Book: COBOL for the 21st Century

ISBN: 1118739531

Chapter: 12

Question: 4PA

Create a report/print out that displays the current date, page number, followed by the rest of the report.

The report has the following headings: Vehicle class, Name, Weight, Fee. It also has a totaal for all fees at the bottom.

The data being read in has 90 entries, one for each vehicle class. AFter the table input file is read and sotred in the table in memeory, read the transaction file. For each transaction record, the vehicle calss must be found in the table to obtain the corresponding registration rate. Registration Fee=Vehicle Weight*Registartion Rate.

Here are the following parameters: Vehicle-Class PIC X(2) / First-Name PIC X(10) / Middle-Initial PIC X(1) / Last-Name PIC X(20) / Weight-Of-Vehicle PIC 9(5) / Vehicle-Description PIC X(13)

Use the STRING verb to format the name as: Last Name, comma, space, frist name, middle initial, period.

Add a "TOTAL" line to the report

Use MOVE CORRESPONDING and the INSPECT verb to format the date.