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

BUD2ZD5.m

Go to the documentation of this file.
BUD2ZD5 ;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,"1327,11845094236 ",.02)
 ;;11845094236
 ;;9002226.02101,"1327,11845097502 ",.01)
 ;;11845097502
 ;;9002226.02101,"1327,11845097502 ",.02)
 ;;11845097502
 ;;9002226.02101,"1327,11845099316 ",.01)
 ;;11845099316
 ;;9002226.02101,"1327,11845099316 ",.02)
 ;;11845099316
 ;;9002226.02101,"1327,11917004160 ",.01)
 ;;11917004160
 ;;9002226.02101,"1327,11917004160 ",.02)
 ;;11917004160
 ;;9002226.02101,"1327,11917004161 ",.01)
 ;;11917004161
 ;;9002226.02101,"1327,11917004161 ",.02)
 ;;11917004161
 ;;9002226.02101,"1327,12843006132 ",.01)
 ;;12843006132
 ;;9002226.02101,"1327,12843006132 ",.02)
 ;;12843006132
 ;;9002226.02101,"1327,12843010514 ",.01)
 ;;12843010514
 ;;9002226.02101,"1327,12843010514 ",.02)
 ;;12843010514
 ;;9002226.02101,"1327,12843053636 ",.01)
 ;;12843053636
 ;;9002226.02101,"1327,12843053636 ",.02)
 ;;12843053636
 ;;9002226.02101,"1327,12843053637 ",.01)
 ;;12843053637
 ;;9002226.02101,"1327,12843053637 ",.02)
 ;;12843053637
 ;;9002226.02101,"1327,12843053640 ",.01)
 ;;12843053640
 ;;9002226.02101,"1327,12843053640 ",.02)
 ;;12843053640
 ;;9002226.02101,"1327,15127001105 ",.01)
 ;;15127001105
 ;;9002226.02101,"1327,15127001105 ",.02)
 ;;15127001105
 ;;9002226.02101,"1327,15127012020 ",.01)
 ;;15127012020
 ;;9002226.02101,"1327,15127012020 ",.02)
 ;;15127012020
 ;;9002226.02101,"1327,15127022894 ",.01)
 ;;15127022894
 ;;9002226.02101,"1327,15127022894 ",.02)
 ;;15127022894
 ;;9002226.02101,"1327,15127024136 ",.01)
 ;;15127024136
 ;;9002226.02101,"1327,15127024136 ",.02)
 ;;15127024136
 ;;9002226.02101,"1327,15127073801 ",.01)
 ;;15127073801
 ;;9002226.02101,"1327,15127073801 ",.02)
 ;;15127073801
 ;;9002226.02101,"1327,15127073805 ",.01)
 ;;15127073805
 ;;9002226.02101,"1327,15127073805 ",.02)
 ;;15127073805
 ;;9002226.02101,"1327,15127073809 ",.01)
 ;;15127073809
 ;;9002226.02101,"1327,15127073809 ",.02)
 ;;15127073809
 ;;9002226.02101,"1327,15127073810 ",.01)
 ;;15127073810
 ;;9002226.02101,"1327,15127073810 ",.02)
 ;;15127073810
 ;;9002226.02101,"1327,15127073821 ",.01)
 ;;15127073821
 ;;9002226.02101,"1327,15127073821 ",.02)
 ;;15127073821
 ;;9002226.02101,"1327,15127076008 ",.01)
 ;;15127076008
 ;;9002226.02101,"1327,15127076008 ",.02)
 ;;15127076008
 ;;9002226.02101,"1327,15127087436 ",.01)
 ;;15127087436
 ;;9002226.02101,"1327,15127087436 ",.02)
 ;;15127087436
 ;;9002226.02101,"1327,17714000936 ",.01)
 ;;17714000936
 ;;9002226.02101,"1327,17714000936 ",.02)
 ;;17714000936
 ;;9002226.02101,"1327,17714001001 ",.01)
 ;;17714001001
 ;;9002226.02101,"1327,17714001001 ",.02)
 ;;17714001001
 ;;9002226.02101,"1327,17714001010 ",.01)
 ;;17714001010
 ;;9002226.02101,"1327,17714001010 ",.02)
 ;;17714001010
 ;;9002226.02101,"1327,17714001101 ",.01)
 ;;17714001101
 ;;9002226.02101,"1327,17714001101 ",.02)
 ;;17714001101
 ;;9002226.02101,"1327,17714001110 ",.01)
 ;;17714001110
 ;;9002226.02101,"1327,17714001110 ",.02)
 ;;17714001110
 ;;9002226.02101,"1327,17856044420 ",.01)
 ;;17856044420
 ;;9002226.02101,"1327,17856044420 ",.02)
 ;;17856044420
 ;;9002226.02101,"1327,19458500101 ",.01)
 ;;19458500101
 ;;9002226.02101,"1327,19458500101 ",.02)
 ;;19458500101
 ;;9002226.02101,"1327,19458500102 ",.01)
 ;;19458500102
 ;;9002226.02101,"1327,19458500102 ",.02)
 ;;19458500102
 ;;9002226.02101,"1327,19458500201 ",.01)
 ;;19458500201
 ;;9002226.02101,"1327,19458500201 ",.02)
 ;;19458500201
 ;;9002226.02101,"1327,19458500301 ",.01)
 ;;19458500301
 ;;9002226.02101,"1327,19458500301 ",.02)
 ;;19458500301
 ;;9002226.02101,"1327,19458500801 ",.01)
 ;;19458500801
 ;;9002226.02101,"1327,19458500801 ",.02)
 ;;19458500801
 ;;9002226.02101,"1327,21695053336 ",.01)
 ;;21695053336
 ;;9002226.02101,"1327,21695053336 ",.02)
 ;;21695053336
 ;;9002226.02101,"1327,21695066600 ",.01)
 ;;21695066600
 ;;9002226.02101,"1327,21695066600 ",.02)
 ;;21695066600
 ;;9002226.02101,"1327,21695066630 ",.01)
 ;;21695066630
 ;;9002226.02101,"1327,21695066630 ",.02)
 ;;21695066630
 ;;9002226.02101,"1327,21695066690 ",.01)
 ;;21695066690
 ;;9002226.02101,"1327,21695066690 ",.02)
 ;;21695066690
 ;;9002226.02101,"1327,21695068400 ",.01)
 ;;21695068400
 ;;9002226.02101,"1327,21695068400 ",.02)
 ;;21695068400
 ;;9002226.02101,"1327,21695068430 ",.01)
 ;;21695068430
 ;;9002226.02101,"1327,21695068430 ",.02)
 ;;21695068430
 ;;9002226.02101,"1327,21695068472 ",.01)
 ;;21695068472
 ;;9002226.02101,"1327,21695068472 ",.02)
 ;;21695068472
 ;;9002226.02101,"1327,21695068490 ",.01)
 ;;21695068490
 ;;9002226.02101,"1327,21695068490 ",.02)
 ;;21695068490
 ;;9002226.02101,"1327,23490660701 ",.01)
 ;;23490660701
 ;;9002226.02101,"1327,23490660701 ",.02)
 ;;23490660701
 ;;9002226.02101,"1327,23490660702 ",.01)
 ;;23490660702
 ;;9002226.02101,"1327,23490660702 ",.02)
 ;;23490660702
 ;;9002226.02101,"1327,23490661201 ",.01)
 ;;23490661201
 ;;9002226.02101,"1327,23490661201 ",.02)
 ;;23490661201
 ;;9002226.02101,"1327,23490661202 ",.01)
 ;;23490661202
 ;;9002226.02101,"1327,23490661202 ",.02)
 ;;23490661202
 ;;9002226.02101,"1327,24385002868 ",.01)
 ;;24385002868
 ;;9002226.02101,"1327,24385002868 ",.02)
 ;;24385002868
 ;;9002226.02101,"1327,24385027868 ",.01)
 ;;24385027868
 ;;9002226.02101,"1327,24385027868 ",.02)
 ;;24385027868
 ;;9002226.02101,"1327,24385036468 ",.01)
 ;;24385036468
 ;;9002226.02101,"1327,24385036468 ",.02)
 ;;24385036468
 ;;9002226.02101,"1327,24385041185 ",.01)
 ;;24385041185
 ;;9002226.02101,"1327,24385041185 ",.02)
 ;;24385041185
 ;;9002226.02101,"1327,24385041190 ",.01)
 ;;24385041190
 ;;9002226.02101,"1327,24385041190 ",.02)
 ;;24385041190
 ;;9002226.02101,"1327,24385041685 ",.01)
 ;;24385041685
 ;;9002226.02101,"1327,24385041685 ",.02)
 ;;24385041685
 ;;9002226.02101,"1327,24385041687 ",.01)
 ;;24385041687
 ;;9002226.02101,"1327,24385041687 ",.02)
 ;;24385041687
 ;;9002226.02101,"1327,24385041690 ",.01)
 ;;24385041690
 ;;9002226.02101,"1327,24385041690 ",.02)
 ;;24385041690
 ;;9002226.02101,"1327,24385042902 ",.01)
 ;;24385042902
 ;;9002226.02101,"1327,24385042902 ",.02)
 ;;24385042902
 ;;9002226.02101,"1327,24385042978 ",.01)
 ;;24385042978
 ;;9002226.02101,"1327,24385042978 ",.02)
 ;;24385042978
 ;;9002226.02101,"1327,24385042990 ",.01)
 ;;24385042990
 ;;9002226.02101,"1327,24385042990 ",.02)
 ;;24385042990
 ;;9002226.02101,"1327,24385053548 ",.01)
 ;;24385053548
 ;;9002226.02101,"1327,24385053548 ",.02)
 ;;24385053548
 ;;9002226.02101,"1327,24385053576 ",.01)
 ;;24385053576
 ;;9002226.02101,"1327,24385053576 ",.02)
 ;;24385053576
 ;;9002226.02101,"1327,24385053587 ",.01)
 ;;24385053587
 ;;9002226.02101,"1327,24385053587 ",.02)
 ;;24385053587
 ;;9002226.02101,"1327,24385053590 ",.01)
 ;;24385053590
 ;;9002226.02101,"1327,24385053590 ",.02)
 ;;24385053590
 ;;9002226.02101,"1327,24385054148 ",.01)
 ;;24385054148
 ;;9002226.02101,"1327,24385054148 ",.02)
 ;;24385054148
 ;;9002226.02101,"1327,24385054187 ",.01)
 ;;24385054187
 ;;9002226.02101,"1327,24385054187 ",.02)
 ;;24385054187
 ;;9002226.02101,"1327,24385054572 ",.01)
 ;;24385054572
 ;;9002226.02101,"1327,24385054572 ",.02)
 ;;24385054572
 ;;9002226.02101,"1327,26053000701 ",.01)
 ;;26053000701
 ;;9002226.02101,"1327,26053000701 ",.02)
 ;;26053000701
 ;;9002226.02101,"1327,26053032301 ",.01)
 ;;26053032301
 ;;9002226.02101,"1327,26053032301 ",.02)
 ;;26053032301
 ;;9002226.02101,"1327,30142041678 ",.01)
 ;;30142041678
 ;;9002226.02101,"1327,30142041678 ",.02)
 ;;30142041678
 ;;9002226.02101,"1327,30142041687 ",.01)
 ;;30142041687
 ;;9002226.02101,"1327,30142041687 ",.02)
 ;;30142041687
 ;;9002226.02101,"1327,30142046708 ",.01)
 ;;30142046708
 ;;9002226.02101,"1327,30142046708 ",.02)
 ;;30142046708
 ;;9002226.02101,"1327,30142046768 ",.01)
 ;;30142046768
 ;;9002226.02101,"1327,30142046768 ",.02)
 ;;30142046768
 ;;9002226.02101,"1327,33358003501 ",.01)
 ;;33358003501
 ;;9002226.02101,"1327,33358003501 ",.02)
 ;;33358003501
 ;;9002226.02101,"1327,33358003530 ",.01)
 ;;33358003530
 ;;9002226.02101,"1327,33358003530 ",.02)
 ;;33358003530
 ;;9002226.02101,"1327,33358003600 ",.01)
 ;;33358003600
 ;;9002226.02101,"1327,33358003600 ",.02)
 ;;33358003600
 ;;9002226.02101,"1327,33358003630 ",.01)
 ;;33358003630
 ;;9002226.02101,"1327,33358003630 ",.02)
 ;;33358003630
 ;;9002226.02101,"1327,36800025968 ",.01)
 ;;36800025968
 ;;9002226.02101,"1327,36800025968 ",.02)
 ;;36800025968
 ;;9002226.02101,"1327,36800027468 ",.01)
 ;;36800027468
 ;;9002226.02101,"1327,36800027468 ",.02)
 ;;36800027468
 ;;9002226.02101,"1327,36800027748 ",.01)
 ;;36800027748
 ;;9002226.02101,"1327,36800027748 ",.02)
 ;;36800027748
 ;;9002226.02101,"1327,36800042902 ",.01)
 ;;36800042902
 ;;9002226.02101,"1327,36800042902 ",.02)
 ;;36800042902
 ;;9002226.02101,"1327,36800046768 ",.01)
 ;;36800046768
 ;;9002226.02101,"1327,36800046768 ",.02)
 ;;36800046768
 ;;9002226.02101,"1327,37205014519 ",.01)
 ;;37205014519
 ;;9002226.02101,"1327,37205014519 ",.02)
 ;;37205014519
 ;;9002226.02101,"1327,37205014578 ",.01)
 ;;37205014578
 ;;9002226.02101,"1327,37205014578 ",.02)
 ;;37205014578
 ;;9002226.02101,"1327,37205014587 ",.01)
 ;;37205014587
 ;;9002226.02101,"1327,37205014587 ",.02)
 ;;37205014587
 ;;9002226.02101,"1327,37205015078 ",.01)
 ;;37205015078
 ;;9002226.02101,"1327,37205015078 ",.02)
 ;;37205015078
 ;;9002226.02101,"1327,37205021807 ",.01)
 ;;37205021807
 ;;9002226.02101,"1327,37205021807 ",.02)
 ;;37205021807
 ;;9002226.02101,"1327,37205021823 ",.01)
 ;;37205021823
 ;;9002226.02101,"1327,37205021823 ",.02)
 ;;37205021823
 ;;9002226.02101,"1327,37205036968 ",.01)
 ;;37205036968
 ;;9002226.02101,"1327,37205036968 ",.02)
 ;;37205036968
 ;;9002226.02101,"1327,37205042978 ",.01)
 ;;37205042978
 ;;9002226.02101,"1327,37205042978 ",.02)
 ;;37205042978
 ;;9002226.02101,"1327,37205042990 ",.01)
 ;;37205042990
 ;;9002226.02101,"1327,37205042990 ",.02)
 ;;37205042990
 ;;9002226.02101,"1327,37205042996 ",.01)
 ;;37205042996
 ;;9002226.02101,"1327,37205042996 ",.02)
 ;;37205042996
 ;;9002226.02101,"1327,37205046768 ",.01)
 ;;37205046768
 ;;9002226.02101,"1327,37205046768 ",.02)
 ;;37205046768
 ;;9002226.02101,"1327,37205051076 ",.01)
 ;;37205051076
 ;;9002226.02101,"1327,37205051076 ",.02)
 ;;37205051076
 ;;9002226.02101,"1327,37205051087 ",.01)
 ;;37205051087
 ;;9002226.02101,"1327,37205051087 ",.02)
 ;;37205051087
 ;;9002226.02101,"1327,37205051172 ",.01)
 ;;37205051172
 ;;9002226.02101,"1327,37205051172 ",.02)
 ;;37205051172
 ;;9002226.02101,"1327,37205070868 ",.01)
 ;;37205070868
 ;;9002226.02101,"1327,37205070868 ",.02)
 ;;37205070868
 ;;9002226.02101,"1327,37808027748 ",.01)
 ;;37808027748
 ;;9002226.02101,"1327,37808027748 ",.02)
 ;;37808027748
 ;;9002226.02101,"1327,37808046768 ",.01)
 ;;37808046768
 ;;9002226.02101,"1327,37808046768 ",.02)
 ;;37808046768
 ;;9002226.02101,"1327,37808053576 ",.01)
 ;;37808053576
 ;;9002226.02101,"1327,37808053576 ",.02)
 ;;37808053576
 ;;9002226.02101,"1327,41163027468 ",.01)
 ;;41163027468
 ;;9002226.02101,"1327,41163027468 ",.02)
 ;;41163027468
 ;;9002226.02101,"1327,41163041412 ",.01)
 ;;41163041412
 ;;9002226.02101,"1327,41163041412 ",.02)
 ;;41163041412
 ;;9002226.02101,"1327,41163041460 ",.01)
 ;;41163041460
 ;;9002226.02101,"1327,41163041460 ",.02)
 ;;41163041460
 ;;9002226.02101,"1327,41163041678 ",.01)
 ;;41163041678
 ;;9002226.02101,"1327,41163041678 ",.02)
 ;;41163041678
 ;;9002226.02101,"1327,41163041687 ",.01)
 ;;41163041687
 ;;9002226.02101,"1327,41163041687 ",.02)
 ;;41163041687
 ;;9002226.02101,"1327,41163041690 ",.01)
 ;;41163041690
 ;;9002226.02101,"1327,41163041690 ",.02)
 ;;41163041690
 ;;9002226.02101,"1327,41163041693 ",.01)
 ;;41163041693
 ;;9002226.02101,"1327,41163041693 ",.02)
 ;;41163041693
 ;;9002226.02101,"1327,41163042978 ",.01)
 ;;41163042978
 ;;9002226.02101,"1327,41163042978 ",.02)
 ;;41163042978
 ;;9002226.02101,"1327,41163042990 ",.01)
 ;;41163042990
 ;;9002226.02101,"1327,41163042990 ",.02)
 ;;41163042990
 ;;9002226.02101,"1327,41163046768 ",.01)
 ;;41163046768
 ;;9002226.02101,"1327,41163046768 ",.02)
 ;;41163046768
 ;;9002226.02101,"1327,41163053576 ",.01)
 ;;41163053576
 ;;9002226.02101,"1327,41163053576 ",.02)
 ;;41163053576
 ;;9002226.02101,"1327,41163053587 ",.01)
 ;;41163053587
 ;;9002226.02101,"1327,41163053587 ",.02)
 ;;41163053587
 ;;9002226.02101,"1327,41163056306 ",.01)
 ;;41163056306
 ;;9002226.02101,"1327,41163056306 ",.02)
 ;;41163056306
 ;;9002226.02101,"1327,41163056317 ",.01)
 ;;41163056317
 ;;9002226.02101,"1327,41163056317 ",.02)
 ;;41163056317
 ;;9002226.02101,"1327,41163056332 ",.01)
 ;;41163056332
 ;;9002226.02101,"1327,41163056332 ",.02)
 ;;41163056332
 ;;9002226.02101,"1327,41163064281 ",.01)
 ;;41163064281
 ;;9002226.02101,"1327,41163064281 ",.02)
 ;;41163064281
 ;;9002226.02101,"1327,41226041182 ",.01)
 ;;41226041182
 ;;9002226.02101,"1327,41226041182 ",.02)
 ;;41226041182
 ;;9002226.02101,"1327,41250027408 ",.01)
 ;;41250027408
 ;;9002226.02101,"1327,41250027408 ",.02)
 ;;41250027408
 ;;9002226.02101,"1327,41250027468 ",.01)
 ;;41250027468
 ;;9002226.02101,"1327,41250027468 ",.02)
 ;;41250027468
 ;;9002226.02101,"1327,41250027715 ",.01)
 ;;41250027715
 ;;9002226.02101,"1327,41250027715 ",.02)
 ;;41250027715
 ;;9002226.02101,"1327,41250027748 ",.01)
 ;;41250027748
 ;;9002226.02101,"1327,41250027748 ",.02)
 ;;41250027748
 ;;9002226.02101,"1327,41250053576 ",.01)
 ;;41250053576
 ;;9002226.02101,"1327,41250053576 ",.02)
 ;;41250053576