埋め込みの説明
@1@ : TYPEDEF
例題
[C1699.cob] 000001 IDENTIFICATION DIVISION. 000002 CLASS-ID. C1699. 000003 ENVIRONMENT DIVISION. 000004 IDENTIFICATION DIVISION. 000005 OBJECT. 000006 PROCEDURE DIVISION. 000007 METHOD-ID. M1699. 000008 DATA DIVISION. 000009 WORKING-STORAGE SECTION. 000010 01 TYPEDEF. 000011 END METHOD M1699. 000012 END OBJECT. 000013 END CLASS C1699.
C1699.cob 10: JMN1699I-S 無名項目にTYPEDEF句を指定することはできません．TYPEDEF句は無効になります．
C1699.cob 10: JMN2222I-S PICTURE句がありません．PICTURE 9が指定されたものとみなします．
