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

BUDD1D30.m

Go to the documentation of this file.
  1. BUDD1D30 ; IHS/CMI/LAB -CREATED BY ^ATXSTX ON NOV 30, 2016 ;
  1. ;;11.0;IHS/RPMS UNIFORM DATA SYSTEM;;JAN 18, 2017;Build 66
  1. ;
  1. START ;
  1. K:'$G(ATXPGMC) ^TMP("ATX",$J)
  1. S ATXPGMC=$G(ATXPGMC)+1
  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
  1. Q
  1. ;
  1. TMP ;;TAXONOMY (WITH BULLETIN)
  1. ;;9002226.02101,"1078,66336-0573-30 ",.01)
  1. ;;66336-0573-30
  1. ;;9002226.02101,"1078,66336-0573-30 ",.02)
  1. ;;66336-0573-30
  1. ;;9002226.02101,"1078,66336-0573-30 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,66336-0662-30 ",.01)
  1. ;;66336-0662-30
  1. ;;9002226.02101,"1078,66336-0662-30 ",.02)
  1. ;;66336-0662-30
  1. ;;9002226.02101,"1078,66336-0662-30 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,66336-0662-60 ",.01)
  1. ;;66336-0662-60
  1. ;;9002226.02101,"1078,66336-0662-60 ",.02)
  1. ;;66336-0662-60
  1. ;;9002226.02101,"1078,66336-0662-60 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,66336-0730-30 ",.01)
  1. ;;66336-0730-30
  1. ;;9002226.02101,"1078,66336-0730-30 ",.02)
  1. ;;66336-0730-30
  1. ;;9002226.02101,"1078,66336-0730-30 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,66336-0730-60 ",.01)
  1. ;;66336-0730-60
  1. ;;9002226.02101,"1078,66336-0730-60 ",.02)
  1. ;;66336-0730-60
  1. ;;9002226.02101,"1078,66336-0730-60 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,66336-0784-30 ",.01)
  1. ;;66336-0784-30
  1. ;;9002226.02101,"1078,66336-0784-30 ",.02)
  1. ;;66336-0784-30
  1. ;;9002226.02101,"1078,66336-0784-30 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,66336-0938-30 ",.01)
  1. ;;66336-0938-30
  1. ;;9002226.02101,"1078,66336-0938-30 ",.02)
  1. ;;66336-0938-30
  1. ;;9002226.02101,"1078,66336-0938-30 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,66336-0938-60 ",.01)
  1. ;;66336-0938-60
  1. ;;9002226.02101,"1078,66336-0938-60 ",.02)
  1. ;;66336-0938-60
  1. ;;9002226.02101,"1078,66336-0938-60 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,66780-0110-01 ",.01)
  1. ;;66780-0110-01
  1. ;;9002226.02101,"1078,66780-0110-01 ",.02)
  1. ;;66780-0110-01
  1. ;;9002226.02101,"1078,66780-0110-01 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,66780-0115-02 ",.01)
  1. ;;66780-0115-02
  1. ;;9002226.02101,"1078,66780-0115-02 ",.02)
  1. ;;66780-0115-02
  1. ;;9002226.02101,"1078,66780-0115-02 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,66780-0121-02 ",.01)
  1. ;;66780-0121-02
  1. ;;9002226.02101,"1078,66780-0121-02 ",.02)
  1. ;;66780-0121-02
  1. ;;9002226.02101,"1078,66780-0121-02 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,66780-0210-07 ",.01)
  1. ;;66780-0210-07
  1. ;;9002226.02101,"1078,66780-0210-07 ",.02)
  1. ;;66780-0210-07
  1. ;;9002226.02101,"1078,66780-0210-07 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,66780-0210-08 ",.01)
  1. ;;66780-0210-08
  1. ;;9002226.02101,"1078,66780-0210-08 ",.02)
  1. ;;66780-0210-08
  1. ;;9002226.02101,"1078,66780-0210-08 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,66780-0212-01 ",.01)
  1. ;;66780-0212-01
  1. ;;9002226.02101,"1078,66780-0212-01 ",.02)
  1. ;;66780-0212-01
  1. ;;9002226.02101,"1078,66780-0212-01 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,66780-0219-01 ",.01)
  1. ;;66780-0219-01
  1. ;;9002226.02101,"1078,66780-0219-01 ",.02)
  1. ;;66780-0219-01
  1. ;;9002226.02101,"1078,66780-0219-01 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,66780-0219-02 ",.01)
  1. ;;66780-0219-02
  1. ;;9002226.02101,"1078,66780-0219-02 ",.02)
  1. ;;66780-0219-02
  1. ;;9002226.02101,"1078,66780-0219-02 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,66780-0219-04 ",.01)
  1. ;;66780-0219-04
  1. ;;9002226.02101,"1078,66780-0219-04 ",.02)
  1. ;;66780-0219-04
  1. ;;9002226.02101,"1078,66780-0219-04 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,66780-0226-01 ",.01)
  1. ;;66780-0226-01
  1. ;;9002226.02101,"1078,66780-0226-01 ",.02)
  1. ;;66780-0226-01
  1. ;;9002226.02101,"1078,66780-0226-01 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,66789-0219-02 ",.01)
  1. ;;66789-0219-02
  1. ;;9002226.02101,"1078,66789-0219-02 ",.02)
  1. ;;66789-0219-02
  1. ;;9002226.02101,"1078,66789-0219-02 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,66993-0162-02 ",.01)
  1. ;;66993-0162-02
  1. ;;9002226.02101,"1078,66993-0162-02 ",.02)
  1. ;;66993-0162-02
  1. ;;9002226.02101,"1078,66993-0162-02 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,66993-0163-02 ",.01)
  1. ;;66993-0163-02
  1. ;;9002226.02101,"1078,66993-0163-02 ",.02)
  1. ;;66993-0163-02
  1. ;;9002226.02101,"1078,66993-0163-02 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,66993-0164-02 ",.01)
  1. ;;66993-0164-02
  1. ;;9002226.02101,"1078,66993-0164-02 ",.02)
  1. ;;66993-0164-02
  1. ;;9002226.02101,"1078,66993-0164-02 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,66993-0821-30 ",.01)
  1. ;;66993-0821-30
  1. ;;9002226.02101,"1078,66993-0821-30 ",.02)
  1. ;;66993-0821-30
  1. ;;9002226.02101,"1078,66993-0821-30 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,66993-0822-30 ",.01)
  1. ;;66993-0822-30
  1. ;;9002226.02101,"1078,66993-0822-30 ",.02)
  1. ;;66993-0822-30
  1. ;;9002226.02101,"1078,66993-0822-30 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,67046-0235-30 ",.01)
  1. ;;67046-0235-30
  1. ;;9002226.02101,"1078,67046-0235-30 ",.02)
  1. ;;67046-0235-30
  1. ;;9002226.02101,"1078,67046-0235-30 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,67046-0240-30 ",.01)
  1. ;;67046-0240-30
  1. ;;9002226.02101,"1078,67046-0240-30 ",.02)
  1. ;;67046-0240-30
  1. ;;9002226.02101,"1078,67046-0240-30 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,67046-0240-60 ",.01)
  1. ;;67046-0240-60
  1. ;;9002226.02101,"1078,67046-0240-60 ",.02)
  1. ;;67046-0240-60
  1. ;;9002226.02101,"1078,67046-0240-60 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,67251-0460-11 ",.01)
  1. ;;67251-0460-11
  1. ;;9002226.02101,"1078,67251-0460-11 ",.02)
  1. ;;67251-0460-11
  1. ;;9002226.02101,"1078,67251-0460-11 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,67251-0460-50 ",.01)
  1. ;;67251-0460-50
  1. ;;9002226.02101,"1078,67251-0460-50 ",.02)
  1. ;;67251-0460-50
  1. ;;9002226.02101,"1078,67251-0460-50 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,67253-0460-10 ",.01)
  1. ;;67253-0460-10
  1. ;;9002226.02101,"1078,67253-0460-10 ",.02)
  1. ;;67253-0460-10
  1. ;;9002226.02101,"1078,67253-0460-10 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,67253-0460-11 ",.01)
  1. ;;67253-0460-11
  1. ;;9002226.02101,"1078,67253-0460-11 ",.02)
  1. ;;67253-0460-11
  1. ;;9002226.02101,"1078,67253-0460-11 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,67253-0460-50 ",.01)
  1. ;;67253-0460-50
  1. ;;9002226.02101,"1078,67253-0460-50 ",.02)
  1. ;;67253-0460-50
  1. ;;9002226.02101,"1078,67253-0460-50 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,67253-0461-10 ",.01)
  1. ;;67253-0461-10
  1. ;;9002226.02101,"1078,67253-0461-10 ",.02)
  1. ;;67253-0461-10
  1. ;;9002226.02101,"1078,67253-0461-10 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,67253-0461-11 ",.01)
  1. ;;67253-0461-11
  1. ;;9002226.02101,"1078,67253-0461-11 ",.02)
  1. ;;67253-0461-11
  1. ;;9002226.02101,"1078,67253-0461-11 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,67253-0461-50 ",.01)
  1. ;;67253-0461-50
  1. ;;9002226.02101,"1078,67253-0461-50 ",.02)
  1. ;;67253-0461-50
  1. ;;9002226.02101,"1078,67253-0461-50 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,67253-0462-10 ",.01)
  1. ;;67253-0462-10
  1. ;;9002226.02101,"1078,67253-0462-10 ",.02)
  1. ;;67253-0462-10
  1. ;;9002226.02101,"1078,67253-0462-10 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,67253-0462-11 ",.01)
  1. ;;67253-0462-11
  1. ;;9002226.02101,"1078,67253-0462-11 ",.02)
  1. ;;67253-0462-11
  1. ;;9002226.02101,"1078,67253-0462-11 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,67253-0462-50 ",.01)
  1. ;;67253-0462-50
  1. ;;9002226.02101,"1078,67253-0462-50 ",.02)
  1. ;;67253-0462-50
  1. ;;9002226.02101,"1078,67253-0462-50 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,67544-0296-70 ",.01)
  1. ;;67544-0296-70
  1. ;;9002226.02101,"1078,67544-0296-70 ",.02)
  1. ;;67544-0296-70
  1. ;;9002226.02101,"1078,67544-0296-70 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,67544-0417-70 ",.01)
  1. ;;67544-0417-70
  1. ;;9002226.02101,"1078,67544-0417-70 ",.02)
  1. ;;67544-0417-70
  1. ;;9002226.02101,"1078,67544-0417-70 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,67544-0511-70 ",.01)
  1. ;;67544-0511-70
  1. ;;9002226.02101,"1078,67544-0511-70 ",.02)
  1. ;;67544-0511-70
  1. ;;9002226.02101,"1078,67544-0511-70 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,67544-0511-94 ",.01)
  1. ;;67544-0511-94
  1. ;;9002226.02101,"1078,67544-0511-94 ",.02)
  1. ;;67544-0511-94
  1. ;;9002226.02101,"1078,67544-0511-94 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,67544-0653-53 ",.01)
  1. ;;67544-0653-53
  1. ;;9002226.02101,"1078,67544-0653-53 ",.02)
  1. ;;67544-0653-53
  1. ;;9002226.02101,"1078,67544-0653-53 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,67544-0653-80 ",.01)
  1. ;;67544-0653-80
  1. ;;9002226.02101,"1078,67544-0653-80 ",.02)
  1. ;;67544-0653-80
  1. ;;9002226.02101,"1078,67544-0653-80 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,67544-0661-41 ",.01)
  1. ;;67544-0661-41
  1. ;;9002226.02101,"1078,67544-0661-41 ",.02)
  1. ;;67544-0661-41
  1. ;;9002226.02101,"1078,67544-0661-41 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,67544-0808-60 ",.01)
  1. ;;67544-0808-60
  1. ;;9002226.02101,"1078,67544-0808-60 ",.02)
  1. ;;67544-0808-60
  1. ;;9002226.02101,"1078,67544-0808-60 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,68001-0177-00 ",.01)
  1. ;;68001-0177-00
  1. ;;9002226.02101,"1078,68001-0177-00 ",.02)
  1. ;;68001-0177-00
  1. ;;9002226.02101,"1078,68001-0177-00 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,68001-0177-03 ",.01)
  1. ;;68001-0177-03
  1. ;;9002226.02101,"1078,68001-0177-03 ",.02)
  1. ;;68001-0177-03
  1. ;;9002226.02101,"1078,68001-0177-03 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,68001-0178-00 ",.01)
  1. ;;68001-0178-00
  1. ;;9002226.02101,"1078,68001-0178-00 ",.02)
  1. ;;68001-0178-00
  1. ;;9002226.02101,"1078,68001-0178-00 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,68001-0178-03 ",.01)
  1. ;;68001-0178-03
  1. ;;9002226.02101,"1078,68001-0178-03 ",.02)
  1. ;;68001-0178-03
  1. ;;9002226.02101,"1078,68001-0178-03 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,68001-0179-00 ",.01)
  1. ;;68001-0179-00
  1. ;;9002226.02101,"1078,68001-0179-00 ",.02)
  1. ;;68001-0179-00
  1. ;;9002226.02101,"1078,68001-0179-00 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,68001-0179-03 ",.01)
  1. ;;68001-0179-03
  1. ;;9002226.02101,"1078,68001-0179-03 ",.02)
  1. ;;68001-0179-03
  1. ;;9002226.02101,"1078,68001-0179-03 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,68084-0111-01 ",.01)
  1. ;;68084-0111-01
  1. ;;9002226.02101,"1078,68084-0111-01 ",.02)
  1. ;;68084-0111-01
  1. ;;9002226.02101,"1078,68084-0111-01 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,68084-0111-11 ",.01)
  1. ;;68084-0111-11
  1. ;;9002226.02101,"1078,68084-0111-11 ",.02)
  1. ;;68084-0111-11
  1. ;;9002226.02101,"1078,68084-0111-11 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,68084-0112-01 ",.01)
  1. ;;68084-0112-01
  1. ;;9002226.02101,"1078,68084-0112-01 ",.02)
  1. ;;68084-0112-01
  1. ;;9002226.02101,"1078,68084-0112-01 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,68084-0112-11 ",.01)
  1. ;;68084-0112-11
  1. ;;9002226.02101,"1078,68084-0112-11 ",.02)
  1. ;;68084-0112-11
  1. ;;9002226.02101,"1078,68084-0112-11 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,68084-0136-01 ",.01)
  1. ;;68084-0136-01
  1. ;;9002226.02101,"1078,68084-0136-01 ",.02)
  1. ;;68084-0136-01
  1. ;;9002226.02101,"1078,68084-0136-01 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,68084-0136-11 ",.01)
  1. ;;68084-0136-11
  1. ;;9002226.02101,"1078,68084-0136-11 ",.02)
  1. ;;68084-0136-11
  1. ;;9002226.02101,"1078,68084-0136-11 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,68084-0137-01 ",.01)
  1. ;;68084-0137-01
  1. ;;9002226.02101,"1078,68084-0137-01 ",.02)
  1. ;;68084-0137-01
  1. ;;9002226.02101,"1078,68084-0137-01 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,68084-0137-11 ",.01)
  1. ;;68084-0137-11
  1. ;;9002226.02101,"1078,68084-0137-11 ",.02)
  1. ;;68084-0137-11
  1. ;;9002226.02101,"1078,68084-0137-11 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,68084-0138-01 ",.01)
  1. ;;68084-0138-01
  1. ;;9002226.02101,"1078,68084-0138-01 ",.02)
  1. ;;68084-0138-01
  1. ;;9002226.02101,"1078,68084-0138-01 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,68084-0138-11 ",.01)
  1. ;;68084-0138-11
  1. ;;9002226.02101,"1078,68084-0138-11 ",.02)
  1. ;;68084-0138-11
  1. ;;9002226.02101,"1078,68084-0138-11 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,68084-0295-11 ",.01)
  1. ;;68084-0295-11
  1. ;;9002226.02101,"1078,68084-0295-11 ",.02)
  1. ;;68084-0295-11
  1. ;;9002226.02101,"1078,68084-0295-11 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,68084-0295-21 ",.01)
  1. ;;68084-0295-21
  1. ;;9002226.02101,"1078,68084-0295-21 ",.02)
  1. ;;68084-0295-21
  1. ;;9002226.02101,"1078,68084-0295-21 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,68084-0326-01 ",.01)
  1. ;;68084-0326-01
  1. ;;9002226.02101,"1078,68084-0326-01 ",.02)
  1. ;;68084-0326-01
  1. ;;9002226.02101,"1078,68084-0326-01 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,68084-0326-11 ",.01)
  1. ;;68084-0326-11
  1. ;;9002226.02101,"1078,68084-0326-11 ",.02)
  1. ;;68084-0326-11
  1. ;;9002226.02101,"1078,68084-0326-11 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,68084-0327-01 ",.01)
  1. ;;68084-0327-01
  1. ;;9002226.02101,"1078,68084-0327-01 ",.02)
  1. ;;68084-0327-01