例題
[C1411.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. C1411. 000003 ENVIRONMENT DIVISION. 000004 DATA DIVISION. 000005 WORKING-STORAGE SECTION. 000006 01 A PIC ++Z. 000007 01 B PIC \\Z. 000008 01 C PIC *--. 000009 01 D PIC *Z. 000010 01 E PIC ++--. 000011 01 F PIC --\\. 000012 01 G PIC \\++. 000013 PROCEDURE DIVISION. 000014 STOP RUN.
C1411.cob 6: JMN1411I-S PICTURE文字列で,'+','-','*','Z'および通貨編集用文字を浮動置換え文字として使うときには,このうち1種類しか書けません.PICTURE 9とみなします.
C1411.cob 7: JMN1411I-S PICTURE文字列で,'+','-','*','Z'および通貨編集用文字を浮動置換え文字として使うときには,このうち1種類しか書けません.PICTURE 9とみなします.
C1411.cob 8: JMN1411I-S PICTURE文字列で,'+','-','*','Z'および通貨編集用文字を浮動置換え文字として使うときには,このうち1種類しか書けません.PICTURE 9とみなします.
C1411.cob 9: JMN1411I-S PICTURE文字列で,'+','-','*','Z'および通貨編集用文字を浮動置換え文字として使うときには,このうち1種類しか書けません.PICTURE 9とみなします.
C1411.cob 10: JMN1411I-S PICTURE文字列で,'+','-','*','Z'および通貨編集用文字を浮動置換え文字として使うときには,このうち1種類しか書けません.PICTURE 9とみなします.
C1411.cob 11: JMN1411I-S PICTURE文字列で,'+','-','*','Z'および通貨編集用文字を浮動置換え文字として使うときには,このうち1種類しか書けません.PICTURE 9とみなします.
C1411.cob 12: JMN1411I-S PICTURE文字列で,'+','-','*','Z'および通貨編集用文字を浮動置換え文字として使うときには,このうち1種類しか書けません.PICTURE 9とみなします.