CCP COBOL ASSIGNMENT #10
CICS -- UPDATE SESSION

Purpose:

                    To learn how to write CICS COBOL programs
                    to update an indexed file.
                    Print a report in TSO.

Instructions:
 

CHOOSE ONE OF THE FOLLOWING:

1) FILE-A:

1) File-A. Contains student number, name , 0 to 5 grades, total credits, and grade-points average ( the last two are automatically calculated when there is an ADD) All fields except student number and name should be able to be changed (Hence, there can be a change in total credits and grade-points average which is automatically determined)

2) FILE-B:

Define fields and input data for employee number(Primary Key), name, address, social sec #, hours worked, hourly rate, base pay, overtime, and gross pay (the last three are automatically calculated when there is an ADD).  All fields except employee number and name should be able to be changed (hence, there can be a change in base pay, overtime, and gross pay which is automatically determined).

3) FILE-C:

Define fields and input data for book number(Primary Key), book name, publisher, quantity, retail price, wholesale price, amount sold, net profit, and inventory amount (the last two are automatically calculated when there is an ADD). All fields except book number and book name should be able to be changed (hence, there can be a change in net profit and inventory amount which is automatically determined).
 
4) FILE-D:

Define fields and input data for employee number(Primary Key), name, Social Security number, address, marital status, weekly salary, YTD salary, weekly FICA, and YTD FICA (the last three are automatically calculated when there is an ADD).  All fields except employee number, name and Social Security number should be changeable hence there can be a change in weekly FICA, YTD FICA and YTD salary if the weekly salary changes).

5) FILE-E:

Define fields and input data for student number(Primary Key), name, up to five course numbers, total credits, and total tuition (the last two are automatically calculated when there is an ADD).  All fields except student id number and name should be changed (hence, there can be a change in total credits and total tuition if the number of courses taken changes).

6) FILE-F:
Define fields and input data for customer number(Primary Key), name, address, current meter reading, previous meter reading, kilowatts used, cost/kw, invoice amount.  All fields except customer number should be changed (hence kilowatts used and invoice amount changes).

7) FILE-G:

Define fields and input data for customer number(Primary Key), name, address, liability amount, collision amount, comprehensive amount, number of tickets, number of accidents this year, basic semi-annual premium, surcharge (if any) and total semi-annual premium (the last three are automatically calculated when there is an ADD).  All fields except number and name can be updated (hence, there can be a change in the calculated fields).
-----
Student number, account number, employee number, or book number are all Primary Keys -- first eight bytes.  You need NOT worry about the alternate key for this program except that all names (student's last name, employee's last name, and book name) start in column 121 of your file and are 30 bytes in length.

The above is worth 40 points.  The report, which includes header lines, date of run, and two final totals is worth 10 points.  Name the job "TENDUMP".  Make sure you have 10-20 records entered. Since two totals are required -- one from the current file and 1 from the changed file, I will run the report, then do some adds, deletes, and changes in CICS, then run the report again.

Send me email when your job is ready for review.  In the email, tell me
 
    PROGRAM 10 is ready
    Transaction name = ???? (4 character name)
    Your Name

    Choice of 1 or 2 below
    
        1) I dare you to bomb it