-
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.
-
Press
Ctrl+S to save the changes.
-
On the
Build menu, click
Compile.
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.