引数の説明
編成種別 |
ファイル名 |
'INPUT','OUTPUT','I-O','EXTEND' |
例
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID. C3116.
000003 ENVIRONMENT DIVISION.
000004 INPUT-OUTPUT SECTION.
000005 FILE-CONTROL.
000006 SELECT FILE-1 LINE SEQUENTIAL ASSIGN TO PS-SYS001.
000007 DATA DIVISION.
000008 FILE SECTION.
000009 FD FILE-1.
000010 01 REC-1 PIC X(80).
000011 PROCEDURE DIVISION.
000012 OPEN I-O FILE-1.
000013 STOP RUN.
C3116.cob (12) : JMN3116I-S 行順ファイル'FILE-1'は,OPEN文のI-O指定に記述できません.