00001 *****                                                             01/11/05
00002 *                                                                 DTSXL127
00003 *    DTSXL127    XEROX LASER REPORT LAYOUT  AND                      LV058
00004 *                DEFINITIONS                                      DTSXL127
00005 *                                                                 DTSXL127
00006 * 09-20-1999 ADDED FILLER BYTE TO BEGINNING OF XEROX LASER DEFIN- DTSXL127
00007 *            ITION RECORDS TO ALLOW FOR COMPILER DIFFERENCES.     DTSXL127
00008 *            REFERENCE RFP #****                 PROGRAMMER: DVS  DTSXL127
00009 *                                                                 DTSXL127
00010 * 09-14-2004 REWORKED FOR NEW XEROX FORMAT                        DTSXL127
00011 *            REFERENCE RFP #****                 PROGRAMMER: ZL1  DTSXL127
00012 *                                                                 DTSXL127
00013 * YY-YY-YYYY XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX  DTSXL127
00014 *            XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX  DTSXL127
00015 *            REFERENCE RFP #****                 PROGRAMMER: XXX  DTSXL127
00016 *                                                                 DTSXL127
00017 *****                                                             DTSXL127
00018 ******************************************************************DTSXL127
00019 *                    FR500 XEROX LASER DEFINITION                *DTSXL127
00020 ******************************************************************DTSXL127
00021  01  XEROX-CNTL-LINE.                                             DTSXL127
00022      05  XEROX-DJDE       PIC X(12)  VALUE '$X9700$DJDE '.        DTSXL127
00023      05  XEROX-JDL        PIC X(9)   VALUE 'JDL=XMOM,'.           DTSXL127
00024      05  XEROX-JDE        PIC X(11)  VALUE 'JDE=DTSRQI,'.         DTSXL127
00025      05  XEROX-FORMS      PIC X(13)  VALUE 'FORMS=T127P1,'.       DTSXL127
00026      05  XEROX-BFORM      PIC X(13)  VALUE 'BFORM=T127P2,'.       DTSXL127
00027      05  XEROX-DUPLEX     PIC X(11)  VALUE 'DUPLEX=YES,'.         DTSXL127
00028      05  X5-CA-LINE-END   PIC X(1)   VALUE ';'.                   DTSXL127
00029                                                                   DTSXL127
00030  01  XEROX-CNTL-LINE2.                                            DTSXL127
00031      05  XEROX-DJDE       PIC X(12)  VALUE '$X9700$DJDE '.        DTSXL127
00032      05  XEROX-FONTS      PIC X(13)  VALUE 'FONTS=P07TDB,'.       DTSXL127
00033      05  XEROX-FMT        PIC X(12)  VALUE 'FORMAT=FMT6,'.        DTSXL127
00034      05  X5-CA-TOF        PIC X(06)  VALUE 'TOF=5,'.              DTSXL127
00035      05  X5-CA-BOF        PIC X(07)  VALUE 'BOF=60,'.             DTSXL127
00036      05  X5-CA-LINE-END   PIC X(4)   VALUE 'END;'.                DTSXL127
00037  01  BLANK-LINE PIC X(132) VALUE SPACES.                          DTSXL127
00038      SKIP3                                                        DTSXL127
00039  01  XEROX-START-LINE.                                            DTSXL127
00040      05  LINE-13.                                                 DTSXL127
00041          10  FILLER                  PIC  X(02)  VALUE SPACES.    DTSXL127
00042          10  FILLER                  PIC  X(40)                   DTSXL127
00043                VALUE '****************************************'.  DTSXL127
00044      05  LINE-14.                                                 DTSXL127
00045          10  FILLER                  PIC  X(02)  VALUE SPACES.    DTSXL127
00046          10  FILLER                  PIC  X(40)                   DTSXL127
00047                VALUE '*      ROUTE FOLLOWING FORMS (127) TO: *'.  DTSXL127
00048      05  LINE-15.                                                 DTSXL127
00049          10  FILLER                  PIC  X(02)  VALUE SPACES.    DTSXL127
00050          10  FILLER                  PIC  X(40)                   DTSXL127
00051                VALUE '*        TAX ACCOUNTING SECTION        *'.  DTSXL127
00052      05  LINE-16.                                                 DTSXL127
00053          10  FILLER                  PIC  X(02)  VALUE SPACES.    DTSXL127
00054          10  FILLER                  PIC  X(40)                   DTSXL127
00055                VALUE '* DEPARTMENT OF EMPLOYMENT SERVICES    *'.  DTSXL127
00056      05  LINE-17.                                                 DTSXL127
00057          10  FILLER                  PIC  X(02)  VALUE SPACES.    DTSXL127
00058          10  FILLER                  PIC  X(40)                   DTSXL127
00059                VALUE '****************************************'.  DTSXL127