00001 *****                                                             07/01/08
00002 *                                                                 DTSIX303
00003 *    DTSIX303    R*STARS 'DAFRIN' TRAN INTERFACE HEADER REC          LV001
00004 *                                                                 DTSIX303
00005 *    HEADER RECORD FOR THE AUTOMATED REFUND PROCESS.              DTSIX303
00006 *                                                                 DTSIX303
00007 *                                                                 DTSIX303
00008 *                                                                 DTSIX303
00009 *****                                                             DTSIX303
00010                                                                   DTSIX303
00011          10  X303-BATCH-AGY             PIC  X(03) VALUE 'UIU'.   DTSIX303
00012          10  X303-BATCH-DATE            PIC  X(08).               DTSIX303
00013          10  X303-BATCH-TYPE            PIC  X(01) VALUE 'X'.     DTSIX303
00014          10  X303-BATCH-NO              PIC  9(03).               DTSIX303
00015          10  X303-BATCH-SEQ-NO          PIC  9(05) VALUE ZEROS.   DTSIX303
00016          10  X303-BATCH-OPERATOR-ID     PIC  X(08)                DTSIX303
00017                                           VALUE 'INTERUIU'.       DTSIX303
00018          10  X303-BATCH-OPERATOR-NAME   PIC  X(20) VALUE SPACES.  DTSIX303
00019          10  X303-BATCH-OPERATOR-CLASS  PIC  X(02) VALUE SPACES.  DTSIX303
00020          10  X303-BATCH-TID             PIC  X(04) VALUE SPACES.  DTSIX303
00021          10  X303-BATCH-EFF-DATE        PIC  X(08).               DTSIX303
00022          10  X303-BATCH-DISB-METHOD     PIC  X(01) VALUE 'R'.     DTSIX303
00023          10  X303-BATCH-PAY-DIST-TYPE   PIC  X(02) VALUE SPACES.  DTSIX303
00024          10  X303-FAST-ENTRY            PIC  X(01) VALUE 'N'.     DTSIX303
00025          10  X303-BATCH-DOC-HOLD-FLG    PIC  X(01) VALUE SPACES.  DTSIX303
00026          10  X303-BATCH-AMT-CNT-ENTR    PIC  X(01) VALUE 'Y'.     DTSIX303
00027          10  X303-BATCH-STATUS          PIC  X(01) VALUE 'R'.     DTSIX303
00028          10  X303-BATCH-HDR-CNT-SW      PIC  X(01) VALUE 'Y'.     DTSIX303
00029          10  X303-BATCH-LAST-SEQ-NO     PIC  9(05) VALUE ZERO.    DTSIX303
00030          10  X303-BATCH-SYSTEM-DATE     PIC  X(05).               DTSIX303
00031          10  X303-BATCH-MSTR-FILE-SW    PIC  X(01) VALUE '0'.     DTSIX303
00032          10  FILLER                     PIC  X(07) VALUE SPACES.  DTSIX303
00033          10  X303-ENTERED-BATCH-CNT-N   PIC  9(05).               DTSIX303
00034          10  X303-ENTERED-BATCH-AMT-N   PIC  9(11)V99.            DTSIX303
00035          10  FILLER                     PIC  X(05) VALUE SPACES.  DTSIX303
00036          10  X303-COMP-BATCH-CNT-N      PIC  9(05) VALUE ZERO.    DTSIX303
00037          10  X303-COMP-BATCH-AMT-N      PIC  9(11)V99 VALUE 0.    DTSIX303
00038          10  X303-APPRVL-REQ-TO-POST    PIC  X(01) VALUE 'N'.     DTSIX303
00039          10  X303-ALL-DOCS-APPRVD       PIC  X(01) VALUE SPACES.  DTSIX303
00040          10  X303-BATCH-RTI-ERR-IND     PIC  X(01) VALUE SPACES.  DTSIX303
00041          10  FILLER                     PIC  X(618) VALUE SPACES. DTSIX303