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

BUDD1D20.m

Go to the documentation of this file.
BUDD1D20 ; 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,54868-0996-01 ",.01)
 ;;54868-0996-01
 ;;9002226.02101,"1078,54868-0996-01 ",.02)
 ;;54868-0996-01
 ;;9002226.02101,"1078,54868-0996-01 ",.03)
 ;;30
 ;;9002226.02101,"1078,54868-0996-02 ",.01)
 ;;54868-0996-02
 ;;9002226.02101,"1078,54868-0996-02 ",.02)
 ;;54868-0996-02
 ;;9002226.02101,"1078,54868-0996-02 ",.03)
 ;;30
 ;;9002226.02101,"1078,54868-0997-01 ",.01)
 ;;54868-0997-01
 ;;9002226.02101,"1078,54868-0997-01 ",.02)
 ;;54868-0997-01
 ;;9002226.02101,"1078,54868-0997-01 ",.03)
 ;;30
 ;;9002226.02101,"1078,54868-0997-02 ",.01)
 ;;54868-0997-02
 ;;9002226.02101,"1078,54868-0997-02 ",.02)
 ;;54868-0997-02
 ;;9002226.02101,"1078,54868-0997-02 ",.03)
 ;;30
 ;;9002226.02101,"1078,54868-0997-04 ",.01)
 ;;54868-0997-04
 ;;9002226.02101,"1078,54868-0997-04 ",.02)
 ;;54868-0997-04
 ;;9002226.02101,"1078,54868-0997-04 ",.03)
 ;;30
 ;;9002226.02101,"1078,54868-1020-00 ",.01)
 ;;54868-1020-00
 ;;9002226.02101,"1078,54868-1020-00 ",.02)
 ;;54868-1020-00
 ;;9002226.02101,"1078,54868-1020-00 ",.03)
 ;;30
 ;;9002226.02101,"1078,54868-1089-01 ",.01)
 ;;54868-1089-01
 ;;9002226.02101,"1078,54868-1089-01 ",.02)
 ;;54868-1089-01
 ;;9002226.02101,"1078,54868-1089-01 ",.03)
 ;;30
 ;;9002226.02101,"1078,54868-1089-02 ",.01)
 ;;54868-1089-02
 ;;9002226.02101,"1078,54868-1089-02 ",.02)
 ;;54868-1089-02
 ;;9002226.02101,"1078,54868-1089-02 ",.03)
 ;;30
 ;;9002226.02101,"1078,54868-1089-03 ",.01)
 ;;54868-1089-03
 ;;9002226.02101,"1078,54868-1089-03 ",.02)
 ;;54868-1089-03
 ;;9002226.02101,"1078,54868-1089-03 ",.03)
 ;;30
 ;;9002226.02101,"1078,54868-1097-00 ",.01)
 ;;54868-1097-00
 ;;9002226.02101,"1078,54868-1097-00 ",.02)
 ;;54868-1097-00
 ;;9002226.02101,"1078,54868-1097-00 ",.03)
 ;;30
 ;;9002226.02101,"1078,54868-1361-01 ",.01)
 ;;54868-1361-01
 ;;9002226.02101,"1078,54868-1361-01 ",.02)
 ;;54868-1361-01
 ;;9002226.02101,"1078,54868-1361-01 ",.03)
 ;;30
 ;;9002226.02101,"1078,54868-1429-01 ",.01)
 ;;54868-1429-01
 ;;9002226.02101,"1078,54868-1429-01 ",.02)
 ;;54868-1429-01
 ;;9002226.02101,"1078,54868-1429-01 ",.03)
 ;;30
 ;;9002226.02101,"1078,54868-2380-01 ",.01)
 ;;54868-2380-01
 ;;9002226.02101,"1078,54868-2380-01 ",.02)
 ;;54868-2380-01
 ;;9002226.02101,"1078,54868-2380-01 ",.03)
 ;;30
 ;;9002226.02101,"1078,54868-2746-00 ",.01)
 ;;54868-2746-00
 ;;9002226.02101,"1078,54868-2746-00 ",.02)
 ;;54868-2746-00
 ;;9002226.02101,"1078,54868-2746-00 ",.03)
 ;;30
 ;;9002226.02101,"1078,54868-2777-00 ",.01)
 ;;54868-2777-00
 ;;9002226.02101,"1078,54868-2777-00 ",.02)
 ;;54868-2777-00
 ;;9002226.02101,"1078,54868-2777-00 ",.03)
 ;;30
 ;;9002226.02101,"1078,54868-3265-00 ",.01)
 ;;54868-3265-00
 ;;9002226.02101,"1078,54868-3265-00 ",.02)
 ;;54868-3265-00
 ;;9002226.02101,"1078,54868-3265-00 ",.03)
 ;;30
 ;;9002226.02101,"1078,54868-3265-01 ",.01)
 ;;54868-3265-01
 ;;9002226.02101,"1078,54868-3265-01 ",.02)
 ;;54868-3265-01
 ;;9002226.02101,"1078,54868-3265-01 ",.03)
 ;;30
 ;;9002226.02101,"1078,54868-3265-03 ",.01)
 ;;54868-3265-03
 ;;9002226.02101,"1078,54868-3265-03 ",.02)
 ;;54868-3265-03
 ;;9002226.02101,"1078,54868-3265-03 ",.03)
 ;;30
 ;;9002226.02101,"1078,54868-3265-04 ",.01)
 ;;54868-3265-04
 ;;9002226.02101,"1078,54868-3265-04 ",.02)
 ;;54868-3265-04
 ;;9002226.02101,"1078,54868-3265-04 ",.03)
 ;;30
 ;;9002226.02101,"1078,54868-3265-05 ",.01)
 ;;54868-3265-05
 ;;9002226.02101,"1078,54868-3265-05 ",.02)
 ;;54868-3265-05
 ;;9002226.02101,"1078,54868-3265-05 ",.03)
 ;;30
 ;;9002226.02101,"1078,54868-3266-01 ",.01)
 ;;54868-3266-01
 ;;9002226.02101,"1078,54868-3266-01 ",.02)
 ;;54868-3266-01
 ;;9002226.02101,"1078,54868-3266-01 ",.03)
 ;;30
 ;;9002226.02101,"1078,54868-3266-02 ",.01)
 ;;54868-3266-02
 ;;9002226.02101,"1078,54868-3266-02 ",.02)
 ;;54868-3266-02
 ;;9002226.02101,"1078,54868-3266-02 ",.03)
 ;;30
 ;;9002226.02101,"1078,54868-3266-03 ",.01)
 ;;54868-3266-03
 ;;9002226.02101,"1078,54868-3266-03 ",.02)
 ;;54868-3266-03
 ;;9002226.02101,"1078,54868-3266-03 ",.03)
 ;;30
 ;;9002226.02101,"1078,54868-3266-04 ",.01)
 ;;54868-3266-04
 ;;9002226.02101,"1078,54868-3266-04 ",.02)
 ;;54868-3266-04
 ;;9002226.02101,"1078,54868-3266-04 ",.03)
 ;;30
 ;;9002226.02101,"1078,54868-3318-01 ",.01)
 ;;54868-3318-01
 ;;9002226.02101,"1078,54868-3318-01 ",.02)
 ;;54868-3318-01
 ;;9002226.02101,"1078,54868-3318-01 ",.03)
 ;;30
 ;;9002226.02101,"1078,54868-3318-02 ",.01)
 ;;54868-3318-02
 ;;9002226.02101,"1078,54868-3318-02 ",.02)
 ;;54868-3318-02
 ;;9002226.02101,"1078,54868-3318-02 ",.03)
 ;;30
 ;;9002226.02101,"1078,54868-3318-03 ",.01)
 ;;54868-3318-03
 ;;9002226.02101,"1078,54868-3318-03 ",.02)
 ;;54868-3318-03
 ;;9002226.02101,"1078,54868-3318-03 ",.03)
 ;;30
 ;;9002226.02101,"1078,54868-3318-04 ",.01)
 ;;54868-3318-04
 ;;9002226.02101,"1078,54868-3318-04 ",.02)
 ;;54868-3318-04
 ;;9002226.02101,"1078,54868-3318-04 ",.03)
 ;;30
 ;;9002226.02101,"1078,54868-3318-05 ",.01)
 ;;54868-3318-05
 ;;9002226.02101,"1078,54868-3318-05 ",.02)
 ;;54868-3318-05
 ;;9002226.02101,"1078,54868-3318-05 ",.03)
 ;;30
 ;;9002226.02101,"1078,54868-3319-01 ",.01)
 ;;54868-3319-01
 ;;9002226.02101,"1078,54868-3319-01 ",.02)
 ;;54868-3319-01
 ;;9002226.02101,"1078,54868-3319-01 ",.03)
 ;;30
 ;;9002226.02101,"1078,54868-3319-02 ",.01)
 ;;54868-3319-02
 ;;9002226.02101,"1078,54868-3319-02 ",.02)
 ;;54868-3319-02
 ;;9002226.02101,"1078,54868-3319-02 ",.03)
 ;;30
 ;;9002226.02101,"1078,54868-3319-03 ",.01)
 ;;54868-3319-03
 ;;9002226.02101,"1078,54868-3319-03 ",.02)
 ;;54868-3319-03
 ;;9002226.02101,"1078,54868-3319-03 ",.03)
 ;;30
 ;;9002226.02101,"1078,54868-3319-04 ",.01)
 ;;54868-3319-04
 ;;9002226.02101,"1078,54868-3319-04 ",.02)
 ;;54868-3319-04
 ;;9002226.02101,"1078,54868-3319-04 ",.03)
 ;;30
 ;;9002226.02101,"1078,54868-3319-05 ",.01)
 ;;54868-3319-05
 ;;9002226.02101,"1078,54868-3319-05 ",.02)
 ;;54868-3319-05
 ;;9002226.02101,"1078,54868-3319-05 ",.03)
 ;;30
 ;;9002226.02101,"1078,54868-3319-06 ",.01)
 ;;54868-3319-06
 ;;9002226.02101,"1078,54868-3319-06 ",.02)
 ;;54868-3319-06
 ;;9002226.02101,"1078,54868-3319-06 ",.03)
 ;;30
 ;;9002226.02101,"1078,54868-3319-07 ",.01)
 ;;54868-3319-07
 ;;9002226.02101,"1078,54868-3319-07 ",.02)
 ;;54868-3319-07
 ;;9002226.02101,"1078,54868-3319-07 ",.03)
 ;;30
 ;;9002226.02101,"1078,54868-3327-00 ",.01)
 ;;54868-3327-00
 ;;9002226.02101,"1078,54868-3327-00 ",.02)
 ;;54868-3327-00
 ;;9002226.02101,"1078,54868-3327-00 ",.03)
 ;;30
 ;;9002226.02101,"1078,54868-3327-01 ",.01)
 ;;54868-3327-01
 ;;9002226.02101,"1078,54868-3327-01 ",.02)
 ;;54868-3327-01
 ;;9002226.02101,"1078,54868-3327-01 ",.03)
 ;;30
 ;;9002226.02101,"1078,54868-3334-00 ",.01)
 ;;54868-3334-00
 ;;9002226.02101,"1078,54868-3334-00 ",.02)
 ;;54868-3334-00
 ;;9002226.02101,"1078,54868-3334-00 ",.03)
 ;;30
 ;;9002226.02101,"1078,54868-3334-01 ",.01)
 ;;54868-3334-01
 ;;9002226.02101,"1078,54868-3334-01 ",.02)
 ;;54868-3334-01
 ;;9002226.02101,"1078,54868-3334-01 ",.03)
 ;;30
 ;;9002226.02101,"1078,54868-3334-02 ",.01)
 ;;54868-3334-02
 ;;9002226.02101,"1078,54868-3334-02 ",.02)
 ;;54868-3334-02
 ;;9002226.02101,"1078,54868-3334-02 ",.03)
 ;;30
 ;;9002226.02101,"1078,54868-3334-03 ",.01)
 ;;54868-3334-03
 ;;9002226.02101,"1078,54868-3334-03 ",.02)
 ;;54868-3334-03
 ;;9002226.02101,"1078,54868-3334-03 ",.03)
 ;;30
 ;;9002226.02101,"1078,54868-3334-04 ",.01)
 ;;54868-3334-04
 ;;9002226.02101,"1078,54868-3334-04 ",.02)
 ;;54868-3334-04
 ;;9002226.02101,"1078,54868-3334-04 ",.03)
 ;;30
 ;;9002226.02101,"1078,54868-3335-00 ",.01)
 ;;54868-3335-00
 ;;9002226.02101,"1078,54868-3335-00 ",.02)
 ;;54868-3335-00
 ;;9002226.02101,"1078,54868-3335-00 ",.03)
 ;;30
 ;;9002226.02101,"1078,54868-3335-01 ",.01)
 ;;54868-3335-01
 ;;9002226.02101,"1078,54868-3335-01 ",.02)
 ;;54868-3335-01
 ;;9002226.02101,"1078,54868-3335-01 ",.03)
 ;;30
 ;;9002226.02101,"1078,54868-3335-02 ",.01)
 ;;54868-3335-02
 ;;9002226.02101,"1078,54868-3335-02 ",.02)
 ;;54868-3335-02
 ;;9002226.02101,"1078,54868-3335-02 ",.03)
 ;;30
 ;;9002226.02101,"1078,54868-3335-03 ",.01)
 ;;54868-3335-03
 ;;9002226.02101,"1078,54868-3335-03 ",.02)
 ;;54868-3335-03
 ;;9002226.02101,"1078,54868-3335-03 ",.03)
 ;;30
 ;;9002226.02101,"1078,54868-3377-00 ",.01)
 ;;54868-3377-00
 ;;9002226.02101,"1078,54868-3377-00 ",.02)
 ;;54868-3377-00
 ;;9002226.02101,"1078,54868-3377-00 ",.03)
 ;;30
 ;;9002226.02101,"1078,54868-3377-01 ",.01)
 ;;54868-3377-01
 ;;9002226.02101,"1078,54868-3377-01 ",.02)
 ;;54868-3377-01
 ;;9002226.02101,"1078,54868-3377-01 ",.03)
 ;;30
 ;;9002226.02101,"1078,54868-3377-02 ",.01)
 ;;54868-3377-02
 ;;9002226.02101,"1078,54868-3377-02 ",.02)
 ;;54868-3377-02
 ;;9002226.02101,"1078,54868-3377-02 ",.03)
 ;;30
 ;;9002226.02101,"1078,54868-3377-03 ",.01)
 ;;54868-3377-03
 ;;9002226.02101,"1078,54868-3377-03 ",.02)
 ;;54868-3377-03
 ;;9002226.02101,"1078,54868-3377-03 ",.03)
 ;;30
 ;;9002226.02101,"1078,54868-3426-00 ",.01)
 ;;54868-3426-00
 ;;9002226.02101,"1078,54868-3426-00 ",.02)
 ;;54868-3426-00
 ;;9002226.02101,"1078,54868-3426-00 ",.03)
 ;;30
 ;;9002226.02101,"1078,54868-3426-01 ",.01)
 ;;54868-3426-01
 ;;9002226.02101,"1078,54868-3426-01 ",.02)
 ;;54868-3426-01
 ;;9002226.02101,"1078,54868-3426-01 ",.03)
 ;;30
 ;;9002226.02101,"1078,54868-3474-00 ",.01)
 ;;54868-3474-00
 ;;9002226.02101,"1078,54868-3474-00 ",.02)
 ;;54868-3474-00
 ;;9002226.02101,"1078,54868-3474-00 ",.03)
 ;;30
 ;;9002226.02101,"1078,54868-3598-00 ",.01)
 ;;54868-3598-00
 ;;9002226.02101,"1078,54868-3598-00 ",.02)
 ;;54868-3598-00
 ;;9002226.02101,"1078,54868-3598-00 ",.03)
 ;;30
 ;;9002226.02101,"1078,54868-3619-00 ",.01)
 ;;54868-3619-00
 ;;9002226.02101,"1078,54868-3619-00 ",.02)
 ;;54868-3619-00
 ;;9002226.02101,"1078,54868-3619-00 ",.03)
 ;;30
 ;;9002226.02101,"1078,54868-3823-01 ",.01)
 ;;54868-3823-01
 ;;9002226.02101,"1078,54868-3823-01 ",.02)
 ;;54868-3823-01
 ;;9002226.02101,"1078,54868-3823-01 ",.03)
 ;;30
 ;;9002226.02101,"1078,54868-4091-00 ",.01)
 ;;54868-4091-00
 ;;9002226.02101,"1078,54868-4091-00 ",.02)
 ;;54868-4091-00
 ;;9002226.02101,"1078,54868-4091-00 ",.03)
 ;;30
 ;;9002226.02101,"1078,54868-4091-01 ",.01)
 ;;54868-4091-01
 ;;9002226.02101,"1078,54868-4091-01 ",.02)
 ;;54868-4091-01
 ;;9002226.02101,"1078,54868-4091-01 ",.03)
 ;;30
 ;;9002226.02101,"1078,54868-4091-02 ",.01)
 ;;54868-4091-02
 ;;9002226.02101,"1078,54868-4091-02 ",.02)
 ;;54868-4091-02
 ;;9002226.02101,"1078,54868-4091-02 ",.03)
 ;;30
 ;;9002226.02101,"1078,54868-4091-03 ",.01)
 ;;54868-4091-03
 ;;9002226.02101,"1078,54868-4091-03 ",.02)
 ;;54868-4091-03
 ;;9002226.02101,"1078,54868-4091-03 ",.03)
 ;;30
 ;;9002226.02101,"1078,54868-4205-00 ",.01)
 ;;54868-4205-00
 ;;9002226.02101,"1078,54868-4205-00 ",.02)
 ;;54868-4205-00
 ;;9002226.02101,"1078,54868-4205-00 ",.03)
 ;;30
 ;;9002226.02101,"1078,54868-4205-01 ",.01)
 ;;54868-4205-01
 ;;9002226.02101,"1078,54868-4205-01 ",.02)
 ;;54868-4205-01
 ;;9002226.02101,"1078,54868-4205-01 ",.03)
 ;;30
 ;;9002226.02101,"1078,54868-4205-02 ",.01)
 ;;54868-4205-02
 ;;9002226.02101,"1078,54868-4205-02 ",.02)
 ;;54868-4205-02
 ;;9002226.02101,"1078,54868-4205-02 ",.03)
 ;;30
 ;;9002226.02101,"1078,54868-4206-00 ",.01)
 ;;54868-4206-00
 ;;9002226.02101,"1078,54868-4206-00 ",.02)
 ;;54868-4206-00
 ;;9002226.02101,"1078,54868-4206-00 ",.03)
 ;;30
 ;;9002226.02101,"1078,54868-4206-01 ",.01)
 ;;54868-4206-01
 ;;9002226.02101,"1078,54868-4206-01 ",.02)
 ;;54868-4206-01
 ;;9002226.02101,"1078,54868-4206-01 ",.03)
 ;;30
 ;;9002226.02101,"1078,54868-4206-03 ",.01)
 ;;54868-4206-03
 ;;9002226.02101,"1078,54868-4206-03 ",.02)
 ;;54868-4206-03