埋め込みの説明
@1@ : ASSIGN
@2@ : @1@句に指定されたデータ名
例題
[P5158.cob] 000001 @OPTIONS RCS(UCS2) 000002 IDENTIFICATION DIVISION. 000003 PROGRAM-ID. P5158. 000004 ENVIRONMENT DIVISION. 000005 INPUT-OUTPUT SECTION. 000006 FILE-CONTROL. 000007 SELECT SQFILE1 ASSIGN TO WFILNM 000008 ORGANIZATION IS SEQUENTIAL 000009 FILE STATUS IS WFS1. 000010 I-O-CONTROL. 000011 DATA DIVISION. 000012 FILE SECTION. 000013 FD SQFILE1. 000014 01 SQF1REC. 000015 02 PIC X(80). 000016 WORKING-STORAGE SECTION. 000017 01 WFS1 PIC X(2). 000018 01 WFILNM. 000019 02 PIC N(10). 000020 PROCEDURE DIVISION. 000021 END PROGRAM P5158.
P5158.cob 18: JMN5158I-S 日本語データの実行時コード系がUNICODEの場合，ASSIGN句のデータ名'WFILNM'は日本語を含む集団項目であってはなりません．書かれたとおりに受け入れます．
詳細な説明
NetCOBOLでUnicodeデータを扱う場合，日本語項目の表現形式はUCS-2です．一方，集団項目(字類は英数字)の表現形式はUTF-8になります．集団項目として扱う場合は，集団に従属する日本語項目の領域にもUTF-8表現形式のデータが格納されるため，日本語項目として適切なデータになりません．
