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

2.4.186 JMN2372I-S

LENGTH OFで指定されたデータ項目は,名前付き定数@1@の宣言よりも前に完結していなければなりません.

埋め込みの説明

@1@ : エラーの原因となった名前付き定数名.

例題

[P2372.cob]
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID.    P2372.
000003 ENVIRONMENT    DIVISION.
000004 DATA           DIVISION.
000005 WORKING-STORAGE SECTION.
000006 78 WNCT        VALUE LENGTH OF WGRP.
000007 01 WGRP.
000008   02 WELM1     PIC X(10).
000009   02 WELM2     PIC N(10).
000010 PROCEDURE      DIVISION.
000011 END PROGRAM    P2372.

P2372.cob 6: JMN2372I-S LENGTH OFで指定されたデータ項目は,名前付き定数WNCTの宣言よりも前に完結していなければなりません.

詳細な説明

名前付き定数のデータ記述項(レベル番号が78)でLENGTH OFを指定した場合,LENGTH OFで指定したデータ名の項目長がその名前付き定数の値となります.当該名前付き定数の宣言が表れるよりも前に,LENGTH OF指定のデータ項目の大きさが確定している必要があります.