引数の説明
INVOKE. |
例
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID. P5552.
000003 ENVIRONMENT DIVISION.
000004 CONFIGURATION SECTION.
000005 REPOSITORY.
000006 CLASS SYSSTR AS "System.String".
000007 DATA DIVISION.
000008 WORKING-STORAGE SECTION.
000009 01 WOBR OBJECT REFERENCE SYSSTR.
000010 PROCEDURE DIVISION.
000011 INVOKE SYSSTR "Concat" USING BY VALUE WOBR
000012 BY VALUE "#ADD"
000013 ON EXCEPTION DISPLAY "NG".
000014 INVOKE SYSSTR "Concat" USING BY VALUE WOBR
000015 BY VALUE "#ADD"
000016 ON OVERFLOW DISPLAY "NG".
000017 END PROGRAM P5552.
P5552.cob (11) : JMN5552I-S INVOKE文に条件指定は記述できません.INVOKE文を無効とします.
P5552.cob (14) : JMN5552I-S INVOKE文に条件指定は記述できません.INVOKE文を無効とします.
詳細な説明
ここでの条件指定とは,次の指定を指します.
ON OVERFLOW指定
ON EXCEPTION指定