引数の説明
ファイル名 |
例
000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. C3248. 000003 ENVIRONMENT DIVISION. 000004 INPUT-OUTPUT SECTION. 000005 FILE-CONTROL. 000006 SELECT FILE-1 LINE SEQUENTIAL ASSIGN TO SYS001. 000007 DATA DIVISION. 000008 FILE SECTION. 000009 FD FILE-1 RECORD CONTAINS 0 CHARACTERS. 000010 01 REC-1 PIC X(80). 000011 PROCEDURE DIVISION. 000012 OPEN OUTPUT FILE-1. 000013 STOP RUN.
C3248.cob (12) : JMN3248I-S RECORD CONTAINS 0 CHARACTERS句を指定したファイル'FILE-1'は,OPEN文のOUTPUT指定に記述できません.