引数の説明
受取り側に指定された項目名 |
例
000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. C3037. 000003 ENVIRONMENT DIVISION. 000004 DATA DIVISION. 000005 WORKING-STORAGE SECTION. 000006 01 A. 000007 02 B PIC X OCCURS 1 TO 10 DEPENDING ON C. 000008 01 C PIC 99. 000009 PROCEDURE DIVISION. 000010 P-START. 000011 INITIALIZE A C. 000012 STOP RUN.
C3037.cob (11) : JMN3037I-S INITIALIZE文に,DEPENDING指定のOCCURS句を含む項目'A'は指定できません.