例
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID. C1534.
000003 ENVIRONMENT DIVISION.
000004 INPUT-OUTPUT SECTION.
000005 FILE-CONTROL.
000006 SELECT IN-F ASSIGN DISK
000007 ORGANIZATION SEQUENTIAL
000008 PADDING CHARACTER IS "AB".
000009 DATA DIVISION.
000010 FILE SECTION.
000011 FD IN-F.
000012 01 IN-R PIC X(80).
000013 END PROGRAM C1534.
C1534.cob (8) : JMN1534I-S PADDING CHARACTER句の文字定数の長さは1文字でなければなりません.先頭1文字を文字定数とみなします.