例
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID. C1026.
000003 DATA DIVISION.
000004 WORKING-STORAGE SECTION.
000005 01 NCHAR PIC N(1) VALUE N"".
000006 END PROGRAM C1026.
C1026.cob (5) : JMN1026I-S 日本語定数の長さはゼロであってはいけません．1字の空白とみなします．