- BGPM5BEK ;IHS/MSC/MMT-CREATED BY ^ATXSTX ON SEP 12, 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,"55045226608 ")
- +2 ;;2645
- +3 ;;21,"55045226609 ")
- +4 ;;2646
- +5 ;;21,"55045226700 ")
- +6 ;;2647
- +7 ;;21,"55045226708 ")
- +8 ;;2648
- +9 ;;21,"55045232201 ")
- +10 ;;2649
- +11 ;;21,"55045232208 ")
- +12 ;;2650
- +13 ;;21,"55045261700 ")
- +14 ;;2651
- +15 ;;21,"55045290400 ")
- +16 ;;785
- +17 ;;21,"55045290402 ")
- +18 ;;786
- +19 ;;21,"55045290409 ")
- +20 ;;787
- +21 ;;21,"55045290500 ")
- +22 ;;788
- +23 ;;21,"55045290503 ")
- +24 ;;789
- +25 ;;21,"55045290506 ")
- +26 ;;790
- +27 ;;21,"55045290508 ")
- +28 ;;791
- +29 ;;21,"55045290600 ")
- +30 ;;792
- +31 ;;21,"55045290601 ")
- +32 ;;793
- +33 ;;21,"55045290602 ")
- +34 ;;794
- +35 ;;21,"55045290606 ")
- +36 ;;795
- +37 ;;21,"55045290609 ")
- +38 ;;796
- +39 ;;21,"55045328701 ")
- +40 ;;797
- +41 ;;21,"55045330001 ")
- +42 ;;2652
- +43 ;;21,"55045360702 ")
- +44 ;;2653
- +45 ;;21,"55045361304 ")
- +46 ;;2654
- +47 ;;21,"55111032001 ")
- +48 ;;2655
- +49 ;;21,"55111032005 ")
- +50 ;;2656
- +51 ;;21,"55111032030 ")
- +52 ;;2657
- +53 ;;21,"55111032078 ")
- +54 ;;2658
- +55 ;;21,"55111032101 ")
- +56 ;;2659
- +57 ;;21,"55111032105 ")
- +58 ;;2660
- +59 ;;21,"55111032130 ")
- +60 ;;2661
- +61 ;;21,"55111032178 ")
- +62 ;;2662
- +63 ;;21,"55111032179 ")
- +64 ;;2663
- +65 ;;21,"55111032201 ")
- +66 ;;2664
- +67 ;;21,"55111032205 ")
- +68 ;;2665
- +69 ;;21,"55111032230 ")
- +70 ;;2666
- +71 ;;21,"55111032278 ")
- +72 ;;2667
- +73 ;;21,"55111032279 ")
- +74 ;;2668
- +75 ;;21,"55111032801 ")
- +76 ;;2009
- +77 ;;21,"55111032805 ")
- +78 ;;2010
- +79 ;;21,"55111032830 ")
- +80 ;;2011
- +81 ;;21,"55111032878 ")
- +82 ;;2012
- +83 ;;21,"55111032879 ")
- +84 ;;2013
- +85 ;;21,"55111032890 ")
- +86 ;;2014
- +87 ;;21,"55111032901 ")
- +88 ;;2015
- +89 ;;21,"55111032905 ")
- +90 ;;2016
- +91 ;;21,"55111032930 ")
- +92 ;;2017
- +93 ;;21,"55111032978 ")
- +94 ;;2018
- +95 ;;21,"55111032979 ")
- +96 ;;2019
- +97 ;;21,"55111032990 ")
- +98 ;;2020
- +99 ;;21,"55111042901 ")
- +100 ;;798
- +101 ;;21,"55111042905 ")
- +102 ;;799
- +103 ;;21,"55111042910 ")
- +104 ;;800
- +105 ;;21,"55111042930 ")
- +106 ;;801
- +107 ;;21,"55111042960 ")
- +108 ;;802
- +109 ;;21,"55111042978 ")
- +110 ;;803
- +111 ;;21,"55111043001 ")
- +112 ;;804
- +113 ;;21,"55111043005 ")
- +114 ;;805
- +115 ;;21,"55111043030 ")
- +116 ;;806
- +117 ;;21,"55111043060 ")
- +118 ;;807
- +119 ;;21,"55111043078 ")
- +120 ;;808
- +121 ;;21,"55111043101 ")
- +122 ;;809
- +123 ;;21,"55111043105 ")
- +124 ;;810
- +125 ;;21,"55111043130 ")
- +126 ;;811
- +127 ;;21,"55111043160 ")
- +128 ;;812
- +129 ;;21,"55111043178 ")
- +130 ;;813
- +131 ;;21,"55111069501 ")
- +132 ;;66
- +133 ;;21,"55111069505 ")
- +134 ;;67
- +135 ;;21,"55111069510 ")
- +136 ;;68
- +137 ;;21,"55111069601 ")
- +138 ;;69
- +139 ;;21,"55111069605 ")
- +140 ;;70
- +141 ;;21,"55111069610 ")
- +142 ;;71
- +143 ;;21,"55111069701 ")
- +144 ;;72
- +145 ;;21,"55111069705 ")
- +146 ;;73
- +147 ;;21,"55111069710 ")
- +148 ;;74
- +149 ;;21,"55154053400 ")
- +150 ;;2678
- +151 ;;21,"55154053404 ")
- +152 ;;2679
- +153 ;;21,"55154053406 ")
- +154 ;;2680
- +155 ;;21,"55154167509 ")
- +156 ;;823
- +157 ;;21,"55154167609 ")
- +158 ;;824
- +159 ;;21,"55154205800 ")
- +160 ;;825
- +161 ;;21,"55154317500 ")
- +162 ;;2681
- +163 ;;21,"55154317504 ")
- +164 ;;2682
- +165 ;;21,"55154317506 ")
- +166 ;;2683
- +167 ;;21,"55154343709 ")
- +168 ;;826
- +169 ;;21,"55154375001 ")
- +170 ;;827
- +171 ;;21,"55154455609 ")
- +172 ;;2684
- +173 ;;21,"55154455709 ")
- +174 ;;2685
- +175 ;;21,"55154456103 ")
- +176 ;;828
- +177 ;;21,"55154507000 ")
- +178 ;;2686
- +179 ;;21,"55154522400 ")
- +180 ;;2687
- +181 ;;21,"55154522407 ")
- +182 ;;2688
- +183 ;;21,"55154542209 ")
- +184 ;;829
- +185 ;;21,"55154547600 ")
- +186 ;;2689
- +187 ;;21,"55154547607 ")
- +188 ;;2690
- +189 ;;21,"55154548700 ")
- +190 ;;830
- +191 ;;21,"55154548707 ")
- +192 ;;831
- +193 ;;21,"55154558800 ")
- +194 ;;2691
- +195 ;;21,"55154566200 ")
- +196 ;;2692
- +197 ;;21,"55154585003 ")
- +198 ;;832
- +199 ;;21,"55154599204 ")
- +200 ;;2693
- +201 ;;21,"55154599206 ")
- +202 ;;2694
- +203 ;;21,"55154619000 ")
- +204 ;;2695
- +205 ;;21,"55154619600 ")
- +206 ;;2696
- +207 ;;21,"55154622408 ")
- +208 ;;2697
- +209 ;;21,"55154622409 ")
- +210 ;;2698
- +211 ;;21,"55154623809 ")
- +212 ;;2699
- +213 ;;21,"55154665703 ")
- +214 ;;833
- +215 ;;21,"55154827009 ")
- +216 ;;2700
- +217 ;;21,"55160012201 ")
- +218 ;;2701
- +219 ;;21,"55160012205 ")
- +220 ;;2702
- +221 ;;21,"55160012301 ")
- +222 ;;2703
- +223 ;;21,"55160012305 ")
- +224 ;;2704
- +225 ;;21,"55160014301 ")
- +226 ;;834
- +227 ;;21,"55160014305 ")
- +228 ;;835
- +229 ;;21,"55160014401 ")
- +230 ;;836
- +231 ;;21,"55160014501 ")
- +232 ;;837
- +233 ;;21,"55288124301 ")
- +234 ;;2705
- +235 ;;21,"55288125201 ")
- +236 ;;2706
- +237 ;;21,"55289006690 ")
- +238 ;;2707
- +239 ;;21,"55289006697 ")
- +240 ;;2708
- +241 ;;21,"55289017142 ")
- +242 ;;4352
- +243 ;;21,"55289018797 ")
- +244 ;;2709
- +245 ;;21,"55289026590 ")
- +246 ;;2710
- +247 ;;21,"55289028130 ")
- +248 ;;75
- +249 ;;21,"55289028160 ")
- +250 ;;76
- +251 ;;21,"55289028186 ")
- +252 ;;77
- +253 ;;21,"55289028190 ")
- +254 ;;78
- +255 ;;21,"55289030193 ")
- +256 ;;2715
- +257 ;;21,"55289038430 ")
- +258 ;;842
- +259 ;;21,"55289038460 ")
- +260 ;;843
- +261 ;;21,"55289038486 ")
- +262 ;;844
- +263 ;;21,"55289038490 ")
- +264 ;;845
- +265 ;;21,"55289038493 ")
- +266 ;;846
- +267 ;;21,"55289038494 ")
- +268 ;;847
- +269 ;;21,"55289060630 ")
- +270 ;;2716
- +271 ;;21,"55289060690 ")
- +272 ;;2717
- +273 ;;21,"55289061514 ")
- +274 ;;848
- +275 ;;21,"55289061530 ")
- +276 ;;849
- +277 ;;21,"55289061560 ")
- +278 ;;850
- +279 ;;21,"55289061586 ")
- +280 ;;851
- +281 ;;21,"55289061590 ")
- +282 ;;852
- +283 ;;21,"55289061593 ")
- +284 ;;853
- +285 ;;21,"55289061594 ")
- +286 ;;854
- +287 ;;21,"55289061598 ")
- +288 ;;855
- +289 ;;21,"55289077907 ")
- +290 ;;2718
- +291 ;;21,"55289080614 ")
- +292 ;;2719
- +293 ;;21,"55289080630 ")
- +294 ;;2720
- +295 ;;21,"55289080660 ")
- +296 ;;2721
- +297 ;;21,"55289080686 ")
- +298 ;;2722
- +299 ;;21,"55289080690 ")
- +300 ;;2723
- +301 ;;21,"55289089201 ")
- +302 ;;2724
- +303 ;;21,"55289089214 ")
- +304 ;;2725
- +305 ;;21,"55289089215 ")
- +306 ;;2726
- +307 ;;21,"55289089230 ")
- +308 ;;2727
- +309 ;;21,"55289089260 ")
- +310 ;;2728
- +311 ;;21,"55289089286 ")
- +312 ;;2729
- +313 ;;21,"55289089290 ")
- +314 ;;2730
- +315 ;;21,"55289089293 ")
- +316 ;;2731
- +317 ;;21,"55289089297 ")
- +318 ;;2732
- +319 ;;21,"55289089298 ")
- +320 ;;2733
- +321 ;;21,"55289091930 ")
- +322 ;;856
- +323 ;;21,"55289091960 ")
- +324 ;;857
- +325 ;;21,"55289091990 ")
- +326 ;;858
- +327 ;;21,"55289091993 ")
- +328 ;;859
- +329 ;;21,"55289091994 ")
- +330 ;;860
- +331 ;;21,"55289091998 ")
- +332 ;;861
- +333 ;;21,"55289093430 ")
- +334 ;;862
- +335 ;;21,"55289093460 ")
- +336 ;;863
- +337 ;;21,"55289093493 ")
- +338 ;;864
- +339 ;;21,"55289093494 ")
- +340 ;;865
- +341 ;;21,"55289093498 ")
- +342 ;;866
- +343 ;;21,"55289097601 ")
- +344 ;;2734
- +345 ;;21,"55289097614 ")
- +346 ;;2735
- +347 ;;21,"55289097630 ")
- +348 ;;2736
- +349 ;;21,"55289097660 ")
- +350 ;;2737
- +351 ;;21,"55289097693 ")
- +352 ;;2738
- +353 ;;21,"55370014607 ")
- +354 ;;2739
- +355 ;;21,"55370014608 ")
- +356 ;;2740
- +357 ;;21,"55370014609 ")
- +358 ;;2741
- +359 ;;21,"55370014707 ")
- +360 ;;2742
- +361 ;;21,"55370014708 ")
- +362 ;;2743
- +363 ;;21,"55370014709 ")
- +364 ;;2744
- +365 ;;21,"55370014907 ")
- +366 ;;2745
- +367 ;;21,"55370014909 ")
- +368 ;;2746
- +369 ;;21,"55370046010 ")
- +370 ;;2747
- +371 ;;21,"55370046011 ")
- +372 ;;2748
- +373 ;;21,"55370046050 ")
- +374 ;;2749
- +375 ;;21,"55370046110 ")
- +376 ;;2750
- +377 ;;21,"55370046111 ")
- +378 ;;2751
- +379 ;;21,"55370046150 ")
- +380 ;;2752
- +381 ;;21,"55370046210 ")
- +382 ;;2753
- +383 ;;21,"55370046211 ")
- +384 ;;2754
- +385 ;;21,"55370046250 ")
- +386 ;;2755
- +387 ;;21,"55370050607 ")
- +388 ;;2756
- +389 ;;21,"55370050608 ")
- +390 ;;2757
- +391 ;;21,"55370050609 ")
- +392 ;;2758
- +393 ;;21,"55370059207 ")
- +394 ;;2759
- +395 ;;21,"55370059407 ")
- +396 ;;2760
- +397 ;;21,"55370059408 ")
- +398 ;;2761
- +399 ;;21,"55370059507 ")
- +400 ;;2762
- +401 ;;21,"55370059607 ")
- +402 ;;2763
- +403 ;;21,"55370059608 ")
- +404 ;;2764
- +405 ;;21,"55370075607 ")
- +406 ;;867
- +407 ;;21,"55370075609 ")
- +408 ;;868
- +409 ;;21,"55370075707 ")
- +410 ;;869
- +411 ;;21,"55370075709 ")
- +412 ;;870
- +413 ;;21,"55370075907 ")
- +414 ;;871
- +415 ;;21,"55370075909 ")
- +416 ;;872
- +417 ;;21,"55567011300 ")
- +418 ;;873
- +419 ;;21,"55567011318 ")
- +420 ;;874
- +421 ;;21,"55567011325 ")
- +422 ;;875
- +423 ;;21,"55567014400 ")
- +424 ;;876
- +425 ;;21,"55567014418 ")
- +426 ;;877
- +427 ;;21,"55567014425 ")
- +428 ;;878
- +429 ;;21,"55567014500 ")
- +430 ;;879
- +431 ;;21,"55567014518 ")
- +432 ;;880
- +433 ;;21,"55567014525 ")
- +434 ;;881
- +435 ;;21,"55567014600 ")
- +436 ;;882
- +437 ;;21,"55567014618 ")
- +438 ;;883
- +439 ;;21,"55567014625 ")
- +440 ;;884
- +441 ;;21,"55887017330 ")
- +442 ;;79
- +443 ;;21,"55887017990 ")
- +444 ;;2766
- +445 ;;21,"55887021230 ")
- +446 ;;2767
- +447 ;;21,"55887022230 ")
- +448 ;;2768
- +449 ;;21,"55887022260 ")
- +450 ;;2769
- +451 ;;21,"55887022290 ")
- +452 ;;2770
- +453 ;;21,"55887033930 ")
- +454 ;;2771
- +455 ;;21,"55887033960 ")
- +456 ;;2772
- +457 ;;21,"55887033990 ")
- +458 ;;2773
- +459 ;;21,"55887036830 ")
- +460 ;;80
- +461 ;;21,"55887036860 ")
- +462 ;;81
- +463 ;;21,"55887036890 ")
- +464 ;;82
- +465 ;;21,"55887036896 ")
- +466 ;;83
- +467 ;;21,"55887041482 ")
- +468 ;;890
- +469 ;;21,"55887041492 ")
- +470 ;;891
- +471 ;;21,"55887053501 ")
- +472 ;;2778
- +473 ;;21,"55887053530 ")
- +474 ;;2779
- +475 ;;21,"55887053560 ")
- +476 ;;2780
- +477 ;;21,"55887053590 ")
- +478 ;;2781
- +479 ;;21,"55887053601 ")
- +480 ;;2782
- +481 ;;21,"55887053630 ")
- +482 ;;2783
- +483 ;;21,"55887053660 ")
- +484 ;;2784
- +485 ;;21,"55887053690 ")
- +486 ;;2785
- +487 ;;21,"55887053699 ")
- +488 ;;2786
- +489 ;;21,"55887057101 ")
- +490 ;;892
- +491 ;;21,"55887057130 ")
- +492 ;;893
- +493 ;;21,"55887057160 ")
- +494 ;;894
- +495 ;;21,"55887057182 ")
- +496 ;;895
- +497 ;;21,"55887057186 ")
- +498 ;;896
- +499 ;;21,"55887057190 ")
- +500 ;;897
- +501 ;;21,"55887057192 ")
- +502 ;;898
- +503 ;;21,"55887061430 ")
- +504 ;;899
- +505 ;;21,"55887061490 ")
- +506 ;;900
- +507 ;;21,"55887062701 ")
- +508 ;;901
- +509 ;;21,"55887062730 ")
- +510 ;;902
- +511 ;;21,"55887062760 ")
- +512 ;;903
- +513 ;;21,"55887062782 ")
- +514 ;;904
- +515 ;;21,"55887062790 ")
- +516 ;;905
- +517 ;;21,"55887062792 ")
- +518 ;;906
- +519 ;;21,"55887065730 ")
- +520 ;;2787
- +521 ;;21,"55887065760 ")
- +522 ;;2788
- +523 ;;21,"55887069301 ")
- +524 ;;2789
- +525 ;;21,"55887069330 ")
- +526 ;;2790
- +527 ;;21,"55887069360 ")
- +528 ;;2791
- +529 ;;21,"55887069390 ")
- +530 ;;2792
- +531 ;;21,"55887072701 ")
- +532 ;;2793
- +533 ;;21,"55887072730 ")
- +534 ;;2794
- +535 ;;21,"55887072760 ")
- +536 ;;2795
- +537 ;;21,"55887072790 ")
- +538 ;;2796
- +539 ;;21,"55887084530 ")
- +540 ;;84
- +541 ;;21,"55887084560 ")
- +542 ;;85
- +543 ;;21,"55887094030 ")
- +544 ;;909
- +545 ;;21,"55887094060 ")
- +546 ;;910
- +547 ;;21,"55887094090 ")
- +548 ;;911
- +549 ;;21,"55887096530 ")
- +550 ;;2799
- +551 ;;21,"57315001001 ")
- +552 ;;2800
- +553 ;;21,"57315001002 ")
- +554 ;;2801
- +555 ;;21,"57315001003 ")
- +556 ;;2802
- +557 ;;21,"57315001004 ")
- +558 ;;2803
- +559 ;;21,"57315001101 ")
- +560 ;;2804
- +561 ;;21,"57315001102 ")
- +562 ;;2805
- +563 ;;21,"57315001103 ")
- +564 ;;2806
- +565 ;;21,"57315001104 ")
- +566 ;;2807
- +567 ;;21,"57315004701 ")
- +568 ;;912
- +569 ;;21,"57315004703 ")
- +570 ;;913
- +571 ;;21,"57315004704 ")
- +572 ;;914
- +573 ;;21,"57315004801 ")
- +574 ;;915
- +575 ;;21,"57315004803 ")
- +576 ;;916
- +577 ;;21,"57315004804 ")
- +578 ;;917
- +579 ;;21,"57315004805 ")
- +580 ;;918
- +581 ;;21,"57315005001 ")
- +582 ;;919
- +583 ;;21,"57315005002 ")
- +584 ;;920
- +585 ;;21,"57315005003 ")
- +586 ;;921
- +587 ;;21,"57664039713 ")
- +588 ;;922
- +589 ;;21,"57664039718 ")
- +590 ;;923
- +591 ;;21,"57664039751 ")
- +592 ;;924
- +593 ;;21,"57664039753 ")
- +594 ;;925
- +595 ;;21,"57664039758 ")
- +596 ;;926
- +597 ;;21,"57664039759 ")
- +598 ;;927
- +599 ;;21,"57664039788 ")
- +600 ;;928
- +601 ;;21,"57664039799 ")
- +602 ;;929
- +603 ;;21,"57664039808 ")
- +604 ;;2808
- +605 ;;21,"57664039813 ")
- +606 ;;2809
- +607 ;;21,"57664039818 ")
- +608 ;;2810
- +609 ;;21,"57664039888 ")
- +610 ;;2811
- +611 ;;21,"57664039908 ")
- +612 ;;2812
- +613 ;;21,"57664039913 ")
- +614 ;;2813
- +615 ;;21,"57664039918 ")
- +616 ;;2814
- +617 ;;21,"57664039988 ")
- +618 ;;2815
- +619 ;;21,"57664043513 ")
- +620 ;;930
- +621 ;;21,"57664043518 ")
- +622 ;;931
- +623 ;;21,"57664043551 ")
- +624 ;;932
- +625 ;;21,"57664043553 ")
- +626 ;;933
- +627 ;;21,"57664043558 ")
- +628 ;;934
- +629 ;;21,"57664043559 ")
- +630 ;;935
- +631 ;;21,"57664043588 ")
- +632 ;;936
- +633 ;;21,"57664043599 ")
- +634 ;;937
- +635 ;;21,"57664047413 ")
- +636 ;;938
- +637 ;;21,"57664047418 ")
- +638 ;;939
- +639 ;;21,"57664047451 ")
- +640 ;;940
- +641 ;;21,"57664047453 ")
- +642 ;;941
- +643 ;;21,"57664047458 ")
- +644 ;;942
- +645 ;;21,"57664047459 ")
- +646 ;;943
- +647 ;;21,"57664047488 ")
- +648 ;;944
- +649 ;;21,"57664047499 ")
- +650 ;;945
- +651 ;;21,"57664072413 ")
- +652 ;;86
- +653 ;;21,"57664072418 ")
- +654 ;;87
- +655 ;;21,"57664072488 ")
- +656 ;;88
- +657 ;;21,"57664072513 ")
- +658 ;;89
- +659 ;;21,"57664072518 ")
- +660 ;;90
- +661 ;;21,"57664072588 ")
- +662 ;;91
- +663 ;;21,"57664072713 ")
- +664 ;;92
- +665 ;;21,"57664072718 ")
- +666 ;;93
- +667 ;;21,"57664072788 ")
- +668 ;;94
- +669 ;;21,"57664099813 ")
- +670 ;;955
- +671 ;;21,"57664099818 ")
- +672 ;;956
- +673 ;;21,"57664099888 ")
- +674 ;;957
- +675 ;;21,"57664099899 ")
- +676 ;;958
- +677 ;;21,"57664099913 ")
- +678 ;;959
- +679 ;;21,"57664099918 ")
- +680 ;;960
- +681 ;;21,"57664099988 ")
- +682 ;;961
- +683 ;;21,"57664099999 ")
- +684 ;;962
- +685 ;;21,"57866346201 ")
- +686 ;;2825
- +687 ;;21,"57866346502 ")
- +688 ;;2826
- +689 ;;21,"57866346505 ")
- +690 ;;2827
- +691 ;;21,"57866466802 ")
- +692 ;;2828
- +693 ;;21,"57866640701 ")
- +694 ;;2829
- +695 ;;21,"57866640801 ")
- +696 ;;2830
- +697 ;;21,"57866640802 ")
- +698 ;;2831
- +699 ;;21,"57866640901 ")
- +700 ;;2832
- +701 ;;21,"57866640902 ")
- +702 ;;2833
- +703 ;;21,"57866640903 ")
- +704 ;;2834
- +705 ;;21,"57866640904 ")
- +706 ;;2835
- +707 ;;21,"57866640905 ")
- +708 ;;2836
- +709 ;;21,"57866640906 ")
- +710 ;;2837
- +711 ;;21,"57866646201 ")
- +712 ;;2838
- +713 ;;21,"57866646203 ")
- +714 ;;2839