COBOL/400 Language Help

Format 2 (MULTIPLY with GIVING)

Description
In Format 2, the value of identifier-1 or literal-1 is multiplied by the value of identifier-2 or literal-2. The product is then stored in the data items referenced by identifier-3. The composite of operands in an arithmetic statement can have a maximum of 30 digits.
Format 2 (MULTIPLY with GIVING)
 
->->--MULTIPLY-*--identifier-1-*-BY-*-identifier-2-*------->
             *--literal-1----*    *--literal-2---*
 
          *-----------------------*
          V                       +
->--GIVING identifier-3--*---------*---------------------->
                        *-ROUNDED-*
 
->---*-----------------------------------------------*---->
    *--*----*--SIZE ERROR imperative-statement-1----*
       *-ON-*
 
->---*-------------------------------------------------*-->
    *-NOT--*----*--SIZE ERROR imperative-statement-2--*
           *-ON-*
 
->----*---------------*-----------------------------------><-
     *-END-MULTIPLY--*
 

identifier-1 or -2

Identifier-1 and identifier-2 must name an elementary numeric item.

literal-1

Literal-1 must be numeric.

literal-2

Literal-2 must be numeric.

identifier-3

Identifier-3 must name an elementary numeric or numeric-edited item.


[ Top of Page | Previous Page | Next Page | Table of Contents ]