* DATA SET DTSM1D AT LEVEL 013 AS OF 09/13/12 * DATA SET DTSM1D AT LEVEL 002 AS OF 07/15/09 00001 * DATA SET DTSM1D AT LEVEL 011 AS OF 01/31/06 00002 * DATA SET DTSM1D AT LEVEL 002 AS OF 10/24/05 00003 * DATA SET DTSM1D AT LEVEL 009 AS OF 07/17/03 00004 * DATA SET DTSM1D AT LEVEL 004 AS OF 07/11/03 00005 * DATA SET DTSM1D AT LEVEL 002 AS OF 05/02/03 00006 * DATA SET DTSM1D AT LEVEL 007 AS OF 07/18/00 00007 * DATA SET DTSM1D AT LEVEL 003 AS OF 05/08/00 00008 * DATA SET DTSM1D AT LEVEL 005 AS OF 05/08/00 00009 ***** 00010 * 00011 * 1D MISCELLANEOUS REGISTRATION INQUIRY/UPDATE 00012 * 00013 ****** 00014 SPACE 00015 DTSM1D DFHMDI SIZE=(24,80),LINE=1,COLUMN=1 00016 SPACE 00017 F1D0101 DFHMDF POS=(1,1),LENGTH=02,ATTRB=(FSET,ASKIP), *00018 INITIAL='1D' 00019 SPACE 00020 DFHMDF POS=(1,14),LENGTH=41,ATTRB=(ASKIP), *00021 INITIAL='MISCELLANEOUS REGISTRATION INQUIRY/UPDATE' 00022 SPACE 00023 F1D0162 DFHMDF POS=(1,62),LENGTH=08,ATTRB=(ASKIP) 00024 SPACE 00025 F1D0172 DFHMDF POS=(1,72),LENGTH=08,ATTRB=(ASKIP) 00026 SPACE 00027 F1D0272 DFHMDF POS=(2,72),LENGTH=08,ATTRB=(ASKIP) 00028 SPACE 00029 DFHMDF POS=(03,09),LENGTH=07,ATTRB=(ASKIP), *00030 INITIAL='EMP NO:' 00031 SPACE 00032 F1D0317 DFHMDF POS=(03,17),LENGTH=03,ATTRB=(ASKIP) 00033 SPACE 00034 F1D0321 DFHMDF POS=(03,21),LENGTH=03,ATTRB=(ASKIP) 00035 SPACE 00036 DFHMDF POS=(03,25),LENGTH=01,ATTRB=(ASKIP) 00037 SPACE 00038 F1D0330 DFHMDF POS=(03,30),LENGTH=40,ATTRB=(ASKIP) 00039 SPACE 00040 DFHMDF POS=(05,07),LENGTH=21,ATTRB=(ASKIP), *00041 INITIAL='FISCAL AGENT SERVICES' 00042 SPACE 00043 DFHMDF POS=(06,07),LENGTH=22,ATTRB=(ASKIP), *00044 INITIAL=' ADDR OF RECORD:' 00045 SPACE 00046 F1D0630 DFHMDF POS=(06,30),LENGTH=03,ATTRB=(ASKIP) 00047 SPACE 00048 DFHMDF POS=(06,34),LENGTH=01,ATTRB=(ASKIP) 00049 SPACE 00050 F1D0636 DFHMDF POS=(06,36),LENGTH=40,ATTRB=(ASKIP) 00051 SPACE 00052 DFHMDF POS=(06,77),LENGTH=01,ATTRB=(ASKIP) 00053 SPACE 00054 DFHMDF POS=(07,07),LENGTH=22,ATTRB=(ASKIP), *00055 INITIAL=' QTRLY REPORT:' 00056 SPACE 00057 F1D0730 DFHMDF POS=(07,30),LENGTH=03,ATTRB=(ASKIP) 00058 SPACE 00059 DFHMDF POS=(07,34),LENGTH=01,ATTRB=(ASKIP) 00060 SPACE 00061 F1D0736 DFHMDF POS=(07,36),LENGTH=40,ATTRB=(ASKIP) 00062 SPACE 00063 DFHMDF POS=(07,77),LENGTH=01,ATTRB=(ASKIP) 00064 SPACE 00065 DFHMDF POS=(08,07),LENGTH=22,ATTRB=(ASKIP), *00066 INITIAL=' BENEFIT CHARGE:' 00067 SPACE 00068 F1D0830 DFHMDF POS=(08,30),LENGTH=03,ATTRB=(ASKIP) 00069 SPACE 00070 DFHMDF POS=(08,34),LENGTH=01,ATTRB=(ASKIP) 00071 SPACE 00072 F1D0836 DFHMDF POS=(08,36),LENGTH=40,ATTRB=(ASKIP) 00073 SPACE 00074 DFHMDF POS=(08,77),LENGTH=01,ATTRB=(ASKIP) 00075 SPACE 00076 DFHMDF POS=(10,12),LENGTH=17,ATTRB=(ASKIP), *00077 INITIAL='UC-30 MASS MAIL?' 00078 SPACE 00079 F1D1030 DFHMDF POS=(10,30),LENGTH=01,ATTRB=(ASKIP) 00080 SPACE 00081 DFHMDF POS=(10,32),LENGTH=01,ATTRB=(ASKIP) 00082 SPACE 00083 DFHMDF POS=(10,43),LENGTH=15,ATTRB=(ASKIP), *00084 INITIAL='CREDIT DISPLAY?' 00085 SPACE 00086 F1D0752 DFHMDF POS=(10,59),LENGTH=01,ATTRB=(ASKIP) 00087 SPACE 00088 DFHMDF POS=(10,61),LENGTH=01,ATTRB=(ASKIP) 00089 SPACE 00090 DFHMDF POS=(11,06),LENGTH=23,ATTRB=(ASKIP), *00091 INITIAL='CHARGE STATEMENT PRINT?' 00092 SPACE 00093 F1D1130 DFHMDF POS=(11,30),LENGTH=01,ATTRB=(ASKIP) 00094 SPACE 00095 DFHMDF POS=(11,32),LENGTH=01,ATTRB=(ASKIP) 00096 SPACE 00097 DFHMDF POS=(11,43),LENGTH=15,ATTRB=(ASKIP), *00098 INITIAL=' RETURN MAIL?' 00099 SPACE 00100 F1D1159 DFHMDF POS=(11,59),LENGTH=01,ATTRB=(ASKIP) 00101 SPACE 00102 DFHMDF POS=(11,61),LENGTH=01,ATTRB=(ASKIP) 00103 SPACE 00104 DFHMDF POS=(13,11),LENGTH=09,ATTRB=(ASKIP), *00105 INITIAL='ORG TYPE:' 00106 SPACE 00107 F1D1323 DFHMDF POS=(13,21),LENGTH=03,ATTRB=(ASKIP) 00108 SPACE 00109 DFHMDF POS=(13,25),LENGTH=01,ATTRB=(ASKIP) 00110 SPACE 00111 F1D1329 DFHMDF POS=(13,27),LENGTH=10,ATTRB=(ASKIP) 00112 SPACE 00113 DFHMDF POS=(13,38),LENGTH=01,ATTRB=(ASKIP) 00114 SPACE 00115 DFHMDF POS=(13,50),LENGTH=08,ATTRB=(ASKIP), *00116 INITIAL='ELIG CD:' 00117 SPACE 00118 F1D1330 DFHMDF POS=(13,59),LENGTH=03,ATTRB=(ASKIP) 00119 SPACE 00120 DFHMDF POS=(13,63),LENGTH=01,ATTRB=(ASKIP) 00121 SPACE 00122 F1D1340 DFHMDF POS=(13,65),LENGTH=10,ATTRB=(ASKIP) 00123 SPACE 00124 DFHMDF POS=(14,15),LENGTH=05,ATTRB=(ASKIP), *00125 INITIAL='FEIN:' 00126 SPACE 00127 F1D1421 DFHMDF POS=(14,21),LENGTH=02,ATTRB=(ASKIP) 00128 SPACE 00129 F1D1424 DFHMDF POS=(14,24),LENGTH=07,ATTRB=(ASKIP) 00130 SPACE 00131 DFHMDF POS=(14,32),LENGTH=01,ATTRB=(ASKIP) 00132 SPACE 00133 DFHMDF POS=(14,40),LENGTH=18,ATTRB=(ASKIP), *00134 INITIAL='LETTER IF NO FEIN?' 00135 SPACE 00136 F1D1459 DFHMDF POS=(14,59),LENGTH=01,ATTRB=(ASKIP) 00137 SPACE 00138 DFHMDF POS=(14,61),LENGTH=01,ATTRB=(ASKIP) 00139 SPACE 00140 DFHMDF POS=(15,06),LENGTH=14,ATTRB=(ASKIP), *00141 INITIAL='DC CONTRACTOR:' 00142 SPACE 00143 F1D1521 DFHMDF POS=(15,21),LENGTH=01,ATTRB=(ASKIP) 00144 SPACE 00145 DFHMDF POS=(15,23),LENGTH=01,ATTRB=(ASKIP) 00146 SPACE 00147 DFHMDF POS=(15,40),LENGTH=18,ATTRB=(ASKIP), *00148 INITIAL='POWER OF ATTORNEY:' 00149 SPACE 00150 F1D1558 DFHMDF POS=(15,59),LENGTH=02,ATTRB=(ASKIP) 00151 SPACE 00152 F1D1562 DFHMDF POS=(15,62),LENGTH=02,ATTRB=(ASKIP) 00153 SPACE 00154 F1D1565 DFHMDF POS=(15,65),LENGTH=02,ATTRB=(ASKIP) 00155 SPACE 00156 DFHMDF POS=(15,68),LENGTH=01,ATTRB=(ASKIP) 00157 SPACE 00158 DFHMDF POS=(16,07),LENGTH=13,ATTRB=(ASKIP), *00159 INITIAL='EFT ENROLLED:' 00160 SPACE 00161 F1D1621 DFHMDF POS=(16,21),LENGTH=01,ATTRB=(ASKIP) 00162 SPACE 00163 DFHMDF POS=(16,23),LENGTH=01,ATTRB=(ASKIP) 00164 SPACE 00165 DFHMDF POS=(18,02),LENGTH=27,ATTRB=(ASKIP), *00166 INITIAL='MOST RECENT ARCHIVED AUDIT:' 00167 SPACE 00168 F1D1830 DFHMDF POS=(18,30),LENGTH=02,ATTRB=(ASKIP) 00169 SPACE 00170 F1D1833 DFHMDF POS=(18,33),LENGTH=01,ATTRB=(ASKIP) 00171 SPACE 00172 DFHMDF POS=(18,35),LENGTH=01,ATTRB=(ASKIP) 00173 SPACE 00174 DFHMDF POS=(20,04),LENGTH=25,ATTRB=(ASKIP), *00175 INITIAL='MOST RECENT ARCHIVED QTR:' 00176 SPACE 00177 F1D2030 DFHMDF POS=(20,30),LENGTH=04,ATTRB=(ASKIP) 00178 SPACE 00179 F1D2319 DFHMDF POS=(23,19),LENGTH=07,ATTRB=(ASKIP) 00180 SPACE 00181 F1D2401 DFHMDF POS=(24,01),LENGTH=08,ATTRB=(ASKIP) 00182 SPACE 00183 F1D2410 DFHMDF POS=(24,10),LENGTH=58,ATTRB=(ASKIP) 00184 SPACE 00185 DFHMDF POS=(24,69),LENGTH=06,ATTRB=(ASKIP), *00186 INITIAL='GO TO:' 00187 SPACE 00188 F1D2476 DFHMDF POS=(24,76),LENGTH=02,ATTRB=(ASKIP) 00189 SPACE 00190 DFHMDF POS=(24,79),LENGTH=01,ATTRB=(ASKIP) 00191