例題
[c1854.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. C1854. 000003 ENVIRONMENT DIVISION. 000004 CONFIGURATION SECTION. 000005 SPECIAL-NAMES. 000006 ALPHABET UTF FOR NATIONAL IS UTF16 000007 ALPHABET UTF FOR NATIONAL IS UTF32. 000008 DATA DIVISION. 000009 WORKING-STORAGE SECTION. 000010 01 DATA1 PIC N ENCODING UTF. 000011 END PROGRAM C1854.
c1854.cob 10: JMN1854I-S ENCODING句に指定された符号系名が多重定義です.ENCODING句は無効になります.