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