引数の説明
プログラム名 |
一意名 |
一意名 |
例
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID. C3334.
000003 ENVIRONMENT DIVISION.
000004 CONFIGURATION SECTION.
000005 REPOSITORY.
000006 CLASS SYS-BYTE AS "System.Byte".
000007 DATA DIVISION.
000008 WORKING-STORAGE SECTION.
000009 01 U OBJECT REFERENCE SYS-BYTE.
000010 PROCEDURE DIVISION.
000011 CALL "C3334S" USING U.
000012 EXIT PROGRAM.
000013*
000014 IDENTIFICATION DIVISION.
000015 PROGRAM-ID. C3334S.
000016 DATA DIVISION.
000017 LINKAGE SECTION.
000018 01 L-U BINARY-CHAR UNSIGNED.
000019 PROCEDURE DIVISION
000020 USING L-U.
000021 EXIT PROGRAM.
000022 END PROGRAM C3334S.
000023 END PROGRAM C3334.
C3334.cob (11) : JMN3334I-S CALL文のUSING指定またはRETURNING指定に記述したパラメタ'U'の型は,プログラム'C3334S'のPROCEDURE DIVISIONのUSING指定またはRETURNING指定に記述したパラメタ仮パラメタの型と一致していなければなりません.