引数の説明
エラーの原因となったファイル名. |
例
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID. P2131.
000003 ENVIRONMENT DIVISION.
000004 INPUT-OUTPUT SECTION.
000005 FILE-CONTROL.
000006 SELECT RLFILE1 ASSIGN TO SYS001
000007 ORGANIZATION IS RELATIVE.
000008 I-O-CONTROL.
000009 MULTIPLE FILE TAPE CONTAINS RLFILE1.
000010 DATA DIVISION.
000011 FILE SECTION.
000012 FD RLFILE1.
000013 01 RLF1REC.
000014 02 PIC X(80).
000015 WORKING-STORAGE SECTION.
000016 PROCEDURE DIVISION.
000017 END PROGRAM P2131.
P2131.cob (9) : JMN2131I-S MULTIPLE FILE TAPE句のファイル名'RLFILE1'は順ファイルでなければなりません.
詳細な説明
MULTIPLE FILE TAPE句は廃要素です.このコンパイラでは,MULTIPLE FILE TAPE句は注釈とみなされます.