例
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が現れるまで読み飛ばします.
詳細な説明
ファイルを開くときのモードを「オープンモード」といいます.オープンモードには,入力モード(INPUT),出力モード(OUTPUT),入出力両用モード(I-O)および拡張モード(EXTEND)の4種類があります.
どのモードでファイルを開くかを,OPEN文で指定します.