引数の説明
PICTURE句のFROM指定,PROMPT句,CONTROL句,SIZE句,LINE NUMBER句またはCOLUMN NUMBER句. |
エラーの原因となった語. |
例
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID. P2950.
000003 ENVIRONMENT DIVISION.
000004 INPUT-OUTPUT SECTION.
000005 FILE-CONTROL.
000006 SELECT RPT-FILE ASSIGN RPTFILE.
000007 I-O-CONTROL.
000008 DATA DIVISION.
000009 FILE SECTION.
000010 FD RPT-FILE
000011 REPORT IS RPT-1.
000012 REPORT SECTION.
000013 RD RPT-1
000014 PAGE LIMITS ARE 66 LINES.
000015 01 DE01 TYPE IS DE.
000016 02 LINE PLUS 1.
000017 03 COLUMN 1
000018 PIC X(80) VALUE ALL "---+---+".
000019 SCREEN SECTION.
000020 01 WSC1 PIC X(80) FROM DE01.
000021 PROCEDURE DIVISION.
000022 END PROGRAM P2950.
P2950.cob (20) : JMN2950I-S PICTURE句のFROM指定に記述された一意名'DE01'は,ファイル節,作業場所節,局所記憶節,連絡節,基底場所節または定数節で定義されたものでなければなりません.次の認識できる句,段落,節または部まで無効になります.