例
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID. C1023.
000003 DATA DIVISION.
000004 WORKING-STORAGE SECTION.
000005 78 MOJI VALUE "ABCDEFGHIJKLMNOPQRSTUVWXYZ
000006- "ABCDEFGHIJKLMNOPQRSTUVWXYZ
000007- "ABCDEFGHIJKLMNOPQRSTUVWXYZ
000008- "ABCDEFGHIJKLMNOPQRSTUVWXYZ
000009- "ABCDEFGHIJKLMNOPQRSTUVWXYZ
000010- "ABCDEFGHIJKLMNOPQRSTUVWXYZ
000011- "ABCDEFGHIJKLMNOPQRSTUVWXYZ
000012- "ABCDEFGHIJKLMNOPQRSTUVWXYZ".
000013 END PROGRAM C1023.
C1023.cob (5) : JMN1023I-S 定数が最大長を超えています．先頭から最大長までを定数とみなします．
詳細な説明
定数の最大長は160バイトです．1～160バイトの範囲内で記述してください．