2.3.188 JMN1309I-S

順ファイルの場合，ACCESS MODE句はSEQUENTIALでなければなりません． SEQUENTIALとみなします．

例題

[C1309.cob]
000001 IDENTIFICATION  DIVISION.
000002 PROGRAM-ID.     C1309.
000003 ENVIRONMENT     DIVISION.
000004 INPUT-OUTPUT    SECTION.
000005 FILE-CONTROL.
000006     SELECT INFILE ASSIGN TO SYS1
000007     ACCESS MODE IS DYNAMIC.
000008 DATA            DIVISION.
000009 FILE            SECTION.
000010 FD  INFILE.
000011 01  INREC.
000012   02  KEY1   PIC X(80).
000013 END PROGRAM     C1309.

C1309.cob 7: JMN1309I-S 順ファイルの場合，ACCESS MODE句はSEQUENTIALでなければなりません．SEQUENTIALとみなします．