00001 ***** 04/24/03 00002 * EFTIFAC5 00003 * EFTIFAC5 ACH DISHONORED CHECK FILE LV042 00004 * BATCH HEADER RECORD DESCRIPTION CL*42 00005 * CL*17 00006 * THE BANK SENDS A FILE OF ELECTRONIC PAYMENTS THAT WERE CL*39 00007 * DISHONORED TO DOES EVERY DAY. DOES BUILDS NO GOOD CL*39 00008 * CHECK PAYMENT REVERSAL TRANSACTIONS FROM THESE RECORDS CL*39 00009 * THAT ARE INPUT TO THE DAILY ACCOUNTING UPDATE. CL*39 00010 * CL*39 00011 * THERE ARE 7 RECORD TYPES IN THIS FILE. CL*39 00012 * CL*39 00013 * THIS COPY BOOK CONTAINS THE RECORD DESCRIPTION FOR THE CL*17 00014 * BATCH HEADER RECORD. CL*42 00015 * CL*23 00016 ***** EFTIFAC5 00017 10 FAC5-HEADER-REC. CL*42 00018 15 FAC5-TYPE PIC X(01). CL*42 00019 88 FAC5-TYPE-HEADER-88 VALUE '1'. CL*42 00020 88 FAC5-TYPE-CMPNY-BTCH-HDR-88 VALUE '5'. CL*42 00021 88 FAC5-TYPE-ENTRY-DETAIL-88 VALUE '6'. CL*42 00022 88 FAC5-TYPE-ADDENDA-88 VALUE '7'. CL*42 00023 88 FAC5-TYPE-TRAILER-88 VALUE '9'. CL*42 00024 CL*30 00025 15 FAC5-SERVICE-CLASS-CD PIC X(03). CL*42 00026 15 FAC5-COMPANY-NAME PIC X(16). CL*42 00027 15 FAC5-COMPANY-DATA PIC X(20). CL*42 00028 15 FAC5-COMPANY-ID PIC X(10). CL*42 00029 15 FAC5-STD-ENTRY-CLASS-CD PIC X(03). CL*42 00030 15 FAC5-COMPANY-ENTRY-DESC PIC X(10). CL*42 00031 15 FAC5-COMPANY-DESC-DATE PIC X(06). CL*42 00032 15 FAC5-EFF-ENTRY-DATE PIC X(06). CL*42 00033 15 FAC5-JUL-SETTLMNT-DATE PIC X(03). CL*42 00034 15 FAC5-ORIG-STATUS-CD PIC X(01). CL*42 00035 15 FAC5-ORIG-DFI PIC X(08). CL*42 00036 15 FAC5-BATCH-NO PIC X(07). CL*42