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