引数の説明
プログラム名 |
一意名 |
"仮パラメタ" |
例
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID. C3324S.
000003 DATA DIVISION.
000004 LINKAGE SECTION.
000005 01 U PIC X(05).
000006 PROCEDURE DIVISION
000007 USING U.
000008 EXIT PROGRAM.
000009 END PROGRAM C3324S.
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID. C3324.
000003 DATA DIVISION.
000004 WORKING-STORAGE SECTION.
000005 01 U PIC 9(05).
000006 PROCEDURE DIVISION.
000007 CALL "C3324S" USING U. *> JMN3324I-S
000008 EXIT PROGRAM.
000009 END PROGRAM C3324.
C3324.cob (7) : JMN3324I-W CALL文のUSINGまたはRETURNING指定に記述したパラメタ'U'の型は,プログラム'C3324S'のPROCEDURE DIVISION USINGまたはRETURNING指定に記述した仮パラメタの型と一致していなければなりません.