Files
DUTAS/Maps/DTSM8A.bms
2025-07-21 11:20:11 -04:00

118 lines
8.9 KiB
Plaintext

* DATA SET DTSM8A AT LEVEL 003 AS OF 05/07/02
* DATA SET DTSM8A AT LEVEL 003 AS OF 04/04/02 00001
* DATA SET DTSM8A AT LEVEL 001 AS OF 01/29/02 00002
* DATA SET DTSM8A AT LEVEL 036 AS OF 11/12/01 00003
* DATA SET DTSM8A AT LEVEL 004 AS OF 11/18/98 00004
DTSM8A DFHMDI SIZE=(24,80), X00005
LINE=01, X00006
COLUMN=01 00007
* SCREEN TYPE 00008
F8A0101 DFHMDF POS=(01,01), X00009
ATTRB=(ASKIP,FSET), X00010
LENGTH=002, X00011
INITIAL='8A' 00012
DFHMDF POS=(01,17), X00013
ATTRB=(ASKIP), X00014
LENGTH=029, X00015
INITIAL='ONLINE JOB SUBMISSION INQUIRY' 00016
* CICS REGION 00017
F8A0162 DFHMDF POS=(01,62), X00018
ATTRB=(ASKIP), X00019
LENGTH=008 00020
* SYSTEM DATE 00021
F8A0172 DFHMDF POS=(01,72), X00022
ATTRB=(ASKIP), X00023
LENGTH=008 00024
* SYSTEM TIME 00025
F8A0272 DFHMDF POS=(02,72), X00026
ATTRB=(ASKIP), X00027
LENGTH=008 00028
DFHMDF POS=(03,01), X00029
ATTRB=(ASKIP), X00030
LENGTH=014, X00031
INITIAL='BUSINESS AREA:' 00032
*BUSINESS AREA 00033
F8A0322 DFHMDF POS=(03,16), X00034
ATTRB=(ASKIP), X00035
LENGTH=002 00036
DFHMDF POS=(03,19), X00037
ATTRB=(ASKIP), X00038
LENGTH=001 00039
DFHMDF POS=(03,21), X00040
ATTRB=(ASKIP), X00041
LENGTH=39, X00042
INITIAL='(1=REG, 3=ACCT, 4=COL, 6=FIELD, 7=MISC)' 00043
DFHMDF POS=(06,01), X00044
ATTRB=(ASKIP), X00045
LENGTH=079, X00046
INITIAL='NO JOB NAME JOB DESCRIPTION' 00047
F8A0801 DFHMDF POS=(08,01), X00048
ATTRB=(ASKIP), X00049
LENGTH=079 00050
F8A0901 DFHMDF POS=(09,01), X00051
ATTRB=(ASKIP), X00052
LENGTH=079 00053
F8A1001 DFHMDF POS=(10,01), X00054
ATTRB=(ASKIP), X00055
LENGTH=079 00056
F8A1101 DFHMDF POS=(11,01), X00057
ATTRB=(ASKIP), X00058
LENGTH=079 00059
F8A1201 DFHMDF POS=(12,01), X00060
ATTRB=(ASKIP), X00061
LENGTH=079 00062
F8A1301 DFHMDF POS=(13,01), X00063
ATTRB=(ASKIP), X00064
LENGTH=079 00065
F8A1401 DFHMDF POS=(14,01), X00066
ATTRB=(ASKIP), X00067
LENGTH=079 00068
F8A1501 DFHMDF POS=(15,01), X00069
ATTRB=(ASKIP), X00070
LENGTH=079 00071
F8A1601 DFHMDF POS=(16,01), X00072
ATTRB=(ASKIP), X00073
LENGTH=079 00074
F8A1701 DFHMDF POS=(17,01), X00075
ATTRB=(ASKIP), X00076
LENGTH=079 00077
F8A1801 DFHMDF POS=(18,01), X00078
ATTRB=(ASKIP), X00079
LENGTH=079 00080
F8A1901 DFHMDF POS=(19,01), X00081
ATTRB=(ASKIP), X00082
LENGTH=079 00083
DFHMDF POS=(21,01), X00084
ATTRB=(ASKIP), X00085
LENGTH=015, X00086
INITIAL='SELECT LINE NO:' 00087
* LINE # SELECTED 00088
F8A2117 DFHMDF POS=(21,17), X00089
ATTRB=(ASKIP), X00090
LENGTH=002 00091
DFHMDF POS=(21,20), X00092
ATTRB=(ASKIP), X00093
LENGTH=001 00094
F8A2310 DFHMDF POS=(23,10), X00095
ATTRB=(ASKIP), X00096
LENGTH=007 00097
F8A2320 DFHMDF POS=(23,20), X00098
ATTRB=(ASKIP), X00099
LENGTH=007 00100
F8A2401 DFHMDF POS=(24,01), X00101
ATTRB=(ASKIP), X00102
LENGTH=008 00103
F8A2410 DFHMDF POS=(24,10), X00104
ATTRB=(ASKIP), X00105
LENGTH=058 00106
DFHMDF POS=(24,69), X00107
ATTRB=(ASKIP), X00108
LENGTH=006, X00109
INITIAL='GO TO:' 00110
F8A2476 DFHMDF POS=(24,76), X00111
ATTRB=(ASKIP), X00112
LENGTH=002 00113
DFHMDF POS=(24,79), X00114
ATTRB=(ASKIP), X00115
LENGTH=001 00116