ATXXA14 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON APR 29, 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,"S63.637A ")
;;5020
;;21,"S63.638A ")
;;5021
;;21,"S63.639A ")
;;5022
;;21,"S63.641A ")
;;5023
;;21,"S63.642A ")
;;5024
;;21,"S63.649A ")
;;5025
;;21,"S63.650A ")
;;5026
;;21,"S63.651A ")
;;5027
;;21,"S63.652A ")
;;5028
;;21,"S63.653A ")
;;5029
;;21,"S63.654A ")
;;5030
;;21,"S63.655A ")
;;5031
;;21,"S63.656A ")
;;5032
;;21,"S63.657A ")
;;5033
;;21,"S63.658A ")
;;5034
;;21,"S63.659A ")
;;5035
;;21,"S63.681A ")
;;5036
;;21,"S63.682A ")
;;5037
;;21,"S63.689A ")
;;5038
;;21,"S63.690A ")
;;5039
;;21,"S63.691A ")
;;5040
;;21,"S63.692A ")
;;5041
;;21,"S63.693A ")
;;5042
;;21,"S63.694A ")
;;5043
;;21,"S63.695A ")
;;5044
;;21,"S63.696A ")
;;5045
;;21,"S63.697A ")
;;5046
;;21,"S63.698A ")
;;5047
;;21,"S63.699A ")
;;5048
;;21,"S63.8X1A ")
;;5049
;;21,"S63.8X2A ")
;;5050
;;21,"S63.8X9A ")
;;5051
;;21,"S63.90XA ")
;;5052
;;21,"S63.91XA ")
;;5053
;;21,"S63.92XA ")
;;5054
;;21,"S64.00XA ")
;;5055
;;21,"S64.01XA ")
;;5056
;;21,"S64.02XA ")
;;5057
;;21,"S64.10XA ")
;;5058
;;21,"S64.11XA ")
;;5059
;;21,"S64.12XA ")
;;5060
;;21,"S64.20XA ")
;;5061
;;21,"S64.21XA ")
;;5062
;;21,"S64.22XA ")
;;5063
;;21,"S64.30XA ")
;;5064
;;21,"S64.31XA ")
;;5065
;;21,"S64.32XA ")
;;5066
;;21,"S64.40XA ")
;;5067
;;21,"S64.490A ")
;;5068
;;21,"S64.491A ")
;;5069
;;21,"S64.492A ")
;;5070
;;21,"S64.493A ")
;;5071
;;21,"S64.494A ")
;;5072
;;21,"S64.495A ")
;;5073
;;21,"S64.496A ")
;;5074
;;21,"S64.497A ")
;;5075
;;21,"S64.498A ")
;;5076
;;21,"S64.8X1A ")
;;5077
;;21,"S64.8X2A ")
;;5078
;;21,"S64.8X9A ")
;;5079
;;21,"S64.90XA ")
;;5080
;;21,"S64.91XA ")
;;5081
;;21,"S64.92XA ")
;;5082
;;21,"S65.001A ")
;;5083
;;21,"S65.002A ")
;;5084
;;21,"S65.009A ")
;;5085
;;21,"S65.011A ")
;;5086
;;21,"S65.012A ")
;;5087
;;21,"S65.019A ")
;;5088
;;21,"S65.091A ")
;;5089
;;21,"S65.092A ")
;;5090
;;21,"S65.099A ")
;;5091
;;21,"S65.101A ")
;;5092
;;21,"S65.102A ")
;;5093
;;21,"S65.109A ")
;;5094
;;21,"S65.111A ")
;;5095
;;21,"S65.112A ")
;;5096
;;21,"S65.119A ")
;;5097
;;21,"S65.191A ")
;;5098
;;21,"S65.192A ")
;;5099
;;21,"S65.199A ")
;;5100
;;21,"S65.201A ")
;;5101
;;21,"S65.202A ")
;;5102
;;21,"S65.209A ")
;;5103
;;21,"S65.211A ")
;;5104
;;21,"S65.212A ")
;;5105
;;21,"S65.219A ")
;;5106
;;21,"S65.291A ")
;;5107
;;21,"S65.292A ")
;;5108
;;21,"S65.299A ")
;;5109
;;21,"S65.301A ")
;;5110
;;21,"S65.302A ")
;;5111
;;21,"S65.309A ")
;;5112
;;21,"S65.311A ")
;;5113
;;21,"S65.312A ")
;;5114
;;21,"S65.319A ")
;;5115
;;21,"S65.391A ")
;;5116
;;21,"S65.392A ")
;;5117
;;21,"S65.399A ")
;;5118
;;21,"S65.401A ")
;;5119
;;21,"S65.402A ")
;;5120
;;21,"S65.409A ")
;;5121
;;21,"S65.411A ")
;;5122
;;21,"S65.412A ")
;;5123
;;21,"S65.419A ")
;;5124
;;21,"S65.491A ")
;;5125
;;21,"S65.492A ")
;;5126
;;21,"S65.499A ")
;;5127
;;21,"S65.500A ")
;;5128
;;21,"S65.501A ")
;;5129
;;21,"S65.502A ")
;;5130
;;21,"S65.503A ")
;;5131
;;21,"S65.504A ")
;;5132
;;21,"S65.505A ")
;;5133
;;21,"S65.506A ")
;;5134
;;21,"S65.507A ")
;;5135
;;21,"S65.508A ")
;;5136
;;21,"S65.509A ")
;;5137
;;21,"S65.510A ")
;;5138
;;21,"S65.511A ")
;;5139
;;21,"S65.512A ")
;;5140
;;21,"S65.513A ")
;;5141
;;21,"S65.514A ")
;;5142
;;21,"S65.515A ")
;;5143
;;21,"S65.516A ")
;;5144
;;21,"S65.517A ")
;;5145
;;21,"S65.518A ")
;;5146
;;21,"S65.519A ")
;;5147
;;21,"S65.590A ")
;;5148
;;21,"S65.591A ")
;;5149
;;21,"S65.592A ")
;;5150
;;21,"S65.593A ")
;;5151
;;21,"S65.594A ")
;;5152
;;21,"S65.595A ")
;;5153
;;21,"S65.596A ")
;;5154
;;21,"S65.597A ")
;;5155
;;21,"S65.598A ")
;;5156
;;21,"S65.599A ")
;;5157
;;21,"S65.801A ")
;;5158
;;21,"S65.802A ")
;;5159
;;21,"S65.809A ")
;;5160
;;21,"S65.811A ")
;;5161
;;21,"S65.812A ")
;;5162
;;21,"S65.819A ")
;;5163
;;21,"S65.891A ")
;;5164
;;21,"S65.892A ")
;;5165
;;21,"S65.899A ")
;;5166
;;21,"S65.901A ")
;;5167
;;21,"S65.902A ")
;;5168
;;21,"S65.909A ")
;;5169
;;21,"S65.911A ")
;;5170
;;21,"S65.912A ")
;;5171
;;21,"S65.919A ")
;;5172
;;21,"S65.991A ")
;;5173
;;21,"S65.992A ")
;;5174
;;21,"S65.999A ")
;;5175
;;21,"S66.001A ")
;;5176
;;21,"S66.002A ")
;;5177
;;21,"S66.009A ")
;;5178
;;21,"S66.011A ")
;;5179
;;21,"S66.012A ")
;;5180
;;21,"S66.019A ")
;;5181
;;21,"S66.021A ")
;;5182
;;21,"S66.022A ")
;;5183
;;21,"S66.029A ")
;;5184
;;21,"S66.091A ")
;;5185
;;21,"S66.092A ")
;;5186
;;21,"S66.099A ")
;;5187
;;21,"S66.100A ")
;;5188
;;21,"S66.101A ")
;;5189
;;21,"S66.102A ")
;;5190
;;21,"S66.103A ")
;;5191
;;21,"S66.104A ")
;;5192
;;21,"S66.105A ")
;;5193
;;21,"S66.106A ")
;;5194
;;21,"S66.107A ")
;;5195
;;21,"S66.108A ")
;;5196
;;21,"S66.109A ")
;;5197
;;21,"S66.110A ")
;;5198
;;21,"S66.111A ")
;;5199
;;21,"S66.112A ")
;;5200
;;21,"S66.113A ")
;;5201
;;21,"S66.114A ")
;;5202
;;21,"S66.115A ")
;;5203
;;21,"S66.116A ")
;;5204
;;21,"S66.117A ")
;;5205
;;21,"S66.118A ")
;;5206
;;21,"S66.119A ")
;;5207
;;21,"S66.120A ")
;;5208
;;21,"S66.121A ")
;;5209
;;21,"S66.122A ")
;;5210
;;21,"S66.123A ")
;;5211
;;21,"S66.124A ")
;;5212
;;21,"S66.125A ")
;;5213
;;21,"S66.126A ")
;;5214
;;21,"S66.127A ")
;;5215
;;21,"S66.128A ")
;;5216
;;21,"S66.129A ")
;;5217
;;21,"S66.190A ")
;;5218
;;21,"S66.191A ")
;;5219
;;21,"S66.192A ")
;;5220
;;21,"S66.193A ")
;;5221
;;21,"S66.194A ")
;;5222
;;21,"S66.195A ")
;;5223
;;21,"S66.196A ")
;;5224
;;21,"S66.197A ")
;;5225
;;21,"S66.198A ")
;;5226
;;21,"S66.199A ")
;;5227
;;21,"S66.201A ")
;;5228
;;21,"S66.202A ")
;;5229
;;21,"S66.209A ")
;;5230
;;21,"S66.211A ")
;;5231
;;21,"S66.212A ")
;;5232
;;21,"S66.219A ")
;;5233
;;21,"S66.221A ")
;;5234
;;21,"S66.222A ")
;;5235
;;21,"S66.229A ")
;;5236
;;21,"S66.291A ")
;;5237
;;21,"S66.292A ")
;;5238
;;21,"S66.299A ")
;;5239
;;21,"S66.300A ")
;;5240
;;21,"S66.301A ")
;;5241
;;21,"S66.302A ")
;;5242
;;21,"S66.303A ")
;;5243
;;21,"S66.304A ")
;;5244
;;21,"S66.305A ")
;;5245
;;21,"S66.306A ")
;;5246
;;21,"S66.307A ")
;;5247
;;21,"S66.308A ")
;;5248
;;21,"S66.309A ")
;;5249
;;21,"S66.310A ")
;;5250
;;21,"S66.311A ")
;;5251
;;21,"S66.312A ")
;;5252
;;21,"S66.313A ")
;;5253
;;21,"S66.314A ")
;;5254
;;21,"S66.315A ")
;;5255
;;21,"S66.316A ")
;;5256
;;21,"S66.317A ")
;;5257
;;21,"S66.318A ")
;;5258
;;21,"S66.319A ")
;;5259
;;21,"S66.320A ")
;;5260
;;21,"S66.321A ")
;;5261
;;21,"S66.322A ")
;;5262
;;21,"S66.323A ")
;;5263
;;21,"S66.324A ")
;;5264
;;21,"S66.325A ")
;;5265
;;21,"S66.326A ")
;;5266
;;21,"S66.327A ")
;;5267
;;21,"S66.328A ")
;;5268
;;21,"S66.329A ")
;;5269
;;21,"S66.390A ")
;;5270
;;21,"S66.391A ")
;;5271
;;21,"S66.392A ")
;;5272
;;21,"S66.393A ")
;;5273
;;21,"S66.394A ")
;;5274
;;21,"S66.395A ")
;;5275
;;21,"S66.396A ")
;;5276
;;21,"S66.397A ")
;;5277
;;21,"S66.398A ")
;;5278
;;21,"S66.399A ")
;;5279
;;21,"S66.401A ")
;;5280
;;21,"S66.402A ")
;;5281
;;21,"S66.409A ")
;;5282
;;21,"S66.411A ")
;;5283
;;21,"S66.412A ")
;;5284
;;21,"S66.419A ")
;;5285
;;21,"S66.421A ")
;;5286
;;21,"S66.422A ")
;;5287
;;21,"S66.429A ")
;;5288
;;21,"S66.491A ")
;;5289
;;21,"S66.492A ")
;;5290
;;21,"S66.499A ")
;;5291
;;21,"S66.500A ")
;;5292
;;21,"S66.501A ")
;;5293
;;21,"S66.502A ")
;;5294
;;21,"S66.503A ")
;;5295
;;21,"S66.504A ")
;;5296
;;21,"S66.505A ")
;;5297
;;21,"S66.506A ")
;;5298
;;21,"S66.507A ")
;;5299
;;21,"S66.508A ")
;;5300
;;21,"S66.509A ")
;;5301
;;21,"S66.510A ")
;;5302
;;21,"S66.511A ")
;;5303
;;21,"S66.512A ")
;;5304
;;21,"S66.513A ")
;;5305
;;21,"S66.514A ")
;;5306
;;21,"S66.515A ")
;;5307
;;21,"S66.516A ")
;;5308
;;21,"S66.517A ")
;;5309
;;21,"S66.518A ")
;;5310
;;21,"S66.519A ")
;;5311
;;21,"S66.520A ")
;;5312
;;21,"S66.521A ")
;;5313
;;21,"S66.522A ")
;;5314
;;21,"S66.523A ")
;;5315
;;21,"S66.524A ")
;;5316
;;21,"S66.525A ")
;;5317
;;21,"S66.526A ")
;;5318
;;21,"S66.527A ")
;;5319
;;21,"S66.528A ")
;;5320
;;21,"S66.529A ")
;;5321
;;21,"S66.590A ")
;;5322
;;21,"S66.591A ")
;;5323
;;21,"S66.592A ")
;;5324
;;21,"S66.593A ")
;;5325
;;21,"S66.594A ")
;;5326
;;21,"S66.595A ")
;;5327
;;21,"S66.596A ")
;;5328
;;21,"S66.597A ")
;;5329
;;21,"S66.598A ")
;;5330
;;21,"S66.599A ")
;;5331
;;21,"S66.801A ")
;;5332
;;21,"S66.802A ")
;;5333
;;21,"S66.809A ")
;;5334
;;21,"S66.811A ")
;;5335
;;21,"S66.812A ")
;;5336
;;21,"S66.819A ")
;;5337
;;21,"S66.821A ")
;;5338
;;21,"S66.822A ")
;;5339
;;21,"S66.829A ")
;;5340
;;21,"S66.891A ")
;;5341
;;21,"S66.892A ")
;;5342
;;21,"S66.899A ")
;;5343
;;21,"S66.901A ")
;;5344
;;21,"S66.902A ")
;;5345
;;21,"S66.909A ")
;;5346
;;21,"S66.911A ")
;;5347
;;21,"S66.912A ")
;;5348
;;21,"S66.919A ")
;;5349
;;21,"S66.921A ")
;;5350
;;21,"S66.922A ")
;;5351
;;21,"S66.929A ")
;;5352
;;21,"S66.991A ")
;;5353
;;21,"S66.992A ")
;;5354
;;21,"S66.999A ")
;;5355
;;21,"S67.00XA ")
;;5356
;;21,"S67.01XA ")
;;5357
;;21,"S67.02XA ")
;;5358
;;21,"S67.10XA ")
;;5359
;;21,"S67.190A ")
;;5360
;;21,"S67.191A ")
;;5361
;;21,"S67.192A ")
;;5362
;;21,"S67.193A ")
;;5363
;;21,"S67.194A ")
;;5364
;;21,"S67.195A ")
;;5365
;;21,"S67.196A ")
;;5366
;;21,"S67.197A ")
;;5367
;;21,"S67.198A ")
;;5368
;;21,"S67.20XA ")
;;5369
;;21,"S67.21XA ")
;;5370
;;21,"S67.22XA ")
;;5371
;;21,"S67.30XA ")
;;5372
;;21,"S67.31XA ")
;;5373
;;21,"S67.32XA ")
;;5374
;;21,"S67.40XA ")
;;5375
;;21,"S67.41XA ")
;;5376
;;21,"S67.42XA ")
;;5377
;;21,"S67.90XA ")
;;5378
;;21,"S67.91XA ")
;;5379
;;21,"S67.92XA ")
;;5380
;;21,"S68.011A ")
;;5381
;;21,"S68.012A ")
;;5382
;;21,"S68.019A ")
;;5383
;;21,"S68.021A ")
;;5384
;;21,"S68.022A ")
;;5385
;;21,"S68.029A ")
;;5386
;;21,"S68.110A ")
;;5387
;;21,"S68.111A ")
;;5388
;;21,"S68.112A ")
;;5389
;;21,"S68.113A ")
;;5390
;;21,"S68.114A ")
;;5391
;;21,"S68.115A ")
;;5392
;;21,"S68.116A ")
;;5393
;;21,"S68.117A ")
;;5394
;;21,"S68.118A ")
;;5395
;;21,"S68.119A ")
;;5396
;;21,"S68.120A ")
;;5397
;;21,"S68.121A ")
;;5398
;;21,"S68.122A ")
;;5399
;;21,"S68.123A ")
;;5400
;;21,"S68.124A ")
;;5401
;;21,"S68.125A ")
;;5402
;;21,"S68.126A ")
;;5403
ATXXA14 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON APR 29, 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,"S63.637A ")
+2 ;;5020
+3 ;;21,"S63.638A ")
+4 ;;5021
+5 ;;21,"S63.639A ")
+6 ;;5022
+7 ;;21,"S63.641A ")
+8 ;;5023
+9 ;;21,"S63.642A ")
+10 ;;5024
+11 ;;21,"S63.649A ")
+12 ;;5025
+13 ;;21,"S63.650A ")
+14 ;;5026
+15 ;;21,"S63.651A ")
+16 ;;5027
+17 ;;21,"S63.652A ")
+18 ;;5028
+19 ;;21,"S63.653A ")
+20 ;;5029
+21 ;;21,"S63.654A ")
+22 ;;5030
+23 ;;21,"S63.655A ")
+24 ;;5031
+25 ;;21,"S63.656A ")
+26 ;;5032
+27 ;;21,"S63.657A ")
+28 ;;5033
+29 ;;21,"S63.658A ")
+30 ;;5034
+31 ;;21,"S63.659A ")
+32 ;;5035
+33 ;;21,"S63.681A ")
+34 ;;5036
+35 ;;21,"S63.682A ")
+36 ;;5037
+37 ;;21,"S63.689A ")
+38 ;;5038
+39 ;;21,"S63.690A ")
+40 ;;5039
+41 ;;21,"S63.691A ")
+42 ;;5040
+43 ;;21,"S63.692A ")
+44 ;;5041
+45 ;;21,"S63.693A ")
+46 ;;5042
+47 ;;21,"S63.694A ")
+48 ;;5043
+49 ;;21,"S63.695A ")
+50 ;;5044
+51 ;;21,"S63.696A ")
+52 ;;5045
+53 ;;21,"S63.697A ")
+54 ;;5046
+55 ;;21,"S63.698A ")
+56 ;;5047
+57 ;;21,"S63.699A ")
+58 ;;5048
+59 ;;21,"S63.8X1A ")
+60 ;;5049
+61 ;;21,"S63.8X2A ")
+62 ;;5050
+63 ;;21,"S63.8X9A ")
+64 ;;5051
+65 ;;21,"S63.90XA ")
+66 ;;5052
+67 ;;21,"S63.91XA ")
+68 ;;5053
+69 ;;21,"S63.92XA ")
+70 ;;5054
+71 ;;21,"S64.00XA ")
+72 ;;5055
+73 ;;21,"S64.01XA ")
+74 ;;5056
+75 ;;21,"S64.02XA ")
+76 ;;5057
+77 ;;21,"S64.10XA ")
+78 ;;5058
+79 ;;21,"S64.11XA ")
+80 ;;5059
+81 ;;21,"S64.12XA ")
+82 ;;5060
+83 ;;21,"S64.20XA ")
+84 ;;5061
+85 ;;21,"S64.21XA ")
+86 ;;5062
+87 ;;21,"S64.22XA ")
+88 ;;5063
+89 ;;21,"S64.30XA ")
+90 ;;5064
+91 ;;21,"S64.31XA ")
+92 ;;5065
+93 ;;21,"S64.32XA ")
+94 ;;5066
+95 ;;21,"S64.40XA ")
+96 ;;5067
+97 ;;21,"S64.490A ")
+98 ;;5068
+99 ;;21,"S64.491A ")
+100 ;;5069
+101 ;;21,"S64.492A ")
+102 ;;5070
+103 ;;21,"S64.493A ")
+104 ;;5071
+105 ;;21,"S64.494A ")
+106 ;;5072
+107 ;;21,"S64.495A ")
+108 ;;5073
+109 ;;21,"S64.496A ")
+110 ;;5074
+111 ;;21,"S64.497A ")
+112 ;;5075
+113 ;;21,"S64.498A ")
+114 ;;5076
+115 ;;21,"S64.8X1A ")
+116 ;;5077
+117 ;;21,"S64.8X2A ")
+118 ;;5078
+119 ;;21,"S64.8X9A ")
+120 ;;5079
+121 ;;21,"S64.90XA ")
+122 ;;5080
+123 ;;21,"S64.91XA ")
+124 ;;5081
+125 ;;21,"S64.92XA ")
+126 ;;5082
+127 ;;21,"S65.001A ")
+128 ;;5083
+129 ;;21,"S65.002A ")
+130 ;;5084
+131 ;;21,"S65.009A ")
+132 ;;5085
+133 ;;21,"S65.011A ")
+134 ;;5086
+135 ;;21,"S65.012A ")
+136 ;;5087
+137 ;;21,"S65.019A ")
+138 ;;5088
+139 ;;21,"S65.091A ")
+140 ;;5089
+141 ;;21,"S65.092A ")
+142 ;;5090
+143 ;;21,"S65.099A ")
+144 ;;5091
+145 ;;21,"S65.101A ")
+146 ;;5092
+147 ;;21,"S65.102A ")
+148 ;;5093
+149 ;;21,"S65.109A ")
+150 ;;5094
+151 ;;21,"S65.111A ")
+152 ;;5095
+153 ;;21,"S65.112A ")
+154 ;;5096
+155 ;;21,"S65.119A ")
+156 ;;5097
+157 ;;21,"S65.191A ")
+158 ;;5098
+159 ;;21,"S65.192A ")
+160 ;;5099
+161 ;;21,"S65.199A ")
+162 ;;5100
+163 ;;21,"S65.201A ")
+164 ;;5101
+165 ;;21,"S65.202A ")
+166 ;;5102
+167 ;;21,"S65.209A ")
+168 ;;5103
+169 ;;21,"S65.211A ")
+170 ;;5104
+171 ;;21,"S65.212A ")
+172 ;;5105
+173 ;;21,"S65.219A ")
+174 ;;5106
+175 ;;21,"S65.291A ")
+176 ;;5107
+177 ;;21,"S65.292A ")
+178 ;;5108
+179 ;;21,"S65.299A ")
+180 ;;5109
+181 ;;21,"S65.301A ")
+182 ;;5110
+183 ;;21,"S65.302A ")
+184 ;;5111
+185 ;;21,"S65.309A ")
+186 ;;5112
+187 ;;21,"S65.311A ")
+188 ;;5113
+189 ;;21,"S65.312A ")
+190 ;;5114
+191 ;;21,"S65.319A ")
+192 ;;5115
+193 ;;21,"S65.391A ")
+194 ;;5116
+195 ;;21,"S65.392A ")
+196 ;;5117
+197 ;;21,"S65.399A ")
+198 ;;5118
+199 ;;21,"S65.401A ")
+200 ;;5119
+201 ;;21,"S65.402A ")
+202 ;;5120
+203 ;;21,"S65.409A ")
+204 ;;5121
+205 ;;21,"S65.411A ")
+206 ;;5122
+207 ;;21,"S65.412A ")
+208 ;;5123
+209 ;;21,"S65.419A ")
+210 ;;5124
+211 ;;21,"S65.491A ")
+212 ;;5125
+213 ;;21,"S65.492A ")
+214 ;;5126
+215 ;;21,"S65.499A ")
+216 ;;5127
+217 ;;21,"S65.500A ")
+218 ;;5128
+219 ;;21,"S65.501A ")
+220 ;;5129
+221 ;;21,"S65.502A ")
+222 ;;5130
+223 ;;21,"S65.503A ")
+224 ;;5131
+225 ;;21,"S65.504A ")
+226 ;;5132
+227 ;;21,"S65.505A ")
+228 ;;5133
+229 ;;21,"S65.506A ")
+230 ;;5134
+231 ;;21,"S65.507A ")
+232 ;;5135
+233 ;;21,"S65.508A ")
+234 ;;5136
+235 ;;21,"S65.509A ")
+236 ;;5137
+237 ;;21,"S65.510A ")
+238 ;;5138
+239 ;;21,"S65.511A ")
+240 ;;5139
+241 ;;21,"S65.512A ")
+242 ;;5140
+243 ;;21,"S65.513A ")
+244 ;;5141
+245 ;;21,"S65.514A ")
+246 ;;5142
+247 ;;21,"S65.515A ")
+248 ;;5143
+249 ;;21,"S65.516A ")
+250 ;;5144
+251 ;;21,"S65.517A ")
+252 ;;5145
+253 ;;21,"S65.518A ")
+254 ;;5146
+255 ;;21,"S65.519A ")
+256 ;;5147
+257 ;;21,"S65.590A ")
+258 ;;5148
+259 ;;21,"S65.591A ")
+260 ;;5149
+261 ;;21,"S65.592A ")
+262 ;;5150
+263 ;;21,"S65.593A ")
+264 ;;5151
+265 ;;21,"S65.594A ")
+266 ;;5152
+267 ;;21,"S65.595A ")
+268 ;;5153
+269 ;;21,"S65.596A ")
+270 ;;5154
+271 ;;21,"S65.597A ")
+272 ;;5155
+273 ;;21,"S65.598A ")
+274 ;;5156
+275 ;;21,"S65.599A ")
+276 ;;5157
+277 ;;21,"S65.801A ")
+278 ;;5158
+279 ;;21,"S65.802A ")
+280 ;;5159
+281 ;;21,"S65.809A ")
+282 ;;5160
+283 ;;21,"S65.811A ")
+284 ;;5161
+285 ;;21,"S65.812A ")
+286 ;;5162
+287 ;;21,"S65.819A ")
+288 ;;5163
+289 ;;21,"S65.891A ")
+290 ;;5164
+291 ;;21,"S65.892A ")
+292 ;;5165
+293 ;;21,"S65.899A ")
+294 ;;5166
+295 ;;21,"S65.901A ")
+296 ;;5167
+297 ;;21,"S65.902A ")
+298 ;;5168
+299 ;;21,"S65.909A ")
+300 ;;5169
+301 ;;21,"S65.911A ")
+302 ;;5170
+303 ;;21,"S65.912A ")
+304 ;;5171
+305 ;;21,"S65.919A ")
+306 ;;5172
+307 ;;21,"S65.991A ")
+308 ;;5173
+309 ;;21,"S65.992A ")
+310 ;;5174
+311 ;;21,"S65.999A ")
+312 ;;5175
+313 ;;21,"S66.001A ")
+314 ;;5176
+315 ;;21,"S66.002A ")
+316 ;;5177
+317 ;;21,"S66.009A ")
+318 ;;5178
+319 ;;21,"S66.011A ")
+320 ;;5179
+321 ;;21,"S66.012A ")
+322 ;;5180
+323 ;;21,"S66.019A ")
+324 ;;5181
+325 ;;21,"S66.021A ")
+326 ;;5182
+327 ;;21,"S66.022A ")
+328 ;;5183
+329 ;;21,"S66.029A ")
+330 ;;5184
+331 ;;21,"S66.091A ")
+332 ;;5185
+333 ;;21,"S66.092A ")
+334 ;;5186
+335 ;;21,"S66.099A ")
+336 ;;5187
+337 ;;21,"S66.100A ")
+338 ;;5188
+339 ;;21,"S66.101A ")
+340 ;;5189
+341 ;;21,"S66.102A ")
+342 ;;5190
+343 ;;21,"S66.103A ")
+344 ;;5191
+345 ;;21,"S66.104A ")
+346 ;;5192
+347 ;;21,"S66.105A ")
+348 ;;5193
+349 ;;21,"S66.106A ")
+350 ;;5194
+351 ;;21,"S66.107A ")
+352 ;;5195
+353 ;;21,"S66.108A ")
+354 ;;5196
+355 ;;21,"S66.109A ")
+356 ;;5197
+357 ;;21,"S66.110A ")
+358 ;;5198
+359 ;;21,"S66.111A ")
+360 ;;5199
+361 ;;21,"S66.112A ")
+362 ;;5200
+363 ;;21,"S66.113A ")
+364 ;;5201
+365 ;;21,"S66.114A ")
+366 ;;5202
+367 ;;21,"S66.115A ")
+368 ;;5203
+369 ;;21,"S66.116A ")
+370 ;;5204
+371 ;;21,"S66.117A ")
+372 ;;5205
+373 ;;21,"S66.118A ")
+374 ;;5206
+375 ;;21,"S66.119A ")
+376 ;;5207
+377 ;;21,"S66.120A ")
+378 ;;5208
+379 ;;21,"S66.121A ")
+380 ;;5209
+381 ;;21,"S66.122A ")
+382 ;;5210
+383 ;;21,"S66.123A ")
+384 ;;5211
+385 ;;21,"S66.124A ")
+386 ;;5212
+387 ;;21,"S66.125A ")
+388 ;;5213
+389 ;;21,"S66.126A ")
+390 ;;5214
+391 ;;21,"S66.127A ")
+392 ;;5215
+393 ;;21,"S66.128A ")
+394 ;;5216
+395 ;;21,"S66.129A ")
+396 ;;5217
+397 ;;21,"S66.190A ")
+398 ;;5218
+399 ;;21,"S66.191A ")
+400 ;;5219
+401 ;;21,"S66.192A ")
+402 ;;5220
+403 ;;21,"S66.193A ")
+404 ;;5221
+405 ;;21,"S66.194A ")
+406 ;;5222
+407 ;;21,"S66.195A ")
+408 ;;5223
+409 ;;21,"S66.196A ")
+410 ;;5224
+411 ;;21,"S66.197A ")
+412 ;;5225
+413 ;;21,"S66.198A ")
+414 ;;5226
+415 ;;21,"S66.199A ")
+416 ;;5227
+417 ;;21,"S66.201A ")
+418 ;;5228
+419 ;;21,"S66.202A ")
+420 ;;5229
+421 ;;21,"S66.209A ")
+422 ;;5230
+423 ;;21,"S66.211A ")
+424 ;;5231
+425 ;;21,"S66.212A ")
+426 ;;5232
+427 ;;21,"S66.219A ")
+428 ;;5233
+429 ;;21,"S66.221A ")
+430 ;;5234
+431 ;;21,"S66.222A ")
+432 ;;5235
+433 ;;21,"S66.229A ")
+434 ;;5236
+435 ;;21,"S66.291A ")
+436 ;;5237
+437 ;;21,"S66.292A ")
+438 ;;5238
+439 ;;21,"S66.299A ")
+440 ;;5239
+441 ;;21,"S66.300A ")
+442 ;;5240
+443 ;;21,"S66.301A ")
+444 ;;5241
+445 ;;21,"S66.302A ")
+446 ;;5242
+447 ;;21,"S66.303A ")
+448 ;;5243
+449 ;;21,"S66.304A ")
+450 ;;5244
+451 ;;21,"S66.305A ")
+452 ;;5245
+453 ;;21,"S66.306A ")
+454 ;;5246
+455 ;;21,"S66.307A ")
+456 ;;5247
+457 ;;21,"S66.308A ")
+458 ;;5248
+459 ;;21,"S66.309A ")
+460 ;;5249
+461 ;;21,"S66.310A ")
+462 ;;5250
+463 ;;21,"S66.311A ")
+464 ;;5251
+465 ;;21,"S66.312A ")
+466 ;;5252
+467 ;;21,"S66.313A ")
+468 ;;5253
+469 ;;21,"S66.314A ")
+470 ;;5254
+471 ;;21,"S66.315A ")
+472 ;;5255
+473 ;;21,"S66.316A ")
+474 ;;5256
+475 ;;21,"S66.317A ")
+476 ;;5257
+477 ;;21,"S66.318A ")
+478 ;;5258
+479 ;;21,"S66.319A ")
+480 ;;5259
+481 ;;21,"S66.320A ")
+482 ;;5260
+483 ;;21,"S66.321A ")
+484 ;;5261
+485 ;;21,"S66.322A ")
+486 ;;5262
+487 ;;21,"S66.323A ")
+488 ;;5263
+489 ;;21,"S66.324A ")
+490 ;;5264
+491 ;;21,"S66.325A ")
+492 ;;5265
+493 ;;21,"S66.326A ")
+494 ;;5266
+495 ;;21,"S66.327A ")
+496 ;;5267
+497 ;;21,"S66.328A ")
+498 ;;5268
+499 ;;21,"S66.329A ")
+500 ;;5269
+501 ;;21,"S66.390A ")
+502 ;;5270
+503 ;;21,"S66.391A ")
+504 ;;5271
+505 ;;21,"S66.392A ")
+506 ;;5272
+507 ;;21,"S66.393A ")
+508 ;;5273
+509 ;;21,"S66.394A ")
+510 ;;5274
+511 ;;21,"S66.395A ")
+512 ;;5275
+513 ;;21,"S66.396A ")
+514 ;;5276
+515 ;;21,"S66.397A ")
+516 ;;5277
+517 ;;21,"S66.398A ")
+518 ;;5278
+519 ;;21,"S66.399A ")
+520 ;;5279
+521 ;;21,"S66.401A ")
+522 ;;5280
+523 ;;21,"S66.402A ")
+524 ;;5281
+525 ;;21,"S66.409A ")
+526 ;;5282
+527 ;;21,"S66.411A ")
+528 ;;5283
+529 ;;21,"S66.412A ")
+530 ;;5284
+531 ;;21,"S66.419A ")
+532 ;;5285
+533 ;;21,"S66.421A ")
+534 ;;5286
+535 ;;21,"S66.422A ")
+536 ;;5287
+537 ;;21,"S66.429A ")
+538 ;;5288
+539 ;;21,"S66.491A ")
+540 ;;5289
+541 ;;21,"S66.492A ")
+542 ;;5290
+543 ;;21,"S66.499A ")
+544 ;;5291
+545 ;;21,"S66.500A ")
+546 ;;5292
+547 ;;21,"S66.501A ")
+548 ;;5293
+549 ;;21,"S66.502A ")
+550 ;;5294
+551 ;;21,"S66.503A ")
+552 ;;5295
+553 ;;21,"S66.504A ")
+554 ;;5296
+555 ;;21,"S66.505A ")
+556 ;;5297
+557 ;;21,"S66.506A ")
+558 ;;5298
+559 ;;21,"S66.507A ")
+560 ;;5299
+561 ;;21,"S66.508A ")
+562 ;;5300
+563 ;;21,"S66.509A ")
+564 ;;5301
+565 ;;21,"S66.510A ")
+566 ;;5302
+567 ;;21,"S66.511A ")
+568 ;;5303
+569 ;;21,"S66.512A ")
+570 ;;5304
+571 ;;21,"S66.513A ")
+572 ;;5305
+573 ;;21,"S66.514A ")
+574 ;;5306
+575 ;;21,"S66.515A ")
+576 ;;5307
+577 ;;21,"S66.516A ")
+578 ;;5308
+579 ;;21,"S66.517A ")
+580 ;;5309
+581 ;;21,"S66.518A ")
+582 ;;5310
+583 ;;21,"S66.519A ")
+584 ;;5311
+585 ;;21,"S66.520A ")
+586 ;;5312
+587 ;;21,"S66.521A ")
+588 ;;5313
+589 ;;21,"S66.522A ")
+590 ;;5314
+591 ;;21,"S66.523A ")
+592 ;;5315
+593 ;;21,"S66.524A ")
+594 ;;5316
+595 ;;21,"S66.525A ")
+596 ;;5317
+597 ;;21,"S66.526A ")
+598 ;;5318
+599 ;;21,"S66.527A ")
+600 ;;5319
+601 ;;21,"S66.528A ")
+602 ;;5320
+603 ;;21,"S66.529A ")
+604 ;;5321
+605 ;;21,"S66.590A ")
+606 ;;5322
+607 ;;21,"S66.591A ")
+608 ;;5323
+609 ;;21,"S66.592A ")
+610 ;;5324
+611 ;;21,"S66.593A ")
+612 ;;5325
+613 ;;21,"S66.594A ")
+614 ;;5326
+615 ;;21,"S66.595A ")
+616 ;;5327
+617 ;;21,"S66.596A ")
+618 ;;5328
+619 ;;21,"S66.597A ")
+620 ;;5329
+621 ;;21,"S66.598A ")
+622 ;;5330
+623 ;;21,"S66.599A ")
+624 ;;5331
+625 ;;21,"S66.801A ")
+626 ;;5332
+627 ;;21,"S66.802A ")
+628 ;;5333
+629 ;;21,"S66.809A ")
+630 ;;5334
+631 ;;21,"S66.811A ")
+632 ;;5335
+633 ;;21,"S66.812A ")
+634 ;;5336
+635 ;;21,"S66.819A ")
+636 ;;5337
+637 ;;21,"S66.821A ")
+638 ;;5338
+639 ;;21,"S66.822A ")
+640 ;;5339
+641 ;;21,"S66.829A ")
+642 ;;5340
+643 ;;21,"S66.891A ")
+644 ;;5341
+645 ;;21,"S66.892A ")
+646 ;;5342
+647 ;;21,"S66.899A ")
+648 ;;5343
+649 ;;21,"S66.901A ")
+650 ;;5344
+651 ;;21,"S66.902A ")
+652 ;;5345
+653 ;;21,"S66.909A ")
+654 ;;5346
+655 ;;21,"S66.911A ")
+656 ;;5347
+657 ;;21,"S66.912A ")
+658 ;;5348
+659 ;;21,"S66.919A ")
+660 ;;5349
+661 ;;21,"S66.921A ")
+662 ;;5350
+663 ;;21,"S66.922A ")
+664 ;;5351
+665 ;;21,"S66.929A ")
+666 ;;5352
+667 ;;21,"S66.991A ")
+668 ;;5353
+669 ;;21,"S66.992A ")
+670 ;;5354
+671 ;;21,"S66.999A ")
+672 ;;5355
+673 ;;21,"S67.00XA ")
+674 ;;5356
+675 ;;21,"S67.01XA ")
+676 ;;5357
+677 ;;21,"S67.02XA ")
+678 ;;5358
+679 ;;21,"S67.10XA ")
+680 ;;5359
+681 ;;21,"S67.190A ")
+682 ;;5360
+683 ;;21,"S67.191A ")
+684 ;;5361
+685 ;;21,"S67.192A ")
+686 ;;5362
+687 ;;21,"S67.193A ")
+688 ;;5363
+689 ;;21,"S67.194A ")
+690 ;;5364
+691 ;;21,"S67.195A ")
+692 ;;5365
+693 ;;21,"S67.196A ")
+694 ;;5366
+695 ;;21,"S67.197A ")
+696 ;;5367
+697 ;;21,"S67.198A ")
+698 ;;5368
+699 ;;21,"S67.20XA ")
+700 ;;5369
+701 ;;21,"S67.21XA ")
+702 ;;5370
+703 ;;21,"S67.22XA ")
+704 ;;5371
+705 ;;21,"S67.30XA ")
+706 ;;5372
+707 ;;21,"S67.31XA ")
+708 ;;5373
+709 ;;21,"S67.32XA ")
+710 ;;5374
+711 ;;21,"S67.40XA ")
+712 ;;5375
+713 ;;21,"S67.41XA ")
+714 ;;5376
+715 ;;21,"S67.42XA ")
+716 ;;5377
+717 ;;21,"S67.90XA ")
+718 ;;5378
+719 ;;21,"S67.91XA ")
+720 ;;5379
+721 ;;21,"S67.92XA ")
+722 ;;5380
+723 ;;21,"S68.011A ")
+724 ;;5381
+725 ;;21,"S68.012A ")
+726 ;;5382
+727 ;;21,"S68.019A ")
+728 ;;5383
+729 ;;21,"S68.021A ")
+730 ;;5384
+731 ;;21,"S68.022A ")
+732 ;;5385
+733 ;;21,"S68.029A ")
+734 ;;5386
+735 ;;21,"S68.110A ")
+736 ;;5387
+737 ;;21,"S68.111A ")
+738 ;;5388
+739 ;;21,"S68.112A ")
+740 ;;5389
+741 ;;21,"S68.113A ")
+742 ;;5390
+743 ;;21,"S68.114A ")
+744 ;;5391
+745 ;;21,"S68.115A ")
+746 ;;5392
+747 ;;21,"S68.116A ")
+748 ;;5393
+749 ;;21,"S68.117A ")
+750 ;;5394
+751 ;;21,"S68.118A ")
+752 ;;5395
+753 ;;21,"S68.119A ")
+754 ;;5396
+755 ;;21,"S68.120A ")
+756 ;;5397
+757 ;;21,"S68.121A ")
+758 ;;5398
+759 ;;21,"S68.122A ")
+760 ;;5399
+761 ;;21,"S68.123A ")
+762 ;;5400
+763 ;;21,"S68.124A ")
+764 ;;5401
+765 ;;21,"S68.125A ")
+766 ;;5402
+767 ;;21,"S68.126A ")
+768 ;;5403