ページの先頭行へ戻る
NetCOBOL V11.1 メッセージ集
FUJITSU Software

2.4.336 JMN2553I-S

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で指定した値ぶん減らされます.