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

25
Copybook/DTSIR410.cpy Normal file
View File

@ -0,0 +1,25 @@
00001 ***** 01/18/99
00002 * DTSIR410
00003 * DTSIR410 OPEN APPEALS REPORT RECORD. LV005
00004 * DTSIR410
00005 ***** DTSIR410
00006 SKIP1 DTSIR410
00007 10 R410-LENGTH PIC S9(04) COMP. CL**2
00008 SKIP1 DTSIR410
00009 10 R410-SORT-AREA. DTSIR410
00010 15 R410-REC-TYPE PIC X(03). CL**2
00011 15 R410-APPEAL-LEVEL PIC X(01). DTSIR410
00012 88 R410-APPEAL-LEVEL-TAX-CHIEF VALUE '1'. CL**3
00013 88 R410-APPEAL-LEVEL-OFFICE-APPL VALUE '2'. CL**5
00014 88 R410-APPEAL-LEVEL-OAR VALUE '3'. CL**3
00015 88 R410-APPEAL-LEVEL-COURT VALUE '4'. CL**3
00016 88 R410-APPEAL-LEVEL-UNKOWN VALUE '5'. CL**3
00017 15 R410-APPEAL-LEVEL-9 REDEFINES R410-APPEAL-LEVEL DTSIR410
00018 PIC 9(01). DTSIR410
00019 15 R410-EMP-NO PIC S9(07) COMP-3. DTSIR410
00020 SKIP1 DTSIR410
00021 10 R410-DATA-AREA. DTSIR410
00022 15 R410-PRIMARY-NAME PIC X(40). CL**2
00023 15 R410-APPEAL-TYPE PIC X(03). DTSIR410
00024 15 R410-FILE-DATE PIC S9(09) COMP-3. DTSIR410
00025 15 R410-OPEN-DATE PIC S9(09) COMP-3. DTSIR410