引数の説明
SIA |
例
000001 @OPTIONS FLAGSW(STDH) 000002 IDENTIFICATION DIVISION. 000003 PROGRAM-ID. P9172. 000004 ENVIRONMENT DIVISION. 000005 DATA DIVISION. 000006 WORKING-STORAGE SECTION. 000007 01 REC01 PIC NBNBNB. 000008 01 REC02 PIC N(3)B(3). 000009 PROCEDURE DIVISION. 000010 P-START. 000011 MOVE REC01 TO REC02. 000012 STOP RUN.
P9172.cob (11) : JMN9172I-W (STD)MOVE文において日本語編集項目から日本語編集項目への転記は共通範囲外です.処理を続行します.