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

BUDD1D18.m

Go to the documentation of this file.
BUDD1D18 ; IHS/CMI/LAB -CREATED BY ^ATXSTX ON NOV 30, 2016 ;
 ;;11.0;IHS/RPMS UNIFORM DATA SYSTEM;;JAN 18, 2017;Build 66
 ;
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,"1078,51079-0873-17 ",.03)
 ;;30
 ;;9002226.02101,"1078,51079-0873-19 ",.01)
 ;;51079-0873-19
 ;;9002226.02101,"1078,51079-0873-19 ",.02)
 ;;51079-0873-19
 ;;9002226.02101,"1078,51079-0873-19 ",.03)
 ;;30
 ;;9002226.02101,"1078,51079-0873-20 ",.01)
 ;;51079-0873-20
 ;;9002226.02101,"1078,51079-0873-20 ",.02)
 ;;51079-0873-20
 ;;9002226.02101,"1078,51079-0873-20 ",.03)
 ;;30
 ;;9002226.02101,"1078,51079051401 ",.01)
 ;;51079051401
 ;;9002226.02101,"1078,51079051401 ",.02)
 ;;51079051401
 ;;9002226.02101,"1078,51079051401 ",.03)
 ;;30
 ;;9002226.02101,"1078,51079051420 ",.01)
 ;;51079051420
 ;;9002226.02101,"1078,51079051420 ",.02)
 ;;51079051420
 ;;9002226.02101,"1078,51079051420 ",.03)
 ;;30
 ;;9002226.02101,"1078,51079051501 ",.01)
 ;;51079051501
 ;;9002226.02101,"1078,51079051501 ",.02)
 ;;51079051501
 ;;9002226.02101,"1078,51079051501 ",.03)
 ;;30
 ;;9002226.02101,"1078,51079051520 ",.01)
 ;;51079051520
 ;;9002226.02101,"1078,51079051520 ",.02)
 ;;51079051520
 ;;9002226.02101,"1078,51079051520 ",.03)
 ;;30
 ;;9002226.02101,"1078,51285-0598-04 ",.01)
 ;;51285-0598-04
 ;;9002226.02101,"1078,51285-0598-04 ",.02)
 ;;51285-0598-04
 ;;9002226.02101,"1078,51285-0598-04 ",.03)
 ;;30
 ;;9002226.02101,"1078,51285-0599-04 ",.01)
 ;;51285-0599-04
 ;;9002226.02101,"1078,51285-0599-04 ",.02)
 ;;51285-0599-04
 ;;9002226.02101,"1078,51285-0599-04 ",.03)
 ;;30
 ;;9002226.02101,"1078,51655-0904-24 ",.01)
 ;;51655-0904-24
 ;;9002226.02101,"1078,51655-0904-24 ",.02)
 ;;51655-0904-24
 ;;9002226.02101,"1078,51655-0904-24 ",.03)
 ;;30
 ;;9002226.02101,"1078,51655-0904-25 ",.01)
 ;;51655-0904-25
 ;;9002226.02101,"1078,51655-0904-25 ",.02)
 ;;51655-0904-25
 ;;9002226.02101,"1078,51655-0904-25 ",.03)
 ;;30
 ;;9002226.02101,"1078,51655-0961-24 ",.01)
 ;;51655-0961-24
 ;;9002226.02101,"1078,51655-0961-24 ",.02)
 ;;51655-0961-24
 ;;9002226.02101,"1078,51655-0961-24 ",.03)
 ;;30
 ;;9002226.02101,"1078,51655-0961-25 ",.01)
 ;;51655-0961-25
 ;;9002226.02101,"1078,51655-0961-25 ",.02)
 ;;51655-0961-25
 ;;9002226.02101,"1078,51655-0961-25 ",.03)
 ;;30
 ;;9002226.02101,"1078,51655-0962-24 ",.01)
 ;;51655-0962-24
 ;;9002226.02101,"1078,51655-0962-24 ",.02)
 ;;51655-0962-24
 ;;9002226.02101,"1078,51655-0962-24 ",.03)
 ;;30
 ;;9002226.02101,"1078,51862-0210-01 ",.01)
 ;;51862-0210-01
 ;;9002226.02101,"1078,51862-0210-01 ",.02)
 ;;51862-0210-01
 ;;9002226.02101,"1078,51862-0210-01 ",.03)
 ;;30
 ;;9002226.02101,"1078,51862-0211-01 ",.01)
 ;;51862-0211-01
 ;;9002226.02101,"1078,51862-0211-01 ",.02)
 ;;51862-0211-01
 ;;9002226.02101,"1078,51862-0211-01 ",.03)
 ;;30
 ;;9002226.02101,"1078,51862-0212-01 ",.01)
 ;;51862-0212-01
 ;;9002226.02101,"1078,51862-0212-01 ",.02)
 ;;51862-0212-01
 ;;9002226.02101,"1078,51862-0212-01 ",.03)
 ;;30
 ;;9002226.02101,"1078,51991-0708-10 ",.01)
 ;;51991-0708-10
 ;;9002226.02101,"1078,51991-0708-10 ",.02)
 ;;51991-0708-10
 ;;9002226.02101,"1078,51991-0708-10 ",.03)
 ;;30
 ;;9002226.02101,"1078,51991-0708-33 ",.01)
 ;;51991-0708-33
 ;;9002226.02101,"1078,51991-0708-33 ",.02)
 ;;51991-0708-33
 ;;9002226.02101,"1078,51991-0708-33 ",.03)
 ;;30
 ;;9002226.02101,"1078,51991-0708-90 ",.01)
 ;;51991-0708-90
 ;;9002226.02101,"1078,51991-0708-90 ",.02)
 ;;51991-0708-90
 ;;9002226.02101,"1078,51991-0708-90 ",.03)
 ;;30
 ;;9002226.02101,"1078,51991070910 ",.01)
 ;;51991070910
 ;;9002226.02101,"1078,51991070910 ",.02)
 ;;51991070910
 ;;9002226.02101,"1078,51991070910 ",.03)
 ;;30
 ;;9002226.02101,"1078,51991070933 ",.01)
 ;;51991070933
 ;;9002226.02101,"1078,51991070933 ",.02)
 ;;51991070933
 ;;9002226.02101,"1078,51991070933 ",.03)
 ;;30
 ;;9002226.02101,"1078,51991070990 ",.01)
 ;;51991070990
 ;;9002226.02101,"1078,51991070990 ",.02)
 ;;51991070990
 ;;9002226.02101,"1078,51991070990 ",.03)
 ;;30
 ;;9002226.02101,"1078,51991071010 ",.01)
 ;;51991071010
 ;;9002226.02101,"1078,51991071010 ",.02)
 ;;51991071010
 ;;9002226.02101,"1078,51991071010 ",.03)
 ;;30
 ;;9002226.02101,"1078,51991071033 ",.01)
 ;;51991071033
 ;;9002226.02101,"1078,51991071033 ",.02)
 ;;51991071033
 ;;9002226.02101,"1078,51991071033 ",.03)
 ;;30
 ;;9002226.02101,"1078,51991071090 ",.01)
 ;;51991071090
 ;;9002226.02101,"1078,51991071090 ",.02)
 ;;51991071090
 ;;9002226.02101,"1078,51991071090 ",.03)
 ;;30
 ;;9002226.02101,"1078,52343005405 ",.01)
 ;;52343005405
 ;;9002226.02101,"1078,52343005405 ",.02)
 ;;52343005405
 ;;9002226.02101,"1078,52343005405 ",.03)
 ;;30
 ;;9002226.02101,"1078,52343005430 ",.01)
 ;;52343005430
 ;;9002226.02101,"1078,52343005430 ",.02)
 ;;52343005430
 ;;9002226.02101,"1078,52343005430 ",.03)
 ;;30
 ;;9002226.02101,"1078,52343005490 ",.01)
 ;;52343005490
 ;;9002226.02101,"1078,52343005490 ",.02)
 ;;52343005490
 ;;9002226.02101,"1078,52343005490 ",.03)
 ;;30
 ;;9002226.02101,"1078,52959-0449-30 ",.01)
 ;;52959-0449-30
 ;;9002226.02101,"1078,52959-0449-30 ",.02)
 ;;52959-0449-30
 ;;9002226.02101,"1078,52959-0449-30 ",.03)
 ;;30
 ;;9002226.02101,"1078,52959-0449-60 ",.01)
 ;;52959-0449-60
 ;;9002226.02101,"1078,52959-0449-60 ",.02)
 ;;52959-0449-60
 ;;9002226.02101,"1078,52959-0449-60 ",.03)
 ;;30
 ;;9002226.02101,"1078,52959-0822-00 ",.01)
 ;;52959-0822-00
 ;;9002226.02101,"1078,52959-0822-00 ",.02)
 ;;52959-0822-00
 ;;9002226.02101,"1078,52959-0822-00 ",.03)
 ;;30
 ;;9002226.02101,"1078,52959-0822-30 ",.01)
 ;;52959-0822-30
 ;;9002226.02101,"1078,52959-0822-30 ",.02)
 ;;52959-0822-30
 ;;9002226.02101,"1078,52959-0822-30 ",.03)
 ;;30
 ;;9002226.02101,"1078,52959-0822-60 ",.01)
 ;;52959-0822-60
 ;;9002226.02101,"1078,52959-0822-60 ",.02)
 ;;52959-0822-60
 ;;9002226.02101,"1078,52959-0822-60 ",.03)
 ;;30
 ;;9002226.02101,"1078,52959-0823-20 ",.01)
 ;;52959-0823-20
 ;;9002226.02101,"1078,52959-0823-20 ",.02)
 ;;52959-0823-20
 ;;9002226.02101,"1078,52959-0823-20 ",.03)
 ;;30
 ;;9002226.02101,"1078,52959-0823-60 ",.01)
 ;;52959-0823-60
 ;;9002226.02101,"1078,52959-0823-60 ",.02)
 ;;52959-0823-60
 ;;9002226.02101,"1078,52959-0823-60 ",.03)
 ;;30
 ;;9002226.02101,"1078,52959-0888-00 ",.01)
 ;;52959-0888-00
 ;;9002226.02101,"1078,52959-0888-00 ",.02)
 ;;52959-0888-00
 ;;9002226.02101,"1078,52959-0888-00 ",.03)
 ;;30
 ;;9002226.02101,"1078,52959-0888-30 ",.01)
 ;;52959-0888-30
 ;;9002226.02101,"1078,52959-0888-30 ",.02)
 ;;52959-0888-30
 ;;9002226.02101,"1078,52959-0888-30 ",.03)
 ;;30
 ;;9002226.02101,"1078,52959-0936-30 ",.01)
 ;;52959-0936-30
 ;;9002226.02101,"1078,52959-0936-30 ",.02)
 ;;52959-0936-30
 ;;9002226.02101,"1078,52959-0936-30 ",.03)
 ;;30
 ;;9002226.02101,"1078,53746-0286-02 ",.01)
 ;;53746-0286-02
 ;;9002226.02101,"1078,53746-0286-02 ",.02)
 ;;53746-0286-02
 ;;9002226.02101,"1078,53746-0286-02 ",.03)
 ;;30
 ;;9002226.02101,"1078,53808-0257-01 ",.01)
 ;;53808-0257-01
 ;;9002226.02101,"1078,53808-0257-01 ",.02)
 ;;53808-0257-01
 ;;9002226.02101,"1078,53808-0257-01 ",.03)
 ;;30
 ;;9002226.02101,"1078,53808-0258-01 ",.01)
 ;;53808-0258-01
 ;;9002226.02101,"1078,53808-0258-01 ",.02)
 ;;53808-0258-01
 ;;9002226.02101,"1078,53808-0258-01 ",.03)
 ;;30
 ;;9002226.02101,"1078,53808-0259-01 ",.01)
 ;;53808-0259-01
 ;;9002226.02101,"1078,53808-0259-01 ",.02)
 ;;53808-0259-01
 ;;9002226.02101,"1078,53808-0259-01 ",.03)
 ;;30
 ;;9002226.02101,"1078,53808-0260-01 ",.01)
 ;;53808-0260-01
 ;;9002226.02101,"1078,53808-0260-01 ",.02)
 ;;53808-0260-01
 ;;9002226.02101,"1078,53808-0260-01 ",.03)
 ;;30
 ;;9002226.02101,"1078,53808-0369-01 ",.01)
 ;;53808-0369-01
 ;;9002226.02101,"1078,53808-0369-01 ",.02)
 ;;53808-0369-01
 ;;9002226.02101,"1078,53808-0369-01 ",.03)
 ;;30
 ;;9002226.02101,"1078,53808-0400-01 ",.01)
 ;;53808-0400-01
 ;;9002226.02101,"1078,53808-0400-01 ",.02)
 ;;53808-0400-01
 ;;9002226.02101,"1078,53808-0400-01 ",.03)
 ;;30
 ;;9002226.02101,"1078,54458-0885-10 ",.01)
 ;;54458-0885-10
 ;;9002226.02101,"1078,54458-0885-10 ",.02)
 ;;54458-0885-10
 ;;9002226.02101,"1078,54458-0885-10 ",.03)
 ;;30
 ;;9002226.02101,"1078,54458-0966-10 ",.01)
 ;;54458-0966-10
 ;;9002226.02101,"1078,54458-0966-10 ",.02)
 ;;54458-0966-10
 ;;9002226.02101,"1078,54458-0966-10 ",.03)
 ;;30
 ;;9002226.02101,"1078,54458-0967-10 ",.01)
 ;;54458-0967-10
 ;;9002226.02101,"1078,54458-0967-10 ",.02)
 ;;54458-0967-10
 ;;9002226.02101,"1078,54458-0967-10 ",.03)
 ;;30
 ;;9002226.02101,"1078,54458-0968-10 ",.01)
 ;;54458-0968-10
 ;;9002226.02101,"1078,54458-0968-10 ",.02)
 ;;54458-0968-10
 ;;9002226.02101,"1078,54458-0968-10 ",.03)
 ;;30
 ;;9002226.02101,"1078,54458088310 ",.01)
 ;;54458088310
 ;;9002226.02101,"1078,54458088310 ",.02)
 ;;54458088310
 ;;9002226.02101,"1078,54458088310 ",.03)
 ;;30
 ;;9002226.02101,"1078,54458088410 ",.01)
 ;;54458088410
 ;;9002226.02101,"1078,54458088410 ",.02)
 ;;54458088410
 ;;9002226.02101,"1078,54458088410 ",.03)
 ;;30
 ;;9002226.02101,"1078,54569-0200-00 ",.01)
 ;;54569-0200-00
 ;;9002226.02101,"1078,54569-0200-00 ",.02)
 ;;54569-0200-00
 ;;9002226.02101,"1078,54569-0200-00 ",.03)
 ;;30
 ;;9002226.02101,"1078,54569-0203-00 ",.01)
 ;;54569-0203-00
 ;;9002226.02101,"1078,54569-0203-00 ",.02)
 ;;54569-0203-00
 ;;9002226.02101,"1078,54569-0203-00 ",.03)
 ;;30
 ;;9002226.02101,"1078,54569-0203-01 ",.01)
 ;;54569-0203-01
 ;;9002226.02101,"1078,54569-0203-01 ",.02)
 ;;54569-0203-01
 ;;9002226.02101,"1078,54569-0203-01 ",.03)
 ;;30
 ;;9002226.02101,"1078,54569-0203-40 ",.01)
 ;;54569-0203-40
 ;;9002226.02101,"1078,54569-0203-40 ",.02)
 ;;54569-0203-40
 ;;9002226.02101,"1078,54569-0203-40 ",.03)
 ;;30
 ;;9002226.02101,"1078,54569-0206-01 ",.01)
 ;;54569-0206-01
 ;;9002226.02101,"1078,54569-0206-01 ",.02)
 ;;54569-0206-01
 ;;9002226.02101,"1078,54569-0206-01 ",.03)
 ;;30
 ;;9002226.02101,"1078,54569-0206-02 ",.01)
 ;;54569-0206-02
 ;;9002226.02101,"1078,54569-0206-02 ",.02)
 ;;54569-0206-02
 ;;9002226.02101,"1078,54569-0206-02 ",.03)
 ;;30
 ;;9002226.02101,"1078,54569-0206-03 ",.01)
 ;;54569-0206-03
 ;;9002226.02101,"1078,54569-0206-03 ",.02)
 ;;54569-0206-03
 ;;9002226.02101,"1078,54569-0206-03 ",.03)
 ;;30
 ;;9002226.02101,"1078,54569-2017-01 ",.01)
 ;;54569-2017-01
 ;;9002226.02101,"1078,54569-2017-01 ",.02)
 ;;54569-2017-01
 ;;9002226.02101,"1078,54569-2017-01 ",.03)
 ;;30
 ;;9002226.02101,"1078,54569-2318-00 ",.01)
 ;;54569-2318-00
 ;;9002226.02101,"1078,54569-2318-00 ",.02)
 ;;54569-2318-00
 ;;9002226.02101,"1078,54569-2318-00 ",.03)
 ;;30
 ;;9002226.02101,"1078,54569-2319-00 ",.01)
 ;;54569-2319-00
 ;;9002226.02101,"1078,54569-2319-00 ",.02)
 ;;54569-2319-00
 ;;9002226.02101,"1078,54569-2319-00 ",.03)
 ;;30
 ;;9002226.02101,"1078,54569-2918-00 ",.01)
 ;;54569-2918-00
 ;;9002226.02101,"1078,54569-2918-00 ",.02)
 ;;54569-2918-00
 ;;9002226.02101,"1078,54569-2918-00 ",.03)
 ;;30
 ;;9002226.02101,"1078,54569-2918-01 ",.01)
 ;;54569-2918-01
 ;;9002226.02101,"1078,54569-2918-01 ",.02)
 ;;54569-2918-01
 ;;9002226.02101,"1078,54569-2918-01 ",.03)
 ;;30
 ;;9002226.02101,"1078,54569-2918-02 ",.01)
 ;;54569-2918-02
 ;;9002226.02101,"1078,54569-2918-02 ",.02)
 ;;54569-2918-02
 ;;9002226.02101,"1078,54569-2918-02 ",.03)
 ;;30
 ;;9002226.02101,"1078,54569-3467-00 ",.01)
 ;;54569-3467-00
 ;;9002226.02101,"1078,54569-3467-00 ",.02)
 ;;54569-3467-00
 ;;9002226.02101,"1078,54569-3467-00 ",.03)
 ;;30
 ;;9002226.02101,"1078,54569-3690-00 ",.01)
 ;;54569-3690-00
 ;;9002226.02101,"1078,54569-3690-00 ",.02)
 ;;54569-3690-00
 ;;9002226.02101,"1078,54569-3690-00 ",.03)
 ;;30
 ;;9002226.02101,"1078,54569-3690-01 ",.01)
 ;;54569-3690-01
 ;;9002226.02101,"1078,54569-3690-01 ",.02)
 ;;54569-3690-01
 ;;9002226.02101,"1078,54569-3690-01 ",.03)
 ;;30