例
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID. C1436.
000003 ENVIRONMENT DIVISION.
000004 DATA DIVISION.
000005 WORKING-STORAGE SECTION.
000006 01 A PIC B(12345678901)A.
000007 PROCEDURE DIVISION.
000008 STOP RUN.
C1436.cob (6) : JMN1436I-S PICTURE文字列で，反復回数のけた数は，10けた以下でなければなりません．最初の10けたが指定されたとみなします．