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

BUD2ZA16.m

Go to the documentation of this file.
BUD2ZA16 ;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,53489060801 ",.01)
 ;;53489060801
 ;;9002226.02101,"1149,53489060801 ",.02)
 ;;53489060801
 ;;9002226.02101,"1149,53489060803 ",.01)
 ;;53489060803
 ;;9002226.02101,"1149,53489060803 ",.02)
 ;;53489060803
 ;;9002226.02101,"1149,53489060805 ",.01)
 ;;53489060805
 ;;9002226.02101,"1149,53489060805 ",.02)
 ;;53489060805
 ;;9002226.02101,"1149,53489060806 ",.01)
 ;;53489060806
 ;;9002226.02101,"1149,53489060806 ",.02)
 ;;53489060806
 ;;9002226.02101,"1149,53489060807 ",.01)
 ;;53489060807
 ;;9002226.02101,"1149,53489060807 ",.02)
 ;;53489060807
 ;;9002226.02101,"1149,53489060810 ",.01)
 ;;53489060810
 ;;9002226.02101,"1149,53489060810 ",.02)
 ;;53489060810
 ;;9002226.02101,"1149,53489060901 ",.01)
 ;;53489060901
 ;;9002226.02101,"1149,53489060901 ",.02)
 ;;53489060901
 ;;9002226.02101,"1149,53489060903 ",.01)
 ;;53489060903
 ;;9002226.02101,"1149,53489060903 ",.02)
 ;;53489060903
 ;;9002226.02101,"1149,53489060905 ",.01)
 ;;53489060905
 ;;9002226.02101,"1149,53489060905 ",.02)
 ;;53489060905
 ;;9002226.02101,"1149,53489060906 ",.01)
 ;;53489060906
 ;;9002226.02101,"1149,53489060906 ",.02)
 ;;53489060906
 ;;9002226.02101,"1149,53489060907 ",.01)
 ;;53489060907
 ;;9002226.02101,"1149,53489060907 ",.02)
 ;;53489060907
 ;;9002226.02101,"1149,53489060910 ",.01)
 ;;53489060910
 ;;9002226.02101,"1149,53489060910 ",.02)
 ;;53489060910
 ;;9002226.02101,"1149,53489067707 ",.01)
 ;;53489067707
 ;;9002226.02101,"1149,53489067707 ",.02)
 ;;53489067707
 ;;9002226.02101,"1149,53489067807 ",.01)
 ;;53489067807
 ;;9002226.02101,"1149,53489067807 ",.02)
 ;;53489067807
 ;;9002226.02101,"1149,53489067890 ",.01)
 ;;53489067890
 ;;9002226.02101,"1149,53489067890 ",.02)
 ;;53489067890
 ;;9002226.02101,"1149,53808025101 ",.01)
 ;;53808025101
 ;;9002226.02101,"1149,53808025101 ",.02)
 ;;53808025101
 ;;9002226.02101,"1149,53808036801 ",.01)
 ;;53808036801
 ;;9002226.02101,"1149,53808036801 ",.02)
 ;;53808036801
 ;;9002226.02101,"1149,53808067301 ",.01)
 ;;53808067301
 ;;9002226.02101,"1149,53808067301 ",.02)
 ;;53808067301
 ;;9002226.02101,"1149,53808079001 ",.01)
 ;;53808079001
 ;;9002226.02101,"1149,53808079001 ",.02)
 ;;53808079001
 ;;9002226.02101,"1149,53808079101 ",.01)
 ;;53808079101
 ;;9002226.02101,"1149,53808079101 ",.02)
 ;;53808079101
 ;;9002226.02101,"1149,53808079201 ",.01)
 ;;53808079201
 ;;9002226.02101,"1149,53808079201 ",.02)
 ;;53808079201
 ;;9002226.02101,"1149,53808079301 ",.01)
 ;;53808079301
 ;;9002226.02101,"1149,53808079301 ",.02)
 ;;53808079301
 ;;9002226.02101,"1149,53808079401 ",.01)
 ;;53808079401
 ;;9002226.02101,"1149,53808079401 ",.02)
 ;;53808079401
 ;;9002226.02101,"1149,53816414300 ",.01)
 ;;53816414300
 ;;9002226.02101,"1149,53816414300 ",.02)
 ;;53816414300
 ;;9002226.02101,"1149,53869414300 ",.01)
 ;;53869414300
 ;;9002226.02101,"1149,53869414300 ",.02)
 ;;53869414300
 ;;9002226.02101,"1149,53869414400 ",.01)
 ;;53869414400
 ;;9002226.02101,"1149,53869414400 ",.02)
 ;;53869414400
 ;;9002226.02101,"1149,53869414500 ",.01)
 ;;53869414500
 ;;9002226.02101,"1149,53869414500 ",.02)
 ;;53869414500
 ;;9002226.02101,"1149,53869414600 ",.01)
 ;;53869414600
 ;;9002226.02101,"1149,53869414600 ",.02)
 ;;53869414600
 ;;9002226.02101,"1149,53869414700 ",.01)
 ;;53869414700
 ;;9002226.02101,"1149,53869414700 ",.02)
 ;;53869414700
 ;;9002226.02101,"1149,53869414800 ",.01)
 ;;53869414800
 ;;9002226.02101,"1149,53869414800 ",.02)
 ;;53869414800
 ;;9002226.02101,"1149,53869415500 ",.01)
 ;;53869415500
 ;;9002226.02101,"1149,53869415500 ",.02)
 ;;53869415500
 ;;9002226.02101,"1149,53869415600 ",.01)
 ;;53869415600
 ;;9002226.02101,"1149,53869415600 ",.02)
 ;;53869415600
 ;;9002226.02101,"1149,53978090303 ",.01)
 ;;53978090303
 ;;9002226.02101,"1149,53978090303 ",.02)
 ;;53978090303
 ;;9002226.02101,"1149,53978203307 ",.01)
 ;;53978203307
 ;;9002226.02101,"1149,53978203307 ",.02)
 ;;53978203307
 ;;9002226.02101,"1149,53978203308 ",.01)
 ;;53978203308
 ;;9002226.02101,"1149,53978203308 ",.02)
 ;;53978203308
 ;;9002226.02101,"1149,53978306901 ",.01)
 ;;53978306901
 ;;9002226.02101,"1149,53978306901 ",.02)
 ;;53978306901
 ;;9002226.02101,"1149,53978306903 ",.01)
 ;;53978306903
 ;;9002226.02101,"1149,53978306903 ",.02)
 ;;53978306903
 ;;9002226.02101,"1149,53978337001 ",.01)
 ;;53978337001
 ;;9002226.02101,"1149,53978337001 ",.02)
 ;;53978337001
 ;;9002226.02101,"1149,53978337003 ",.01)
 ;;53978337003
 ;;9002226.02101,"1149,53978337003 ",.02)
 ;;53978337003
 ;;9002226.02101,"1149,54421032001 ",.01)
 ;;54421032001
 ;;9002226.02101,"1149,54421032001 ",.02)
 ;;54421032001
 ;;9002226.02101,"1149,54429314801 ",.01)
 ;;54429314801
 ;;9002226.02101,"1149,54429314801 ",.02)
 ;;54429314801
 ;;9002226.02101,"1149,54441015810 ",.01)
 ;;54441015810
 ;;9002226.02101,"1149,54441015810 ",.02)
 ;;54441015810
 ;;9002226.02101,"1149,54441015811 ",.01)
 ;;54441015811
 ;;9002226.02101,"1149,54441015811 ",.02)
 ;;54441015811
 ;;9002226.02101,"1149,54441015815 ",.01)
 ;;54441015815
 ;;9002226.02101,"1149,54441015815 ",.02)
 ;;54441015815
 ;;9002226.02101,"1149,54441015825 ",.01)
 ;;54441015825
 ;;9002226.02101,"1149,54441015825 ",.02)
 ;;54441015825
 ;;9002226.02101,"1149,54441015850 ",.01)
 ;;54441015850
 ;;9002226.02101,"1149,54441015850 ",.02)
 ;;54441015850
 ;;9002226.02101,"1149,54458093610 ",.01)
 ;;54458093610
 ;;9002226.02101,"1149,54458093610 ",.02)
 ;;54458093610
 ;;9002226.02101,"1149,54458093710 ",.01)
 ;;54458093710
 ;;9002226.02101,"1149,54458093710 ",.02)
 ;;54458093710
 ;;9002226.02101,"1149,54458093810 ",.01)
 ;;54458093810
 ;;9002226.02101,"1149,54458093810 ",.02)
 ;;54458093810
 ;;9002226.02101,"1149,54458098210 ",.01)
 ;;54458098210
 ;;9002226.02101,"1149,54458098210 ",.02)
 ;;54458098210
 ;;9002226.02101,"1149,54458098310 ",.01)
 ;;54458098310
 ;;9002226.02101,"1149,54458098310 ",.02)
 ;;54458098310
 ;;9002226.02101,"1149,54458098410 ",.01)
 ;;54458098410
 ;;9002226.02101,"1149,54458098410 ",.02)
 ;;54458098410
 ;;9002226.02101,"1149,54569225901 ",.01)
 ;;54569225901
 ;;9002226.02101,"1149,54569225901 ",.02)
 ;;54569225901
 ;;9002226.02101,"1149,54569369500 ",.01)
 ;;54569369500
 ;;9002226.02101,"1149,54569369500 ",.02)
 ;;54569369500
 ;;9002226.02101,"1149,54569369501 ",.01)
 ;;54569369501
 ;;9002226.02101,"1149,54569369501 ",.02)
 ;;54569369501
 ;;9002226.02101,"1149,54569466300 ",.01)
 ;;54569466300
 ;;9002226.02101,"1149,54569466300 ",.02)
 ;;54569466300
 ;;9002226.02101,"1149,54569466301 ",.01)
 ;;54569466301
 ;;9002226.02101,"1149,54569466301 ",.02)
 ;;54569466301
 ;;9002226.02101,"1149,54569483200 ",.01)
 ;;54569483200
 ;;9002226.02101,"1149,54569483200 ",.02)
 ;;54569483200
 ;;9002226.02101,"1149,54569534500 ",.01)
 ;;54569534500
 ;;9002226.02101,"1149,54569534500 ",.02)
 ;;54569534500
 ;;9002226.02101,"1149,54569534600 ",.01)
 ;;54569534600
 ;;9002226.02101,"1149,54569534600 ",.02)
 ;;54569534600
 ;;9002226.02101,"1149,54569534700 ",.01)
 ;;54569534700
 ;;9002226.02101,"1149,54569534700 ",.02)
 ;;54569534700
 ;;9002226.02101,"1149,54569583300 ",.01)
 ;;54569583300
 ;;9002226.02101,"1149,54569583300 ",.02)
 ;;54569583300
 ;;9002226.02101,"1149,54569583301 ",.01)
 ;;54569583301
 ;;9002226.02101,"1149,54569583301 ",.02)
 ;;54569583301
 ;;9002226.02101,"1149,54569583302 ",.01)
 ;;54569583302
 ;;9002226.02101,"1149,54569583302 ",.02)
 ;;54569583302
 ;;9002226.02101,"1149,54569583303 ",.01)
 ;;54569583303
 ;;9002226.02101,"1149,54569583303 ",.02)
 ;;54569583303
 ;;9002226.02101,"1149,54569583401 ",.01)
 ;;54569583401
 ;;9002226.02101,"1149,54569583401 ",.02)
 ;;54569583401
 ;;9002226.02101,"1149,54569583402 ",.01)
 ;;54569583402
 ;;9002226.02101,"1149,54569583402 ",.02)
 ;;54569583402
 ;;9002226.02101,"1149,54569583403 ",.01)
 ;;54569583403
 ;;9002226.02101,"1149,54569583403 ",.02)
 ;;54569583403
 ;;9002226.02101,"1149,54569583404 ",.01)
 ;;54569583404
 ;;9002226.02101,"1149,54569583404 ",.02)
 ;;54569583404
 ;;9002226.02101,"1149,54569801600 ",.01)
 ;;54569801600
 ;;9002226.02101,"1149,54569801600 ",.02)
 ;;54569801600
 ;;9002226.02101,"1149,54569851100 ",.01)
 ;;54569851100
 ;;9002226.02101,"1149,54569851100 ",.02)
 ;;54569851100
 ;;9002226.02101,"1149,54569851101 ",.01)
 ;;54569851101
 ;;9002226.02101,"1149,54569851101 ",.02)
 ;;54569851101
 ;;9002226.02101,"1149,54629005101 ",.01)
 ;;54629005101
 ;;9002226.02101,"1149,54629005101 ",.02)
 ;;54629005101
 ;;9002226.02101,"1149,54629007101 ",.01)
 ;;54629007101
 ;;9002226.02101,"1149,54629007101 ",.02)
 ;;54629007101
 ;;9002226.02101,"1149,54868061000 ",.01)
 ;;54868061000
 ;;9002226.02101,"1149,54868061000 ",.02)
 ;;54868061000
 ;;9002226.02101,"1149,54868235300 ",.01)
 ;;54868235300
 ;;9002226.02101,"1149,54868235300 ",.02)
 ;;54868235300
 ;;9002226.02101,"1149,54868235301 ",.01)
 ;;54868235301
 ;;9002226.02101,"1149,54868235301 ",.02)
 ;;54868235301
 ;;9002226.02101,"1149,54868235302 ",.01)
 ;;54868235302
 ;;9002226.02101,"1149,54868235302 ",.02)
 ;;54868235302
 ;;9002226.02101,"1149,54868235303 ",.01)
 ;;54868235303
 ;;9002226.02101,"1149,54868235303 ",.02)
 ;;54868235303
 ;;9002226.02101,"1149,54868235304 ",.01)
 ;;54868235304
 ;;9002226.02101,"1149,54868235304 ",.02)
 ;;54868235304
 ;;9002226.02101,"1149,54868235305 ",.01)
 ;;54868235305
 ;;9002226.02101,"1149,54868235305 ",.02)
 ;;54868235305
 ;;9002226.02101,"1149,54868235306 ",.01)
 ;;54868235306
 ;;9002226.02101,"1149,54868235306 ",.02)
 ;;54868235306
 ;;9002226.02101,"1149,54868458500 ",.01)
 ;;54868458500
 ;;9002226.02101,"1149,54868458500 ",.02)
 ;;54868458500
 ;;9002226.02101,"1149,54868458501 ",.01)
 ;;54868458501
 ;;9002226.02101,"1149,54868458501 ",.02)
 ;;54868458501
 ;;9002226.02101,"1149,54868459300 ",.01)
 ;;54868459300
 ;;9002226.02101,"1149,54868459300 ",.02)
 ;;54868459300
 ;;9002226.02101,"1149,54868459301 ",.01)
 ;;54868459301
 ;;9002226.02101,"1149,54868459301 ",.02)
 ;;54868459301
 ;;9002226.02101,"1149,54868459302 ",.01)
 ;;54868459302
 ;;9002226.02101,"1149,54868459302 ",.02)
 ;;54868459302
 ;;9002226.02101,"1149,54868477400 ",.01)
 ;;54868477400
 ;;9002226.02101,"1149,54868477400 ",.02)
 ;;54868477400
 ;;9002226.02101,"1149,54868477401 ",.01)
 ;;54868477401
 ;;9002226.02101,"1149,54868477401 ",.02)
 ;;54868477401
 ;;9002226.02101,"1149,54868477402 ",.01)
 ;;54868477402
 ;;9002226.02101,"1149,54868477402 ",.02)
 ;;54868477402
 ;;9002226.02101,"1149,54868477403 ",.01)
 ;;54868477403
 ;;9002226.02101,"1149,54868477403 ",.02)
 ;;54868477403
 ;;9002226.02101,"1149,54868481200 ",.01)
 ;;54868481200
 ;;9002226.02101,"1149,54868481200 ",.02)
 ;;54868481200
 ;;9002226.02101,"1149,54868481201 ",.01)
 ;;54868481201
 ;;9002226.02101,"1149,54868481201 ",.02)
 ;;54868481201
 ;;9002226.02101,"1149,54868552600 ",.01)
 ;;54868552600
 ;;9002226.02101,"1149,54868552600 ",.02)
 ;;54868552600
 ;;9002226.02101,"1149,54868557500 ",.01)
 ;;54868557500
 ;;9002226.02101,"1149,54868557500 ",.02)
 ;;54868557500
 ;;9002226.02101,"1149,54868557501 ",.01)
 ;;54868557501
 ;;9002226.02101,"1149,54868557501 ",.02)
 ;;54868557501
 ;;9002226.02101,"1149,54868557502 ",.01)
 ;;54868557502
 ;;9002226.02101,"1149,54868557502 ",.02)
 ;;54868557502
 ;;9002226.02101,"1149,54868562700 ",.01)
 ;;54868562700
 ;;9002226.02101,"1149,54868562700 ",.02)
 ;;54868562700
 ;;9002226.02101,"1149,54868562701 ",.01)
 ;;54868562701
 ;;9002226.02101,"1149,54868562701 ",.02)
 ;;54868562701
 ;;9002226.02101,"1149,54868562800 ",.01)
 ;;54868562800
 ;;9002226.02101,"1149,54868562800 ",.02)
 ;;54868562800
 ;;9002226.02101,"1149,54868562801 ",.01)
 ;;54868562801
 ;;9002226.02101,"1149,54868562801 ",.02)
 ;;54868562801
 ;;9002226.02101,"1149,54868562802 ",.01)
 ;;54868562802
 ;;9002226.02101,"1149,54868562802 ",.02)
 ;;54868562802
 ;;9002226.02101,"1149,54868562900 ",.01)
 ;;54868562900
 ;;9002226.02101,"1149,54868562900 ",.02)
 ;;54868562900
 ;;9002226.02101,"1149,54868562901 ",.01)
 ;;54868562901
 ;;9002226.02101,"1149,54868562901 ",.02)
 ;;54868562901
 ;;9002226.02101,"1149,54868562902 ",.01)
 ;;54868562902
 ;;9002226.02101,"1149,54868562902 ",.02)
 ;;54868562902
 ;;9002226.02101,"1149,54868562903 ",.01)
 ;;54868562903
 ;;9002226.02101,"1149,54868562903 ",.02)
 ;;54868562903
 ;;9002226.02101,"1149,54868562904 ",.01)
 ;;54868562904
 ;;9002226.02101,"1149,54868562904 ",.02)
 ;;54868562904
 ;;9002226.02101,"1149,54868563000 ",.01)
 ;;54868563000
 ;;9002226.02101,"1149,54868563000 ",.02)
 ;;54868563000
 ;;9002226.02101,"1149,54868563001 ",.01)
 ;;54868563001
 ;;9002226.02101,"1149,54868563001 ",.02)
 ;;54868563001
 ;;9002226.02101,"1149,54868566000 ",.01)
 ;;54868566000
 ;;9002226.02101,"1149,54868566000 ",.02)
 ;;54868566000
 ;;9002226.02101,"1149,54868566001 ",.01)
 ;;54868566001
 ;;9002226.02101,"1149,54868566001 ",.02)
 ;;54868566001
 ;;9002226.02101,"1149,54868569700 ",.01)
 ;;54868569700
 ;;9002226.02101,"1149,54868569700 ",.02)
 ;;54868569700
 ;;9002226.02101,"1149,54868599400 ",.01)
 ;;54868599400
 ;;9002226.02101,"1149,54868599400 ",.02)
 ;;54868599400
 ;;9002226.02101,"1149,54868599401 ",.01)
 ;;54868599401
 ;;9002226.02101,"1149,54868599401 ",.02)
 ;;54868599401
 ;;9002226.02101,"1149,54868606600 ",.01)
 ;;54868606600
 ;;9002226.02101,"1149,54868606600 ",.02)
 ;;54868606600
 ;;9002226.02101,"1149,54907090009 ",.01)
 ;;54907090009
 ;;9002226.02101,"1149,54907090009 ",.02)
 ;;54907090009
 ;;9002226.02101,"1149,54907090105 ",.01)
 ;;54907090105