00001 ***** 04/08/03 00002 * DTSXL303 00003 * DTSXL303 XEROX LASER REPORT LAYOUT AND LV038 00004 * DEFINITIONS DTSXL303 00005 * DTSXL303 00006 * 07-20-1999 ADDED FILLER BYTE TO BEGINNING OF XEROX LASER DEFIN- DTSXL303 00007 * ITION RECORDS TO ALLOW FOR COMPILER DIFFERENCES. DTSXL303 00008 * REFERENCE RFP #**** PROGRAMMER: DVS DTSXL303 00009 * DTSXL303 00010 * YY-YY-YYYY XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX DTSXL303 00011 * XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX DTSXL303 00012 * REFERENCE RFP #**** PROGRAMMER: XXX DTSXL303 00013 * DTSXL303 00014 ***** DTSXL303 00015 ******************************************************************DTSXL303 00016 * ETA581 XEROX LASER DEFINITION *DTSXL303 00017 ******************************************************************DTSXL303 00018 01 XEROX-XL303-LINE1. DTSXL303 00019 * 05 FILLER PIC X. CL*38 00020 05 XL3031-DJDE PIC X(12) VALUE '$X9700$DJDE '. DTSXL303 00021 05 XL3031-JDL PIC X(9) VALUE 'JDL=XMOM,'. DTSXL303 00022 05 XL3031-JDE PIC X(11) VALUE 'JDE=ETA581,'. DTSXL303 00023 05 XL3031-FORMS PIC X(13) VALUE 'FORMS=DTUIRV,'. DTSXL303 00024 05 XL3031-BFORM PIC X(11) VALUE 'BFORM=NONE,'. DTSXL303 00025 05 XL3031-DUPLEX PIC X(10) VALUE 'DUPLEX=NO,'. DTSXL303 00026 05 XL3031-FONTS PIC X(13) VALUE 'FONTS=UN210A,'. DTSXL303 00027 05 XL3031-LINE-END PIC X(1) VALUE ';'. DTSXL303 00028 DTSXL303 00029 01 XEROX-XL303-LINE2. DTSXL303 00030 * 05 FILLER PIC X. CL*38 00031 05 XL3032-DJDE PIC X(12) VALUE '$X9700$DJDE '. DTSXL303 00032 05 XL3032-DATA PIC X(13) VALUE 'DATA=(0,132),'. DTSXL303 00033 05 XL3032-ASSIGN PIC X(13) VALUE 'ASSIGN=(1,1),'. DTSXL303 00034 05 XL3032-TOF PIC X(06) VALUE 'TOF=5,'. DTSXL303 00035 05 XL3032-BOF PIC X(07) VALUE 'BOF=55,'. DTSXL303 00036 05 XL3032-BEGIN PIC X(18) VALUE DTSXL303 00037 'BEGIN=(0.50,0.41),'. DTSXL303 00038 05 XL3032-LINE-END PIC X(4) VALUE 'END;'. DTSXL303 00039 05 FILLER PIC X(08) VALUE SPACES. DTSXL303 00040 DTSXL303 00041 DTSXL303 00042 EJECT DTSXL303 00043 01 BLANK-LINE PIC X(132) VALUE SPACES. DTSXL303 00044 SKIP3 DTSXL303 00045 01 XEROX-START-LINE. DTSXL303 00046 05 LINE-13. DTSXL303 00047 10 FILLER PIC X(75) VALUE SPACES. DTSXL303 00048 10 FILLER PIC X(40) DTSXL303 00049 VALUE ALL '*'. DTSXL303 00050 05 LINE-14. DTSXL303 00051 10 FILLER PIC X(75) VALUE SPACES. DTSXL303 00052 10 FILLER PIC X(40) DTSXL303 00053 VALUE '* ROUTE FOLLOWING FORMS TO: *'. DTSXL303 00054 05 LINE-15. DTSXL303 00055 10 FILLER PIC X(75) VALUE SPACES. DTSXL303 00056 10 FILLER PIC X(40) DTSXL303 00057 VALUE '* TAX ACCOUNTING SECTION *'. DTSXL303 00058 05 LINE-16. DTSXL303 00059 10 FILLER PIC X(75) VALUE SPACES. DTSXL303 00060 10 FILLER PIC X(40) DTSXL303 00061 VALUE '* DEPARTMENT OF EMPLOYMENT SERVICES *'. DTSXL303 00062 05 LINE-17. DTSXL303 00063 10 FILLER PIC X(75) VALUE SPACES. DTSXL303 00064 10 FILLER PIC X(40) DTSXL303 00065 VALUE ALL '*'. DTSXL303