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

98
Maps/DTSM78.bms Normal file
View File

@ -0,0 +1,98 @@
* DATA SET DTSM78 AT LEVEL 003 AS OF 10/01/98
* DATA SET MACM78 AT LEVEL 042 AS OF 01/23/95 00001
***** 00002
* 00003
* 78 CORRESPONDENCE QUEUE INQUIRY/UPDATE 00004
* 00005
***** 00006
SPACE 00007
DTSM78 DFHMDI SIZE=(24,80),LINE=1,COLUMN=1 00008**2
SPACE 00009
F780101 DFHMDF POS=(1,1),LENGTH=02,ATTRB=(FSET,ASKIP), *00010
INITIAL='78' 00011
SPACE 00012
DFHMDF POS=(1,15),LENGTH=35,ATTRB=(ASKIP), *00013
INITIAL='CORRESPONDENCE QUEUE INQUIRY/UPDATE' 00014
SPACE 00015
F780162 DFHMDF POS=(1,62),LENGTH=08,ATTRB=(ASKIP) 00016
SPACE 00017
F780172 DFHMDF POS=(1,72),LENGTH=08,ATTRB=(ASKIP) 00018
SPACE 00019
DFHMDF POS=(02,01),LENGTH=09,ATTRB=(ASKIP), *00020
INITIAL='QUEUE ID:' 00021
SPACE 00022
F780211 DFHMDF POS=(02,11),LENGTH=08,ATTRB=(ASKIP) 00023**3
SPACE 00024
DFHMDF POS=(02,20),LENGTH=01,ATTRB=(ASKIP) 00025**3
SPACE 00026
F780220 DFHMDF POS=(02,22),LENGTH=10,ATTRB=(ASKIP) 00027**3
SPACE 00028
F780259 DFHMDF POS=(02,59),LENGTH=03,ATTRB=(ASKIP) 00029
SPACE 00030
DFHMDF POS=(02,63),LENGTH=02,ATTRB=(ASKIP), *00031
INITIAL='OF' 00032
SPACE 00033
F780266 DFHMDF POS=(02,66),LENGTH=03,ATTRB=(ASKIP) 00034
SPACE 00035
F780272 DFHMDF POS=(02,72),LENGTH=08,ATTRB=(ASKIP) 00036
SPACE 00037
F780301 DFHMDF POS=(03,01),LENGTH=79,ATTRB=(ASKIP) 00038
SPACE 00039
F780401 DFHMDF POS=(04,01),LENGTH=79,ATTRB=(ASKIP) 00040
SPACE 00041
F780501 DFHMDF POS=(05,01),LENGTH=79,ATTRB=(ASKIP) 00042
SPACE 00043
F780601 DFHMDF POS=(06,01),LENGTH=79,ATTRB=(ASKIP) 00044
SPACE 00045
F780701 DFHMDF POS=(07,01),LENGTH=79,ATTRB=(ASKIP) 00046
SPACE 00047
F780801 DFHMDF POS=(08,01),LENGTH=79,ATTRB=(ASKIP) 00048
SPACE 00049
F780901 DFHMDF POS=(09,01),LENGTH=79,ATTRB=(ASKIP) 00050
SPACE 00051
F781001 DFHMDF POS=(10,01),LENGTH=79,ATTRB=(ASKIP) 00052
SPACE 00053
F781101 DFHMDF POS=(11,01),LENGTH=79,ATTRB=(ASKIP) 00054
SPACE 00055
F781201 DFHMDF POS=(12,01),LENGTH=79,ATTRB=(ASKIP) 00056
SPACE 00057
F781301 DFHMDF POS=(13,01),LENGTH=79,ATTRB=(ASKIP) 00058
SPACE 00059
F781401 DFHMDF POS=(14,01),LENGTH=79,ATTRB=(ASKIP) 00060
SPACE 00061
F781501 DFHMDF POS=(15,01),LENGTH=79,ATTRB=(ASKIP) 00062
SPACE 00063
F781601 DFHMDF POS=(16,01),LENGTH=79,ATTRB=(ASKIP) 00064
SPACE 00065
F781701 DFHMDF POS=(17,01),LENGTH=79,ATTRB=(ASKIP) 00066
SPACE 00067
F781801 DFHMDF POS=(18,01),LENGTH=79,ATTRB=(ASKIP) 00068
SPACE 00069
F781901 DFHMDF POS=(19,01),LENGTH=79,ATTRB=(ASKIP) 00070
SPACE 00071
F782001 DFHMDF POS=(20,01),LENGTH=79,ATTRB=(ASKIP) 00072
SPACE 00073
F782101 DFHMDF POS=(21,01),LENGTH=79,ATTRB=(ASKIP) 00074
SPACE 00075
F782201 DFHMDF POS=(22,01),LENGTH=79,ATTRB=(ASKIP) 00076
SPACE 00077
F782310 DFHMDF POS=(23,10),LENGTH=08,ATTRB=(ASKIP) 00078
SPACE 00079
F782320 DFHMDF POS=(23,20),LENGTH=07,ATTRB=(ASKIP) 00080
SPACE 00081
F782329 DFHMDF POS=(23,29),LENGTH=07,ATTRB=(ASKIP) 00082
SPACE 00083
F782338 DFHMDF POS=(23,38),LENGTH=07,ATTRB=(ASKIP) 00084
SPACE 00085
F782349 DFHMDF POS=(23,49),LENGTH=27,ATTRB=(ASKIP) 00086
SPACE 00087
F782401 DFHMDF POS=(24,01),LENGTH=08,ATTRB=(ASKIP) 00088
SPACE 00089
F782410 DFHMDF POS=(24,10),LENGTH=58,ATTRB=(ASKIP) 00090
SPACE 00091
DFHMDF POS=(24,69),LENGTH=06,ATTRB=(ASKIP), *00092
INITIAL='GO TO:' 00093
SPACE 00094
F782476 DFHMDF POS=(24,76),LENGTH=02,ATTRB=(ASKIP) 00095
SPACE 00096
DFHMDF POS=(24,79),LENGTH=01,ATTRB=(ASKIP) 00097