引数の説明
エラーの原因となったファイル名. |
例
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID. P2656.
000003 ENVIRONMENT DIVISION.
000004 INPUT-OUTPUT SECTION.
000005 FILE-CONTROL.
000006 SELECT SQFILE1 ASSIGN TO SYS001.
000007 I-O-CONTROL.
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 DECLARATIVES.
000016 ER1 SECTION.
000017 USE AFTER STANDARD ENDING FILE
000018 LABEL PROCEDURE ON SQFILE1.
000019 END DECLARATIVES.
000020 END PROGRAM P2656.
P2656.cob (18) : JMN2656I-S USE LABEL文に指定されたファイル'SQFILE1'には,LABEL RECORD句でデータ名を指定しなければなりません.'SQFILE1'を無効とします.
詳細な説明
USE LABEL文は,OSIV系システムの固有機能です.