埋め込みの説明
@1@ : 一意名
例題
[C3400.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. C3400. 000003 DATA DIVISION. 000004 BASED-STORAGE SECTION. 000005 01 REC-1 BASED ON PT. 000006 02 KEY-REC PIC XX. 000007 02 FILLER PIC X(78). 000008 WORKING-STORAGE SECTION. 000009 01 PT POINTER. 000010 PROCEDURE DIVISION. 000011 ACCEPT REC-1 FROM CRT. 000012 END PROGRAM C3400.
C3400.cob 11: JMN3400I-S ACCEPT文の'REC-1'は作業場所節で定義されていなければなりません．
