引数の説明
PICTURE句のFROM指定,PICTURE句のUSING指定,,PICTURE句のTO指定,PROMPT句,CONTROL句,SIZE句,LINE NUMBER句,COLUMN NUMBER句 |
例
000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. P5137. 000003 ENVIRONMENT DIVISION. 000004 CONFIGURATION SECTION. 000005 REPOSITORY. 000006 CLASS SYSOBJ AS "System.Object". 000007 DATA DIVISION. 000008 WORKING-STORAGE SECTION. 000009 01 WOBR OBJECT REFERENCE SYSOBJ. 000010 SCREEN SECTION. 000011 01 WSCR PIC X(8) USING WOBR. 000012 PROCEDURE DIVISION. 000013 END PROGRAM P5137.
P5137.cob (11) : JMN5137I-S PICTURE句のUSING指定のデータ名は,オブジェクト参照データ項目またはこれを含む集団項目であってはなりません.データ名は無効になります.