COBOL/400 Language Help

Format 1 (DIVIDE)

Description
In Format 1 of the DIVIDE statement, the value of identifier-1 or literal-2 is divided into the value of identifier-2; the quotient is then placed in identifier-2. This process is repeated for each successive occurrence.
Format 1 (DIVIDE)
 
                                   *----------------------*
                                   V                      +
->->--DIVIDE-*--identifier-1--*-INTO identifier-2-*---------*->
           *--literal-1-----*                   *-ROUNDED-*
 
->----*----------------------------------------------*------->
     *--*----*---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 ]