引数の説明
一意名の名標,特殊レジスタの名標,指標名の名標 |
属性 |
一意名の名標,特殊レジスタの名標,指標名の名標 |
属性 |
例
000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. C3077. 000003 ENVIRONMENT DIVISION. 000004 DATA DIVISION. 000005 WORKING-STORAGE SECTION. 000006 01 A PIC S9(3) PACKED-DECIMAL. 000007 01 B PIC XX. 000008 PROCEDURE DIVISION. 000009 P-START. 000010 IF A = B STOP RUN.
C3077.cob (10) : JMN3077I-S 'A'(内部10進)と'B'(英数字)との比較は,許されない組合せの比較です.