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

144
Maps/DTSM40.bms Normal file
View File

@ -0,0 +1,144 @@
* DATA SET DTSM40 AT LEVEL 005 AS OF 12/09/04
* DATA SET DTSM40 AT LEVEL 002 AS OF 11/30/04 00001
* DATA SET DTSM40 AT LEVEL 003 AS OF 08/11/98 00002
* DATA SET MACM40 AT LEVEL 008 AS OF 01/23/95 00003
***** 00004
* 00005
* 40 COLLECTIONS MENU 00006
* 00007
***** 00008
SPACE 00009
DTSM40 DFHMDI SIZE=(24,80), *00010
LINE=1, *00011
COLUMN=1 00012
SPACE 00013
F400101 DFHMDF POS=(1,1), *00014
ATTRB=(ASKIP,FSET), *00015
LENGTH=2, *00016
INITIAL='40' 00017
SPACE 00018
DFHMDF POS=(1,25), *00019
ATTRB=(ASKIP), *00020
LENGTH=16, *00021
INITIAL='COLLECTIONS MENU' 00022
SPACE 00023
F400162 DFHMDF POS=(1,62), *00024
ATTRB=(ASKIP), *00025
LENGTH=8 00026
SPACE 00027
F400172 DFHMDF POS=(1,72), *00028
ATTRB=(ASKIP), *00029
LENGTH=8 00030
SPACE 00031
F400272 DFHMDF POS=(2,72), *00032
ATTRB=(ASKIP), *00033
LENGTH=8 00034
SPACE 00035
DFHMDF POS=(03,13), *00036
ATTRB=(ASKIP), *00037
LENGTH=6, *00038
INITIAL='OPTION' 00039
SPACE 00040
DFHMDF POS=(03,26), *00041
ATTRB=(ASKIP), *00042
LENGTH=11, *00043
INITIAL='DESCRIPTION' 00044
SPACE 00045
DFHMDF POS=(05,16), *00046
ATTRB=(ASKIP,BRT), *00047
LENGTH=1, *00048
INITIAL='1' 00049
SPACE 00050
DFHMDF POS=(05,21), *00051
ATTRB=(ASKIP), *00052
LENGTH=19, *00053
INITIAL='COLLECTIONS INQUIRY' 00054
SPACE 00055
DFHMDF POS=(06,16), *00056
ATTRB=(ASKIP,BRT), *00057
LENGTH=1, *00058
INITIAL='2' 00059
SPACE 00060
DFHMDF POS=(06,21), *00061
ATTRB=(ASKIP), *00062
LENGTH=40, *00063
INITIAL='MISCELLANEOUS COLLECTIONS INQUIRY/UPDATE' 00064
SPACE 00065
DFHMDF POS=(07,16), *00066
ATTRB=(ASKIP,BRT), *00067
LENGTH=1, *00068
INITIAL='3' 00069
SPACE 00070
DFHMDF POS=(07,21), *00071
ATTRB=(ASKIP), *00072
LENGTH=21, *00073
INITIAL='APPEAL INQUIRY/UPDATE' 00074
SPACE 00075
DFHMDF POS=(08,16), *00076
ATTRB=(ASKIP,BRT), *00077
LENGTH=1, *00078
INITIAL='4' 00079
SPACE 00080
DFHMDF POS=(08,21), *00081
ATTRB=(ASKIP), *00082
LENGTH=19, *00083
INITIAL='LIEN INQUIRY/UPDATE' 00084
SPACE 00085
DFHMDF POS=(09,16), *00086
ATTRB=(ASKIP,BRT), *00087
LENGTH=1, *00088
INITIAL='5' 00089
SPACE 00090
DFHMDF POS=(09,21), *00091
ATTRB=(ASKIP), *00092
LENGTH=40, *00093
INITIAL='DEFERRED PAYMENT CONTRACT INQUIRY/UPDATE' 00094
SPACE 00095
DFHMDF POS=(10,16), *00096
ATTRB=(ASKIP,BRT), *00097
LENGTH=1, *00098
INITIAL='6' 00099
SPACE 00100
DFHMDF POS=(10,21), *00101
ATTRB=(ASKIP), *00102
LENGTH=16, *00103
INITIAL='DUE/CREDIT PRINT' 00104
DFHMDF POS=(11,16), *00105
ATTRB=(ASKIP,BRT), *00106
LENGTH=1, *00107
INITIAL='7' 00108
SPACE 00109
DFHMDF POS=(11,21), *00110
ATTRB=(ASKIP), *00111
LENGTH=19, *00112
INITIAL='LEVY INQUIRY/UPDATE' 00113
DFHMDF POS=(12,16), *00114
ATTRB=(ASKIP,BRT), *00115
LENGTH=1, *00116
INITIAL='8' 00117
SPACE 00118
DFHMDF POS=(12,21), *00119
ATTRB=(ASKIP), *00120
LENGTH=36, *00121
INITIAL='COMPROMISE SETTLEMENT INQUIRE/UPDATE' 00122
SPACE 00123
DFHMDF POS=(22,13), *00124
ATTRB=(ASKIP), *00125
LENGTH=7, *00126
INITIAL='OPTION:' 00127
SPACE 00128
F402221 DFHMDF POS=(22,21), *00129
ATTRB=(UNPROT,IC,FSET,BRT), *00130
LENGTH=2 00131
SPACE 00132
DFHMDF POS=(22,24), *00133
ATTRB=(ASKIP), *00134
LENGTH=1 00135
SPACE 00136
F402401 DFHMDF POS=(24,01), *00137
ATTRB=(ASKIP), *00138
LENGTH=8 00139
SPACE 00140
F402410 DFHMDF POS=(24,10), *00141
ATTRB=(ASKIP), *00142
LENGTH=58 00143