埋め込みの説明
@1@ : 一意名(集団項目)
例題
[C3516I-S.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. C3516I-S. 000003 ENVIRONMENT DIVISION. 000004 INPUT-OUTPUT SECTION. 000005 FILE-CONTROL. 000006 SELECT A-FILE ASSIGN TO SYS001 000007 ORGANIZATION IS LINE SEQUENTIAL. 000008 DATA DIVISION. 000009 FILE SECTION. 000010 FD A-FILE. 000011 01 A-RECORD. 000012 02 X24 PIC X(24). 000013 WORKING-STORAGE SECTION. 000014 01 XNMIXGR. 000015 02 X04 PIC X(24). 000016 02 N10 PIC N(10). 000017 PROCEDURE DIVISION. 000018 WRITE A-RECORD FROM XNMIXGR 000019 EXIT PROGRAM. 000020 END PROGRAM C3516I-S.
C3516I-S.cob 18: JMN3516I-S 実行時のコード系がUnicodeの場合，行順ファイルのWRITE文には，日本語項目とその他の項目を含む集団項目'XNMIXGR'は指定できません．
