*COMDECK  RPTTBL
00001 ************************************************************      01/17/78
00002 *                                                                 RPTTBL
00003 *     PRINT LINE TABLE                                               LV001
00004 *        USED BY  WRITELNI TO TABLE PRINT RECORDS FOR OUTPUT      RPTTBL
00005 *         BY CALLING PROGRAM                                      RPTTBL
00006 *                                                                 RPTTBL
00007 ***************************************************************** RPTTBL
00008  01  RPTTBL.                                                      RPTTBL
00009      03  RPT-LINE-CT             PICTURE 99.                      RPTTBL
00010      03  RPTTBL-PRINT-LINES.                                      RPTTBL
00011          05  RPT-OUTPUT-LINE OCCURS 40 TIMES.                     RPTTBL
00012              07  RPT-PRT-CTL      PICTURE X.                      RPTTBL
00013              07  RPT-PRT-LINE    PICTURE X(132).                     CL**2
