Top Video Suppliers
|Time to complete||Allow 5-6 hours continuous|
|Program Download||TopSupplierRpt.Cbl is a model answer. Don't look at this until you have made your own attempt at the program.|
TopSuppliers.Rpt (The top suppliers report)
All-Seq-In.Dat is a sequential file that contains the data required to set up the three master files. A transaction code at the beginning of each record signals which of the master files the record belongs to. The program Seq2Direct.Cbl reads this file and from it creates the indexed Video Details File (VDF.DAT), the indexed Video File (Video.Dat), and the Relative Supplier File (Supplier.Dat).
The conversion program is required because direct access files are not standard ASCII files and cannot be viewed or edited in a standard text application like Notepad.
|Major Constructs||Indexed Files, Relative Files, Print Files, READ, START, Tables|
The manager of Metropolis Videos was so pleased with your Video Stock File Maintenance and Report system that he has asked you to write the Top Suppliers Report program detailed below. The report must show the top three Suppliers (by total video earnings) and for each of the top three the most popular video title (by average earnings) in their inventory must be shown.
The system data resides on three master files.
Video Details File (VDF.DAT)
Video File (VIDEO.DAT)
Supplier File (SUPPLIER.DAT)
The report must show the top three Suppliers and the total video earnings for each supplier. For each of the top suppliers, their most popular video title and its average earnings (Total earnings / Number of copies) must be shown . The total earnings for a video title may be obtained by summing the Rental-Earnings for each copy of the video.
All money values should be printed using floating dollar signs and should have commas and decimal points inserted as appropriate. The report should be printed as shown in the print layout chart below.
This COBOL project specification is the copyright property of Michael Coughlan. You have permission to use this material for your own personal use but you may not reproduce it in any published work without written permission from the author.