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

BUDD1D11.m

Go to the documentation of this file.
BUDD1D11 ; 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,00228-2898-03 ",.03)
 ;;30
 ;;9002226.02101,"1078,00228-2899-10 ",.01)
 ;;00228-2899-10
 ;;9002226.02101,"1078,00228-2899-10 ",.02)
 ;;00228-2899-10
 ;;9002226.02101,"1078,00228-2899-10 ",.03)
 ;;30
 ;;9002226.02101,"1078,00228-2899-50 ",.01)
 ;;00228-2899-50
 ;;9002226.02101,"1078,00228-2899-50 ",.02)
 ;;00228-2899-50
 ;;9002226.02101,"1078,00228-2899-50 ",.03)
 ;;30
 ;;9002226.02101,"1078,00228-2899-96 ",.01)
 ;;00228-2899-96
 ;;9002226.02101,"1078,00228-2899-96 ",.02)
 ;;00228-2899-96
 ;;9002226.02101,"1078,00228-2899-96 ",.03)
 ;;30
 ;;9002226.02101,"1078,00228-2900-10 ",.01)
 ;;00228-2900-10
 ;;9002226.02101,"1078,00228-2900-10 ",.02)
 ;;00228-2900-10
 ;;9002226.02101,"1078,00228-2900-10 ",.03)
 ;;30
 ;;9002226.02101,"1078,00228-2900-11 ",.01)
 ;;00228-2900-11
 ;;9002226.02101,"1078,00228-2900-11 ",.02)
 ;;00228-2900-11
 ;;9002226.02101,"1078,00228-2900-11 ",.03)
 ;;30
 ;;9002226.02101,"1078,00228-2900-50 ",.01)
 ;;00228-2900-50
 ;;9002226.02101,"1078,00228-2900-50 ",.02)
 ;;00228-2900-50
 ;;9002226.02101,"1078,00228-2900-50 ",.03)
 ;;30
 ;;9002226.02101,"1078,00228-2900-96 ",.01)
 ;;00228-2900-96
 ;;9002226.02101,"1078,00228-2900-96 ",.02)
 ;;00228-2900-96
 ;;9002226.02101,"1078,00228-2900-96 ",.03)
 ;;30
 ;;9002226.02101,"1078,00247-0444-02 ",.01)
 ;;00247-0444-02
 ;;9002226.02101,"1078,00247-0444-02 ",.02)
 ;;00247-0444-02
 ;;9002226.02101,"1078,00247-0444-02 ",.03)
 ;;30
 ;;9002226.02101,"1078,00247-0444-03 ",.01)
 ;;00247-0444-03
 ;;9002226.02101,"1078,00247-0444-03 ",.02)
 ;;00247-0444-03
 ;;9002226.02101,"1078,00247-0444-03 ",.03)
 ;;30
 ;;9002226.02101,"1078,00247-0444-60 ",.01)
 ;;00247-0444-60
 ;;9002226.02101,"1078,00247-0444-60 ",.02)
 ;;00247-0444-60
 ;;9002226.02101,"1078,00247-0444-60 ",.03)
 ;;30
 ;;9002226.02101,"1078,00247-0447-10 ",.01)
 ;;00247-0447-10
 ;;9002226.02101,"1078,00247-0447-10 ",.02)
 ;;00247-0447-10
 ;;9002226.02101,"1078,00247-0447-10 ",.03)
 ;;30
 ;;9002226.02101,"1078,00247-1270-03 ",.01)
 ;;00247-1270-03
 ;;9002226.02101,"1078,00247-1270-03 ",.02)
 ;;00247-1270-03
 ;;9002226.02101,"1078,00247-1270-03 ",.03)
 ;;30
 ;;9002226.02101,"1078,00247-1270-30 ",.01)
 ;;00247-1270-30
 ;;9002226.02101,"1078,00247-1270-30 ",.02)
 ;;00247-1270-30
 ;;9002226.02101,"1078,00247-1270-30 ",.03)
 ;;30
 ;;9002226.02101,"1078,00247-1270-60 ",.01)
 ;;00247-1270-60
 ;;9002226.02101,"1078,00247-1270-60 ",.02)
 ;;00247-1270-60
 ;;9002226.02101,"1078,00247-1270-60 ",.03)
 ;;30
 ;;9002226.02101,"1078,00247-1270-90 ",.01)
 ;;00247-1270-90
 ;;9002226.02101,"1078,00247-1270-90 ",.02)
 ;;00247-1270-90
 ;;9002226.02101,"1078,00247-1270-90 ",.03)
 ;;30
 ;;9002226.02101,"1078,00247-1538-10 ",.01)
 ;;00247-1538-10
 ;;9002226.02101,"1078,00247-1538-10 ",.02)
 ;;00247-1538-10
 ;;9002226.02101,"1078,00247-1538-10 ",.03)
 ;;30
 ;;9002226.02101,"1078,00247-1704-30 ",.01)
 ;;00247-1704-30
 ;;9002226.02101,"1078,00247-1704-30 ",.02)
 ;;00247-1704-30
 ;;9002226.02101,"1078,00247-1704-30 ",.03)
 ;;30
 ;;9002226.02101,"1078,00247-1760-00 ",.01)
 ;;00247-1760-00
 ;;9002226.02101,"1078,00247-1760-00 ",.02)
 ;;00247-1760-00
 ;;9002226.02101,"1078,00247-1760-00 ",.03)
 ;;30
 ;;9002226.02101,"1078,00247-1760-02 ",.01)
 ;;00247-1760-02
 ;;9002226.02101,"1078,00247-1760-02 ",.02)
 ;;00247-1760-02
 ;;9002226.02101,"1078,00247-1760-02 ",.03)
 ;;30
 ;;9002226.02101,"1078,00247-1760-30 ",.01)
 ;;00247-1760-30
 ;;9002226.02101,"1078,00247-1760-30 ",.02)
 ;;00247-1760-30
 ;;9002226.02101,"1078,00247-1760-30 ",.03)
 ;;30
 ;;9002226.02101,"1078,00247-1760-60 ",.01)
 ;;00247-1760-60
 ;;9002226.02101,"1078,00247-1760-60 ",.02)
 ;;00247-1760-60
 ;;9002226.02101,"1078,00247-1760-60 ",.03)
 ;;30
 ;;9002226.02101,"1078,00247-1760-77 ",.01)
 ;;00247-1760-77
 ;;9002226.02101,"1078,00247-1760-77 ",.02)
 ;;00247-1760-77
 ;;9002226.02101,"1078,00247-1760-77 ",.03)
 ;;30
 ;;9002226.02101,"1078,00247-1762-02 ",.01)
 ;;00247-1762-02
 ;;9002226.02101,"1078,00247-1762-02 ",.02)
 ;;00247-1762-02
 ;;9002226.02101,"1078,00247-1762-02 ",.03)
 ;;30
 ;;9002226.02101,"1078,00247-1763-02 ",.01)
 ;;00247-1763-02
 ;;9002226.02101,"1078,00247-1763-02 ",.02)
 ;;00247-1763-02
 ;;9002226.02101,"1078,00247-1763-02 ",.03)
 ;;30
 ;;9002226.02101,"1078,00247-1763-30 ",.01)
 ;;00247-1763-30
 ;;9002226.02101,"1078,00247-1763-30 ",.02)
 ;;00247-1763-30
 ;;9002226.02101,"1078,00247-1763-30 ",.03)
 ;;30
 ;;9002226.02101,"1078,00247-1924-30 ",.01)
 ;;00247-1924-30
 ;;9002226.02101,"1078,00247-1924-30 ",.02)
 ;;00247-1924-30
 ;;9002226.02101,"1078,00247-1924-30 ",.03)
 ;;30
 ;;9002226.02101,"1078,00247-1925-30 ",.01)
 ;;00247-1925-30
 ;;9002226.02101,"1078,00247-1925-30 ",.02)
 ;;00247-1925-30
 ;;9002226.02101,"1078,00247-1925-30 ",.03)
 ;;30
 ;;9002226.02101,"1078,00247-1989-15 ",.01)
 ;;00247-1989-15
 ;;9002226.02101,"1078,00247-1989-15 ",.02)
 ;;00247-1989-15
 ;;9002226.02101,"1078,00247-1989-15 ",.03)
 ;;30
 ;;9002226.02101,"1078,00247-2069-30 ",.01)
 ;;00247-2069-30
 ;;9002226.02101,"1078,00247-2069-30 ",.02)
 ;;00247-2069-30
 ;;9002226.02101,"1078,00247-2069-30 ",.03)
 ;;30
 ;;9002226.02101,"1078,00247-2069-60 ",.01)
 ;;00247-2069-60
 ;;9002226.02101,"1078,00247-2069-60 ",.02)
 ;;00247-2069-60
 ;;9002226.02101,"1078,00247-2069-60 ",.03)
 ;;30
 ;;9002226.02101,"1078,00247-2069-90 ",.01)
 ;;00247-2069-90
 ;;9002226.02101,"1078,00247-2069-90 ",.02)
 ;;00247-2069-90
 ;;9002226.02101,"1078,00247-2069-90 ",.03)
 ;;30
 ;;9002226.02101,"1078,00247-2159-00 ",.01)
 ;;00247-2159-00
 ;;9002226.02101,"1078,00247-2159-00 ",.02)
 ;;00247-2159-00
 ;;9002226.02101,"1078,00247-2159-00 ",.03)
 ;;30
 ;;9002226.02101,"1078,00247-2159-30 ",.01)
 ;;00247-2159-30
 ;;9002226.02101,"1078,00247-2159-30 ",.02)
 ;;00247-2159-30
 ;;9002226.02101,"1078,00247-2159-30 ",.03)
 ;;30
 ;;9002226.02101,"1078,00247-2160-30 ",.01)
 ;;00247-2160-30
 ;;9002226.02101,"1078,00247-2160-30 ",.02)
 ;;00247-2160-30
 ;;9002226.02101,"1078,00247-2160-30 ",.03)
 ;;30
 ;;9002226.02101,"1078,00247-2288-30 ",.01)
 ;;00247-2288-30
 ;;9002226.02101,"1078,00247-2288-30 ",.02)
 ;;00247-2288-30
 ;;9002226.02101,"1078,00247-2288-30 ",.03)
 ;;30
 ;;9002226.02101,"1078,00247-2288-60 ",.01)
 ;;00247-2288-60
 ;;9002226.02101,"1078,00247-2288-60 ",.02)
 ;;00247-2288-60
 ;;9002226.02101,"1078,00247-2288-60 ",.03)
 ;;30
 ;;9002226.02101,"1078,00247-2288-77 ",.01)
 ;;00247-2288-77
 ;;9002226.02101,"1078,00247-2288-77 ",.02)
 ;;00247-2288-77
 ;;9002226.02101,"1078,00247-2288-77 ",.03)
 ;;30
 ;;9002226.02101,"1078,00247-2288-90 ",.01)
 ;;00247-2288-90
 ;;9002226.02101,"1078,00247-2288-90 ",.02)
 ;;00247-2288-90
 ;;9002226.02101,"1078,00247-2288-90 ",.03)
 ;;30
 ;;9002226.02101,"1078,00247-2289-30 ",.01)
 ;;00247-2289-30
 ;;9002226.02101,"1078,00247-2289-30 ",.02)
 ;;00247-2289-30
 ;;9002226.02101,"1078,00247-2289-30 ",.03)
 ;;30
 ;;9002226.02101,"1078,00247-2289-60 ",.01)
 ;;00247-2289-60
 ;;9002226.02101,"1078,00247-2289-60 ",.02)
 ;;00247-2289-60
 ;;9002226.02101,"1078,00247-2289-60 ",.03)
 ;;30
 ;;9002226.02101,"1078,00247-2289-77 ",.01)
 ;;00247-2289-77
 ;;9002226.02101,"1078,00247-2289-77 ",.02)
 ;;00247-2289-77
 ;;9002226.02101,"1078,00247-2289-77 ",.03)
 ;;30
 ;;9002226.02101,"1078,00247-2289-90 ",.01)
 ;;00247-2289-90
 ;;9002226.02101,"1078,00247-2289-90 ",.02)
 ;;00247-2289-90
 ;;9002226.02101,"1078,00247-2289-90 ",.03)
 ;;30
 ;;9002226.02101,"1078,00247-2290-30 ",.01)
 ;;00247-2290-30
 ;;9002226.02101,"1078,00247-2290-30 ",.02)
 ;;00247-2290-30
 ;;9002226.02101,"1078,00247-2290-30 ",.03)
 ;;30
 ;;9002226.02101,"1078,00247-2290-60 ",.01)
 ;;00247-2290-60
 ;;9002226.02101,"1078,00247-2290-60 ",.02)
 ;;00247-2290-60
 ;;9002226.02101,"1078,00247-2290-60 ",.03)
 ;;30
 ;;9002226.02101,"1078,00247-2290-77 ",.01)
 ;;00247-2290-77
 ;;9002226.02101,"1078,00247-2290-77 ",.02)
 ;;00247-2290-77
 ;;9002226.02101,"1078,00247-2290-77 ",.03)
 ;;30
 ;;9002226.02101,"1078,00247-2290-90 ",.01)
 ;;00247-2290-90
 ;;9002226.02101,"1078,00247-2290-90 ",.02)
 ;;00247-2290-90
 ;;9002226.02101,"1078,00247-2290-90 ",.03)
 ;;30
 ;;9002226.02101,"1078,00247-2291-30 ",.01)
 ;;00247-2291-30
 ;;9002226.02101,"1078,00247-2291-30 ",.02)
 ;;00247-2291-30
 ;;9002226.02101,"1078,00247-2291-30 ",.03)
 ;;30
 ;;9002226.02101,"1078,00247-2291-60 ",.01)
 ;;00247-2291-60
 ;;9002226.02101,"1078,00247-2291-60 ",.02)
 ;;00247-2291-60
 ;;9002226.02101,"1078,00247-2291-60 ",.03)
 ;;30
 ;;9002226.02101,"1078,00247-2292-30 ",.01)
 ;;00247-2292-30
 ;;9002226.02101,"1078,00247-2292-30 ",.02)
 ;;00247-2292-30
 ;;9002226.02101,"1078,00247-2292-30 ",.03)
 ;;30
 ;;9002226.02101,"1078,00247-2292-60 ",.01)
 ;;00247-2292-60
 ;;9002226.02101,"1078,00247-2292-60 ",.02)
 ;;00247-2292-60
 ;;9002226.02101,"1078,00247-2292-60 ",.03)
 ;;30
 ;;9002226.02101,"1078,00247-2293-30 ",.01)
 ;;00247-2293-30
 ;;9002226.02101,"1078,00247-2293-30 ",.02)
 ;;00247-2293-30
 ;;9002226.02101,"1078,00247-2293-30 ",.03)
 ;;30
 ;;9002226.02101,"1078,00247-2293-60 ",.01)
 ;;00247-2293-60
 ;;9002226.02101,"1078,00247-2293-60 ",.02)
 ;;00247-2293-60
 ;;9002226.02101,"1078,00247-2293-60 ",.03)
 ;;30
 ;;9002226.02101,"1078,00247-2294-30 ",.01)
 ;;00247-2294-30
 ;;9002226.02101,"1078,00247-2294-30 ",.02)
 ;;00247-2294-30
 ;;9002226.02101,"1078,00247-2294-30 ",.03)
 ;;30
 ;;9002226.02101,"1078,00247-2295-30 ",.01)
 ;;00247-2295-30
 ;;9002226.02101,"1078,00247-2295-30 ",.02)
 ;;00247-2295-30
 ;;9002226.02101,"1078,00247-2295-30 ",.03)
 ;;30
 ;;9002226.02101,"1078,00247-2296-30 ",.01)
 ;;00247-2296-30
 ;;9002226.02101,"1078,00247-2296-30 ",.02)
 ;;00247-2296-30
 ;;9002226.02101,"1078,00247-2296-30 ",.03)
 ;;30
 ;;9002226.02101,"1078,00247192630 ",.01)
 ;;00247192630
 ;;9002226.02101,"1078,00247192630 ",.02)
 ;;00247192630
 ;;9002226.02101,"1078,00247192630 ",.03)
 ;;30
 ;;9002226.02101,"1078,00247192706 ",.01)
 ;;00247192706
 ;;9002226.02101,"1078,00247192706 ",.02)
 ;;00247192706
 ;;9002226.02101,"1078,00247192706 ",.03)
 ;;30
 ;;9002226.02101,"1078,00247192730 ",.01)
 ;;00247192730
 ;;9002226.02101,"1078,00247192730 ",.02)
 ;;00247192730
 ;;9002226.02101,"1078,00247192730 ",.03)
 ;;30
 ;;9002226.02101,"1078,00247192830 ",.01)
 ;;00247192830
 ;;9002226.02101,"1078,00247192830 ",.02)
 ;;00247192830
 ;;9002226.02101,"1078,00247192830 ",.03)
 ;;30
 ;;9002226.02101,"1078,00310-6100-30 ",.01)
 ;;00310-6100-30
 ;;9002226.02101,"1078,00310-6100-30 ",.02)
 ;;00310-6100-30
 ;;9002226.02101,"1078,00310-6100-30 ",.03)
 ;;30
 ;;9002226.02101,"1078,00310-6100-90 ",.01)
 ;;00310-6100-90
 ;;9002226.02101,"1078,00310-6100-90 ",.02)
 ;;00310-6100-90
 ;;9002226.02101,"1078,00310-6100-90 ",.03)
 ;;30
 ;;9002226.02101,"1078,00310-6105-30 ",.01)
 ;;00310-6105-30
 ;;9002226.02101,"1078,00310-6105-30 ",.02)
 ;;00310-6105-30
 ;;9002226.02101,"1078,00310-6105-30 ",.03)
 ;;30
 ;;9002226.02101,"1078,00310-6105-90 ",.01)
 ;;00310-6105-90
 ;;9002226.02101,"1078,00310-6105-90 ",.02)
 ;;00310-6105-90
 ;;9002226.02101,"1078,00310-6105-90 ",.03)
 ;;30
 ;;9002226.02101,"1078,00310-6125-60 ",.01)
 ;;00310-6125-60
 ;;9002226.02101,"1078,00310-6125-60 ",.02)
 ;;00310-6125-60
 ;;9002226.02101,"1078,00310-6125-60 ",.03)
 ;;30
 ;;9002226.02101,"1078,00310-6135-30 ",.01)
 ;;00310-6135-30
 ;;9002226.02101,"1078,00310-6135-30 ",.02)
 ;;00310-6135-30
 ;;9002226.02101,"1078,00310-6135-30 ",.03)
 ;;30
 ;;9002226.02101,"1078,00310-6145-30 ",.01)
 ;;00310-6145-30
 ;;9002226.02101,"1078,00310-6145-30 ",.02)
 ;;00310-6145-30
 ;;9002226.02101,"1078,00310-6145-30 ",.03)
 ;;30
 ;;9002226.02101,"1078,00310-6205-30 ",.01)
 ;;00310-6205-30
 ;;9002226.02101,"1078,00310-6205-30 ",.02)
 ;;00310-6205-30