call-file-handler section. call "EXTFH" using opcode, fcd .
This section will be performed a number of times during the demonstration, each time to perform a different operation.
display-file-status section. if fcd-status-key-1 = "9" display "file-status = " fcd-status-key-1 "/" fcd-binary else display "file-status = " fcd-status-key-1 "/" fcd-status-key-2 end-if .
After each operation, this section will be performed to check that the operation was successful.
Now that the working storage has been defined, and you have the code in place to call the file handler, you can create a file and start performing file handling operations on it.