引数の説明
INVOKEまたはCALL. |
例
000001 IDENTIFICATION DIVISION.
000002 CLASS-ID. C5707.
000003 IDENTIFICATION DIVISION.
000004 STATIC.
000005 PROCEDURE DIVISION.
000006 IDENTIFICATION DIVISION.
000007 METHOD-ID. MAIN.
000008 DATA DIVISION.
000009 WORKING-STORAGE SECTION.
000010 01 WOBJ OBJECT REFERENCE C5707.
000011 PROCEDURE DIVISION.
000012 INVOKE WOBJ "M5707" USING BY REFERENCE C5707.
000013 END METHOD MAIN.
000014 END STATIC.
000015*
000016 IDENTIFICATION DIVISION.
000017 OBJECT.
000018 PROCEDURE DIVISION.
000019 IDENTIFICATION DIVISION.
000020 METHOD-ID. M5707.
000021 DATA DIVISION.
000022 LINKAGE SECTION.
000023 01 LK1 OBJECT REFERENCE C5707.
000024 PROCEDURE DIVISION.
000025 END METHOD M5707.
000026 END OBJECT.
000027 END CLASS C5707.
C5707.cob (12) : JMN5707I-S INVOKE文のBY REFERENCE指定には,定数節で定義したデータ項目,定数,定義済みオブジェクト一意名,クラス名,インタフェース名,デリゲート名,ENUM名は指定できません.INVOKE文を無効とします.
詳細な説明
診断メッセージに列記されている型の項目は,BY REFERENCE指定の引数としては指定できません.