* DATA SET DTSM77 AT LEVEL 008 AS OF 11/03/99 * DATA SET MACM77 AT LEVEL 042 AS OF 01/23/95 00001 ***** 00002 * 00003 * DTSM77 CORRESPONDENCE QUEUE INITIATION 00004**3 * 00005 ***** 00006 SPACE 00007 DTSM77 DFHMDI SIZE=(24,80),LINE=1,COLUMN=1 00008**2 SPACE 00009 F770101 DFHMDF POS=(1,1),LENGTH=02,ATTRB=(FSET,ASKIP), *00010 INITIAL='77' 00011 SPACE 00012 DFHMDF POS=(1,18),LENGTH=31,ATTRB=(ASKIP), *00013 INITIAL='CORRESPONDENCE QUEUE INITIATION' 00014 SPACE 00015 F770162 DFHMDF POS=(1,62),LENGTH=08,ATTRB=(ASKIP) 00016 SPACE 00017 F770172 DFHMDF POS=(1,72),LENGTH=08,ATTRB=(ASKIP) 00018 SPACE 00019 F770272 DFHMDF POS=(02,72),LENGTH=08,ATTRB=(ASKIP) 00020 SPACE 00021 DFHMDF POS=(03,04),LENGTH=07,ATTRB=(ASKIP), *00022 INITIAL='EMP NO:' 00023 SPACE 00024 F770312 DFHMDF POS=(03,12),LENGTH=03,ATTRB=(ASKIP) 00025 SPACE 00026 F770316 DFHMDF POS=(03,16),LENGTH=03,ATTRB=(ASKIP) 00027 SPACE 00028 DFHMDF POS=(03,20),LENGTH=01,ATTRB=(ASKIP) 00029 SPACE 00030 F770323 DFHMDF POS=(03,23),LENGTH=40,ATTRB=(ASKIP) 00031 SPACE 00032 DFHMDF POS=(05,08),LENGTH=12,ATTRB=(ASKIP), *00033 INITIAL='TEMPLATE ID:' 00034 SPACE 00035 F770521 DFHMDF POS=(05,21),LENGTH=40,ATTRB=(ASKIP) 00036 SPACE 00037 DFHMDF POS=(05,62),LENGTH=01,ATTRB=(ASKIP) 00038 SPACE 00039 DFHMDF POS=(06,07),LENGTH=13,ATTRB=(ASKIP), *00040 INITIAL='ADDRESS TYPE:' 00041 SPACE 00042 F770621 DFHMDF POS=(06,21),LENGTH=01,ATTRB=(ASKIP) 00043 SPACE 00044 DFHMDF POS=(06,23),LENGTH=01,ATTRB=(ASKIP) 00045 SPACE 00046 DFHMDF POS=(07,05),LENGTH=15,ATTRB=(ASKIP), *00047 INITIAL='ADDRESS NUMBER:' 00048 SPACE 00049 F770721 DFHMDF POS=(07,21),LENGTH=03,ATTRB=(ASKIP) 00050 SPACE 00051 DFHMDF POS=(07,25),LENGTH=01,ATTRB=(ASKIP) 00052**7 SPACE 00053 DFHMDF POS=(08,01),LENGTH=19,ATTRB=(ASKIP), *00054 INITIAL='CORRESPONDENT OPID:' 00055 SPACE 00056 F770821 DFHMDF POS=(08,21),LENGTH=08,ATTRB=(ASKIP) 00057**3 SPACE 00058 DFHMDF POS=(08,30),LENGTH=01,ATTRB=(ASKIP) 00059**3 SPACE 00060 F770830 DFHMDF POS=(08,32),LENGTH=10,ATTRB=(ASKIP) 00061**3 SPACE 00062 DFHMDF POS=(08,46),LENGTH=24,ATTRB=(ASKIP), *00063**3 INITIAL='EMPLOYER MAILING ADDRESS' 00064 SPACE 00065 DFHMDF POS=(09,09),LENGTH=11,ATTRB=(ASKIP), *00066 INITIAL='FLD REP ID:' 00067 SPACE 00068 F770921 DFHMDF POS=(09,21),LENGTH=02,ATTRB=(ASKIP) 00069 SPACE 00070 DFHMDF POS=(09,24),LENGTH=01,ATTRB=(ASKIP) 00071 SPACE 00072 F770926 DFHMDF POS=(09,26),LENGTH=10,ATTRB=(ASKIP) 00073 SPACE 00074 F770940 DFHMDF POS=(09,40),LENGTH=40,ATTRB=(ASKIP) 00075 SPACE 00076 DFHMDF POS=(10,08),LENGTH=12,ATTRB=(ASKIP), *00077**4 INITIAL='LEIN CERT #:' 00078**4 SPACE 00079**4 F771021 DFHMDF POS=(10,21),LENGTH=02,ATTRB=(ASKIP) 00080**8 SPACE 00081**4 F771024 DFHMDF POS=(10,24),LENGTH=04,ATTRB=(ASKIP) 00082**8 SPACE 00083**8 DFHMDF POS=(10,29),LENGTH=01,ATTRB=(ASKIP) 00084**8 SPACE 00085**4 F771040 DFHMDF POS=(10,40),LENGTH=40,ATTRB=(ASKIP) 00086**4 SPACE 00087**4 DFHMDF POS=(11,01),LENGTH=01,ATTRB=(ASKIP) 00088**4 SPACE 00089 DFHMDF POS=(11,13),LENGTH=07,ATTRB=(ASKIP), *00090**4 INITIAL='COPIES:' 00091 SPACE 00092 F771121 DFHMDF POS=(11,21),LENGTH=02,ATTRB=(ASKIP) 00093**4 SPACE 00094 DFHMDF POS=(11,24),LENGTH=01,ATTRB=(ASKIP) 00095**4 SPACE 00096 F771140 DFHMDF POS=(11,40),LENGTH=40,ATTRB=(ASKIP) 00097**4 SPACE 00098 DFHMDF POS=(12,01),LENGTH=19,ATTRB=(ASKIP), *00099**4 INITIAL=' CORRESPONDENCE DT:' 00100 SPACE 00101 F771221 DFHMDF POS=(12,21),LENGTH=02,ATTRB=(ASKIP) 00102**4 SPACE 00103 F771224 DFHMDF POS=(12,24),LENGTH=02,ATTRB=(ASKIP) 00104**4 SPACE 00105 F771227 DFHMDF POS=(12,27),LENGTH=02,ATTRB=(ASKIP) 00106**4 SPACE 00107 DFHMDF POS=(12,30),LENGTH=01,ATTRB=(ASKIP) 00108**4 SPACE 00109 F771240 DFHMDF POS=(12,40),LENGTH=40,ATTRB=(ASKIP) 00110**4 SPACE 00111 DFHMDF POS=(13,01),LENGTH=01,ATTRB=(ASKIP) 00112**4 SPACE 00113 DFHMDF POS=(13,09),LENGTH=11,ATTRB=(ASKIP), *00114**4 INITIAL='CORR STATE:' 00115 SPACE 00116 F771321 DFHMDF POS=(13,21),LENGTH=02,ATTRB=(ASKIP) 00117**4 SPACE 00118 DFHMDF POS=(13,24),LENGTH=01,ATTRB=(ASKIP) 00119**4 SPACE 00120 F771340 DFHMDF POS=(13,40),LENGTH=40,ATTRB=(ASKIP) 00121**4 SPACE 00122 DFHMDF POS=(14,01),LENGTH=19,ATTRB=(ASKIP), *00123 INITIAL='TICKLER TRIGGER DT:' 00124 SPACE 00125 F771421 DFHMDF POS=(14,21),LENGTH=02,ATTRB=(ASKIP) 00126 SPACE 00127 F771424 DFHMDF POS=(14,24),LENGTH=02,ATTRB=(ASKIP) 00128 SPACE 00129 F771427 DFHMDF POS=(14,27),LENGTH=02,ATTRB=(ASKIP) 00130 SPACE 00131 DFHMDF POS=(14,30),LENGTH=01,ATTRB=(ASKIP) 00132 SPACE 00133 DFHMDF POS=(15,03),LENGTH=01,ATTRB=(ASKIP), *00134 INITIAL=':' 00135 SPACE 00136 F771505 DFHMDF POS=(15,05),LENGTH=72,ATTRB=(ASKIP) 00137 SPACE 00138 DFHMDF POS=(15,78),LENGTH=01,ATTRB=(ASKIP) 00139 SPACE 00140 DFHMDF POS=(16,03),LENGTH=01,ATTRB=(ASKIP), *00141 INITIAL=':' 00142 SPACE 00143 F771605 DFHMDF POS=(16,05),LENGTH=72,ATTRB=(ASKIP) 00144 SPACE 00145 DFHMDF POS=(16,78),LENGTH=01,ATTRB=(ASKIP) 00146 SPACE 00147 DFHMDF POS=(17,03),LENGTH=01,ATTRB=(ASKIP), *00148 INITIAL=':' 00149 SPACE 00150 F771705 DFHMDF POS=(17,05),LENGTH=72,ATTRB=(ASKIP) 00151 SPACE 00152 DFHMDF POS=(17,78),LENGTH=01,ATTRB=(ASKIP) 00153 SPACE 00154 DFHMDF POS=(18,03),LENGTH=01,ATTRB=(ASKIP), *00155 INITIAL=':' 00156 SPACE 00157 F771805 DFHMDF POS=(18,05),LENGTH=72,ATTRB=(ASKIP) 00158 SPACE 00159 DFHMDF POS=(18,78),LENGTH=01,ATTRB=(ASKIP) 00160 SPACE 00161 DFHMDF POS=(19,03),LENGTH=01,ATTRB=(ASKIP), *00162 INITIAL=':' 00163 SPACE 00164 F771905 DFHMDF POS=(19,05),LENGTH=72,ATTRB=(ASKIP) 00165 SPACE 00166 DFHMDF POS=(19,78),LENGTH=01,ATTRB=(ASKIP) 00167 SPACE 00168 DFHMDF POS=(20,03),LENGTH=01,ATTRB=(ASKIP), *00169 INITIAL=':' 00170 SPACE 00171 F772005 DFHMDF POS=(20,05),LENGTH=72,ATTRB=(ASKIP) 00172 SPACE 00173 DFHMDF POS=(20,78),LENGTH=01,ATTRB=(ASKIP) 00174 SPACE 00175 DFHMDF POS=(22,11),LENGTH=09,ATTRB=(ASKIP), *00176 INITIAL='QUEUE ID:' 00177 SPACE 00178 F772221 DFHMDF POS=(22,21),LENGTH=08,ATTRB=(ASKIP) 00179**4 SPACE 00180 DFHMDF POS=(22,30),LENGTH=01,ATTRB=(ASKIP) 00181**4 SPACE 00182 F772232 DFHMDF POS=(22,32),LENGTH=10,ATTRB=(ASKIP) 00183**6 SPACE 00184**6 DFHMDF POS=(22,43),LENGTH=01,ATTRB=(ASKIP) 00185**6 SPACE 00186 F772310 DFHMDF POS=(23,10),LENGTH=06,ATTRB=(ASKIP) 00187**4 SPACE 00188 F772401 DFHMDF POS=(24,01),LENGTH=08,ATTRB=(ASKIP) 00189 SPACE 00190 F772410 DFHMDF POS=(24,10),LENGTH=58,ATTRB=(ASKIP) 00191 SPACE 00192 DFHMDF POS=(24,69),LENGTH=06,ATTRB=(ASKIP), *00193 INITIAL='GO TO:' 00194 SPACE 00195 F772476 DFHMDF POS=(24,76),LENGTH=02,ATTRB=(ASKIP) 00196 SPACE 00197 DFHMDF POS=(24,79),LENGTH=01,ATTRB=(ASKIP) 00198