700-PRINT-RPT-GRP

700-PRINT-RPT-GRP builds a report page, then prints each line. Use this routine when you want the system to control the details of report appearance (such as line format, line advancing, page breaks, and new page headers) rather than controlling those details yourself.

Report distribution services allow reports to be sent to users under control of the program.

Library

This routine is not in a library. It is part of a template and is included in your source program when you compile.
Input Report group number
Output Printed lines

Programming Example

This example prints a report group.

  IF (WS-EMP-GOOD)      
      WRITE EVS-SSN-REC       FROM EVS-EVS-SSN-REC
      ADD 1                   TO WS-COUNT      
      MOVE GN2D-EMP-EMPLOYEE  TO RPT-GROUP-REQUEST      
      PERFORM 700-PRINT-RPT-GRP.