例題
000001 @OPTIONS ENCODE(UTF8,UTF16) 000002 IDENTIFICATION DIVISION. 000003 PROGRAM-ID. C5787. 000004 ENVIRONMENT DIVISION. 000005 CONFIGURATION SECTION. 000006 SPECIAL-NAMES. 000007 ALPHABET UTF16 FOR NATIONAL IS UTF16. 000008 DATA DIVISION. 000009 WORKING-STORAGE SECTION. 000010 01 DATA1 PIC N(10) DISPLAY. 000011 PROCEDURE DIVISION. 000012 MOVE CONVERSION "文字列" TO DATA1. 000013 END PROGRAM C5787.
c5787.cob 12: JMN5787I-S CONVERSIONを指定したMOVE文に定数は指定できません.MOVE文は無効になります.