埋め込みの説明
@1@ : TYPE句に指定した名標
例題
[P5140.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. P5140. 000003 DATA DIVISION. 000004 WORKING-STORAGE SECTION. 000005 01 A TYPE B. 000006 01 B. 000007 02 B1 PIC S9(9) BINARY. 000008 02 B2 PIC X(1024). 000009 PROCEDURE DIVISION. 000010 STOP RUN. 000011 END PROGRAM P5140.
P5140.cob 5: JMN5140I-S TYPE句の名標'B'は，一意な型名でなければなりません．TYPE句は無効になります．
詳細な説明
型宣言を指定するTYPE句では，型名(TYPEDEF句を指定した01レベルのデータ記述項の項目名)を指定しなければなりません．
