- BGPM5AIX ;IHS/MSC/MMT-CREATED BY ^ATXSTX ON JUL 15, 2011;
- +1 ;;11.1;IHS CLINICAL REPORTING SYSTEM;**1**;JUN 27, 2011;Build 106
- +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,"66336061290 ")
- +2 ;;3087
- +3 ;;21,"66336071930 ")
- +4 ;;3088
- +5 ;;21,"66336071960 ")
- +6 ;;3089
- +7 ;;21,"66336071990 ")
- +8 ;;3090
- +9 ;;21,"66336081130 ")
- +10 ;;3091
- +11 ;;21,"66336081160 ")
- +12 ;;3092
- +13 ;;21,"66336081190 ")
- +14 ;;3093
- +15 ;;21,"66336091430 ")
- +16 ;;3094
- +17 ;;21,"66336091460 ")
- +18 ;;3095
- +19 ;;21,"66336091490 ")
- +20 ;;3096
- +21 ;;21,"66467333001 ")
- +22 ;;3097
- +23 ;;21,"66484042000 ")
- +24 ;;3098
- +25 ;;21,"66484042001 ")
- +26 ;;3099
- +27 ;;21,"66484042100 ")
- +28 ;;3100
- +29 ;;21,"66484042101 ")
- +30 ;;3101
- +31 ;;21,"66484042200 ")
- +32 ;;3102
- +33 ;;21,"66484042201 ")
- +34 ;;3103
- +35 ;;21,"66860009002 ")
- +36 ;;3104
- +37 ;;21,"67046003030 ")
- +38 ;;3105
- +39 ;;21,"67046003130 ")
- +40 ;;3106
- +41 ;;21,"67046047430 ")
- +42 ;;3107
- +43 ;;21,"67046047530 ")
- +44 ;;3108
- +45 ;;21,"67046047630 ")
- +46 ;;3109
- +47 ;;21,"67046047730 ")
- +48 ;;3110
- +49 ;;21,"67209039110 ")
- +50 ;;3111
- +51 ;;21,"67209039150 ")
- +52 ;;3112
- +53 ;;21,"67209039210 ")
- +54 ;;3113
- +55 ;;21,"67209039250 ")
- +56 ;;3114
- +57 ;;21,"67209039310 ")
- +58 ;;3115
- +59 ;;21,"67209039350 ")
- +60 ;;3116
- +61 ;;21,"67228001603 ")
- +62 ;;3117
- +63 ;;21,"67228001606 ")
- +64 ;;3118
- +65 ;;21,"67228007403 ")
- +66 ;;3119
- +67 ;;21,"67228007406 ")
- +68 ;;3120
- +69 ;;21,"67228007503 ")
- +70 ;;3121
- +71 ;;21,"67228007506 ")
- +72 ;;3122
- +73 ;;21,"67228009503 ")
- +74 ;;3123
- +75 ;;21,"67228009506 ")
- +76 ;;3124
- +77 ;;21,"67228028303 ")
- +78 ;;3125
- +79 ;;21,"67228028306 ")
- +80 ;;3126
- +81 ;;21,"67228028403 ")
- +82 ;;3127
- +83 ;;21,"67228028406 ")
- +84 ;;3128
- +85 ;;21,"67228028503 ")
- +86 ;;3129
- +87 ;;21,"67228028506 ")
- +88 ;;3130
- +89 ;;21,"67228028903 ")
- +90 ;;3131
- +91 ;;21,"67228028906 ")
- +92 ;;3132
- +93 ;;21,"67228031103 ")
- +94 ;;3133
- +95 ;;21,"67228031106 ")
- +96 ;;3134
- +97 ;;21,"67228034403 ")
- +98 ;;3135
- +99 ;;21,"67228034406 ")
- +100 ;;3136
- +101 ;;21,"67228036603 ")
- +102 ;;3137
- +103 ;;21,"67228036606 ")
- +104 ;;3138
- +105 ;;21,"67228037503 ")
- +106 ;;3139
- +107 ;;21,"67228037506 ")
- +108 ;;3140
- +109 ;;21,"67228041403 ")
- +110 ;;3141
- +111 ;;21,"67228041406 ")
- +112 ;;3142
- +113 ;;21,"67228042103 ")
- +114 ;;3143
- +115 ;;21,"67228042106 ")
- +116 ;;3144
- +117 ;;21,"67228043603 ")
- +118 ;;3145
- +119 ;;21,"67228043606 ")
- +120 ;;3146
- +121 ;;21,"67253042009 ")
- +122 ;;3147
- +123 ;;21,"67253042010 ")
- +124 ;;3148
- +125 ;;21,"67253042011 ")
- +126 ;;3149
- +127 ;;21,"67253042109 ")
- +128 ;;3150
- +129 ;;21,"67253042110 ")
- +130 ;;3151
- +131 ;;21,"67253042111 ")
- +132 ;;3152
- +133 ;;21,"67253042209 ")
- +134 ;;3153
- +135 ;;21,"67253042210 ")
- +136 ;;3154
- +137 ;;21,"67253042211 ")
- +138 ;;3155
- +139 ;;21,"67263039901 ")
- +140 ;;3156
- +141 ;;21,"67296012101 ")
- +142 ;;3157
- +143 ;;21,"67296022901 ")
- +144 ;;3158
- +145 ;;21,"67296025901 ")
- +146 ;;3159
- +147 ;;21,"67544004330 ")
- +148 ;;3160
- +149 ;;21,"67544004332 ")
- +150 ;;3161
- +151 ;;21,"67544004353 ")
- +152 ;;3162
- +153 ;;21,"67544004360 ")
- +154 ;;3163
- +155 ;;21,"67544004380 ")
- +156 ;;3164
- +157 ;;21,"67544007630 ")
- +158 ;;3165
- +159 ;;21,"67544007631 ")
- +160 ;;3166
- +161 ;;21,"67544007632 ")
- +162 ;;3167
- +163 ;;21,"67544007645 ")
- +164 ;;3168
- +165 ;;21,"67544007653 ")
- +166 ;;3169
- +167 ;;21,"67544007660 ")
- +168 ;;3170
- +169 ;;21,"67544007670 ")
- +170 ;;3171
- +171 ;;21,"67544007673 ")
- +172 ;;3172
- +173 ;;21,"67544007680 ")
- +174 ;;3173
- +175 ;;21,"67544007686 ")
- +176 ;;3174
- +177 ;;21,"67544007692 ")
- +178 ;;3175
- +179 ;;21,"67544007694 ")
- +180 ;;3176
- +181 ;;21,"67544008730 ")
- +182 ;;3177
- +183 ;;21,"67544008731 ")
- +184 ;;3178
- +185 ;;21,"67544008732 ")
- +186 ;;3179
- +187 ;;21,"67544008745 ")
- +188 ;;3180
- +189 ;;21,"67544008753 ")
- +190 ;;3181
- +191 ;;21,"67544008760 ")
- +192 ;;3182
- +193 ;;21,"67544008770 ")
- +194 ;;3183
- +195 ;;21,"67544008773 ")
- +196 ;;3184
- +197 ;;21,"67544008780 ")
- +198 ;;3185
- +199 ;;21,"67544008792 ")
- +200 ;;3186
- +201 ;;21,"67544012230 ")
- +202 ;;3187
- +203 ;;21,"67544012231 ")
- +204 ;;3188
- +205 ;;21,"67544012232 ")
- +206 ;;3189
- +207 ;;21,"67544012245 ")
- +208 ;;3190
- +209 ;;21,"67544012253 ")
- +210 ;;3191
- +211 ;;21,"67544012260 ")
- +212 ;;3192
- +213 ;;21,"67544012270 ")
- +214 ;;3193
- +215 ;;21,"67544012273 ")
- +216 ;;3194
- +217 ;;21,"67544012280 ")
- +218 ;;3195
- +219 ;;21,"67544012286 ")
- +220 ;;3196
- +221 ;;21,"67544012292 ")
- +222 ;;3197
- +223 ;;21,"67544013030 ")
- +224 ;;3198
- +225 ;;21,"67544013045 ")
- +226 ;;3199
- +227 ;;21,"67544013053 ")
- +228 ;;3200
- +229 ;;21,"67544013060 ")
- +230 ;;3201
- +231 ;;21,"67544013070 ")
- +232 ;;3202
- +233 ;;21,"67544013080 ")
- +234 ;;3203
- +235 ;;21,"67544014330 ")
- +236 ;;3204
- +237 ;;21,"67544014331 ")
- +238 ;;3205
- +239 ;;21,"67544014353 ")
- +240 ;;3206
- +241 ;;21,"67544014360 ")
- +242 ;;3207
- +243 ;;21,"67544014370 ")
- +244 ;;3208
- +245 ;;21,"67544014380 ")
- +246 ;;3209
- +247 ;;21,"67544016130 ")
- +248 ;;3210
- +249 ;;21,"67544016131 ")
- +250 ;;3211
- +251 ;;21,"67544016132 ")
- +252 ;;3212
- +253 ;;21,"67544016145 ")
- +254 ;;3213
- +255 ;;21,"67544016160 ")
- +256 ;;3214
- +257 ;;21,"67544016180 ")
- +258 ;;3215
- +259 ;;21,"67544020830 ")
- +260 ;;3216
- +261 ;;21,"67544020831 ")
- +262 ;;3217
- +263 ;;21,"67544020853 ")
- +264 ;;3218
- +265 ;;21,"67544020860 ")
- +266 ;;3219
- +267 ;;21,"67544020880 ")
- +268 ;;3220
- +269 ;;21,"67544020882 ")
- +270 ;;3221
- +271 ;;21,"67544020887 ")
- +272 ;;3222
- +273 ;;21,"67544024030 ")
- +274 ;;3223
- +275 ;;21,"67544024031 ")
- +276 ;;3224
- +277 ;;21,"67544024032 ")
- +278 ;;3225
- +279 ;;21,"67544024045 ")
- +280 ;;3226
- +281 ;;21,"67544024060 ")
- +282 ;;3227
- +283 ;;21,"67544024080 ")
- +284 ;;3228
- +285 ;;21,"67544027230 ")
- +286 ;;3229
- +287 ;;21,"67544027231 ")
- +288 ;;3230
- +289 ;;21,"67544027232 ")
- +290 ;;3231
- +291 ;;21,"67544027245 ")
- +292 ;;3232
- +293 ;;21,"67544027253 ")
- +294 ;;3233
- +295 ;;21,"67544027260 ")
- +296 ;;3234
- +297 ;;21,"67544027270 ")
- +298 ;;3235
- +299 ;;21,"67544027273 ")
- +300 ;;3236
- +301 ;;21,"67544027280 ")
- +302 ;;3237
- +303 ;;21,"67544027286 ")
- +304 ;;3238
- +305 ;;21,"67544027292 ")
- +306 ;;3239
- +307 ;;21,"67544027294 ")
- +308 ;;3240
- +309 ;;21,"67544028230 ")
- +310 ;;3241
- +311 ;;21,"67544028245 ")
- +312 ;;3242
- +313 ;;21,"67544028299 ")
- +314 ;;3243
- +315 ;;21,"67544030530 ")
- +316 ;;3244
- +317 ;;21,"67544030553 ")
- +318 ;;3245
- +319 ;;21,"67544030560 ")
- +320 ;;3246
- +321 ;;21,"67544032615 ")
- +322 ;;3247
- +323 ;;21,"67544032630 ")
- +324 ;;3248
- +325 ;;21,"67544032645 ")
- +326 ;;3249
- +327 ;;21,"67544032660 ")
- +328 ;;3250
- +329 ;;21,"67544032670 ")
- +330 ;;3251
- +331 ;;21,"67544032673 ")
- +332 ;;3252
- +333 ;;21,"67544032680 ")
- +334 ;;3253
- +335 ;;21,"67544033260 ")
- +336 ;;3254
- +337 ;;21,"67544037530 ")
- +338 ;;3255
- +339 ;;21,"67544037545 ")
- +340 ;;3256
- +341 ;;21,"67544037560 ")
- +342 ;;3257
- +343 ;;21,"67544037565 ")
- +344 ;;3258
- +345 ;;21,"67544037580 ")
- +346 ;;3259
- +347 ;;21,"67544037630 ")
- +348 ;;3260
- +349 ;;21,"67544037645 ")
- +350 ;;3261
- +351 ;;21,"67544037660 ")
- +352 ;;3262
- +353 ;;21,"67544037670 ")
- +354 ;;3263
- +355 ;;21,"67544037673 ")
- +356 ;;3264
- +357 ;;21,"67544037680 ")
- +358 ;;3265
- +359 ;;21,"67544037860 ")
- +360 ;;3266
- +361 ;;21,"67544038730 ")
- +362 ;;3267
- +363 ;;21,"67544038731 ")
- +364 ;;3268
- +365 ;;21,"67544038732 ")
- +366 ;;3269
- +367 ;;21,"67544038753 ")
- +368 ;;3270
- +369 ;;21,"67544038760 ")
- +370 ;;3271
- +371 ;;21,"67544038780 ")
- +372 ;;3272
- +373 ;;21,"67544049145 ")
- +374 ;;3273
- +375 ;;21,"67544049153 ")
- +376 ;;3274
- +377 ;;21,"67544049160 ")
- +378 ;;3275
- +379 ;;21,"67544049180 ")
- +380 ;;3276
- +381 ;;21,"67544049182 ")
- +382 ;;3277
- +383 ;;21,"67544049199 ")
- +384 ;;3278
- +385 ;;21,"67544056531 ")
- +386 ;;3279
- +387 ;;21,"67544056560 ")
- +388 ;;3280
- +389 ;;21,"67544056730 ")
- +390 ;;3281
- +391 ;;21,"67544056731 ")
- +392 ;;3282
- +393 ;;21,"67544056732 ")
- +394 ;;3283
- +395 ;;21,"67544056753 ")
- +396 ;;3284
- +397 ;;21,"67544056760 ")
- +398 ;;3285
- +399 ;;21,"67544056780 ")
- +400 ;;3286
- +401 ;;21,"67544057382 ")
- +402 ;;3287
- +403 ;;21,"67544057399 ")
- +404 ;;3288
- +405 ;;21,"67544062731 ")
- +406 ;;3289
- +407 ;;21,"67544062753 ")
- +408 ;;3290
- +409 ;;21,"67544062760 ")
- +410 ;;3291
- +411 ;;21,"67544062780 ")
- +412 ;;3292
- +413 ;;21,"67544077360 ")
- +414 ;;3293
- +415 ;;21,"67544078632 ")
- +416 ;;3294
- +417 ;;21,"67544080231 ")
- +418 ;;3295
- +419 ;;21,"67544080232 ")
- +420 ;;3296
- +421 ;;21,"67544091108 ")
- +422 ;;3297
- +423 ;;21,"67544091130 ")
- +424 ;;3298
- +425 ;;21,"67544091145 ")
- +426 ;;3299
- +427 ;;21,"67544091153 ")
- +428 ;;3300
- +429 ;;21,"67544091160 ")
- +430 ;;3301
- +431 ;;21,"67544091170 ")
- +432 ;;3302
- +433 ;;21,"67544091173 ")
- +434 ;;3303
- +435 ;;21,"67544091180 ")
- +436 ;;3304
- +437 ;;21,"67544091192 ")
- +438 ;;3305
- +439 ;;21,"67544091194 ")
- +440 ;;3306
- +441 ;;21,"67544091198 ")
- +442 ;;3307
- +443 ;;21,"67544092932 ")
- +444 ;;3308
- +445 ;;21,"67651000101 ")
- +446 ;;3309
- +447 ;;21,"67651000103 ")
- +448 ;;3310
- +449 ;;21,"67651000105 ")
- +450 ;;3311
- +451 ;;21,"67651000201 ")
- +452 ;;3312
- +453 ;;21,"67651000203 ")
- +454 ;;3313
- +455 ;;21,"67651000205 ")
- +456 ;;3314
- +457 ;;21,"67651000301 ")
- +458 ;;3315
- +459 ;;21,"67651000303 ")
- +460 ;;3316
- +461 ;;21,"67801030430 ")
- +462 ;;3317
- +463 ;;21,"67801030435 ")
- +464 ;;3318
- +465 ;;21,"67801031503 ")
- +466 ;;3319
- +467 ;;21,"67801031530 ")
- +468 ;;3320
- +469 ;;21,"67801031603 ")
- +470 ;;3321
- +471 ;;21,"67801031635 ")
- +472 ;;3322
- +473 ;;21,"67801040409 ")
- +474 ;;3323
- +475 ;;21,"67801041503 ")
- +476 ;;3324
- +477 ;;21,"68071002430 ")
- +478 ;;3325
- +479 ;;21,"68071002460 ")
- +480 ;;3326
- +481 ;;21,"68071004404 ")
- +482 ;;3327
- +483 ;;21,"68071007830 ")
- +484 ;;3328
- +485 ;;21,"68071012930 ")
- +486 ;;3329
- +487 ;;21,"68071013230 ")
- +488 ;;3330
- +489 ;;21,"68071013730 ")
- +490 ;;3331
- +491 ;;21,"68071025090 ")
- +492 ;;3332
- +493 ;;21,"68071025130 ")
- +494 ;;3333
- +495 ;;21,"68071025190 ")
- +496 ;;3334
- +497 ;;21,"68071028890 ")
- +498 ;;3335
- +499 ;;21,"68071036860 ")
- +500 ;;3336
- +501 ;;21,"68071046960 ")
- +502 ;;3337
- +503 ;;21,"68071071992 ")
- +504 ;;3338
- +505 ;;21,"68084020901 ")
- +506 ;;3339
- +507 ;;21,"68084020910 ")
- +508 ;;3340
- +509 ;;21,"68084020911 ")
- +510 ;;3341
- +511 ;;21,"68084021001 ")
- +512 ;;3342
- +513 ;;21,"68084021010 ")
- +514 ;;3343
- +515 ;;21,"68084021011 ")
- +516 ;;3344
- +517 ;;21,"68084021101 ")
- +518 ;;3345
- +519 ;;21,"68084021110 ")
- +520 ;;3346
- +521 ;;21,"68084021111 ")
- +522 ;;3347
- +523 ;;21,"68084021201 ")
- +524 ;;3348
- +525 ;;21,"68084021210 ")
- +526 ;;3349
- +527 ;;21,"68084021211 ")
- +528 ;;3350
- +529 ;;21,"68084045601 ")
- +530 ;;3351
- +531 ;;21,"68084045611 ")
- +532 ;;3352
- +533 ;;21,"68084045701 ")
- +534 ;;3353
- +535 ;;21,"68084045711 ")
- +536 ;;3354
- +537 ;;21,"68115004015 ")
- +538 ;;3355
- +539 ;;21,"68115023890 ")
- +540 ;;3356
- +541 ;;21,"68115023990 ")
- +542 ;;3357
- +543 ;;21,"68115031030 ")
- +544 ;;3358
- +545 ;;21,"68115072730 ")
- +546 ;;3359
- +547 ;;21,"68382002201 ")
- +548 ;;3360
- +549 ;;21,"68382002210 ")
- +550 ;;3361
- +551 ;;21,"68382002216 ")
- +552 ;;3362
- +553 ;;21,"68382002224 ")
- +554 ;;3363
- +555 ;;21,"68382002240 ")
- +556 ;;3364
- +557 ;;21,"68382002301 ")
- +558 ;;3365
- +559 ;;21,"68382002302 ")
- +560 ;;3366
- +561 ;;21,"68382002310 ")
- +562 ;;3367
- +563 ;;21,"68382002316 ")
- +564 ;;3368
- +565 ;;21,"68382002324 ")
- +566 ;;3369
- +567 ;;21,"68382002340 ")
- +568 ;;3370
- +569 ;;21,"68382002401 ")
- +570 ;;3371
- +571 ;;21,"68382002410 ")
- +572 ;;3372
- +573 ;;21,"68382002416 ")
- +574 ;;3373
- +575 ;;21,"68382002440 ")
- +576 ;;3374
- +577 ;;21,"68387053830 ")
- +578 ;;3375
- +579 ;;21,"68387053930 ")
- +580 ;;3376
- +581 ;;21,"68645019059 ")
- +582 ;;3377
- +583 ;;21,"68645019159 ")
- +584 ;;3378
- +585 ;;21,"68788016603 ")
- +586 ;;3379
- +587 ;;21,"68788016606 ")
- +588 ;;3380
- +589 ;;21,"68788016609 ")
- +590 ;;3381
- +591 ;;21,"68788035603 ")
- +592 ;;3382
- +593 ;;21,"68788035606 ")
- +594 ;;3383
- +595 ;;21,"68788035609 ")
- +596 ;;3384
- +597 ;;21,"68788042103 ")
- +598 ;;3385
- +599 ;;21,"68788042106 ")
- +600 ;;3386
- +601 ;;21,"68788042109 ")
- +602 ;;3387
- +603 ;;21,"68788045603 ")
- +604 ;;3388
- +605 ;;21,"68788045606 ")
- +606 ;;3389
- +607 ;;21,"68788045609 ")
- +608 ;;3390
- +609 ;;21,"68788047703 ")
- +610 ;;3391
- +611 ;;21,"68788047706 ")
- +612 ;;3392
- +613 ;;21,"68788047709 ")
- +614 ;;3393
- +615 ;;21,"68788052903 ")
- +616 ;;3394
- +617 ;;21,"68788053003 ")
- +618 ;;3395
- +619 ;;21,"68788053603 ")
- +620 ;;3396
- +621 ;;21,"68788053606 ")
- +622 ;;3397
- +623 ;;21,"68788053609 ")
- +624 ;;3398
- +625 ;;21,"68788057403 ")
- +626 ;;3399
- +627 ;;21,"68788057406 ")
- +628 ;;3400
- +629 ;;21,"68788057409 ")
- +630 ;;3401
- +631 ;;21,"68788076603 ")
- +632 ;;3402
- +633 ;;21,"68788076606 ")
- +634 ;;3403
- +635 ;;21,"68788076609 ")
- +636 ;;3404
- +637 ;;21,"68788080103 ")
- +638 ;;3405
- +639 ;;21,"68788080106 ")
- +640 ;;3406
- +641 ;;21,"68788080109 ")
- +642 ;;3407
- +643 ;;21,"68788094403 ")
- +644 ;;3408
- +645 ;;21,"68788094406 ")
- +646 ;;3409
- +647 ;;21,"68788094409 ")
- +648 ;;3410
- +649 ;;21,"68788107803 ")
- +650 ;;3411
- +651 ;;21,"68788150603 ")
- +652 ;;3412
- +653 ;;21,"68788150606 ")
- +654 ;;3413
- +655 ;;21,"68788150609 ")
- +656 ;;3414
- +657 ;;21,"68788150703 ")
- +658 ;;3415
- +659 ;;21,"68788150706 ")
- +660 ;;3416
- +661 ;;21,"68788150709 ")
- +662 ;;3417
- +663 ;;21,"68788904101 ")
- +664 ;;3418
- +665 ;;21,"68788904103 ")
- +666 ;;3419
- +667 ;;21,"68788904106 ")
- +668 ;;3420
- +669 ;;21,"68788904108 ")
- +670 ;;3421
- +671 ;;21,"68788904109 ")
- +672 ;;3422
- +673 ;;21,"68788904201 ")
- +674 ;;3423
- +675 ;;21,"68788904203 ")
- +676 ;;3424
- +677 ;;21,"68788904206 ")
- +678 ;;3425
- +679 ;;21,"68788904208 ")
- +680 ;;3426
- +681 ;;21,"68788904209 ")
- +682 ;;3427
- +683 ;;21,"68788904703 ")
- +684 ;;3428
- +685 ;;21,"68788904706 ")
- +686 ;;3429
- +687 ;;21,"68788904708 ")
- +688 ;;3430
- +689 ;;21,"68788904709 ")
- +690 ;;3431
- +691 ;;21,"68788904803 ")
- +692 ;;3432
- +693 ;;21,"68788904806 ")
- +694 ;;3433
- +695 ;;21,"68788904808 ")
- +696 ;;3434
- +697 ;;21,"68788904809 ")
- +698 ;;3435
- +699 ;;21,"68788904903 ")
- +700 ;;3436
- +701 ;;21,"68788904906 ")
- +702 ;;3437
- +703 ;;21,"68788904908 ")
- +704 ;;3438