例題
000001 @OPTIONS ENCODE(UTF8,UTF16,LE) 000002 IDENTIFICATION DIVISION. 000003 PROGRAM-ID. C3564. 000004 ENVIRONMENT DIVISION. 000005 CONFIGURATION SECTION. 000006 SPECIAL-NAMES. 000007 ALPHABET U16L FOR NATIONAL UTF16LE 000008 ALPHABET U32L FOR NATIONAL UTF32LE 000009 . 000010 DATA DIVISION. 000011 WORKING-STORAGE SECTION. 000012 01 A PIC N(8) ENCODING U16L. 000013 01 B PIC N(8) ENCODING U32L. 000014 PROCEDURE DIVISION. 000015 MOVE A TO B. 000016 END PROGRAM C3564.
C3564.cob 15: JMN3564I-S エンコード方式が異なるデータ項目の転記は記述できません．
