例
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID. C1421.
000003 ENVIRONMENT DIVISION.
000004 DATA DIVISION.
000005 WORKING-STORAGE SECTION.
000006 01 A PIC 9\.
000007 01 B PIC \+9.
000008 01 C PIC B\9.
000009 01 D PIC V\9.
000010 01 E PIC 9+P.
000011 01 F PIC 9+B.
000012 01 G PIC ++9+.
000013 01 H PIC \\9\.
000014 01 I PIC +9+.
000015 PROCEDURE DIVISION.
000016 STOP RUN.
C1421.cob (6) : JMN1421I-S PICTURE文字列で,固定挿入文字の'+','-'または通貨編集用文字が誤った位置に指定されています.PICTURE 9とみなします.
C1421.cob (7) : JMN1421I-S PICTURE文字列で,固定挿入文字の'+','-'または通貨編集用文字が誤った位置に指定されています.PICTURE 9とみなします.
C1421.cob (8) : JMN1421I-S PICTURE文字列で,固定挿入文字の'+','-'または通貨編集用文字が誤った位置に指定されています.PICTURE 9とみなします.
C1421.cob (9) : JMN1421I-S PICTURE文字列で,固定挿入文字の'+','-'または通貨編集用文字が誤った位置に指定されています.PICTURE 9とみなします.
C1421.cob (10) : JMN1421I-S PICTURE文字列で,固定挿入文字の'+','-'または通貨編集用文字が誤った位置に指定されています.PICTURE 9とみなします.
C1421.cob (11) : JMN1421I-S PICTURE文字列で,固定挿入文字の'+','-'または通貨編集用文字が誤った位置に指定されています.PICTURE 9とみなします.
C1421.cob (12) : JMN1421I-S PICTURE文字列で,固定挿入文字の'+','-'または通貨編集用文字が誤った位置に指定されています.PICTURE 9とみなします.
C1421.cob (13) : JMN1421I-S PICTURE文字列で,固定挿入文字の'+','-'または通貨編集用文字が誤った位置に指定されています.PICTURE 9とみなします.
C1421.cob (14) : JMN1421I-S PICTURE文字列で,固定挿入文字の'+','-'または通貨編集用文字が誤った位置に指定されています.PICTURE 9とみなします.