引数の説明
INVOKEまたはCALL. |
例
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID. P5555.
000003 ENVIRONMENT DIVISION.
000004 CONFIGURATION SECTION.
000005 REPOSITORY.
000006 CLASS SYSINT AS "System.Int32".
000007 DATA DIVISION.
000008 CONSTANT SECTION.
000009 01 CNST-DATA PIC S9(9) COMP-5 VALUE 0.
000010 PROCEDURE DIVISION.
000011 INVOKE SYSINT "Parse" USING BY VALUE "123"
000012 RETURNING CNST-DATA.
000013 END PROGRAM P5555.
P5555.cob (12) : JMN5555I-S INVOKE文のRETURNINGに指定可能な一意名は,ファイル節,作業場所節,局所記憶節または連絡節で定義されたデータ項目でなければなりません.INVOKE文を無効とします.