引数の説明
一意名 |
例
000001 PROGRAM-ID. C3499S. 000002 DATA DIVISION. 000003 LINKAGE SECTION. 000004 01 L1 PIC S9(9) COMP-5. 000005 PROCEDURE DIVISION USING L1. 000006 END PROGRAM C3499S.
000001 PROGRAM-ID. C3499. 000002 DATA DIVISION. 000003 WORKING-STORAGE SECTION. 000004 01 S9COMP5 PIC S9(9) COMP-5. 000005 PROCEDURE DIVISION. 000006 CALL "C3499S" USING BY VALUE S9COMP5 *> JMN3499I-S 000007 END PROGRAM C3499. 000008*
C3499.cob (6) : JMN3499I-S BY REFERENCE指定の仮パラメタに対応するUSINGパラメタ'S9COMP5'は,BY REFERENCE指定またはBY CONTENT指定でなければなりません.