引数の説明
SIA,STD |
ADDRESS OF |
例
000001 @OPTIONS FLAGSW(STDM) 000002 IDENTIFICATION DIVISION. 000003 PROGRAM-ID. P9180. 000004 ENVIRONMENT DIVISION. 000005 DATA DIVISION. 000006 WORKING-STORAGE SECTION. 000007 01 REC01 PIC 9(5). 000008 LINKAGE SECTION. 000009 01 ZPTR0 POINTER. 000010 PROCEDURE DIVISION. 000011 P-START. 000012 SET ADDRESS OF ZPTR0 TO NULLS. 000013 STOP RUN.
P9180.cob (12) : JMN9180I-W (STD)SET文中のADDRESS OF特殊レジスタ指定は共通範囲外です.処理を続行します.