giteaadmin/DUTAS
4
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

DUTAS re-platformed to Raincode - Initial Source Code

Browse Source
This commit is contained in:
Neeraj Kumar
2025-07-21 07:44:09 -04:00
commit ca3572c5df
2773 changed files with 798221 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

28
Copybook/EFTIFACH.cpy Normal file
View File

@ -0,0 +1,28 @@
00001 ***** 04/24/03
00002 * EFTIFACH
00003 * EFTIFACH ACH DISHONORED CHECK FILE LV039
00004 * SKELETAL RECORD DESCRIPTION CL*39
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 * SKELETAL RECORD THAT CAN CONTAIN ANY OF THESE RECORD CL*39
00015 * TYPES. THE IMPORT PROCESS READS THE INPUT DATA INTO THIS CL*39
00016 * RECORD, AND THEN MOVES IT TO THE APPROPRIATE COPY BOOK CL*39
00017 * BASED ON THE VALUE IN THE FIRST FIELD (RECORD TYPE CODE). CL*39
00018 * CL*23
00019 ***** EFTIFACH
00020 10 FACH-SKELETAL-REC. CL*39
00021 15 FACH-TYPE PIC X(01). CL*39
00022 88 FACH-TYPE-HEADER-88 VALUE '1'. CL*39
00023 88 FACH-TYPE-CMPNY-BTCH-HDR-88 VALUE '5'. CL*39
00024 88 FACH-TYPE-ENTRY-DETAIL-88 VALUE '6'. CL*39
00025 88 FACH-TYPE-ADDENDA-88 VALUE '7'. CL*39
00026 88 FACH-TYPE-TRAILER-88 VALUE '9'. CL*39
00027 CL*30
00028 15 FACH-FILLER PIC X(93). CL*39