埋め込みの説明
@1@ : ANY LENGTHまたはTYPE．
例題
[C2375.cob] 000001 CLASS-ID. C2375 . 000002 ENVIRONMENT DIVISION. 000003 OBJECT. 000004 PROCEDURE DIVISION. 000005 METHOD-ID. M2375. 000006 DATA DIVISION. 000007 LINKAGE SECTION. 000008 01 X PIC N ANY LENGTH. 000009 78 V1 VALUE IS 000010 LENGTH OF X. 000011 PROCEDURE DIVISION USING X. 000012 EXIT METHOD. 000013 END METHOD M2375. 000014 END OBJECT. 000015 END CLASS C2375.
C2375.cob 10: JMN2375I-S LENGTH OFで指定されたデータ項目に，ANY LENGTH句が指定されています．この名前付き定数は無効になります．
詳細な説明
名前付き定数のデータ記述項(レベル番号が78)でLENGTH OFを指定した場合，LENGTH OFで指定したデータ名の項目長がその名前付き定数の値となります．LENGTH OFに指定されたデータ記述項にTYPE句やANY LENGTH句が指定されていると，項目長が確定できないのでこれらの句は指定できません．
