COBOL Manual for TNS/E Programs (H06.03+)

Procedure Division Verbs
HP COBOL Manual for TNS/E Programs—520347-003
9-273
WRITE
WRITE
WRITE delivers a record to its associated file.
Forms:
•
WRITE for Sequential Files
•
WRITE for Line Sequential Files
•
WRITE for Relative, Indexed, and Queue Files
Example 9-70. USE AFTER EXCEPTION Statement
...
PROCEDURE DIVISION.
DECLARATIVES.
MASTER-FILES SECTION.
USE AFTER EXCEPTION PROCEDURE ON MASTER-1 MASTER-2.
MASTER-ERROR-ROUTINE.
IF FILE-STATUS....
...
DETAIL-FILE SECTION.
USE AFTER EXCEPTION PROCEDURE ON DETAIL-IN.
DETAIL-ERROR-ROUTINE.
...
END DECLARATIVES.
MAIN-SECTION SECTION.
BEGIN-PROGRAM.
...