NetCOBOL for .NET V8.0 メッセージ集

2.3.184 JMN2372I-S

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

引数の説明

@1@:

エラーの原因となった名前付き定数名．

例

      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指定のデータ項目の大きさが確定している必要があります．