例題
[P2512.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. P2512. 000003 ENVIRONMENT DIVISION. 000004 INPUT-OUTPUT SECTION. 000005 FILE-CONTROL. 000006 SELECT SQFILE1 ASSIGN TO SYS001 000007 ORGANIZATION IS SEQUENTIAL. 000008 DATA DIVISION. 000009 FILE SECTION. 000010 FD SQFILE1. 000011 01 SQF1REC. 000012 02 PIC X(80). 000013 WORKING-STORAGE SECTION. 000014 PROCEDURE DIVISION. 000015 OPEN SQFILE1. 000016 END PROGRAM P2512.
P2512.cob 15: JMN2512I-S OPEN文にINPUT,OUTPUT,I-OまたはEXTENDが指定されていません.INPUT,OUTPUT,I-OまたはEXTENDが現れるまで読み飛ばします.
P2512.cob 15: JMN2557I-S OPEN文の書き方が不完全です.
詳細な説明
ファイルを開くときのモードを「オープンモード」といいます.オープンモードには,入力モード(INPUT),出力モード(OUTPUT),入出力両用モード(I-O)および拡張モード(EXTEND)の4種類があります.
どのモードでファイルを開くかを,OPEN文で指定します.