引数の説明
INVOKE. |
例
000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. P5553. 000003 ENVIRONMENT DIVISION. 000004 CONFIGURATION SECTION. 000005 REPOSITORY. 000006 CLASS SYSSTR AS "System.String". 000007 DATA DIVISION. 000008 WORKING-STORAGE SECTION. 000009 01 WPR1 OBJECT REFERENCE SYSSTR. 000010 01 WRT OBJECT REFERENCE SYSSTR. 000011 PROCEDURE DIVISION. 000012 INVOKE SYSSTR "Copy" RETURNING WRT 000013 USING WPR. 000014 END PROGRAM P5553.
P5553.cob (13) : JMN5553I-S INVOKE文のUSING指定の位置に誤りがあります.INVOKE文を無効とします.
詳細な説明
USING指定は,RETURNING指定の後に指定してはなりません.