Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Routine: BUD2ZA9

BUD2ZA9.m

Go to the documentation of this file.
BUD2ZA9 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON NOV 16, 2012;
 ;;10.0;IHS/RPMS UNIFORM DATA SYSTEM;;FEB 04, 2016;Build 50
 ;
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)
 ;;9002226.02101,"1149,00249113002 ",.02)
 ;;00249113002
 ;;9002226.02101,"1149,00302435010 ",.01)
 ;;00302435010
 ;;9002226.02101,"1149,00302435010 ",.02)
 ;;00302435010
 ;;9002226.02101,"1149,00304049401 ",.01)
 ;;00304049401
 ;;9002226.02101,"1149,00304049401 ",.02)
 ;;00304049401
 ;;9002226.02101,"1149,00304069901 ",.01)
 ;;00304069901
 ;;9002226.02101,"1149,00304069901 ",.02)
 ;;00304069901
 ;;9002226.02101,"1149,00304207301 ",.01)
 ;;00304207301
 ;;9002226.02101,"1149,00304207301 ",.02)
 ;;00304207301
 ;;9002226.02101,"1149,00339565112 ",.01)
 ;;00339565112
 ;;9002226.02101,"1149,00339565112 ",.02)
 ;;00339565112
 ;;9002226.02101,"1149,00349482010 ",.01)
 ;;00349482010
 ;;9002226.02101,"1149,00349482010 ",.02)
 ;;00349482010
 ;;9002226.02101,"1149,00349847310 ",.01)
 ;;00349847310
 ;;9002226.02101,"1149,00349847310 ",.02)
 ;;00349847310
 ;;9002226.02101,"1149,00349860401 ",.01)
 ;;00349860401
 ;;9002226.02101,"1149,00349860401 ",.02)
 ;;00349860401
 ;;9002226.02101,"1149,00349860405 ",.01)
 ;;00349860405
 ;;9002226.02101,"1149,00349860405 ",.02)
 ;;00349860405
 ;;9002226.02101,"1149,00349860410 ",.01)
 ;;00349860410
 ;;9002226.02101,"1149,00349860410 ",.02)
 ;;00349860410
 ;;9002226.02101,"1149,00364106501 ",.01)
 ;;00364106501
 ;;9002226.02101,"1149,00364106501 ",.02)
 ;;00364106501
 ;;9002226.02101,"1149,00364106502 ",.01)
 ;;00364106502
 ;;9002226.02101,"1149,00364106502 ",.02)
 ;;00364106502
 ;;9002226.02101,"1149,00364106601 ",.01)
 ;;00364106601
 ;;9002226.02101,"1149,00364106601 ",.02)
 ;;00364106601
 ;;9002226.02101,"1149,00364106602 ",.01)
 ;;00364106602
 ;;9002226.02101,"1149,00364106602 ",.02)
 ;;00364106602
 ;;9002226.02101,"1149,00364106702 ",.01)
 ;;00364106702
 ;;9002226.02101,"1149,00364106702 ",.02)
 ;;00364106702
 ;;9002226.02101,"1149,00364111101 ",.01)
 ;;00364111101
 ;;9002226.02101,"1149,00364111101 ",.02)
 ;;00364111101
 ;;9002226.02101,"1149,00364111102 ",.01)
 ;;00364111102
 ;;9002226.02101,"1149,00364111102 ",.02)
 ;;00364111102
 ;;9002226.02101,"1149,00364213601 ",.01)
 ;;00364213601
 ;;9002226.02101,"1149,00364213601 ",.02)
 ;;00364213601
 ;;9002226.02101,"1149,00364238101 ",.01)
 ;;00364238101
 ;;9002226.02101,"1149,00364238101 ",.02)
 ;;00364238101
 ;;9002226.02101,"1149,00364238201 ",.01)
 ;;00364238201
 ;;9002226.02101,"1149,00364238201 ",.02)
 ;;00364238201
 ;;9002226.02101,"1149,00364238301 ",.01)
 ;;00364238301
 ;;9002226.02101,"1149,00364238301 ",.02)
 ;;00364238301
 ;;9002226.02101,"1149,00364240501 ",.01)
 ;;00364240501
 ;;9002226.02101,"1149,00364240501 ",.02)
 ;;00364240501
 ;;9002226.02101,"1149,00364256605 ",.01)
 ;;00364256605
 ;;9002226.02101,"1149,00364256605 ",.02)
 ;;00364256605
 ;;9002226.02101,"1149,00364256606 ",.01)
 ;;00364256606
 ;;9002226.02101,"1149,00364256606 ",.02)
 ;;00364256606
 ;;9002226.02101,"1149,00378051705 ",.01)
 ;;00378051705
 ;;9002226.02101,"1149,00378051705 ",.02)
 ;;00378051705
 ;;9002226.02101,"1149,00378051791 ",.01)
 ;;00378051791
 ;;9002226.02101,"1149,00378051791 ",.02)
 ;;00378051791
 ;;9002226.02101,"1149,00378470001 ",.01)
 ;;00378470001
 ;;9002226.02101,"1149,00378470001 ",.02)
 ;;00378470001
 ;;9002226.02101,"1149,00378470005 ",.01)
 ;;00378470005
 ;;9002226.02101,"1149,00378470005 ",.02)
 ;;00378470005
 ;;9002226.02101,"1149,00378470010 ",.01)
 ;;00378470010
 ;;9002226.02101,"1149,00378470010 ",.02)
 ;;00378470010
 ;;9002226.02101,"1149,00378540105 ",.01)
 ;;00378540105
 ;;9002226.02101,"1149,00378540105 ",.02)
 ;;00378540105
 ;;9002226.02101,"1149,00378540177 ",.01)
 ;;00378540177
 ;;9002226.02101,"1149,00378540177 ",.02)
 ;;00378540177
 ;;9002226.02101,"1149,00378540193 ",.01)
 ;;00378540193
 ;;9002226.02101,"1149,00378540193 ",.02)
 ;;00378540193
 ;;9002226.02101,"1149,00378540205 ",.01)
 ;;00378540205
 ;;9002226.02101,"1149,00378540205 ",.02)
 ;;00378540205
 ;;9002226.02101,"1149,00378540277 ",.01)
 ;;00378540277
 ;;9002226.02101,"1149,00378540277 ",.02)
 ;;00378540277
 ;;9002226.02101,"1149,00378540293 ",.01)
 ;;00378540293
 ;;9002226.02101,"1149,00378540293 ",.02)
 ;;00378540293
 ;;9002226.02101,"1149,00378540305 ",.01)
 ;;00378540305
 ;;9002226.02101,"1149,00378540305 ",.02)
 ;;00378540305
 ;;9002226.02101,"1149,00378540377 ",.01)
 ;;00378540377
 ;;9002226.02101,"1149,00378540377 ",.02)
 ;;00378540377
 ;;9002226.02101,"1149,00378540393 ",.01)
 ;;00378540393
 ;;9002226.02101,"1149,00378540393 ",.02)
 ;;00378540393
 ;;9002226.02101,"1149,00378540405 ",.01)
 ;;00378540405
 ;;9002226.02101,"1149,00378540405 ",.02)
 ;;00378540405
 ;;9002226.02101,"1149,00378540477 ",.01)
 ;;00378540477
 ;;9002226.02101,"1149,00378540477 ",.02)
 ;;00378540477
 ;;9002226.02101,"1149,00378540493 ",.01)
 ;;00378540493
 ;;9002226.02101,"1149,00378540493 ",.02)
 ;;00378540493
 ;;9002226.02101,"1149,00378540505 ",.01)
 ;;00378540505
 ;;9002226.02101,"1149,00378540505 ",.02)
 ;;00378540505
 ;;9002226.02101,"1149,00378540577 ",.01)
 ;;00378540577
 ;;9002226.02101,"1149,00378540577 ",.02)
 ;;00378540577
 ;;9002226.02101,"1149,00378540593 ",.01)
 ;;00378540593
 ;;9002226.02101,"1149,00378540593 ",.02)
 ;;00378540593
 ;;9002226.02101,"1149,00378651091 ",.01)
 ;;00378651091
 ;;9002226.02101,"1149,00378651091 ",.02)
 ;;00378651091
 ;;9002226.02101,"1149,00378652005 ",.01)
 ;;00378652005
 ;;9002226.02101,"1149,00378652005 ",.02)
 ;;00378652005
 ;;9002226.02101,"1149,00378652091 ",.01)
 ;;00378652091
 ;;9002226.02101,"1149,00378652091 ",.02)
 ;;00378652091
 ;;9002226.02101,"1149,00378654005 ",.01)
 ;;00378654005
 ;;9002226.02101,"1149,00378654005 ",.02)
 ;;00378654005
 ;;9002226.02101,"1149,00378654091 ",.01)
 ;;00378654091
 ;;9002226.02101,"1149,00378654091 ",.02)
 ;;00378654091
 ;;9002226.02101,"1149,00378710077 ",.01)
 ;;00378710077
 ;;9002226.02101,"1149,00378710077 ",.02)
 ;;00378710077
 ;;9002226.02101,"1149,00378710177 ",.01)
 ;;00378710177
 ;;9002226.02101,"1149,00378710177 ",.02)
 ;;00378710177
 ;;9002226.02101,"1149,00405423601 ",.01)
 ;;00405423601
 ;;9002226.02101,"1149,00405423601 ",.02)
 ;;00405423601
 ;;9002226.02101,"1149,00405445631 ",.01)
 ;;00405445631
 ;;9002226.02101,"1149,00405445631 ",.02)
 ;;00405445631
 ;;9002226.02101,"1149,00406206503 ",.01)
 ;;00406206503
 ;;9002226.02101,"1149,00406206503 ",.02)
 ;;00406206503
 ;;9002226.02101,"1149,00406206505 ",.01)
 ;;00406206505
 ;;9002226.02101,"1149,00406206505 ",.02)
 ;;00406206505
 ;;9002226.02101,"1149,00406206510 ",.01)
 ;;00406206510
 ;;9002226.02101,"1149,00406206510 ",.02)
 ;;00406206510
 ;;9002226.02101,"1149,00406206560 ",.01)
 ;;00406206560
 ;;9002226.02101,"1149,00406206560 ",.02)
 ;;00406206560
 ;;9002226.02101,"1149,00406206590 ",.01)
 ;;00406206590
 ;;9002226.02101,"1149,00406206590 ",.02)
 ;;00406206590
 ;;9002226.02101,"1149,00406206603 ",.01)
 ;;00406206603
 ;;9002226.02101,"1149,00406206603 ",.02)
 ;;00406206603
 ;;9002226.02101,"1149,00406206605 ",.01)
 ;;00406206605
 ;;9002226.02101,"1149,00406206605 ",.02)
 ;;00406206605
 ;;9002226.02101,"1149,00406206610 ",.01)
 ;;00406206610
 ;;9002226.02101,"1149,00406206610 ",.02)
 ;;00406206610
 ;;9002226.02101,"1149,00406206660 ",.01)
 ;;00406206660
 ;;9002226.02101,"1149,00406206660 ",.02)
 ;;00406206660
 ;;9002226.02101,"1149,00406206690 ",.01)
 ;;00406206690
 ;;9002226.02101,"1149,00406206690 ",.02)
 ;;00406206690
 ;;9002226.02101,"1149,00406206692 ",.01)
 ;;00406206692
 ;;9002226.02101,"1149,00406206692 ",.02)
 ;;00406206692
 ;;9002226.02101,"1149,00406206703 ",.01)
 ;;00406206703
 ;;9002226.02101,"1149,00406206703 ",.02)
 ;;00406206703
 ;;9002226.02101,"1149,00406206705 ",.01)
 ;;00406206705
 ;;9002226.02101,"1149,00406206705 ",.02)
 ;;00406206705
 ;;9002226.02101,"1149,00406206710 ",.01)
 ;;00406206710
 ;;9002226.02101,"1149,00406206710 ",.02)
 ;;00406206710
 ;;9002226.02101,"1149,00406206760 ",.01)
 ;;00406206760
 ;;9002226.02101,"1149,00406206760 ",.02)
 ;;00406206760
 ;;9002226.02101,"1149,00406206790 ",.01)
 ;;00406206790
 ;;9002226.02101,"1149,00406206790 ",.02)
 ;;00406206790
 ;;9002226.02101,"1149,00406206792 ",.01)
 ;;00406206792
 ;;9002226.02101,"1149,00406206792 ",.02)
 ;;00406206792
 ;;9002226.02101,"1149,00406206803 ",.01)
 ;;00406206803
 ;;9002226.02101,"1149,00406206803 ",.02)
 ;;00406206803
 ;;9002226.02101,"1149,00406206805 ",.01)
 ;;00406206805
 ;;9002226.02101,"1149,00406206805 ",.02)
 ;;00406206805
 ;;9002226.02101,"1149,00406206810 ",.01)
 ;;00406206810
 ;;9002226.02101,"1149,00406206810 ",.02)
 ;;00406206810
 ;;9002226.02101,"1149,00406206860 ",.01)
 ;;00406206860
 ;;9002226.02101,"1149,00406206860 ",.02)
 ;;00406206860
 ;;9002226.02101,"1149,00406206890 ",.01)
 ;;00406206890
 ;;9002226.02101,"1149,00406206890 ",.02)
 ;;00406206890
 ;;9002226.02101,"1149,00406206891 ",.01)
 ;;00406206891
 ;;9002226.02101,"1149,00406206891 ",.02)
 ;;00406206891
 ;;9002226.02101,"1149,00406206903 ",.01)
 ;;00406206903
 ;;9002226.02101,"1149,00406206903 ",.02)
 ;;00406206903
 ;;9002226.02101,"1149,00406206905 ",.01)
 ;;00406206905
 ;;9002226.02101,"1149,00406206905 ",.02)
 ;;00406206905
 ;;9002226.02101,"1149,00406206910 ",.01)
 ;;00406206910
 ;;9002226.02101,"1149,00406206910 ",.02)
 ;;00406206910
 ;;9002226.02101,"1149,00406206960 ",.01)
 ;;00406206960
 ;;9002226.02101,"1149,00406206960 ",.02)
 ;;00406206960
 ;;9002226.02101,"1149,00406206990 ",.01)
 ;;00406206990
 ;;9002226.02101,"1149,00406206990 ",.02)
 ;;00406206990
 ;;9002226.02101,"1149,00440756000 ",.01)
 ;;00440756000
 ;;9002226.02101,"1149,00440756000 ",.02)
 ;;00440756000
 ;;9002226.02101,"1149,00440756002 ",.01)
 ;;00440756002
 ;;9002226.02101,"1149,00440756002 ",.02)
 ;;00440756002
 ;;9002226.02101,"1149,00440756010 ",.01)
 ;;00440756010
 ;;9002226.02101,"1149,00440756010 ",.02)
 ;;00440756010
 ;;9002226.02101,"1149,00440756020 ",.01)
 ;;00440756020
 ;;9002226.02101,"1149,00440756020 ",.02)
 ;;00440756020
 ;;9002226.02101,"1149,00440756028 ",.01)
 ;;00440756028
 ;;9002226.02101,"1149,00440756028 ",.02)
 ;;00440756028
 ;;9002226.02101,"1149,00440756060 ",.01)
 ;;00440756060
 ;;9002226.02101,"1149,00440756060 ",.02)
 ;;00440756060
 ;;9002226.02101,"1149,00440756092 ",.01)
 ;;00440756092
 ;;9002226.02101,"1149,00440756092 ",.02)
 ;;00440756092
 ;;9002226.02101,"1149,00456058501 ",.01)
 ;;00456058501
 ;;9002226.02101,"1149,00456058501 ",.02)
 ;;00456058501
 ;;9002226.02101,"1149,00463612710 ",.01)
 ;;00463612710
 ;;9002226.02101,"1149,00463612710 ",.02)
 ;;00463612710
 ;;9002226.02101,"1149,00463612810 ",.01)
 ;;00463612810
 ;;9002226.02101,"1149,00463612810 ",.02)
 ;;00463612810
 ;;9002226.02101,"1149,00480067005 ",.01)
 ;;00480067005
 ;;9002226.02101,"1149,00480067005 ",.02)
 ;;00480067005
 ;;9002226.02101,"1149,00480067006 ",.01)
 ;;00480067006
 ;;9002226.02101,"1149,00480067006 ",.02)
 ;;00480067006
 ;;9002226.02101,"1149,00480715256 ",.01)
 ;;00480715256
 ;;9002226.02101,"1149,00480715256 ",.02)
 ;;00480715256
 ;;9002226.02101,"1149,00480715298 ",.01)
 ;;00480715298
 ;;9002226.02101,"1149,00480715298 ",.02)
 ;;00480715298
 ;;9002226.02101,"1149,00480715310 ",.01)
 ;;00480715310
 ;;9002226.02101,"1149,00480715310 ",.02)
 ;;00480715310
 ;;9002226.02101,"1149,00480715356 ",.01)
 ;;00480715356
 ;;9002226.02101,"1149,00480715356 ",.02)
 ;;00480715356
 ;;9002226.02101,"1149,00480715398 ",.01)
 ;;00480715398
 ;;9002226.02101,"1149,00480715398 ",.02)
 ;;00480715398
 ;;9002226.02101,"1149,00480715410 ",.01)
 ;;00480715410
 ;;9002226.02101,"1149,00480715410 ",.02)
 ;;00480715410
 ;;9002226.02101,"1149,00480715456 ",.01)
 ;;00480715456
 ;;9002226.02101,"1149,00480715456 ",.02)
 ;;00480715456
 ;;9002226.02101,"1149,00480715498 ",.01)
 ;;00480715498
 ;;9002226.02101,"1149,00480715498 ",.02)
 ;;00480715498
 ;;9002226.02101,"1149,00480715510 ",.01)
 ;;00480715510
 ;;9002226.02101,"1149,00480715510 ",.02)
 ;;00480715510
 ;;9002226.02101,"1149,00480715556 ",.01)
 ;;00480715556
 ;;9002226.02101,"1149,00480715556 ",.02)
 ;;00480715556
 ;;9002226.02101,"1149,00480715598 ",.01)
 ;;00480715598
 ;;9002226.02101,"1149,00480715598 ",.02)
 ;;00480715598
 ;;9002226.02101,"1149,00480715610 ",.01)
 ;;00480715610
 ;;9002226.02101,"1149,00480715610 ",.02)
 ;;00480715610
 ;;9002226.02101,"1149,00480715656 ",.01)
 ;;00480715656
 ;;9002226.02101,"1149,00480715656 ",.02)
 ;;00480715656
 ;;9002226.02101,"1149,00480715698 ",.01)
 ;;00480715698
 ;;9002226.02101,"1149,00480715698 ",.02)
 ;;00480715698
 ;;9002226.02101,"1149,00480733098 ",.01)
 ;;00480733098
 ;;9002226.02101,"1149,00480733098 ",.02)
 ;;00480733098
 ;;9002226.02101,"1149,00480733198 ",.01)
 ;;00480733198
 ;;9002226.02101,"1149,00480733198 ",.02)
 ;;00480733198
 ;;9002226.02101,"1149,00527115601 ",.01)
 ;;00527115601
 ;;9002226.02101,"1149,00527115601 ",.02)
 ;;00527115601
 ;;9002226.02101,"1149,00527115610 ",.01)
 ;;00527115610
 ;;9002226.02101,"1149,00527115610 ",.02)
 ;;00527115610
 ;;9002226.02101,"1149,00527118205 ",.01)
 ;;00527118205
 ;;9002226.02101,"1149,00527118205 ",.02)
 ;;00527118205
 ;;9002226.02101,"1149,00527118210 ",.01)
 ;;00527118210
 ;;9002226.02101,"1149,00527118210 ",.02)
 ;;00527118210
 ;;9002226.02101,"1149,00527118305 ",.01)
 ;;00527118305
 ;;9002226.02101,"1149,00527118305 ",.02)
 ;;00527118305
 ;;9002226.02101,"1149,00527118310 ",.01)
 ;;00527118310
 ;;9002226.02101,"1149,00527118310 ",.02)
 ;;00527118310
 ;;9002226.02101,"1149,00527126301 ",.01)
 ;;00527126301
 ;;9002226.02101,"1149,00527126301 ",.02)
 ;;00527126301