ATXD8P6 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON MAY 12, 2014;
;;5.1;TAXONOMY;**11**;FEB 04, 1997;Build 48
;
START ;
K:'$G(ATXPGMC) ^TMP("ATX",$J)
S ATXPGMC=$G(ATXPGMC)+1
F ATXI=1:1 S X=$P($T(TMP+ATXI),";;",2,99) Q:X="" S X="^TMP(""ATX"",$J,"_X,ATXI=ATXI+1,Y=$P($T(TMP+ATXI),";;",2,99) S @X=Y
Q
;
TMP ;;TAXONOMY (WITH BULLETIN)
;;21,"O74.5 ")
;;1986
;;21,"O74.6 ")
;;1987
;;21,"O74.7 ")
;;1988
;;21,"O74.8 ")
;;1989
;;21,"O74.9 ")
;;1990
;;21,"O75.0 ")
;;1991
;;21,"O75.1 ")
;;1992
;;21,"O75.2 ")
;;1993
;;21,"O75.3 ")
;;1994
;;21,"O75.4 ")
;;1995
;;21,"O75.5 ")
;;1996
;;21,"O75.81 ")
;;1997
;;21,"O75.89 ")
;;1998
;;21,"O75.9 ")
;;1999
;;21,"O76. ")
;;2000
;;21,"O77.0 ")
;;2001
;;21,"O77.1 ")
;;2002
;;21,"O77.8 ")
;;2003
;;21,"O77.9 ")
;;2004
;;21,"O88.011 ")
;;2005
;;21,"O88.012 ")
;;2006
;;21,"O88.013 ")
;;2007
;;21,"O88.019 ")
;;2008
;;21,"O88.02 ")
;;2009
;;21,"O88.03 ")
;;2010
;;21,"O88.111 ")
;;2291
;;21,"O88.112 ")
;;2011
;;21,"O88.113 ")
;;2012
;;21,"O88.119 ")
;;2013
;;21,"O88.12 ")
;;2014
;;21,"O88.13 ")
;;2015
;;21,"O88.211 ")
;;2016
;;21,"O88.212 ")
;;2017
;;21,"O88.213 ")
;;2018
;;21,"O88.219 ")
;;2019
;;21,"O88.22 ")
;;2020
;;21,"O88.23 ")
;;2021
;;21,"O88.311 ")
;;2022
;;21,"O88.312 ")
;;2023
;;21,"O88.313 ")
;;2024
;;21,"O88.319 ")
;;2025
;;21,"O88.32 ")
;;2026
;;21,"O88.33 ")
;;2027
;;21,"O88.811 ")
;;2028
;;21,"O88.812 ")
;;2029
;;21,"O88.813 ")
;;2030
;;21,"O88.819 ")
;;2031
;;21,"O88.82 ")
;;2032
;;21,"O88.83 ")
;;2033
;;21,"O91.011 ")
;;2034
;;21,"O91.012 ")
;;2035
;;21,"O91.013 ")
;;2036
;;21,"O91.019 ")
;;2037
;;21,"O91.02 ")
;;2038
;;21,"O91.03 ")
;;2039
;;21,"O91.112 ")
;;2040
;;21,"O91.113 ")
;;2041
;;21,"O91.119 ")
;;2042
;;21,"O91.12 ")
;;2043
;;21,"O91.13 ")
;;2044
;;21,"O91.212 ")
;;2045
;;21,"O91.213 ")
;;2046
;;21,"O91.219 ")
;;2047
;;21,"O91.23 ")
;;2048
;;21,"O92.011 ")
;;2049
;;21,"O92.012 ")
;;2050
;;21,"O92.013 ")
;;2051
;;21,"O92.019 ")
;;2052
;;21,"O92.02 ")
;;2053
;;21,"O92.03 ")
;;2054
;;21,"O92.112 ")
;;2055
;;21,"O92.113 ")
;;2056
;;21,"O92.119 ")
;;2057
;;21,"O92.12 ")
;;2058
;;21,"O92.13 ")
;;2059
;;21,"O92.20 ")
;;2060
;;21,"O92.29 ")
;;2061
;;21,"O92.3 ")
;;2062
;;21,"O92.4 ")
;;2063
;;21,"O92.5 ")
;;2064
;;21,"O92.6 ")
;;2065
;;21,"O92.70 ")
;;2066
;;21,"O92.79 ")
;;2067
;;21,"O98.011 ")
;;2068
;;21,"O98.012 ")
;;2069
;;21,"O98.013 ")
;;2070
;;21,"O98.019 ")
;;2071
;;21,"O98.02 ")
;;2072
;;21,"O98.03 ")
;;2073
;;21,"O98.111 ")
;;2074
;;21,"O98.112 ")
;;2075
;;21,"O98.113 ")
;;2076
;;21,"O98.119 ")
;;2077
;;21,"O98.12 ")
;;2078
;;21,"O98.13 ")
;;2079
;;21,"O98.211 ")
;;2080
;;21,"O98.212 ")
;;2081
;;21,"O98.213 ")
;;2082
;;21,"O98.219 ")
;;2083
;;21,"O98.22 ")
;;2084
;;21,"O98.23 ")
;;2085
;;21,"O98.311 ")
;;2086
;;21,"O98.312 ")
;;2087
;;21,"O98.313 ")
;;2088
;;21,"O98.319 ")
;;2089
;;21,"O98.32 ")
;;2090
;;21,"O98.33 ")
;;2091
;;21,"O98.411 ")
;;2092
;;21,"O98.412 ")
;;2093
;;21,"O98.413 ")
;;2094
;;21,"O98.419 ")
;;2095
;;21,"O98.42 ")
;;2096
;;21,"O98.43 ")
;;2097
;;21,"O98.511 ")
;;2098
;;21,"O98.512 ")
;;2099
;;21,"O98.513 ")
;;2100
;;21,"O98.519 ")
;;2101
;;21,"O98.52 ")
;;2102
;;21,"O98.53 ")
;;2103
;;21,"O98.611 ")
;;2104
;;21,"O98.612 ")
;;2105
;;21,"O98.613 ")
;;2106
;;21,"O98.619 ")
;;2107
;;21,"O98.62 ")
;;2108
;;21,"O98.63 ")
;;2109
;;21,"O98.711 ")
;;2110
;;21,"O98.712 ")
;;2111
;;21,"O98.713 ")
;;2112
;;21,"O98.719 ")
;;2113
;;21,"O98.72 ")
;;2114
;;21,"O98.73 ")
;;2115
;;21,"O98.811 ")
;;2116
;;21,"O98.812 ")
;;2117
;;21,"O98.813 ")
;;2118
;;21,"O98.819 ")
;;2119
;;21,"O98.82 ")
;;2120
;;21,"O98.83 ")
;;2121
;;21,"O98.911 ")
;;2122
;;21,"O98.912 ")
;;2123
;;21,"O98.913 ")
;;2124
;;21,"O98.919 ")
;;2125
;;21,"O98.92 ")
;;2126
;;21,"O98.93 ")
;;2127
;;21,"O99.011 ")
;;2128
;;21,"O99.012 ")
;;2129
;;21,"O99.013 ")
;;2130
;;21,"O99.019 ")
;;2131
;;21,"O99.02 ")
;;2132
;;21,"O99.03 ")
;;2133
;;21,"O99.111 ")
;;2134
;;21,"O99.112 ")
;;2135
;;21,"O99.113 ")
;;2136
;;21,"O99.119 ")
;;2137
;;21,"O99.12 ")
;;2138
;;21,"O99.13 ")
;;2139
;;21,"O99.210 ")
;;2140
;;21,"O99.211 ")
;;2141
;;21,"O99.212 ")
;;2142
;;21,"O99.213 ")
;;2143
;;21,"O99.214 ")
;;2144
;;21,"O99.215 ")
;;2145
;;21,"O99.280 ")
;;2146
;;21,"O99.281 ")
;;2147
;;21,"O99.282 ")
;;2148
;;21,"O99.283 ")
;;2149
;;21,"O99.284 ")
;;2150
;;21,"O99.285 ")
;;2151
;;21,"O99.310 ")
;;2152
;;21,"O99.311 ")
;;2153
;;21,"O99.312 ")
;;2154
;;21,"O99.313 ")
;;2155
;;21,"O99.314 ")
;;2156
;;21,"O99.315 ")
;;2157
;;21,"O99.320 ")
;;2158
;;21,"O99.321 ")
;;2159
;;21,"O99.322 ")
;;2160
;;21,"O99.323 ")
;;2161
;;21,"O99.324 ")
;;2162
;;21,"O99.325 ")
;;2163
;;21,"O99.330 ")
;;2164
;;21,"O99.331 ")
;;2165
;;21,"O99.332 ")
;;2166
;;21,"O99.333 ")
;;2167
;;21,"O99.334 ")
;;2168
;;21,"O99.335 ")
;;2169
;;21,"O99.340 ")
;;2170
;;21,"O99.341 ")
;;2171
;;21,"O99.342 ")
;;2172
;;21,"O99.343 ")
;;2173
;;21,"O99.344 ")
;;2174
;;21,"O99.345 ")
;;2175
;;21,"O99.350 ")
;;2176
;;21,"O99.351 ")
;;2177
;;21,"O99.352 ")
;;2178
;;21,"O99.353 ")
;;2179
;;21,"O99.354 ")
;;2180
;;21,"O99.355 ")
;;2181
;;21,"O99.411 ")
;;2182
;;21,"O99.412 ")
;;2183
;;21,"O99.413 ")
;;2184
;;21,"O99.419 ")
;;2185
;;21,"O99.42 ")
;;2186
;;21,"O99.43 ")
;;2187
;;21,"O99.511 ")
;;2188
;;21,"O99.512 ")
;;2189
;;21,"O99.513 ")
;;2190
;;21,"O99.519 ")
;;2191
;;21,"O99.52 ")
;;2192
;;21,"O99.53 ")
;;2193
;;21,"O99.611 ")
;;2194
;;21,"O99.612 ")
;;2195
;;21,"O99.613 ")
;;2196
;;21,"O99.619 ")
;;2197
;;21,"O99.62 ")
;;2198
;;21,"O99.63 ")
;;2199
;;21,"O99.711 ")
;;2200
;;21,"O99.712 ")
;;2201
;;21,"O99.713 ")
;;2202
;;21,"O99.719 ")
;;2203
;;21,"O99.72 ")
;;2204
;;21,"O99.73 ")
;;2205
;;21,"O99.810 ")
;;2206
;;21,"O99.814 ")
;;2207
;;21,"O99.815 ")
;;2208
;;21,"O99.820 ")
;;2209
;;21,"O99.824 ")
;;2210
;;21,"O99.825 ")
;;2211
;;21,"O99.830 ")
;;2212
;;21,"O99.834 ")
;;2213
;;21,"O99.835 ")
;;2214
;;21,"O99.840 ")
;;2215
;;21,"O99.841 ")
;;2216
;;21,"O99.842 ")
;;2217
;;21,"O99.843 ")
;;2218
;;21,"O99.844 ")
;;2219
;;21,"O99.845 ")
;;2220
;;21,"O99.89 ")
;;2221
;;21,"O9A.111 ")
;;2222
;;21,"O9A.112 ")
;;2223
;;21,"O9A.113 ")
;;2224
;;21,"O9A.119 ")
;;2225
;;21,"O9A.12 ")
;;2226
;;21,"O9A.13 ")
;;2227
;;21,"O9A.211 ")
;;2228
;;21,"O9A.212 ")
;;2229
;;21,"O9A.213 ")
;;2230
;;21,"O9A.219 ")
;;2231
;;21,"O9A.22 ")
;;2232
;;21,"O9A.23 ")
;;2233
;;21,"O9A.311 ")
;;2234
;;21,"O9A.312 ")
;;2235
;;21,"O9A.313 ")
;;2236
;;21,"O9A.319 ")
;;2237
;;21,"O9A.32 ")
;;2238
;;21,"O9A.33 ")
;;2239
;;21,"O9A.411 ")
;;2240
;;21,"O9A.412 ")
;;2241
;;21,"O9A.413 ")
;;2242
;;21,"O9A.419 ")
;;2243
;;21,"O9A.42 ")
;;2244
;;21,"O9A.43 ")
;;2245
;;21,"O9A.511 ")
;;2246
;;21,"O9A.512 ")
;;2247
;;21,"O9A.513 ")
;;2248
;;21,"O9A.519 ")
;;2249
;;21,"O9A.52 ")
;;2250
;;21,"O9A.53 ")
;;2251
;;21,"V22.0 ")
;;2252
;;21,"V72.42 ")
;;2253
;;21,"Z03.71 ")
;;2254
;;21,"Z03.72 ")
;;2255
;;21,"Z03.73 ")
;;2256
;;21,"Z03.74 ")
;;2257
;;21,"Z03.75 ")
;;2258
;;21,"Z03.79 ")
;;2259
;;21,"Z32.01 ")
;;2260
;;21,"Z33.1 ")
;;2261
;;21,"Z34.00 ")
;;2262
;;21,"Z34.01 ")
;;2263
;;21,"Z34.02 ")
;;2264
;;21,"Z34.03 ")
;;2265
;;21,"Z34.80 ")
;;2266
;;21,"Z34.81 ")
;;2267
;;21,"Z34.82 ")
;;2268
;;21,"Z34.83 ")
;;2269
;;21,"Z34.90 ")
;;2270
;;21,"Z34.91 ")
;;2271
;;21,"Z34.92 ")
;;2272
;;21,"Z34.93 ")
;;2273
;;21,"Z36. ")
;;2274
;;9002226,913,.01)
;;SURVEILLANCE H1N1 PREGNANCY DX
;;9002226,913,.02)
;;@
;;9002226,913,.04)
;;n
;;9002226,913,.06)
;;@
;;9002226,913,.08)
;;0
;;9002226,913,.09)
;;3131113
;;9002226,913,.11)
;;@
;;9002226,913,.12)
;;31
;;9002226,913,.13)
;;1
;;9002226,913,.14)
;;@
;;9002226,913,.15)
;;80
;;9002226,913,.16)
;;@
;;9002226,913,.17)
;;@
;;9002226,913,3101)
;;@
;;9002226.02101,"913,640.00 ",.01)
;;640.00
;;9002226.02101,"913,640.00 ",.02)
;;640.00
;;9002226.02101,"913,640.00 ",.03)
;;1
;;9002226.02101,"913,640.03 ",.01)
;;640.03
;;9002226.02101,"913,640.03 ",.02)
;;640.80
;;9002226.02101,"913,640.03 ",.03)
;;1
;;9002226.02101,"913,640.83 ",.01)
;;640.83
;;9002226.02101,"913,640.83 ",.02)
;;640.90
;;9002226.02101,"913,640.83 ",.03)
;;1
;;9002226.02101,"913,640.93 ",.01)
;;640.93
;;9002226.02101,"913,640.93 ",.02)
;;641.00
;;9002226.02101,"913,640.93 ",.03)
;;1
;;9002226.02101,"913,641.03 ",.01)
;;641.03
;;9002226.02101,"913,641.03 ",.02)
;;641.10
;;9002226.02101,"913,641.03 ",.03)
;;1
;;9002226.02101,"913,641.13 ",.01)
;;641.13
;;9002226.02101,"913,641.13 ",.02)
;;641.20
;;9002226.02101,"913,641.13 ",.03)
;;1
;;9002226.02101,"913,641.23 ",.01)
;;641.23
;;9002226.02101,"913,641.23 ",.02)
;;641.30
;;9002226.02101,"913,641.23 ",.03)
;;1
;;9002226.02101,"913,641.33 ",.01)
;;641.33
;;9002226.02101,"913,641.33 ",.02)
;;641.80
;;9002226.02101,"913,641.33 ",.03)
;;1
;;9002226.02101,"913,641.83 ",.01)
;;641.83
;;9002226.02101,"913,641.83 ",.02)
;;641.90
;;9002226.02101,"913,641.83 ",.03)
;;1
;;9002226.02101,"913,641.93 ",.01)
;;641.93
;;9002226.02101,"913,641.93 ",.02)
;;642.00
;;9002226.02101,"913,641.93 ",.03)
;;1
;;9002226.02101,"913,642.03 ",.01)
;;642.03
;;9002226.02101,"913,642.03 ",.02)
;;642.03
;;9002226.02101,"913,642.03 ",.03)
;;1
;;9002226.02101,"913,642.10 ",.01)
;;642.10
;;9002226.02101,"913,642.10 ",.02)
;;642.10
;;9002226.02101,"913,642.10 ",.03)
;;1
;;9002226.02101,"913,642.13 ",.01)
;;642.13
;;9002226.02101,"913,642.13 ",.02)
;;642.13
;;9002226.02101,"913,642.13 ",.03)
;;1
;;9002226.02101,"913,642.20 ",.01)
;;642.20
;;9002226.02101,"913,642.20 ",.02)
;;642.20
;;9002226.02101,"913,642.20 ",.03)
;;1
;;9002226.02101,"913,642.23 ",.01)
;;642.23
;;9002226.02101,"913,642.23 ",.02)
;;642.23
;;9002226.02101,"913,642.23 ",.03)
;;1
;;9002226.02101,"913,642.30 ",.01)
;;642.30
;;9002226.02101,"913,642.30 ",.02)
;;642.30
;;9002226.02101,"913,642.30 ",.03)
;;1
;;9002226.02101,"913,642.33 ",.01)
;;642.33
;;9002226.02101,"913,642.33 ",.02)
;;642.33
;;9002226.02101,"913,642.33 ",.03)
;;1
;;9002226.02101,"913,642.40 ",.01)
;;642.40
;;9002226.02101,"913,642.40 ",.02)
;;642.40
;;9002226.02101,"913,642.40 ",.03)
;;1
;;9002226.02101,"913,642.43 ",.01)
;;642.43
;;9002226.02101,"913,642.43 ",.02)
;;642.43
;;9002226.02101,"913,642.43 ",.03)
;;1
;;9002226.02101,"913,642.50 ",.01)
;;642.50
;;9002226.02101,"913,642.50 ",.02)
;;642.50
;;9002226.02101,"913,642.50 ",.03)
;;1
ATXD8P6 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON MAY 12, 2014;
+1 ;;5.1;TAXONOMY;**11**;FEB 04, 1997;Build 48
+2 ;
START ;
+1 IF '$GET(ATXPGMC)
KILL ^TMP("ATX",$JOB)
+2 SET ATXPGMC=$GET(ATXPGMC)+1
+3 FOR ATXI=1:1
SET X=$PIECE($TEXT(TMP+ATXI),";;",2,99)
IF X=""
QUIT
SET X="^TMP(""ATX"",$J,"_X
SET ATXI=ATXI+1
SET Y=$PIECE($TEXT(TMP+ATXI),";;",2,99)
SET @X=Y
+4 QUIT
+5 ;
TMP ;;TAXONOMY (WITH BULLETIN)
+1 ;;21,"O74.5 ")
+2 ;;1986
+3 ;;21,"O74.6 ")
+4 ;;1987
+5 ;;21,"O74.7 ")
+6 ;;1988
+7 ;;21,"O74.8 ")
+8 ;;1989
+9 ;;21,"O74.9 ")
+10 ;;1990
+11 ;;21,"O75.0 ")
+12 ;;1991
+13 ;;21,"O75.1 ")
+14 ;;1992
+15 ;;21,"O75.2 ")
+16 ;;1993
+17 ;;21,"O75.3 ")
+18 ;;1994
+19 ;;21,"O75.4 ")
+20 ;;1995
+21 ;;21,"O75.5 ")
+22 ;;1996
+23 ;;21,"O75.81 ")
+24 ;;1997
+25 ;;21,"O75.89 ")
+26 ;;1998
+27 ;;21,"O75.9 ")
+28 ;;1999
+29 ;;21,"O76. ")
+30 ;;2000
+31 ;;21,"O77.0 ")
+32 ;;2001
+33 ;;21,"O77.1 ")
+34 ;;2002
+35 ;;21,"O77.8 ")
+36 ;;2003
+37 ;;21,"O77.9 ")
+38 ;;2004
+39 ;;21,"O88.011 ")
+40 ;;2005
+41 ;;21,"O88.012 ")
+42 ;;2006
+43 ;;21,"O88.013 ")
+44 ;;2007
+45 ;;21,"O88.019 ")
+46 ;;2008
+47 ;;21,"O88.02 ")
+48 ;;2009
+49 ;;21,"O88.03 ")
+50 ;;2010
+51 ;;21,"O88.111 ")
+52 ;;2291
+53 ;;21,"O88.112 ")
+54 ;;2011
+55 ;;21,"O88.113 ")
+56 ;;2012
+57 ;;21,"O88.119 ")
+58 ;;2013
+59 ;;21,"O88.12 ")
+60 ;;2014
+61 ;;21,"O88.13 ")
+62 ;;2015
+63 ;;21,"O88.211 ")
+64 ;;2016
+65 ;;21,"O88.212 ")
+66 ;;2017
+67 ;;21,"O88.213 ")
+68 ;;2018
+69 ;;21,"O88.219 ")
+70 ;;2019
+71 ;;21,"O88.22 ")
+72 ;;2020
+73 ;;21,"O88.23 ")
+74 ;;2021
+75 ;;21,"O88.311 ")
+76 ;;2022
+77 ;;21,"O88.312 ")
+78 ;;2023
+79 ;;21,"O88.313 ")
+80 ;;2024
+81 ;;21,"O88.319 ")
+82 ;;2025
+83 ;;21,"O88.32 ")
+84 ;;2026
+85 ;;21,"O88.33 ")
+86 ;;2027
+87 ;;21,"O88.811 ")
+88 ;;2028
+89 ;;21,"O88.812 ")
+90 ;;2029
+91 ;;21,"O88.813 ")
+92 ;;2030
+93 ;;21,"O88.819 ")
+94 ;;2031
+95 ;;21,"O88.82 ")
+96 ;;2032
+97 ;;21,"O88.83 ")
+98 ;;2033
+99 ;;21,"O91.011 ")
+100 ;;2034
+101 ;;21,"O91.012 ")
+102 ;;2035
+103 ;;21,"O91.013 ")
+104 ;;2036
+105 ;;21,"O91.019 ")
+106 ;;2037
+107 ;;21,"O91.02 ")
+108 ;;2038
+109 ;;21,"O91.03 ")
+110 ;;2039
+111 ;;21,"O91.112 ")
+112 ;;2040
+113 ;;21,"O91.113 ")
+114 ;;2041
+115 ;;21,"O91.119 ")
+116 ;;2042
+117 ;;21,"O91.12 ")
+118 ;;2043
+119 ;;21,"O91.13 ")
+120 ;;2044
+121 ;;21,"O91.212 ")
+122 ;;2045
+123 ;;21,"O91.213 ")
+124 ;;2046
+125 ;;21,"O91.219 ")
+126 ;;2047
+127 ;;21,"O91.23 ")
+128 ;;2048
+129 ;;21,"O92.011 ")
+130 ;;2049
+131 ;;21,"O92.012 ")
+132 ;;2050
+133 ;;21,"O92.013 ")
+134 ;;2051
+135 ;;21,"O92.019 ")
+136 ;;2052
+137 ;;21,"O92.02 ")
+138 ;;2053
+139 ;;21,"O92.03 ")
+140 ;;2054
+141 ;;21,"O92.112 ")
+142 ;;2055
+143 ;;21,"O92.113 ")
+144 ;;2056
+145 ;;21,"O92.119 ")
+146 ;;2057
+147 ;;21,"O92.12 ")
+148 ;;2058
+149 ;;21,"O92.13 ")
+150 ;;2059
+151 ;;21,"O92.20 ")
+152 ;;2060
+153 ;;21,"O92.29 ")
+154 ;;2061
+155 ;;21,"O92.3 ")
+156 ;;2062
+157 ;;21,"O92.4 ")
+158 ;;2063
+159 ;;21,"O92.5 ")
+160 ;;2064
+161 ;;21,"O92.6 ")
+162 ;;2065
+163 ;;21,"O92.70 ")
+164 ;;2066
+165 ;;21,"O92.79 ")
+166 ;;2067
+167 ;;21,"O98.011 ")
+168 ;;2068
+169 ;;21,"O98.012 ")
+170 ;;2069
+171 ;;21,"O98.013 ")
+172 ;;2070
+173 ;;21,"O98.019 ")
+174 ;;2071
+175 ;;21,"O98.02 ")
+176 ;;2072
+177 ;;21,"O98.03 ")
+178 ;;2073
+179 ;;21,"O98.111 ")
+180 ;;2074
+181 ;;21,"O98.112 ")
+182 ;;2075
+183 ;;21,"O98.113 ")
+184 ;;2076
+185 ;;21,"O98.119 ")
+186 ;;2077
+187 ;;21,"O98.12 ")
+188 ;;2078
+189 ;;21,"O98.13 ")
+190 ;;2079
+191 ;;21,"O98.211 ")
+192 ;;2080
+193 ;;21,"O98.212 ")
+194 ;;2081
+195 ;;21,"O98.213 ")
+196 ;;2082
+197 ;;21,"O98.219 ")
+198 ;;2083
+199 ;;21,"O98.22 ")
+200 ;;2084
+201 ;;21,"O98.23 ")
+202 ;;2085
+203 ;;21,"O98.311 ")
+204 ;;2086
+205 ;;21,"O98.312 ")
+206 ;;2087
+207 ;;21,"O98.313 ")
+208 ;;2088
+209 ;;21,"O98.319 ")
+210 ;;2089
+211 ;;21,"O98.32 ")
+212 ;;2090
+213 ;;21,"O98.33 ")
+214 ;;2091
+215 ;;21,"O98.411 ")
+216 ;;2092
+217 ;;21,"O98.412 ")
+218 ;;2093
+219 ;;21,"O98.413 ")
+220 ;;2094
+221 ;;21,"O98.419 ")
+222 ;;2095
+223 ;;21,"O98.42 ")
+224 ;;2096
+225 ;;21,"O98.43 ")
+226 ;;2097
+227 ;;21,"O98.511 ")
+228 ;;2098
+229 ;;21,"O98.512 ")
+230 ;;2099
+231 ;;21,"O98.513 ")
+232 ;;2100
+233 ;;21,"O98.519 ")
+234 ;;2101
+235 ;;21,"O98.52 ")
+236 ;;2102
+237 ;;21,"O98.53 ")
+238 ;;2103
+239 ;;21,"O98.611 ")
+240 ;;2104
+241 ;;21,"O98.612 ")
+242 ;;2105
+243 ;;21,"O98.613 ")
+244 ;;2106
+245 ;;21,"O98.619 ")
+246 ;;2107
+247 ;;21,"O98.62 ")
+248 ;;2108
+249 ;;21,"O98.63 ")
+250 ;;2109
+251 ;;21,"O98.711 ")
+252 ;;2110
+253 ;;21,"O98.712 ")
+254 ;;2111
+255 ;;21,"O98.713 ")
+256 ;;2112
+257 ;;21,"O98.719 ")
+258 ;;2113
+259 ;;21,"O98.72 ")
+260 ;;2114
+261 ;;21,"O98.73 ")
+262 ;;2115
+263 ;;21,"O98.811 ")
+264 ;;2116
+265 ;;21,"O98.812 ")
+266 ;;2117
+267 ;;21,"O98.813 ")
+268 ;;2118
+269 ;;21,"O98.819 ")
+270 ;;2119
+271 ;;21,"O98.82 ")
+272 ;;2120
+273 ;;21,"O98.83 ")
+274 ;;2121
+275 ;;21,"O98.911 ")
+276 ;;2122
+277 ;;21,"O98.912 ")
+278 ;;2123
+279 ;;21,"O98.913 ")
+280 ;;2124
+281 ;;21,"O98.919 ")
+282 ;;2125
+283 ;;21,"O98.92 ")
+284 ;;2126
+285 ;;21,"O98.93 ")
+286 ;;2127
+287 ;;21,"O99.011 ")
+288 ;;2128
+289 ;;21,"O99.012 ")
+290 ;;2129
+291 ;;21,"O99.013 ")
+292 ;;2130
+293 ;;21,"O99.019 ")
+294 ;;2131
+295 ;;21,"O99.02 ")
+296 ;;2132
+297 ;;21,"O99.03 ")
+298 ;;2133
+299 ;;21,"O99.111 ")
+300 ;;2134
+301 ;;21,"O99.112 ")
+302 ;;2135
+303 ;;21,"O99.113 ")
+304 ;;2136
+305 ;;21,"O99.119 ")
+306 ;;2137
+307 ;;21,"O99.12 ")
+308 ;;2138
+309 ;;21,"O99.13 ")
+310 ;;2139
+311 ;;21,"O99.210 ")
+312 ;;2140
+313 ;;21,"O99.211 ")
+314 ;;2141
+315 ;;21,"O99.212 ")
+316 ;;2142
+317 ;;21,"O99.213 ")
+318 ;;2143
+319 ;;21,"O99.214 ")
+320 ;;2144
+321 ;;21,"O99.215 ")
+322 ;;2145
+323 ;;21,"O99.280 ")
+324 ;;2146
+325 ;;21,"O99.281 ")
+326 ;;2147
+327 ;;21,"O99.282 ")
+328 ;;2148
+329 ;;21,"O99.283 ")
+330 ;;2149
+331 ;;21,"O99.284 ")
+332 ;;2150
+333 ;;21,"O99.285 ")
+334 ;;2151
+335 ;;21,"O99.310 ")
+336 ;;2152
+337 ;;21,"O99.311 ")
+338 ;;2153
+339 ;;21,"O99.312 ")
+340 ;;2154
+341 ;;21,"O99.313 ")
+342 ;;2155
+343 ;;21,"O99.314 ")
+344 ;;2156
+345 ;;21,"O99.315 ")
+346 ;;2157
+347 ;;21,"O99.320 ")
+348 ;;2158
+349 ;;21,"O99.321 ")
+350 ;;2159
+351 ;;21,"O99.322 ")
+352 ;;2160
+353 ;;21,"O99.323 ")
+354 ;;2161
+355 ;;21,"O99.324 ")
+356 ;;2162
+357 ;;21,"O99.325 ")
+358 ;;2163
+359 ;;21,"O99.330 ")
+360 ;;2164
+361 ;;21,"O99.331 ")
+362 ;;2165
+363 ;;21,"O99.332 ")
+364 ;;2166
+365 ;;21,"O99.333 ")
+366 ;;2167
+367 ;;21,"O99.334 ")
+368 ;;2168
+369 ;;21,"O99.335 ")
+370 ;;2169
+371 ;;21,"O99.340 ")
+372 ;;2170
+373 ;;21,"O99.341 ")
+374 ;;2171
+375 ;;21,"O99.342 ")
+376 ;;2172
+377 ;;21,"O99.343 ")
+378 ;;2173
+379 ;;21,"O99.344 ")
+380 ;;2174
+381 ;;21,"O99.345 ")
+382 ;;2175
+383 ;;21,"O99.350 ")
+384 ;;2176
+385 ;;21,"O99.351 ")
+386 ;;2177
+387 ;;21,"O99.352 ")
+388 ;;2178
+389 ;;21,"O99.353 ")
+390 ;;2179
+391 ;;21,"O99.354 ")
+392 ;;2180
+393 ;;21,"O99.355 ")
+394 ;;2181
+395 ;;21,"O99.411 ")
+396 ;;2182
+397 ;;21,"O99.412 ")
+398 ;;2183
+399 ;;21,"O99.413 ")
+400 ;;2184
+401 ;;21,"O99.419 ")
+402 ;;2185
+403 ;;21,"O99.42 ")
+404 ;;2186
+405 ;;21,"O99.43 ")
+406 ;;2187
+407 ;;21,"O99.511 ")
+408 ;;2188
+409 ;;21,"O99.512 ")
+410 ;;2189
+411 ;;21,"O99.513 ")
+412 ;;2190
+413 ;;21,"O99.519 ")
+414 ;;2191
+415 ;;21,"O99.52 ")
+416 ;;2192
+417 ;;21,"O99.53 ")
+418 ;;2193
+419 ;;21,"O99.611 ")
+420 ;;2194
+421 ;;21,"O99.612 ")
+422 ;;2195
+423 ;;21,"O99.613 ")
+424 ;;2196
+425 ;;21,"O99.619 ")
+426 ;;2197
+427 ;;21,"O99.62 ")
+428 ;;2198
+429 ;;21,"O99.63 ")
+430 ;;2199
+431 ;;21,"O99.711 ")
+432 ;;2200
+433 ;;21,"O99.712 ")
+434 ;;2201
+435 ;;21,"O99.713 ")
+436 ;;2202
+437 ;;21,"O99.719 ")
+438 ;;2203
+439 ;;21,"O99.72 ")
+440 ;;2204
+441 ;;21,"O99.73 ")
+442 ;;2205
+443 ;;21,"O99.810 ")
+444 ;;2206
+445 ;;21,"O99.814 ")
+446 ;;2207
+447 ;;21,"O99.815 ")
+448 ;;2208
+449 ;;21,"O99.820 ")
+450 ;;2209
+451 ;;21,"O99.824 ")
+452 ;;2210
+453 ;;21,"O99.825 ")
+454 ;;2211
+455 ;;21,"O99.830 ")
+456 ;;2212
+457 ;;21,"O99.834 ")
+458 ;;2213
+459 ;;21,"O99.835 ")
+460 ;;2214
+461 ;;21,"O99.840 ")
+462 ;;2215
+463 ;;21,"O99.841 ")
+464 ;;2216
+465 ;;21,"O99.842 ")
+466 ;;2217
+467 ;;21,"O99.843 ")
+468 ;;2218
+469 ;;21,"O99.844 ")
+470 ;;2219
+471 ;;21,"O99.845 ")
+472 ;;2220
+473 ;;21,"O99.89 ")
+474 ;;2221
+475 ;;21,"O9A.111 ")
+476 ;;2222
+477 ;;21,"O9A.112 ")
+478 ;;2223
+479 ;;21,"O9A.113 ")
+480 ;;2224
+481 ;;21,"O9A.119 ")
+482 ;;2225
+483 ;;21,"O9A.12 ")
+484 ;;2226
+485 ;;21,"O9A.13 ")
+486 ;;2227
+487 ;;21,"O9A.211 ")
+488 ;;2228
+489 ;;21,"O9A.212 ")
+490 ;;2229
+491 ;;21,"O9A.213 ")
+492 ;;2230
+493 ;;21,"O9A.219 ")
+494 ;;2231
+495 ;;21,"O9A.22 ")
+496 ;;2232
+497 ;;21,"O9A.23 ")
+498 ;;2233
+499 ;;21,"O9A.311 ")
+500 ;;2234
+501 ;;21,"O9A.312 ")
+502 ;;2235
+503 ;;21,"O9A.313 ")
+504 ;;2236
+505 ;;21,"O9A.319 ")
+506 ;;2237
+507 ;;21,"O9A.32 ")
+508 ;;2238
+509 ;;21,"O9A.33 ")
+510 ;;2239
+511 ;;21,"O9A.411 ")
+512 ;;2240
+513 ;;21,"O9A.412 ")
+514 ;;2241
+515 ;;21,"O9A.413 ")
+516 ;;2242
+517 ;;21,"O9A.419 ")
+518 ;;2243
+519 ;;21,"O9A.42 ")
+520 ;;2244
+521 ;;21,"O9A.43 ")
+522 ;;2245
+523 ;;21,"O9A.511 ")
+524 ;;2246
+525 ;;21,"O9A.512 ")
+526 ;;2247
+527 ;;21,"O9A.513 ")
+528 ;;2248
+529 ;;21,"O9A.519 ")
+530 ;;2249
+531 ;;21,"O9A.52 ")
+532 ;;2250
+533 ;;21,"O9A.53 ")
+534 ;;2251
+535 ;;21,"V22.0 ")
+536 ;;2252
+537 ;;21,"V72.42 ")
+538 ;;2253
+539 ;;21,"Z03.71 ")
+540 ;;2254
+541 ;;21,"Z03.72 ")
+542 ;;2255
+543 ;;21,"Z03.73 ")
+544 ;;2256
+545 ;;21,"Z03.74 ")
+546 ;;2257
+547 ;;21,"Z03.75 ")
+548 ;;2258
+549 ;;21,"Z03.79 ")
+550 ;;2259
+551 ;;21,"Z32.01 ")
+552 ;;2260
+553 ;;21,"Z33.1 ")
+554 ;;2261
+555 ;;21,"Z34.00 ")
+556 ;;2262
+557 ;;21,"Z34.01 ")
+558 ;;2263
+559 ;;21,"Z34.02 ")
+560 ;;2264
+561 ;;21,"Z34.03 ")
+562 ;;2265
+563 ;;21,"Z34.80 ")
+564 ;;2266
+565 ;;21,"Z34.81 ")
+566 ;;2267
+567 ;;21,"Z34.82 ")
+568 ;;2268
+569 ;;21,"Z34.83 ")
+570 ;;2269
+571 ;;21,"Z34.90 ")
+572 ;;2270
+573 ;;21,"Z34.91 ")
+574 ;;2271
+575 ;;21,"Z34.92 ")
+576 ;;2272
+577 ;;21,"Z34.93 ")
+578 ;;2273
+579 ;;21,"Z36. ")
+580 ;;2274
+581 ;;9002226,913,.01)
+582 ;;SURVEILLANCE H1N1 PREGNANCY DX
+583 ;;9002226,913,.02)
+584 ;;@
+585 ;;9002226,913,.04)
+586 ;;n
+587 ;;9002226,913,.06)
+588 ;;@
+589 ;;9002226,913,.08)
+590 ;;0
+591 ;;9002226,913,.09)
+592 ;;3131113
+593 ;;9002226,913,.11)
+594 ;;@
+595 ;;9002226,913,.12)
+596 ;;31
+597 ;;9002226,913,.13)
+598 ;;1
+599 ;;9002226,913,.14)
+600 ;;@
+601 ;;9002226,913,.15)
+602 ;;80
+603 ;;9002226,913,.16)
+604 ;;@
+605 ;;9002226,913,.17)
+606 ;;@
+607 ;;9002226,913,3101)
+608 ;;@
+609 ;;9002226.02101,"913,640.00 ",.01)
+610 ;;640.00
+611 ;;9002226.02101,"913,640.00 ",.02)
+612 ;;640.00
+613 ;;9002226.02101,"913,640.00 ",.03)
+614 ;;1
+615 ;;9002226.02101,"913,640.03 ",.01)
+616 ;;640.03
+617 ;;9002226.02101,"913,640.03 ",.02)
+618 ;;640.80
+619 ;;9002226.02101,"913,640.03 ",.03)
+620 ;;1
+621 ;;9002226.02101,"913,640.83 ",.01)
+622 ;;640.83
+623 ;;9002226.02101,"913,640.83 ",.02)
+624 ;;640.90
+625 ;;9002226.02101,"913,640.83 ",.03)
+626 ;;1
+627 ;;9002226.02101,"913,640.93 ",.01)
+628 ;;640.93
+629 ;;9002226.02101,"913,640.93 ",.02)
+630 ;;641.00
+631 ;;9002226.02101,"913,640.93 ",.03)
+632 ;;1
+633 ;;9002226.02101,"913,641.03 ",.01)
+634 ;;641.03
+635 ;;9002226.02101,"913,641.03 ",.02)
+636 ;;641.10
+637 ;;9002226.02101,"913,641.03 ",.03)
+638 ;;1
+639 ;;9002226.02101,"913,641.13 ",.01)
+640 ;;641.13
+641 ;;9002226.02101,"913,641.13 ",.02)
+642 ;;641.20
+643 ;;9002226.02101,"913,641.13 ",.03)
+644 ;;1
+645 ;;9002226.02101,"913,641.23 ",.01)
+646 ;;641.23
+647 ;;9002226.02101,"913,641.23 ",.02)
+648 ;;641.30
+649 ;;9002226.02101,"913,641.23 ",.03)
+650 ;;1
+651 ;;9002226.02101,"913,641.33 ",.01)
+652 ;;641.33
+653 ;;9002226.02101,"913,641.33 ",.02)
+654 ;;641.80
+655 ;;9002226.02101,"913,641.33 ",.03)
+656 ;;1
+657 ;;9002226.02101,"913,641.83 ",.01)
+658 ;;641.83
+659 ;;9002226.02101,"913,641.83 ",.02)
+660 ;;641.90
+661 ;;9002226.02101,"913,641.83 ",.03)
+662 ;;1
+663 ;;9002226.02101,"913,641.93 ",.01)
+664 ;;641.93
+665 ;;9002226.02101,"913,641.93 ",.02)
+666 ;;642.00
+667 ;;9002226.02101,"913,641.93 ",.03)
+668 ;;1
+669 ;;9002226.02101,"913,642.03 ",.01)
+670 ;;642.03
+671 ;;9002226.02101,"913,642.03 ",.02)
+672 ;;642.03
+673 ;;9002226.02101,"913,642.03 ",.03)
+674 ;;1
+675 ;;9002226.02101,"913,642.10 ",.01)
+676 ;;642.10
+677 ;;9002226.02101,"913,642.10 ",.02)
+678 ;;642.10
+679 ;;9002226.02101,"913,642.10 ",.03)
+680 ;;1
+681 ;;9002226.02101,"913,642.13 ",.01)
+682 ;;642.13
+683 ;;9002226.02101,"913,642.13 ",.02)
+684 ;;642.13
+685 ;;9002226.02101,"913,642.13 ",.03)
+686 ;;1
+687 ;;9002226.02101,"913,642.20 ",.01)
+688 ;;642.20
+689 ;;9002226.02101,"913,642.20 ",.02)
+690 ;;642.20
+691 ;;9002226.02101,"913,642.20 ",.03)
+692 ;;1
+693 ;;9002226.02101,"913,642.23 ",.01)
+694 ;;642.23
+695 ;;9002226.02101,"913,642.23 ",.02)
+696 ;;642.23
+697 ;;9002226.02101,"913,642.23 ",.03)
+698 ;;1
+699 ;;9002226.02101,"913,642.30 ",.01)
+700 ;;642.30
+701 ;;9002226.02101,"913,642.30 ",.02)
+702 ;;642.30
+703 ;;9002226.02101,"913,642.30 ",.03)
+704 ;;1
+705 ;;9002226.02101,"913,642.33 ",.01)
+706 ;;642.33
+707 ;;9002226.02101,"913,642.33 ",.02)
+708 ;;642.33
+709 ;;9002226.02101,"913,642.33 ",.03)
+710 ;;1
+711 ;;9002226.02101,"913,642.40 ",.01)
+712 ;;642.40
+713 ;;9002226.02101,"913,642.40 ",.02)
+714 ;;642.40
+715 ;;9002226.02101,"913,642.40 ",.03)
+716 ;;1
+717 ;;9002226.02101,"913,642.43 ",.01)
+718 ;;642.43
+719 ;;9002226.02101,"913,642.43 ",.02)
+720 ;;642.43
+721 ;;9002226.02101,"913,642.43 ",.03)
+722 ;;1
+723 ;;9002226.02101,"913,642.50 ",.01)
+724 ;;642.50
+725 ;;9002226.02101,"913,642.50 ",.02)
+726 ;;642.50
+727 ;;9002226.02101,"913,642.50 ",.03)
+728 ;;1