引数の説明
エラーの原因となったデータ名. |
例
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID. P2691.
000003 ENVIRONMENT DIVISION.
000004 INPUT-OUTPUT SECTION.
000005 FILE-CONTROL.
000006 SELECT REPFILE ASSIGN TO SYS002.
000007 I-O-CONTROL.
000008 DATA DIVISION.
000009 FILE SECTION.
000010 FD REPFILE
000011 REPORT IS REP1.
000012 WORKING-STORAGE SECTION.
000013 01 WRKREC PIC X(80).
000014 REPORT SECTION.
000015 RD REP1 PAGE 66.
000016 01 DE-REC TYPE DE.
000017 02 LINE PLUS 1.
000018 03 COLUMN 1 PIC X(80) SOURCE WRKREC.
000019 PROCEDURE DIVISION.
000020 DECLARATIVES.
000021 ERR1 SECTION.
000022 USE BEFORE REPORTING DE-REC.
000023 MOVE SPACE TO DE-REC.
000024 END DECLARATIVES.
000025 END PROGRAM P2691.
P2691.cob (23) : JMN2691I-S 報告書節中の'DE-REC'は,手続部では参照してはなりません.
詳細な説明
報告書記述項で宣言した報告書名(レベル指示語RDに続いて指定した名前),および報告集団名(報告書記述項の下位に宣言したデータ記述項で定義したデータ名)は,手続き部では,USE BEFORE REPORTING文あるいはGENERATE/INITIATE/TERMINATE文の中だけで使えます.