引数の説明
ADD/SUBTRACT/MULTIPLY/DIVIDE |
一意名の名標 |
例
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID. C3062.
000003 ENVIRONMENT DIVISION.
000004 DATA DIVISION.
000005 WORKING-STORAGE SECTION.
000006 01 A PIC X(4).
000007 01 B PIC 9(4).
000008 PROCEDURE DIVISION.
000009 P-START.
000010 ADD A TO B.
000011 SUBTRACT A FROM B.
000012 MULTIPLY A BY B.
000013 DIVIDE A INTO B.
000014 STOP RUN.
C3062.cob (10) : JMN3062I-S ADD文の作用対象'A'は,数字項目でなければなりません.
C3062.cob (11) : JMN3062I-S SUBTRACT文の作用対象'A'は,数字項目でなければなりません.
C3062.cob (12) : JMN3062I-S MULTIPLY文の作用対象'A'は,数字項目でなければなりません.
C3062.cob (13) : JMN3062I-S DIVIDE文の作用対象'A'は,数字項目でなければなりません.