引数の説明
TRACK-AREA,TRACK-LIMIT,PRINTING POSITION |
例
000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. C1256. 000003 ENVIRONMENT DIVISION. 000004 CONFIGURATION SECTION. 000005 SPECIAL-NAMES. 000006 POSITIONING UNIT PUN-A IS 12 CPI. 000007 DATA DIVISION. 000008 WORKING-STORAGE SECTION. 000009 01 REC-A PIC X(10) PRINTING POSITION IS 0 BY PUN-A. 000010 END PROGRAM C1256.
C1256.cob (9) : JMN1256I-S PRINTING POSITION句の整数に0は指定できません.