00001 *****                                                             01/20/06
00002 *                                                                 DTSXD303
00003 *    DTSXD303    XEROX LASER REPORT LAYOUT  AND                      LV002
00004 *                DEFINITIONS FOR DUTAS BLANK LETTER HEAD FORMS    DTSXD303
00005 *                                                                 DTSXD303
00006 * 08-12-1999                                                      DTSXD303
00007 *                                                                 DTSXD303
00008 *                                                                 DTSXD303
00009 *                                                                 DTSXD303
00010 * 02-28-2001 PROGRAM BR303 NEEDS TO HAVE R309 XEROX COPYBOOK.     DTSXD303
00011 *            DTSBR303 WILL PRINT DAILY R309 CREDIT MEMO ON        DTSXD303
00012 *            REGULAR PAPER IN CLASS I                             DTSXD303
00013 *            REFERENCE RFP #****                 PROGRAMMER: ZL11 DTSXD303
00014 *                                                                 DTSXD303
00015 *****                                                             DTSXD303
00016 ******************************************************************DTSXD303
00017 *                          XEROX LASER DEFINITION                *DTSXD303
00018 ******************************************************************DTSXD303
00019                                                                   DTSXD303
00020  01  XEROX-XD303-LINE1.                                           DTSXD303
00021 *    05  FILLER              PIC X     VALUE SPACES.                 CL**2
00022      05  XD3031-DJDE         PIC X(12) VALUE '$X9700$DJDE '.      DTSXD303
00023      05  XD3031-JDL          PIC X(09) VALUE 'JDL=XMOM,'.         DTSXD303
00024      05  XD3031-JDE          PIC X(11) VALUE 'JDE=SWORKS,'.       DTSXD303
00025      05  XD3031-FORMS        PIC X(13) VALUE 'FORMS=DTSBLH,'.     DTSXD303
00026      05  XD3031-BFORM        PIC X(11) VALUE 'BFORM=NONE,'.       DTSXD303
00027      05  XD3031-OTEXT        PIC X(38) VALUE                      DTSXD303
00028                         'OTEXT=(''LOAD NO HOLD WHITE PAPER'');'.  DTSXD303
00029  01  XEROX-XD303-LINE2.                                           DTSXD303
00030 *    05  FILLER              PIC X     VALUE SPACES.                 CL**2
00031      05  XD3032-DJDE         PIC X(12) VALUE '$X9700$DJDE '.      DTSXD303
00032      05  XD3032-DUPLEX       PIC X(10) VALUE 'DUPLEX=NO,'.        DTSXD303
00033      05  XD3032-FORMAT       PIC X(12) VALUE 'FORMAT=FMT7,'.      DTSXD303
00034      05  XD3032-FONTS        PIC X(13) VALUE 'FONTS=P07TDB,'.     DTSXD303
00035      05  XD3032-ASSIGN       PIC X(13) VALUE 'ASSIGN=(1,1),'.     DTSXD303
00036      05  XD3032-TOF          PIC X(07) VALUE 'TOF=12,'.           DTSXD303
00037      05  XD3032-BOF          PIC X(07) VALUE 'BOF=60,'.           DTSXD303
00038      05  XD3032-LINE-END     PIC X(04) VALUE 'END;'.              DTSXD303
00039                                                                   DTSXD303
00040                                                                   DTSXD303