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

BUD2ZD9.m

Go to the documentation of this file.
BUD2ZD9 ;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,62211031299 ",.02)
 ;;62211031299
 ;;9002226.02101,"1327,62318002702 ",.01)
 ;;62318002702
 ;;9002226.02101,"1327,62318002702 ",.02)
 ;;62318002702
 ;;9002226.02101,"1327,62318002704 ",.01)
 ;;62318002704
 ;;9002226.02101,"1327,62318002704 ",.02)
 ;;62318002704
 ;;9002226.02101,"1327,62318002707 ",.01)
 ;;62318002707
 ;;9002226.02101,"1327,62318002707 ",.02)
 ;;62318002707
 ;;9002226.02101,"1327,62318002709 ",.01)
 ;;62318002709
 ;;9002226.02101,"1327,62318002709 ",.02)
 ;;62318002709
 ;;9002226.02101,"1327,62584012701 ",.01)
 ;;62584012701
 ;;9002226.02101,"1327,62584012701 ",.02)
 ;;62584012701
 ;;9002226.02101,"1327,62584012785 ",.01)
 ;;62584012785
 ;;9002226.02101,"1327,62584012785 ",.02)
 ;;62584012785
 ;;9002226.02101,"1327,63548360201 ",.01)
 ;;63548360201
 ;;9002226.02101,"1327,63548360201 ",.02)
 ;;63548360201
 ;;9002226.02101,"1327,63629176201 ",.01)
 ;;63629176201
 ;;9002226.02101,"1327,63629176201 ",.02)
 ;;63629176201
 ;;9002226.02101,"1327,63629176202 ",.01)
 ;;63629176202
 ;;9002226.02101,"1327,63629176202 ",.02)
 ;;63629176202
 ;;9002226.02101,"1327,63629176203 ",.01)
 ;;63629176203
 ;;9002226.02101,"1327,63629176203 ",.02)
 ;;63629176203
 ;;9002226.02101,"1327,63629176204 ",.01)
 ;;63629176204
 ;;9002226.02101,"1327,63629176204 ",.02)
 ;;63629176204
 ;;9002226.02101,"1327,63629282501 ",.01)
 ;;63629282501
 ;;9002226.02101,"1327,63629282501 ",.02)
 ;;63629282501
 ;;9002226.02101,"1327,63629282502 ",.01)
 ;;63629282502
 ;;9002226.02101,"1327,63629282502 ",.02)
 ;;63629282502
 ;;9002226.02101,"1327,63629282503 ",.01)
 ;;63629282503
 ;;9002226.02101,"1327,63629282503 ",.02)
 ;;63629282503
 ;;9002226.02101,"1327,63739002301 ",.01)
 ;;63739002301
 ;;9002226.02101,"1327,63739002301 ",.02)
 ;;63739002301
 ;;9002226.02101,"1327,63739002303 ",.01)
 ;;63739002303
 ;;9002226.02101,"1327,63739002303 ",.02)
 ;;63739002303
 ;;9002226.02101,"1327,63739002401 ",.01)
 ;;63739002401
 ;;9002226.02101,"1327,63739002401 ",.02)
 ;;63739002401
 ;;9002226.02101,"1327,63739002501 ",.01)
 ;;63739002501
 ;;9002226.02101,"1327,63739002501 ",.02)
 ;;63739002501
 ;;9002226.02101,"1327,63739027201 ",.01)
 ;;63739027201
 ;;9002226.02101,"1327,63739027201 ",.02)
 ;;63739027201
 ;;9002226.02101,"1327,63739027203 ",.01)
 ;;63739027203
 ;;9002226.02101,"1327,63739027203 ",.02)
 ;;63739027203
 ;;9002226.02101,"1327,63739027210 ",.01)
 ;;63739027210
 ;;9002226.02101,"1327,63739027210 ",.02)
 ;;63739027210
 ;;9002226.02101,"1327,63739043301 ",.01)
 ;;63739043301
 ;;9002226.02101,"1327,63739043301 ",.02)
 ;;63739043301
 ;;9002226.02101,"1327,63739043303 ",.01)
 ;;63739043303
 ;;9002226.02101,"1327,63739043303 ",.02)
 ;;63739043303
 ;;9002226.02101,"1327,63739043310 ",.01)
 ;;63739043310
 ;;9002226.02101,"1327,63739043310 ",.02)
 ;;63739043310
 ;;9002226.02101,"1327,63739043401 ",.01)
 ;;63739043401
 ;;9002226.02101,"1327,63739043401 ",.02)
 ;;63739043401
 ;;9002226.02101,"1327,63739043403 ",.01)
 ;;63739043403
 ;;9002226.02101,"1327,63739043403 ",.02)
 ;;63739043403
 ;;9002226.02101,"1327,63874000101 ",.01)
 ;;63874000101
 ;;9002226.02101,"1327,63874000101 ",.02)
 ;;63874000101
 ;;9002226.02101,"1327,63874000115 ",.01)
 ;;63874000115
 ;;9002226.02101,"1327,63874000115 ",.02)
 ;;63874000115
 ;;9002226.02101,"1327,63874000120 ",.01)
 ;;63874000120
 ;;9002226.02101,"1327,63874000120 ",.02)
 ;;63874000120
 ;;9002226.02101,"1327,63874000125 ",.01)
 ;;63874000125
 ;;9002226.02101,"1327,63874000125 ",.02)
 ;;63874000125
 ;;9002226.02101,"1327,63874000130 ",.01)
 ;;63874000130
 ;;9002226.02101,"1327,63874000130 ",.02)
 ;;63874000130
 ;;9002226.02101,"1327,63874000150 ",.01)
 ;;63874000150
 ;;9002226.02101,"1327,63874000150 ",.02)
 ;;63874000150
 ;;9002226.02101,"1327,63874099701 ",.01)
 ;;63874099701
 ;;9002226.02101,"1327,63874099701 ",.02)
 ;;63874099701
 ;;9002226.02101,"1327,63874099702 ",.01)
 ;;63874099702
 ;;9002226.02101,"1327,63874099702 ",.02)
 ;;63874099702
 ;;9002226.02101,"1327,63874099730 ",.01)
 ;;63874099730
 ;;9002226.02101,"1327,63874099730 ",.02)
 ;;63874099730
 ;;9002226.02101,"1327,63981022714 ",.01)
 ;;63981022714
 ;;9002226.02101,"1327,63981022714 ",.02)
 ;;63981022714
 ;;9002226.02101,"1327,64092014115 ",.01)
 ;;64092014115
 ;;9002226.02101,"1327,64092014115 ",.02)
 ;;64092014115
 ;;9002226.02101,"1327,64092021807 ",.01)
 ;;64092021807
 ;;9002226.02101,"1327,64092021807 ",.02)
 ;;64092021807
 ;;9002226.02101,"1327,64125010601 ",.01)
 ;;64125010601
 ;;9002226.02101,"1327,64125010601 ",.02)
 ;;64125010601
 ;;9002226.02101,"1327,65162024111 ",.01)
 ;;65162024111
 ;;9002226.02101,"1327,65162024111 ",.02)
 ;;65162024111
 ;;9002226.02101,"1327,65162024116 ",.01)
 ;;65162024116
 ;;9002226.02101,"1327,65162024116 ",.02)
 ;;65162024116
 ;;9002226.02101,"1327,65162038010 ",.01)
 ;;65162038010
 ;;9002226.02101,"1327,65162038010 ",.02)
 ;;65162038010
 ;;9002226.02101,"1327,65162038011 ",.01)
 ;;65162038011
 ;;9002226.02101,"1327,65162038011 ",.02)
 ;;65162038011
 ;;9002226.02101,"1327,65162038211 ",.01)
 ;;65162038211
 ;;9002226.02101,"1327,65162038211 ",.02)
 ;;65162038211
 ;;9002226.02101,"1327,65437003805 ",.01)
 ;;65437003805
 ;;9002226.02101,"1327,65437003805 ",.02)
 ;;65437003805
 ;;9002226.02101,"1327,65437003807 ",.01)
 ;;65437003807
 ;;9002226.02101,"1327,65437003807 ",.02)
 ;;65437003807
 ;;9002226.02101,"1327,65437003810 ",.01)
 ;;65437003810
 ;;9002226.02101,"1327,65437003810 ",.02)
 ;;65437003810
 ;;9002226.02101,"1327,66267002630 ",.01)
 ;;66267002630
 ;;9002226.02101,"1327,66267002630 ",.02)
 ;;66267002630
 ;;9002226.02101,"1327,66267002660 ",.01)
 ;;66267002660
 ;;9002226.02101,"1327,66267002660 ",.02)
 ;;66267002660
 ;;9002226.02101,"1327,66267002730 ",.01)
 ;;66267002730
 ;;9002226.02101,"1327,66267002730 ",.02)
 ;;66267002730
 ;;9002226.02101,"1327,66267002830 ",.01)
 ;;66267002830
 ;;9002226.02101,"1327,66267002830 ",.02)
 ;;66267002830
 ;;9002226.02101,"1327,66553000101 ",.01)
 ;;66553000101
 ;;9002226.02101,"1327,66553000101 ",.02)
 ;;66553000101
 ;;9002226.02101,"1327,66553000201 ",.01)
 ;;66553000201
 ;;9002226.02101,"1327,66553000201 ",.02)
 ;;66553000201
 ;;9002226.02101,"1327,66553000301 ",.01)
 ;;66553000301
 ;;9002226.02101,"1327,66553000301 ",.02)
 ;;66553000301
 ;;9002226.02101,"1327,67046016230 ",.01)
 ;;67046016230
 ;;9002226.02101,"1327,67046016230 ",.02)
 ;;67046016230
 ;;9002226.02101,"1327,67046016430 ",.01)
 ;;67046016430
 ;;9002226.02101,"1327,67046016430 ",.02)
 ;;67046016430
 ;;9002226.02101,"1327,67046016530 ",.01)
 ;;67046016530
 ;;9002226.02101,"1327,67046016530 ",.02)
 ;;67046016530
 ;;9002226.02101,"1327,67046016830 ",.01)
 ;;67046016830
 ;;9002226.02101,"1327,67046016830 ",.02)
 ;;67046016830
 ;;9002226.02101,"1327,67228026103 ",.01)
 ;;67228026103
 ;;9002226.02101,"1327,67228026103 ",.02)
 ;;67228026103
 ;;9002226.02101,"1327,67228026106 ",.01)
 ;;67228026106
 ;;9002226.02101,"1327,67228026106 ",.02)
 ;;67228026106
 ;;9002226.02101,"1327,67544065131 ",.01)
 ;;67544065131
 ;;9002226.02101,"1327,67544065131 ",.02)
 ;;67544065131
 ;;9002226.02101,"1327,68115043320 ",.01)
 ;;68115043320
 ;;9002226.02101,"1327,68115043320 ",.02)
 ;;68115043320
 ;;9002226.02101,"1327,68391041690 ",.01)
 ;;68391041690
 ;;9002226.02101,"1327,68391041690 ",.02)
 ;;68391041690
 ;;9002226.02101,"1327,68752000336 ",.01)
 ;;68752000336
 ;;9002226.02101,"1327,68752000336 ",.02)
 ;;68752000336
 ;;9002226.02101,"1327,68788018602 ",.01)
 ;;68788018602
 ;;9002226.02101,"1327,68788018602 ",.02)
 ;;68788018602
 ;;9002226.02101,"1327,70030041190 ",.01)
 ;;70030041190
 ;;9002226.02101,"1327,70030041190 ",.02)
 ;;70030041190
 ;;9002226.02101,"1327,70253021807 ",.01)
 ;;70253021807
 ;;9002226.02101,"1327,70253021807 ",.02)
 ;;70253021807
 ;;9002226.02101,"1327,75942000110 ",.01)
 ;;75942000110
 ;;9002226.02101,"1327,75942000110 ",.02)
 ;;75942000110
 ;;9002226.02101,"1327,75942000112 ",.01)
 ;;75942000112
 ;;9002226.02101,"1327,75942000112 ",.02)
 ;;75942000112
 ;;9002226.02101,"1327,75942000136 ",.01)
 ;;75942000136
 ;;9002226.02101,"1327,75942000136 ",.02)
 ;;75942000136
 ;;9002226.02101,"1327,75942000150 ",.01)
 ;;75942000150
 ;;9002226.02101,"1327,75942000150 ",.02)
 ;;75942000150
 ;;9002226.02101,"1327,75942000175 ",.01)
 ;;75942000175
 ;;9002226.02101,"1327,75942000175 ",.02)
 ;;75942000175