SET文のUP BYまたはDOWN BYの後は,整数項目または整数でなければなりません.
例題
[P2553.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. P2553. 000003 ENVIRONMENT DIVISION. 000004 DATA DIVISION. 000005 WORKING-STORAGE SECTION. 000006 01 WGRP. 000007 02 WOCC PIC X(1) 000008 OCCURS 10 INDEXED BY IX1. 000009 PROCEDURE DIVISION. 000010 SET IX1 UP BY 1.5 000011 END PROGRAM P2553.
P2553.cob 10: JMN2553I-S SET文のUP BYまたはDOWN BYの後は,整数項目または整数でなければなりません.
詳細な説明
UP BYの前の作用対象の値は,UP BYで指定した値ぶん増やされます.DOWN BYの前の作用対象の値は,DOWN BYで指定した値ぶん減らされます.