Define the Record Area

  1. In the working-storage section of the program, beneath the file name and key definitions, paste the following code: 
           01 ex-record.
               03 record-key           pic 9(5). 
               03 record-data          pic x(95).

    This area is used when reading and writing records to and from the data file. When setting up the FCD later in this tutorial, you set fcd-record-address to the address of ex-record.

  2. Press Ctrl+S to save the changes.
The working-storage section is now complete, next you will create the necessary source code in the procedure division.
Parent topic: Tutorial
Previous topic: Define the Key Definition Block
Next topic: Set up the FCD
Related reference
Record Area