Note: please follow those rule below
- Process this file must use with duplicate
- Must use the structure of program in the below. Do not use your own structure.
- I would like to see the structure in the program.
This program involves working with alternate indexes in indexed files.
You are given an alternate index indexed file DEALER.dat. The contents of this file are:
A0421 ABC Trucking
A0618 ABC Trucking
A0675 DEF Warehousing
A1330 DEF Warehousing
A1366 Zebra Cleaning
A1957 Zebra Cleaning
A2001 Zebra Cleaning
A2275 Pacific Welding
A2309 Pacific Welding
A2506 Jackson Machining
A2622 Jackson Machining
A2643 Rhodes Grinding
A2855 Rhodes Grinding
B1040 ABC Trucking
B1322 ABC Trucking
B2226 Yorba Accessories
B2291 Yorba Accdssories
B2402 Midwest Suppliers
B2407 Midwest Suppliers
B2630 Marsh Outfitters
C3192 Marsh Outfitters
C3198 ACF Industries
C3645 Zebra Cleaning
You are also given Alternate-Indexed-To-Sequential.cbl to enable you to see the contents of DEALER.dat file.
The primary index (called Dealer-Number) is the first 8 characters, e.g. "A0421", and the alternate index (called Dealer-Name) is the next 21 characters,
e.g. "ABC Trucking". The alternate index allows duplicates.
You will create an output sequential file: DEALER-OUT.prnthat will include the results of doing various operations on the DEALER.dat file. Each operation will require printing the result of the read operation as: Dealer-Number followed by one space followed by Dealer-Name.
******************************************************************************
The operations you will perform in the exact order given are:
1. two sequential reads at the beginning of the file without referring to any data in the file.
2. a random read using the primary key starting at "B1040" followed by two sequential reads.
3. a random read using the alternate key starting with "Pacific Welding" followed by 4 sequential reads.
4. a read in the middle of the file at "B2402"
******************************************************************************
Your output file will look exactly like:
A0421 ABC Trucking
A0618 ABC Trucking
B1040 ABC Trucking
B1322 ABC Trucking
B2226 Yorba Accessories
A2275 Pacific Welding
A2309 Pacific Welding
A2643 Rhodes Grinding
A2855 Rhodes Grinding
B2291 Yorba Accdssories
B2402 Midwest Suppliers
The structure of your program must conform to the following:
Pass in your program, Prog06.cbl
Attachment:- Assignment.rar