COBOL/400 Language Help

Format 4 (DIVIDE INTO, GIVING, with REMAINDER)

Description
In Format 4, the value of identifier-1 or literal-1 is divided into identifier-2 or literal-2. The value of the quotient is stored in identifier-3, and the value of the remainder is stored in identifier-4.
Format 4 (DIVIDE INTO, GIVING, with REMAINDER)
 
->->--DIVIDE--*--identifier-1--*-----INTO----*-identifier-2-*->
            *--literal-1-----*             *-literal-2----*
 
->--GIVING identifier-3--*-----------*----------------------->
                        *--ROUNDED--*
 
->--REMAINDER identifier-4----------------------------------->
 
->----*----------------------------------------------*------->
     *--*----*---SIZE ERROR imperative-statement-1--*
        *-ON-*
 
->---*---------------------------------------------------*--->
    *-NOT---*----*---SIZE ERROR imperative-statement-2--*
            *-ON-*
 
->--*------------*-------------------------------------------><-
   *-END-DIVIDE-*
 


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