引数の説明
文 |
一意名 |
例
000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. C3331. 000003 DATA DIVISION. 000004 WORKING-STORAGE SECTION. 000005 01 A1 PIC 99PP. 000006 PROCEDURE DIVISION. 000007 MOVE 1234 TO A1. 000008 END PROGRAM C3331.
C3331.cob (7) : JMN3331I-W MOVE文の数字定数からP付き数字項目'A1'への転記は,数字項目のPに対応する部分の文字位置の値が反映されません.