VMS Help
COBOL, PROCEDURE_DIVISION, DIVIDE, 4format INTO with REMAINDER
 *Conan The Librarian 

  The DIVIDE statement divides one or more numeric data items by another.
  It stores the quotient and remainder.

  Format 4 -

   DIVIDE srcnum INTO srcnum GIVING rsult [ ROUNDED ] REMAINDER remaind

      [ ON SIZE ERROR stment ] [ NOT ON SIZE ERROR stment ]

      [ END-DIVIDE ]

  1 - srcnum 

  is a numeric literal or the identifier of an elementary numeric item.

  2 - rsult 

  is the identifier of an elementary numeric item or an elementary
  numeric edited item.  It is the resultant identifier.

  3 - remaind 

  is the identifier of an elementary numeric item or an elementary
  numeric edited item.

  4 - stment 

  is an imperative statement.
  Close     Help