In the working-storage section of the program, beneath the file name and key definitions, paste the following code:
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,
fcd-record-address to the address of
Ctrl+S to save the changes.
Build menu, click
Ensure that your changes so far compile successfully.
The working-storage section is now complete, next you will create the necessary source code in the procedure division.