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

23
Copybook/DTSIXFAT.cpy Normal file
View File

@ -0,0 +1,23 @@
00001 ***** 03/08/01
00002 * DTSIXFAT
00003 * DTSIXFAT EXTERNAL FISCAL AGENT RATE TAPE LV001
00004 * RECORD DEFINITION. DTSIXFAT
00005 * DTSIXFAT
00006 * 05/16/2000 CREATED FOR DC. ZL1 DTSIXFAT
00007 * DTSIXFAT
00008 ***** DTSIXFAT
00009 DTSIXFAT
00010 10 XFAT-KEY-AREA. DTSIXFAT
00011 15 XFAT-EMP-NO PIC 9(06) VALUE ZEROS.DTSIXFAT
00012 15 XFAT-EMP-FEIN PIC 9(09) VALUE ZEROS.DTSIXFAT
00013 DTSIXFAT
00014 10 XFAT-DATA-AREA. DTSIXFAT
00015 15 XFAT-FIL1 PIC X(02) VALUE SPACES. DTSIXFAT
00016 15 XFAT-EMP-CONTR-RATE PIC 9(03)V9999 VALUE 0. DTSIXFAT
00017 15 XFAT-EMP-CONTR-RATE-X REDEFINES DTSIXFAT
00018 XFAT-EMP-CONTR-RATE PIC X(07). DTSIXFAT
00019 15 XFAT-SIC-CODE PIC 9(04) VALUE ZEROS. DTSIXFAT
00020 15 XFAT-EMP-NAME PIC X(24) VALUE SPACES. DTSIXFAT
00021 15 XFAT-EMP-NAME-A PIC X(24) VALUE SPACES. DTSIXFAT
00022 15 XFAT-EMP-STATUS-CODE PIC X(01) VALUE SPACES. DTSIXFAT
00023 15 XFAT-FIL2 PIC X(23) VALUE SPACES. DTSIXFAT