埋め込みの説明
@1@: 一意名
@2@: FUNCTION NATIONAL, FUNCTION NATIONAL-OF
例題
000001 @OPTIONS ENCODE(UTF8,UTF32) 000002 IDENTIFICATION DIVISION. 000003 PROGRAM-ID. P3567. 000004 ENVIRONMENT DIVISION. 000005 CONFIGURATION SECTION. 000006 SPECIAL-NAMES. 000007 ALPHABET UTF32B NATIONAL UTF32BE. 000008 DATA DIVISION. 000009 WORKING-STORAGE SECTION. 000010 01 GRP-DATA. 000011 02 X-DATA-1 PIC X(5) VALUE "UTF-8". 000012 02 N-DATA-2 PIC N(6) ENCODING UTF32B VALUE NC"UTF-32". 000013 01 RCV PIC N(30). 000014 PROCEDURE DIVISION. 000015 MOVE FUNCTION NATIONAL(GRP-DATA) TO RCV. 000016 DISPLAY RCV. 000017 END PROGRAM P3567.
p3567.cob 15: JMN3567I-W FUNCTION NATIONALの引数に指定された集団項目'GRP-DATA'は,エンコード方式が異なる日本語項目を含んでいます.'GRP-DATA'の日本語項目は英数字項目のエンコード方式として扱われます.