引数の説明
PICTURE句のFROM指定またはPROMPT句 |
エラーの原因となった語. |
例
000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. P2940. 000003 ENVIRONMENT DIVISION. 000004 DATA DIVISION. 000005 WORKING-STORAGE SECTION. 000006 01 WTBL. 000007 02 TBL-EL OCCURS 10 INDEXED BY IDX. 000008 03 TBL-EL1 PIC 9(1). 000009 03 TBL-EL2 PIC 9(1). 000010 SCREEN SECTION. 000011 01 SC1 PIC 9(2) FROM IDX. 000012 PROCEDURE DIVISION. 000013 END PROGRAM P2940.
P2940.cob (11) : JMN2940I-S PICTURE句のFROM指定に記述された'IDX'は一意名または定数でなければなりません.