引数の説明
SIA,STD |
ADDR,LENG |
例
000001 @OPTIONS FLAGSW(SIA)
000002 IDENTIFICATION DIVISION.
000003 PROGRAM-ID. C9502.
000004 ENVIRONMENT DIVISION.
000005 DATA DIVISION.
000006 WORKING-STORAGE SECTION.
000007 01 WBUF PIC X(20).
000008 01 WPX POINTER.
000009 PROCEDURE DIVISION.
000010 MOVE FUNCTION ADDR(WBUF) TO WPX.
C9502.cob (10) : JMN9502I-W (SIA)関数名ADDRは共通範囲外です.処理を続行します.