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

2.5.20 JMN3021I-S

2進項目に転記される数字定数は,領域に入り切る値でなければなりません.

例題

[C3021.cob]
000001 IDENTIFICATION  DIVISION.
000002 PROGRAM-ID.  C3021.
000003 DATA DIVISION.
000004 WORKING-STORAGE SECTION.
000005 01  BI01  PIC  S9(4)  COMPUTATIONAL.
000006 PROCEDURE  DIVISION.
000007     MOVE  +54321  TO  BI01.
000008 END PROGRAM C3021.

C3021.cob 7: JMN3021I-S 2進項目に転記される数字定数は,領域に入り切る値でなければなりません.

詳細な説明

TRUNCオプションが無効,かつ2進項目に対して定義桁を超える桁の数字定数を転記する場合,その数字定数が2進値として受取側の2進項目の領域長に収まる値ならば,その値がそのまま転記されます.しかし2進項目の領域長に収まらない場合は,本エラーメッセージが出力されて翻訳は無効となります.ちなみにTRUNCオプションが有効な場合は,数字定数が2進項目の定義桁に合わせて桁落としされて格納されます.