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

BUD2ZA17.m

Go to the documentation of this file.
BUD2ZA17 ;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,54907090105 ",.02)
 ;;54907090105
 ;;9002226.02101,"1149,54907090109 ",.01)
 ;;54907090109
 ;;9002226.02101,"1149,54907090109 ",.02)
 ;;54907090109
 ;;9002226.02101,"1149,55045232302 ",.01)
 ;;55045232302
 ;;9002226.02101,"1149,55045232302 ",.02)
 ;;55045232302
 ;;9002226.02101,"1149,55045232306 ",.01)
 ;;55045232306
 ;;9002226.02101,"1149,55045232306 ",.02)
 ;;55045232306
 ;;9002226.02101,"1149,55045301401 ",.01)
 ;;55045301401
 ;;9002226.02101,"1149,55045301401 ",.02)
 ;;55045301401
 ;;9002226.02101,"1149,55045301402 ",.01)
 ;;55045301402
 ;;9002226.02101,"1149,55045301402 ",.02)
 ;;55045301402
 ;;9002226.02101,"1149,55045301406 ",.01)
 ;;55045301406
 ;;9002226.02101,"1149,55045301406 ",.02)
 ;;55045301406
 ;;9002226.02101,"1149,55045301408 ",.01)
 ;;55045301408
 ;;9002226.02101,"1149,55045301408 ",.02)
 ;;55045301408
 ;;9002226.02101,"1149,55045301409 ",.01)
 ;;55045301409
 ;;9002226.02101,"1149,55045301409 ",.02)
 ;;55045301409
 ;;9002226.02101,"1149,55045301501 ",.01)
 ;;55045301501
 ;;9002226.02101,"1149,55045301501 ",.02)
 ;;55045301501
 ;;9002226.02101,"1149,55045301508 ",.01)
 ;;55045301508
 ;;9002226.02101,"1149,55045301508 ",.02)
 ;;55045301508
 ;;9002226.02101,"1149,55045301509 ",.01)
 ;;55045301509
 ;;9002226.02101,"1149,55045301509 ",.02)
 ;;55045301509
 ;;9002226.02101,"1149,55111019701 ",.01)
 ;;55111019701
 ;;9002226.02101,"1149,55111019701 ",.02)
 ;;55111019701
 ;;9002226.02101,"1149,55111019705 ",.01)
 ;;55111019705
 ;;9002226.02101,"1149,55111019705 ",.02)
 ;;55111019705
 ;;9002226.02101,"1149,55111019710 ",.01)
 ;;55111019710
 ;;9002226.02101,"1149,55111019710 ",.02)
 ;;55111019710
 ;;9002226.02101,"1149,55111019730 ",.01)
 ;;55111019730
 ;;9002226.02101,"1149,55111019730 ",.02)
 ;;55111019730
 ;;9002226.02101,"1149,55111019760 ",.01)
 ;;55111019760
 ;;9002226.02101,"1149,55111019760 ",.02)
 ;;55111019760
 ;;9002226.02101,"1149,55111019778 ",.01)
 ;;55111019778
 ;;9002226.02101,"1149,55111019778 ",.02)
 ;;55111019778
 ;;9002226.02101,"1149,55111019790 ",.01)
 ;;55111019790
 ;;9002226.02101,"1149,55111019790 ",.02)
 ;;55111019790
 ;;9002226.02101,"1149,55111019801 ",.01)
 ;;55111019801
 ;;9002226.02101,"1149,55111019801 ",.02)
 ;;55111019801
 ;;9002226.02101,"1149,55111019805 ",.01)
 ;;55111019805
 ;;9002226.02101,"1149,55111019805 ",.02)
 ;;55111019805
 ;;9002226.02101,"1149,55111019830 ",.01)
 ;;55111019830
 ;;9002226.02101,"1149,55111019830 ",.02)
 ;;55111019830
 ;;9002226.02101,"1149,55111019860 ",.01)
 ;;55111019860
 ;;9002226.02101,"1149,55111019860 ",.02)
 ;;55111019860
 ;;9002226.02101,"1149,55111019878 ",.01)
 ;;55111019878
 ;;9002226.02101,"1149,55111019878 ",.02)
 ;;55111019878
 ;;9002226.02101,"1149,55111019890 ",.01)
 ;;55111019890
 ;;9002226.02101,"1149,55111019890 ",.02)
 ;;55111019890
 ;;9002226.02101,"1149,55111019901 ",.01)
 ;;55111019901
 ;;9002226.02101,"1149,55111019901 ",.02)
 ;;55111019901
 ;;9002226.02101,"1149,55111019905 ",.01)
 ;;55111019905
 ;;9002226.02101,"1149,55111019905 ",.02)
 ;;55111019905
 ;;9002226.02101,"1149,55111019910 ",.01)
 ;;55111019910
 ;;9002226.02101,"1149,55111019910 ",.02)
 ;;55111019910
 ;;9002226.02101,"1149,55111019930 ",.01)
 ;;55111019930
 ;;9002226.02101,"1149,55111019930 ",.02)
 ;;55111019930
 ;;9002226.02101,"1149,55111019960 ",.01)
 ;;55111019960
 ;;9002226.02101,"1149,55111019960 ",.02)
 ;;55111019960
 ;;9002226.02101,"1149,55111019978 ",.01)
 ;;55111019978
 ;;9002226.02101,"1149,55111019978 ",.02)
 ;;55111019978
 ;;9002226.02101,"1149,55111019990 ",.01)
 ;;55111019990
 ;;9002226.02101,"1149,55111019990 ",.02)
 ;;55111019990
 ;;9002226.02101,"1149,55111020001 ",.01)
 ;;55111020001
 ;;9002226.02101,"1149,55111020001 ",.02)
 ;;55111020001
 ;;9002226.02101,"1149,55111020005 ",.01)
 ;;55111020005
 ;;9002226.02101,"1149,55111020005 ",.02)
 ;;55111020005
 ;;9002226.02101,"1149,55111020010 ",.01)
 ;;55111020010
 ;;9002226.02101,"1149,55111020010 ",.02)
 ;;55111020010
 ;;9002226.02101,"1149,55111020030 ",.01)
 ;;55111020030
 ;;9002226.02101,"1149,55111020030 ",.02)
 ;;55111020030
 ;;9002226.02101,"1149,55111020060 ",.01)
 ;;55111020060
 ;;9002226.02101,"1149,55111020060 ",.02)
 ;;55111020060
 ;;9002226.02101,"1149,55111020078 ",.01)
 ;;55111020078
 ;;9002226.02101,"1149,55111020078 ",.02)
 ;;55111020078
 ;;9002226.02101,"1149,55111020090 ",.01)
 ;;55111020090
 ;;9002226.02101,"1149,55111020090 ",.02)
 ;;55111020090
 ;;9002226.02101,"1149,55111026801 ",.01)
 ;;55111026801
 ;;9002226.02101,"1149,55111026801 ",.02)
 ;;55111026801
 ;;9002226.02101,"1149,55111026805 ",.01)
 ;;55111026805
 ;;9002226.02101,"1149,55111026805 ",.02)
 ;;55111026805
 ;;9002226.02101,"1149,55111026830 ",.01)
 ;;55111026830
 ;;9002226.02101,"1149,55111026830 ",.02)
 ;;55111026830
 ;;9002226.02101,"1149,55111026860 ",.01)
 ;;55111026860
 ;;9002226.02101,"1149,55111026860 ",.02)
 ;;55111026860
 ;;9002226.02101,"1149,55111026878 ",.01)
 ;;55111026878
 ;;9002226.02101,"1149,55111026878 ",.02)
 ;;55111026878
 ;;9002226.02101,"1149,55111026890 ",.01)
 ;;55111026890
 ;;9002226.02101,"1149,55111026890 ",.02)
 ;;55111026890
 ;;9002226.02101,"1149,55111072610 ",.01)
 ;;55111072610
 ;;9002226.02101,"1149,55111072610 ",.02)
 ;;55111072610
 ;;9002226.02101,"1149,55111072630 ",.01)
 ;;55111072630
 ;;9002226.02101,"1149,55111072630 ",.02)
 ;;55111072630
 ;;9002226.02101,"1149,55111072690 ",.01)
 ;;55111072690
 ;;9002226.02101,"1149,55111072690 ",.02)
 ;;55111072690
 ;;9002226.02101,"1149,55111073510 ",.01)
 ;;55111073510
 ;;9002226.02101,"1149,55111073510 ",.02)
 ;;55111073510
 ;;9002226.02101,"1149,55111073530 ",.01)
 ;;55111073530
 ;;9002226.02101,"1149,55111073530 ",.02)
 ;;55111073530
 ;;9002226.02101,"1149,55111073590 ",.01)
 ;;55111073590
 ;;9002226.02101,"1149,55111073590 ",.02)
 ;;55111073590
 ;;9002226.02101,"1149,55111074010 ",.01)
 ;;55111074010
 ;;9002226.02101,"1149,55111074010 ",.02)
 ;;55111074010
 ;;9002226.02101,"1149,55111074030 ",.01)
 ;;55111074030
 ;;9002226.02101,"1149,55111074030 ",.02)
 ;;55111074030
 ;;9002226.02101,"1149,55111074090 ",.01)
 ;;55111074090
 ;;9002226.02101,"1149,55111074090 ",.02)
 ;;55111074090
 ;;9002226.02101,"1149,55111074910 ",.01)
 ;;55111074910
 ;;9002226.02101,"1149,55111074910 ",.02)
 ;;55111074910
 ;;9002226.02101,"1149,55111074930 ",.01)
 ;;55111074930
 ;;9002226.02101,"1149,55111074930 ",.02)
 ;;55111074930
 ;;9002226.02101,"1149,55111074990 ",.01)
 ;;55111074990
 ;;9002226.02101,"1149,55111074990 ",.02)
 ;;55111074990
 ;;9002226.02101,"1149,55111075010 ",.01)
 ;;55111075010
 ;;9002226.02101,"1149,55111075010 ",.02)
 ;;55111075010
 ;;9002226.02101,"1149,55111075030 ",.01)
 ;;55111075030
 ;;9002226.02101,"1149,55111075030 ",.02)
 ;;55111075030
 ;;9002226.02101,"1149,55111075090 ",.01)
 ;;55111075090
 ;;9002226.02101,"1149,55111075090 ",.02)
 ;;55111075090
 ;;9002226.02101,"1149,55154067000 ",.01)
 ;;55154067000
 ;;9002226.02101,"1149,55154067000 ",.02)
 ;;55154067000
 ;;9002226.02101,"1149,55154347609 ",.01)
 ;;55154347609
 ;;9002226.02101,"1149,55154347609 ",.02)
 ;;55154347609
 ;;9002226.02101,"1149,55154347709 ",.01)
 ;;55154347709
 ;;9002226.02101,"1149,55154347709 ",.02)
 ;;55154347709
 ;;9002226.02101,"1149,55154347809 ",.01)
 ;;55154347809
 ;;9002226.02101,"1149,55154347809 ",.02)
 ;;55154347809
 ;;9002226.02101,"1149,55154506200 ",.01)
 ;;55154506200
 ;;9002226.02101,"1149,55154506200 ",.02)
 ;;55154506200
 ;;9002226.02101,"1149,55154506300 ",.01)
 ;;55154506300
 ;;9002226.02101,"1149,55154506300 ",.02)
 ;;55154506300
 ;;9002226.02101,"1149,55154506400 ",.01)
 ;;55154506400
 ;;9002226.02101,"1149,55154506400 ",.02)
 ;;55154506400
 ;;9002226.02101,"1149,55154523100 ",.01)
 ;;55154523100
 ;;9002226.02101,"1149,55154523100 ",.02)
 ;;55154523100
 ;;9002226.02101,"1149,55154523107 ",.01)
 ;;55154523107
 ;;9002226.02101,"1149,55154523107 ",.02)
 ;;55154523107
 ;;9002226.02101,"1149,55154566600 ",.01)
 ;;55154566600
 ;;9002226.02101,"1149,55154566600 ",.02)
 ;;55154566600
 ;;9002226.02101,"1149,55154827209 ",.01)
 ;;55154827209
 ;;9002226.02101,"1149,55154827209 ",.02)
 ;;55154827209
 ;;9002226.02101,"1149,55175532503 ",.01)
 ;;55175532503
 ;;9002226.02101,"1149,55175532503 ",.02)
 ;;55175532503
 ;;9002226.02101,"1149,55289029314 ",.01)
 ;;55289029314
 ;;9002226.02101,"1149,55289029314 ",.02)
 ;;55289029314
 ;;9002226.02101,"1149,55289029330 ",.01)
 ;;55289029330
 ;;9002226.02101,"1149,55289029330 ",.02)
 ;;55289029330
 ;;9002226.02101,"1149,55289029390 ",.01)
 ;;55289029390
 ;;9002226.02101,"1149,55289029390 ",.02)
 ;;55289029390
 ;;9002226.02101,"1149,55289032601 ",.01)
 ;;55289032601
 ;;9002226.02101,"1149,55289032601 ",.02)
 ;;55289032601
 ;;9002226.02101,"1149,55289033814 ",.01)
 ;;55289033814
 ;;9002226.02101,"1149,55289033814 ",.02)
 ;;55289033814
 ;;9002226.02101,"1149,55289033830 ",.01)
 ;;55289033830
 ;;9002226.02101,"1149,55289033830 ",.02)
 ;;55289033830
 ;;9002226.02101,"1149,55289033890 ",.01)
 ;;55289033890
 ;;9002226.02101,"1149,55289033890 ",.02)
 ;;55289033890
 ;;9002226.02101,"1149,55289039530 ",.01)
 ;;55289039530
 ;;9002226.02101,"1149,55289039530 ",.02)
 ;;55289039530
 ;;9002226.02101,"1149,55289039590 ",.01)
 ;;55289039590
 ;;9002226.02101,"1149,55289039590 ",.02)
 ;;55289039590
 ;;9002226.02101,"1149,55289041160 ",.01)
 ;;55289041160
 ;;9002226.02101,"1149,55289041160 ",.02)
 ;;55289041160
 ;;9002226.02101,"1149,55289041193 ",.01)
 ;;55289041193
 ;;9002226.02101,"1149,55289041193 ",.02)
 ;;55289041193
 ;;9002226.02101,"1149,55289069214 ",.01)
 ;;55289069214
 ;;9002226.02101,"1149,55289069214 ",.02)
 ;;55289069214
 ;;9002226.02101,"1149,55289069230 ",.01)
 ;;55289069230
 ;;9002226.02101,"1149,55289069230 ",.02)
 ;;55289069230
 ;;9002226.02101,"1149,55289088130 ",.01)
 ;;55289088130
 ;;9002226.02101,"1149,55289088130 ",.02)
 ;;55289088130
 ;;9002226.02101,"1149,55567012700 ",.01)
 ;;55567012700
 ;;9002226.02101,"1149,55567012700 ",.02)
 ;;55567012700
 ;;9002226.02101,"1149,55567012706 ",.01)
 ;;55567012706
 ;;9002226.02101,"1149,55567012706 ",.02)
 ;;55567012706
 ;;9002226.02101,"1149,55567012718 ",.01)
 ;;55567012718
 ;;9002226.02101,"1149,55567012718 ",.02)
 ;;55567012718
 ;;9002226.02101,"1149,55567012735 ",.01)
 ;;55567012735
 ;;9002226.02101,"1149,55567012735 ",.02)
 ;;55567012735
 ;;9002226.02101,"1149,55567012769 ",.01)
 ;;55567012769
 ;;9002226.02101,"1149,55567012769 ",.02)
 ;;55567012769
 ;;9002226.02101,"1149,55567012800 ",.01)
 ;;55567012800
 ;;9002226.02101,"1149,55567012800 ",.02)
 ;;55567012800
 ;;9002226.02101,"1149,55567012806 ",.01)
 ;;55567012806
 ;;9002226.02101,"1149,55567012806 ",.02)
 ;;55567012806
 ;;9002226.02101,"1149,55567012818 ",.01)
 ;;55567012818
 ;;9002226.02101,"1149,55567012818 ",.02)
 ;;55567012818
 ;;9002226.02101,"1149,55567012835 ",.01)
 ;;55567012835
 ;;9002226.02101,"1149,55567012835 ",.02)
 ;;55567012835
 ;;9002226.02101,"1149,55567012869 ",.01)
 ;;55567012869
 ;;9002226.02101,"1149,55567012869 ",.02)
 ;;55567012869
 ;;9002226.02101,"1149,55567012900 ",.01)
 ;;55567012900
 ;;9002226.02101,"1149,55567012900 ",.02)
 ;;55567012900
 ;;9002226.02101,"1149,55567012906 ",.01)
 ;;55567012906
 ;;9002226.02101,"1149,55567012906 ",.02)
 ;;55567012906
 ;;9002226.02101,"1149,55567012918 ",.01)
 ;;55567012918
 ;;9002226.02101,"1149,55567012918 ",.02)
 ;;55567012918
 ;;9002226.02101,"1149,55567012935 ",.01)
 ;;55567012935
 ;;9002226.02101,"1149,55567012935 ",.02)
 ;;55567012935
 ;;9002226.02101,"1149,55567012969 ",.01)
 ;;55567012969
 ;;9002226.02101,"1149,55567012969 ",.02)
 ;;55567012969
 ;;9002226.02101,"1149,55648090101 ",.01)
 ;;55648090101
 ;;9002226.02101,"1149,55648090101 ",.02)
 ;;55648090101
 ;;9002226.02101,"1149,55887031830 ",.01)
 ;;55887031830
 ;;9002226.02101,"1149,55887031830 ",.02)
 ;;55887031830
 ;;9002226.02101,"1149,55887031860 ",.01)
 ;;55887031860
 ;;9002226.02101,"1149,55887031860 ",.02)
 ;;55887031860
 ;;9002226.02101,"1149,55887031890 ",.01)
 ;;55887031890
 ;;9002226.02101,"1149,55887031890 ",.02)
 ;;55887031890
 ;;9002226.02101,"1149,55887032730 ",.01)
 ;;55887032730
 ;;9002226.02101,"1149,55887032730 ",.02)
 ;;55887032730
 ;;9002226.02101,"1149,55887032760 ",.01)
 ;;55887032760
 ;;9002226.02101,"1149,55887032760 ",.02)
 ;;55887032760
 ;;9002226.02101,"1149,55887032790 ",.01)
 ;;55887032790
 ;;9002226.02101,"1149,55887032790 ",.02)
 ;;55887032790
 ;;9002226.02101,"1149,55887033530 ",.01)
 ;;55887033530
 ;;9002226.02101,"1149,55887033530 ",.02)
 ;;55887033530
 ;;9002226.02101,"1149,55887033560 ",.01)
 ;;55887033560
 ;;9002226.02101,"1149,55887033560 ",.02)
 ;;55887033560
 ;;9002226.02101,"1149,55887033582 ",.01)
 ;;55887033582
 ;;9002226.02101,"1149,55887033582 ",.02)
 ;;55887033582
 ;;9002226.02101,"1149,55887033590 ",.01)
 ;;55887033590
 ;;9002226.02101,"1149,55887033590 ",.02)
 ;;55887033590
 ;;9002226.02101,"1149,55887033592 ",.01)
 ;;55887033592
 ;;9002226.02101,"1149,55887033592 ",.02)
 ;;55887033592
 ;;9002226.02101,"1149,55887035001 ",.01)
 ;;55887035001
 ;;9002226.02101,"1149,55887035001 ",.02)
 ;;55887035001
 ;;9002226.02101,"1149,55887035030 ",.01)
 ;;55887035030
 ;;9002226.02101,"1149,55887035030 ",.02)
 ;;55887035030
 ;;9002226.02101,"1149,55887035060 ",.01)
 ;;55887035060
 ;;9002226.02101,"1149,55887035060 ",.02)
 ;;55887035060
 ;;9002226.02101,"1149,55887035090 ",.01)
 ;;55887035090
 ;;9002226.02101,"1149,55887035090 ",.02)
 ;;55887035090