引数の説明
ADD/SUBTRACT |
一意名の名標 |
例
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID. C3064.
000003 ENVIRONMENT DIVISION.
000004 DATA DIVISION.
000005 WORKING-STORAGE SECTION.
000006 01 A.
000007 02 C1 PIC XX.
000008 01 B.
000009 02 C1 PIC 99.
000010 PROCEDURE DIVISION.
000011 P-START.
000012 ADD CORR A TO B.
000013 SUBTRACT CORR A FROM B.
000014 STOP RUN.
C3064.cob (12) : JMN3064I-S CORRESPONDING指定付きのADD文の対応の取れた項目'C1'は,基本数字データ項目でなければなりません.
C3064.cob (13) : JMN3064I-S CORRESPONDING指定付きのSUBTRACT文の対応の取れた項目'C1'は,基本数字データ項目でなければなりません.