埋め込みの説明
@1@ : ALPHANUMERIC, NATIONAL
例題
000001 @OPTIONS ENCODE(UTF8,UTF16) 000002 IDENTIFICATION DIVISION. 000003 PROGRAM-ID. C1853. 000004 ENVIRONMENT DIVISION. 000005 CONFIGURATION SECTION. 000006 SPECIAL-NAMES. 000007 ALPHABET U16 FOR NATIONAL IS UTF16 000008 ALPHABET U32 FOR NATIONAL IS UTF32. 000009 DATA DIVISION. 000010 WORKING-STORAGE SECTION. 000011 01 GDATA1 ENCODING U16 OR U32. 000012 02 DATA1 PIC N. 000013 END PROGRAM C1853.
c1853.cob 11: JMN1853I-S ENCODING句にNATIONAL指定の符号系名が既に指定されています．最初に指定された符号系名を有効とみなします．
