例題
000001 @OPTIONS ENCODE(UTF8,UTF16) 000002 IDENTIFICATION DIVISION. 000003 PROGRAM-ID. C5789. 000004 ENVIRONMENT DIVISION. 000005 CONFIGURATION SECTION. 000006 SPECIAL-NAMES. 000007 ALPHABET UTF8 IS UTF8 000008 ALPHABET UTF16 FOR NATIONAL UTF16 000009 ALPHABET UTF32 FOR NATIONAL UTF32 000010 . 000011 INPUT-OUTPUT SECTION. 000012 FILE-CONTROL. 000013 SELECT F1 ASSIGN TO PRINTER. 000014 DATA DIVISION. 000015 FILE SECTION. 000016 FD F1. 000017 01 REC1. 000018 02 DATA1 PIC X(2). 000019 02 DATA2 PIC N(5) ENCODING UTF16. 000020 02 DATA3 PIC N(5) ENCODING UTF32. 000021 PROCEDURE DIVISION. 000022 END PROGRAM C5789.
c5789.cob 17: JMN5789I-S 印刷ファイル，および，あて先種別にディスプレイ装置またはプリンタ装置を指定した表示ファイルのレコード定義に複数のエンコード方式が混在しています．エンコード方式は英数字項目および日本語項目に各１種類だけ指定できます．
