*COMDECK  WKPRINT 
00001 ******************************************************************02/22/78
00002 ******************************************************************WKPRINT 
00003 *  PRINTER WORK AREA                                                 LV001
00004 ******************************************************************   CL**2
00005 *****************************************************************    CL**2
00006      03  WKPRINT.                                                 WKPRINT 
00007          10  PRT-DATE1-CON.                                       WKPRINT 
00008              15  PRT-DATE1-HCON  PICTURE X(24).                      CL**2
00009             15  PRT-CURRENT-DATE    PICTURE X(8).                 WKPRINT 
00010          10  PRT-DATE2-CON.                                       WKPRINT 
00011              15  PRT-DATE2-HCON  PICTURE X(24).                      CL**2
00012              15  DATE-LAST-REVISION PICTURE X(8).                 WKPRINT 
00013          10  PRT-PAGE-CON.                                        WKPRINT 
00014              15  PRT-PAGE-HCON   PICTURE X(5).                       CL**2
00015              15  PRT-PAGE-NO     PICTURE ZZZZ9.                      CL**2
00016          10  PAGE-NO             PICTURE 9(5).                       CL**2
00017          10  CON-DC              PICTURE X(31).                      CL**2
00018          10  CON-TITLE             PICTURE X(73).                    CL**2
00019          10  CON-USER              PICTURE X(27).                    CL**2
00020          10  PRT-REV-NO-CON.                                      WKPRINT 
00021              15  PRT-REV-NO-HCON  PICTURE X(25).                     CL**2
00022              15  REVISION-NUMBER  PICTURE ZZZZ9.                  WKPRINT 
00023          10  REPORT-TITLE-LONG   PICTURE X(50).                   WKPRINT 
00024          10  USER-TITLE          PICTURE X(50).                      CL**2
00025          10  EOP-MSG             PICTURE X(54).                   WKPRINT 
00026          10  MAX-LINES           PICTURE S99.                     WKPRINT 
00027          10  LINE-CT             PICTURE S99.                     WKPRINT 
00028          10  8BY11-FLAG          PICTURE X.                          CL**2
00029          10  PRT-CTL        PICTURE 9.                               CL**2
00030          10  SAVE-PRT-CTL        PICTURE 9.                       WKPRINT 
00031          10  HOF-IND             PICTURE 9.                          CL**2
00032          10  SPACE-1             PICTURE 9.                          CL**2
00033          10  STD-REPORT-REC      PICTURE X(132).                  WKPRINT 
