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

BUD2ZA18.m

Go to the documentation of this file.
BUD2ZA18 ;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,55887036930 ",.01)
 ;;55887036930
 ;;9002226.02101,"1149,55887036930 ",.02)
 ;;55887036930
 ;;9002226.02101,"1149,55887036940 ",.01)
 ;;55887036940
 ;;9002226.02101,"1149,55887036940 ",.02)
 ;;55887036940
 ;;9002226.02101,"1149,55887036960 ",.01)
 ;;55887036960
 ;;9002226.02101,"1149,55887036960 ",.02)
 ;;55887036960
 ;;9002226.02101,"1149,55887036990 ",.01)
 ;;55887036990
 ;;9002226.02101,"1149,55887036990 ",.02)
 ;;55887036990
 ;;9002226.02101,"1149,55887085810 ",.01)
 ;;55887085810
 ;;9002226.02101,"1149,55887085810 ",.02)
 ;;55887085810
 ;;9002226.02101,"1149,55887085830 ",.01)
 ;;55887085830
 ;;9002226.02101,"1149,55887085830 ",.02)
 ;;55887085830
 ;;9002226.02101,"1149,55887085860 ",.01)
 ;;55887085860
 ;;9002226.02101,"1149,55887085860 ",.02)
 ;;55887085860
 ;;9002226.02101,"1149,55887085890 ",.01)
 ;;55887085890
 ;;9002226.02101,"1149,55887085890 ",.02)
 ;;55887085890
 ;;9002226.02101,"1149,55887086130 ",.01)
 ;;55887086130
 ;;9002226.02101,"1149,55887086130 ",.02)
 ;;55887086130
 ;;9002226.02101,"1149,55887086160 ",.01)
 ;;55887086160
 ;;9002226.02101,"1149,55887086160 ",.02)
 ;;55887086160
 ;;9002226.02101,"1149,55887086190 ",.01)
 ;;55887086190
 ;;9002226.02101,"1149,55887086190 ",.02)
 ;;55887086190
 ;;9002226.02101,"1149,55887097430 ",.01)
 ;;55887097430
 ;;9002226.02101,"1149,55887097430 ",.02)
 ;;55887097430
 ;;9002226.02101,"1149,55887097490 ",.01)
 ;;55887097490
 ;;9002226.02101,"1149,55887097490 ",.02)
 ;;55887097490
 ;;9002226.02101,"1149,55953000935 ",.01)
 ;;55953000935
 ;;9002226.02101,"1149,55953000935 ",.02)
 ;;55953000935
 ;;9002226.02101,"1149,55953000965 ",.01)
 ;;55953000965
 ;;9002226.02101,"1149,55953000965 ",.02)
 ;;55953000965
 ;;9002226.02101,"1149,55953001135 ",.01)
 ;;55953001135
 ;;9002226.02101,"1149,55953001135 ",.02)
 ;;55953001135
 ;;9002226.02101,"1149,55953001156 ",.01)
 ;;55953001156
 ;;9002226.02101,"1149,55953001156 ",.02)
 ;;55953001156
 ;;9002226.02101,"1149,55953009635 ",.01)
 ;;55953009635
 ;;9002226.02101,"1149,55953009635 ",.02)
 ;;55953009635
 ;;9002226.02101,"1149,55953009665 ",.01)
 ;;55953009665
 ;;9002226.02101,"1149,55953009665 ",.02)
 ;;55953009665
 ;;9002226.02101,"1149,55953011135 ",.01)
 ;;55953011135
 ;;9002226.02101,"1149,55953011135 ",.02)
 ;;55953011135
 ;;9002226.02101,"1149,55953011156 ",.01)
 ;;55953011156
 ;;9002226.02101,"1149,55953011156 ",.02)
 ;;55953011156
 ;;9002226.02101,"1149,55953038240 ",.01)
 ;;55953038240
 ;;9002226.02101,"1149,55953038240 ",.02)
 ;;55953038240
 ;;9002226.02101,"1149,57297046701 ",.01)
 ;;57297046701
 ;;9002226.02101,"1149,57297046701 ",.02)
 ;;57297046701
 ;;9002226.02101,"1149,57297046703 ",.01)
 ;;57297046703
 ;;9002226.02101,"1149,57297046703 ",.02)
 ;;57297046703
 ;;9002226.02101,"1149,57297046707 ",.01)
 ;;57297046707
 ;;9002226.02101,"1149,57297046707 ",.02)
 ;;57297046707
 ;;9002226.02101,"1149,57297046801 ",.01)
 ;;57297046801
 ;;9002226.02101,"1149,57297046801 ",.02)
 ;;57297046801
 ;;9002226.02101,"1149,57297046803 ",.01)
 ;;57297046803
 ;;9002226.02101,"1149,57297046803 ",.02)
 ;;57297046803
 ;;9002226.02101,"1149,57297046807 ",.01)
 ;;57297046807
 ;;9002226.02101,"1149,57297046807 ",.02)
 ;;57297046807
 ;;9002226.02101,"1149,57297046809 ",.01)
 ;;57297046809
 ;;9002226.02101,"1149,57297046809 ",.02)
 ;;57297046809
 ;;9002226.02101,"1149,57297046901 ",.01)
 ;;57297046901
 ;;9002226.02101,"1149,57297046901 ",.02)
 ;;57297046901
 ;;9002226.02101,"1149,57297046903 ",.01)
 ;;57297046903
 ;;9002226.02101,"1149,57297046903 ",.02)
 ;;57297046903
 ;;9002226.02101,"1149,57297046907 ",.01)
 ;;57297046907
 ;;9002226.02101,"1149,57297046907 ",.02)
 ;;57297046907
 ;;9002226.02101,"1149,57297046909 ",.01)
 ;;57297046909
 ;;9002226.02101,"1149,57297046909 ",.02)
 ;;57297046909
 ;;9002226.02101,"1149,57297047801 ",.01)
 ;;57297047801
 ;;9002226.02101,"1149,57297047801 ",.02)
 ;;57297047801
 ;;9002226.02101,"1149,57297047802 ",.01)
 ;;57297047802
 ;;9002226.02101,"1149,57297047802 ",.02)
 ;;57297047802
 ;;9002226.02101,"1149,57297047803 ",.01)
 ;;57297047803
 ;;9002226.02101,"1149,57297047803 ",.02)
 ;;57297047803
 ;;9002226.02101,"1149,57297047901 ",.01)
 ;;57297047901
 ;;9002226.02101,"1149,57297047901 ",.02)
 ;;57297047901
 ;;9002226.02101,"1149,57297047902 ",.01)
 ;;57297047902
 ;;9002226.02101,"1149,57297047902 ",.02)
 ;;57297047902
 ;;9002226.02101,"1149,57297047903 ",.01)
 ;;57297047903
 ;;9002226.02101,"1149,57297047903 ",.02)
 ;;57297047903
 ;;9002226.02101,"1149,57297048001 ",.01)
 ;;57297048001
 ;;9002226.02101,"1149,57297048001 ",.02)
 ;;57297048001
 ;;9002226.02101,"1149,57297048002 ",.01)
 ;;57297048002
 ;;9002226.02101,"1149,57297048002 ",.02)
 ;;57297048002
 ;;9002226.02101,"1149,57297048003 ",.01)
 ;;57297048003
 ;;9002226.02101,"1149,57297048003 ",.02)
 ;;57297048003
 ;;9002226.02101,"1149,57297048101 ",.01)
 ;;57297048101
 ;;9002226.02101,"1149,57297048101 ",.02)
 ;;57297048101
 ;;9002226.02101,"1149,57297048102 ",.01)
 ;;57297048102
 ;;9002226.02101,"1149,57297048102 ",.02)
 ;;57297048102
 ;;9002226.02101,"1149,57297048103 ",.01)
 ;;57297048103
 ;;9002226.02101,"1149,57297048103 ",.02)
 ;;57297048103
 ;;9002226.02101,"1149,57297048203 ",.01)
 ;;57297048203
 ;;9002226.02101,"1149,57297048203 ",.02)
 ;;57297048203
 ;;9002226.02101,"1149,57297048206 ",.01)
 ;;57297048206
 ;;9002226.02101,"1149,57297048206 ",.02)
 ;;57297048206
 ;;9002226.02101,"1149,57297048209 ",.01)
 ;;57297048209
 ;;9002226.02101,"1149,57297048209 ",.02)
 ;;57297048209
 ;;9002226.02101,"1149,57297048213 ",.01)
 ;;57297048213
 ;;9002226.02101,"1149,57297048213 ",.02)
 ;;57297048213
 ;;9002226.02101,"1149,57480080901 ",.01)
 ;;57480080901
 ;;9002226.02101,"1149,57480080901 ",.02)
 ;;57480080901
 ;;9002226.02101,"1149,57480080906 ",.01)
 ;;57480080906
 ;;9002226.02101,"1149,57480080906 ",.02)
 ;;57480080906
 ;;9002226.02101,"1149,57587090100 ",.01)
 ;;57587090100
 ;;9002226.02101,"1149,57587090100 ",.02)
 ;;57587090100
 ;;9002226.02101,"1149,57587090300 ",.01)
 ;;57587090300
 ;;9002226.02101,"1149,57587090300 ",.02)
 ;;57587090300
 ;;9002226.02101,"1149,57664011508 ",.01)
 ;;57664011508
 ;;9002226.02101,"1149,57664011508 ",.02)
 ;;57664011508
 ;;9002226.02101,"1149,57664011513 ",.01)
 ;;57664011513
 ;;9002226.02101,"1149,57664011513 ",.02)
 ;;57664011513
 ;;9002226.02101,"1149,57664011518 ",.01)
 ;;57664011518
 ;;9002226.02101,"1149,57664011518 ",.02)
 ;;57664011518
 ;;9002226.02101,"1149,57664011583 ",.01)
 ;;57664011583
 ;;9002226.02101,"1149,57664011583 ",.02)
 ;;57664011583
 ;;9002226.02101,"1149,57664011586 ",.01)
 ;;57664011586
 ;;9002226.02101,"1149,57664011586 ",.02)
 ;;57664011586
 ;;9002226.02101,"1149,57664011588 ",.01)
 ;;57664011588
 ;;9002226.02101,"1149,57664011588 ",.02)
 ;;57664011588
 ;;9002226.02101,"1149,57866393601 ",.01)
 ;;57866393601
 ;;9002226.02101,"1149,57866393601 ",.02)
 ;;57866393601
 ;;9002226.02101,"1149,57866394901 ",.01)
 ;;57866394901
 ;;9002226.02101,"1149,57866394901 ",.02)
 ;;57866394901
 ;;9002226.02101,"1149,57866640001 ",.01)
 ;;57866640001
 ;;9002226.02101,"1149,57866640001 ",.02)
 ;;57866640001
 ;;9002226.02101,"1149,57866650001 ",.01)
 ;;57866650001
 ;;9002226.02101,"1149,57866650001 ",.02)
 ;;57866650001
 ;;9002226.02101,"1149,57866654001 ",.01)
 ;;57866654001
 ;;9002226.02101,"1149,57866654001 ",.02)
 ;;57866654001
 ;;9002226.02101,"1149,57866654002 ",.01)
 ;;57866654002
 ;;9002226.02101,"1149,57866654002 ",.02)
 ;;57866654002
 ;;9002226.02101,"1149,57866654004 ",.01)
 ;;57866654004
 ;;9002226.02101,"1149,57866654004 ",.02)
 ;;57866654004
 ;;9002226.02101,"1149,57866660101 ",.01)
 ;;57866660101
 ;;9002226.02101,"1149,57866660101 ",.02)
 ;;57866660101
 ;;9002226.02101,"1149,58016000600 ",.01)
 ;;58016000600
 ;;9002226.02101,"1149,58016000600 ",.02)
 ;;58016000600
 ;;9002226.02101,"1149,58016000601 ",.01)
 ;;58016000601
 ;;9002226.02101,"1149,58016000601 ",.02)
 ;;58016000601
 ;;9002226.02101,"1149,58016000602 ",.01)
 ;;58016000602
 ;;9002226.02101,"1149,58016000602 ",.02)
 ;;58016000602
 ;;9002226.02101,"1149,58016000603 ",.01)
 ;;58016000603
 ;;9002226.02101,"1149,58016000603 ",.02)
 ;;58016000603
 ;;9002226.02101,"1149,58016000604 ",.01)
 ;;58016000604
 ;;9002226.02101,"1149,58016000604 ",.02)
 ;;58016000604
 ;;9002226.02101,"1149,58016000605 ",.01)
 ;;58016000605
 ;;9002226.02101,"1149,58016000605 ",.02)
 ;;58016000605
 ;;9002226.02101,"1149,58016000606 ",.01)
 ;;58016000606
 ;;9002226.02101,"1149,58016000606 ",.02)
 ;;58016000606
 ;;9002226.02101,"1149,58016000607 ",.01)
 ;;58016000607
 ;;9002226.02101,"1149,58016000607 ",.02)
 ;;58016000607
 ;;9002226.02101,"1149,58016000608 ",.01)
 ;;58016000608
 ;;9002226.02101,"1149,58016000608 ",.02)
 ;;58016000608
 ;;9002226.02101,"1149,58016000609 ",.01)
 ;;58016000609
 ;;9002226.02101,"1149,58016000609 ",.02)
 ;;58016000609
 ;;9002226.02101,"1149,58016000610 ",.01)
 ;;58016000610
 ;;9002226.02101,"1149,58016000610 ",.02)
 ;;58016000610
 ;;9002226.02101,"1149,58016000630 ",.01)
 ;;58016000630
 ;;9002226.02101,"1149,58016000630 ",.02)
 ;;58016000630
 ;;9002226.02101,"1149,58016000660 ",.01)
 ;;58016000660
 ;;9002226.02101,"1149,58016000660 ",.02)
 ;;58016000660
 ;;9002226.02101,"1149,58016000690 ",.01)
 ;;58016000690
 ;;9002226.02101,"1149,58016000690 ",.02)
 ;;58016000690
 ;;9002226.02101,"1149,58016000700 ",.01)
 ;;58016000700
 ;;9002226.02101,"1149,58016000700 ",.02)
 ;;58016000700
 ;;9002226.02101,"1149,58016000701 ",.01)
 ;;58016000701
 ;;9002226.02101,"1149,58016000701 ",.02)
 ;;58016000701
 ;;9002226.02101,"1149,58016000702 ",.01)
 ;;58016000702
 ;;9002226.02101,"1149,58016000702 ",.02)
 ;;58016000702
 ;;9002226.02101,"1149,58016000703 ",.01)
 ;;58016000703
 ;;9002226.02101,"1149,58016000703 ",.02)
 ;;58016000703
 ;;9002226.02101,"1149,58016000704 ",.01)
 ;;58016000704
 ;;9002226.02101,"1149,58016000704 ",.02)
 ;;58016000704
 ;;9002226.02101,"1149,58016000705 ",.01)
 ;;58016000705
 ;;9002226.02101,"1149,58016000705 ",.02)
 ;;58016000705
 ;;9002226.02101,"1149,58016000706 ",.01)
 ;;58016000706
 ;;9002226.02101,"1149,58016000706 ",.02)
 ;;58016000706
 ;;9002226.02101,"1149,58016000707 ",.01)
 ;;58016000707
 ;;9002226.02101,"1149,58016000707 ",.02)
 ;;58016000707
 ;;9002226.02101,"1149,58016000708 ",.01)
 ;;58016000708
 ;;9002226.02101,"1149,58016000708 ",.02)
 ;;58016000708
 ;;9002226.02101,"1149,58016000709 ",.01)
 ;;58016000709
 ;;9002226.02101,"1149,58016000709 ",.02)
 ;;58016000709
 ;;9002226.02101,"1149,58016000710 ",.01)
 ;;58016000710
 ;;9002226.02101,"1149,58016000710 ",.02)
 ;;58016000710
 ;;9002226.02101,"1149,58016000730 ",.01)
 ;;58016000730
 ;;9002226.02101,"1149,58016000730 ",.02)
 ;;58016000730
 ;;9002226.02101,"1149,58016000760 ",.01)
 ;;58016000760
 ;;9002226.02101,"1149,58016000760 ",.02)
 ;;58016000760
 ;;9002226.02101,"1149,58016000790 ",.01)
 ;;58016000790
 ;;9002226.02101,"1149,58016000790 ",.02)
 ;;58016000790
 ;;9002226.02101,"1149,58016000800 ",.01)
 ;;58016000800
 ;;9002226.02101,"1149,58016000800 ",.02)
 ;;58016000800
 ;;9002226.02101,"1149,58016000830 ",.01)
 ;;58016000830
 ;;9002226.02101,"1149,58016000830 ",.02)
 ;;58016000830
 ;;9002226.02101,"1149,58016000860 ",.01)
 ;;58016000860
 ;;9002226.02101,"1149,58016000860 ",.02)
 ;;58016000860
 ;;9002226.02101,"1149,58016000890 ",.01)
 ;;58016000890
 ;;9002226.02101,"1149,58016000890 ",.02)
 ;;58016000890
 ;;9002226.02101,"1149,58016054000 ",.01)
 ;;58016054000
 ;;9002226.02101,"1149,58016054000 ",.02)
 ;;58016054000
 ;;9002226.02101,"1149,58016054001 ",.01)
 ;;58016054001
 ;;9002226.02101,"1149,58016054001 ",.02)
 ;;58016054001
 ;;9002226.02101,"1149,58016054002 ",.01)
 ;;58016054002
 ;;9002226.02101,"1149,58016054002 ",.02)
 ;;58016054002
 ;;9002226.02101,"1149,58016054003 ",.01)
 ;;58016054003
 ;;9002226.02101,"1149,58016054003 ",.02)
 ;;58016054003
 ;;9002226.02101,"1149,58016054004 ",.01)
 ;;58016054004
 ;;9002226.02101,"1149,58016054004 ",.02)
 ;;58016054004
 ;;9002226.02101,"1149,58016054005 ",.01)
 ;;58016054005
 ;;9002226.02101,"1149,58016054005 ",.02)
 ;;58016054005
 ;;9002226.02101,"1149,58016054006 ",.01)
 ;;58016054006
 ;;9002226.02101,"1149,58016054006 ",.02)
 ;;58016054006
 ;;9002226.02101,"1149,58016054007 ",.01)
 ;;58016054007
 ;;9002226.02101,"1149,58016054007 ",.02)
 ;;58016054007
 ;;9002226.02101,"1149,58016054008 ",.01)
 ;;58016054008
 ;;9002226.02101,"1149,58016054008 ",.02)
 ;;58016054008
 ;;9002226.02101,"1149,58016054009 ",.01)
 ;;58016054009
 ;;9002226.02101,"1149,58016054009 ",.02)
 ;;58016054009
 ;;9002226.02101,"1149,58016054010 ",.01)
 ;;58016054010
 ;;9002226.02101,"1149,58016054010 ",.02)
 ;;58016054010
 ;;9002226.02101,"1149,58016054012 ",.01)
 ;;58016054012
 ;;9002226.02101,"1149,58016054012 ",.02)
 ;;58016054012
 ;;9002226.02101,"1149,58016054014 ",.01)
 ;;58016054014
 ;;9002226.02101,"1149,58016054014 ",.02)
 ;;58016054014
 ;;9002226.02101,"1149,58016054016 ",.01)
 ;;58016054016
 ;;9002226.02101,"1149,58016054016 ",.02)
 ;;58016054016
 ;;9002226.02101,"1149,58016054018 ",.01)
 ;;58016054018
 ;;9002226.02101,"1149,58016054018 ",.02)
 ;;58016054018
 ;;9002226.02101,"1149,58016054020 ",.01)
 ;;58016054020
 ;;9002226.02101,"1149,58016054020 ",.02)
 ;;58016054020
 ;;9002226.02101,"1149,58016054021 ",.01)
 ;;58016054021
 ;;9002226.02101,"1149,58016054021 ",.02)
 ;;58016054021
 ;;9002226.02101,"1149,58016054024 ",.01)
 ;;58016054024