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

BUDD1D23.m

Go to the documentation of this file.
BUDD1D23 ; 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,55289-0606-30 ",.02)
 ;;55289-0606-30
 ;;9002226.02101,"1078,55289-0606-30 ",.03)
 ;;30
 ;;9002226.02101,"1078,55289-0606-90 ",.01)
 ;;55289-0606-90
 ;;9002226.02101,"1078,55289-0606-90 ",.02)
 ;;55289-0606-90
 ;;9002226.02101,"1078,55289-0606-90 ",.03)
 ;;30
 ;;9002226.02101,"1078,55289-0779-07 ",.01)
 ;;55289-0779-07
 ;;9002226.02101,"1078,55289-0779-07 ",.02)
 ;;55289-0779-07
 ;;9002226.02101,"1078,55289-0779-07 ",.03)
 ;;30
 ;;9002226.02101,"1078,55289-0806-14 ",.01)
 ;;55289-0806-14
 ;;9002226.02101,"1078,55289-0806-14 ",.02)
 ;;55289-0806-14
 ;;9002226.02101,"1078,55289-0806-14 ",.03)
 ;;30
 ;;9002226.02101,"1078,55289-0806-30 ",.01)
 ;;55289-0806-30
 ;;9002226.02101,"1078,55289-0806-30 ",.02)
 ;;55289-0806-30
 ;;9002226.02101,"1078,55289-0806-30 ",.03)
 ;;30
 ;;9002226.02101,"1078,55289-0806-60 ",.01)
 ;;55289-0806-60
 ;;9002226.02101,"1078,55289-0806-60 ",.02)
 ;;55289-0806-60
 ;;9002226.02101,"1078,55289-0806-60 ",.03)
 ;;30
 ;;9002226.02101,"1078,55289-0806-86 ",.01)
 ;;55289-0806-86
 ;;9002226.02101,"1078,55289-0806-86 ",.02)
 ;;55289-0806-86
 ;;9002226.02101,"1078,55289-0806-86 ",.03)
 ;;30
 ;;9002226.02101,"1078,55289-0806-90 ",.01)
 ;;55289-0806-90
 ;;9002226.02101,"1078,55289-0806-90 ",.02)
 ;;55289-0806-90
 ;;9002226.02101,"1078,55289-0806-90 ",.03)
 ;;30
 ;;9002226.02101,"1078,55289-0892-01 ",.01)
 ;;55289-0892-01
 ;;9002226.02101,"1078,55289-0892-01 ",.02)
 ;;55289-0892-01
 ;;9002226.02101,"1078,55289-0892-01 ",.03)
 ;;30
 ;;9002226.02101,"1078,55289-0892-14 ",.01)
 ;;55289-0892-14
 ;;9002226.02101,"1078,55289-0892-14 ",.02)
 ;;55289-0892-14
 ;;9002226.02101,"1078,55289-0892-14 ",.03)
 ;;30
 ;;9002226.02101,"1078,55289-0892-15 ",.01)
 ;;55289-0892-15
 ;;9002226.02101,"1078,55289-0892-15 ",.02)
 ;;55289-0892-15
 ;;9002226.02101,"1078,55289-0892-15 ",.03)
 ;;30
 ;;9002226.02101,"1078,55289-0892-30 ",.01)
 ;;55289-0892-30
 ;;9002226.02101,"1078,55289-0892-30 ",.02)
 ;;55289-0892-30
 ;;9002226.02101,"1078,55289-0892-30 ",.03)
 ;;30
 ;;9002226.02101,"1078,55289-0892-60 ",.01)
 ;;55289-0892-60
 ;;9002226.02101,"1078,55289-0892-60 ",.02)
 ;;55289-0892-60
 ;;9002226.02101,"1078,55289-0892-60 ",.03)
 ;;30
 ;;9002226.02101,"1078,55289-0892-86 ",.01)
 ;;55289-0892-86
 ;;9002226.02101,"1078,55289-0892-86 ",.02)
 ;;55289-0892-86
 ;;9002226.02101,"1078,55289-0892-86 ",.03)
 ;;30
 ;;9002226.02101,"1078,55289-0892-90 ",.01)
 ;;55289-0892-90
 ;;9002226.02101,"1078,55289-0892-90 ",.02)
 ;;55289-0892-90
 ;;9002226.02101,"1078,55289-0892-90 ",.03)
 ;;30
 ;;9002226.02101,"1078,55289-0892-93 ",.01)
 ;;55289-0892-93
 ;;9002226.02101,"1078,55289-0892-93 ",.02)
 ;;55289-0892-93
 ;;9002226.02101,"1078,55289-0892-93 ",.03)
 ;;30
 ;;9002226.02101,"1078,55289-0892-97 ",.01)
 ;;55289-0892-97
 ;;9002226.02101,"1078,55289-0892-97 ",.02)
 ;;55289-0892-97
 ;;9002226.02101,"1078,55289-0892-97 ",.03)
 ;;30
 ;;9002226.02101,"1078,55289-0892-98 ",.01)
 ;;55289-0892-98
 ;;9002226.02101,"1078,55289-0892-98 ",.02)
 ;;55289-0892-98
 ;;9002226.02101,"1078,55289-0892-98 ",.03)
 ;;30
 ;;9002226.02101,"1078,55289-0976-01 ",.01)
 ;;55289-0976-01
 ;;9002226.02101,"1078,55289-0976-01 ",.02)
 ;;55289-0976-01
 ;;9002226.02101,"1078,55289-0976-01 ",.03)
 ;;30
 ;;9002226.02101,"1078,55289-0976-14 ",.01)
 ;;55289-0976-14
 ;;9002226.02101,"1078,55289-0976-14 ",.02)
 ;;55289-0976-14
 ;;9002226.02101,"1078,55289-0976-14 ",.03)
 ;;30
 ;;9002226.02101,"1078,55289-0976-30 ",.01)
 ;;55289-0976-30
 ;;9002226.02101,"1078,55289-0976-30 ",.02)
 ;;55289-0976-30
 ;;9002226.02101,"1078,55289-0976-30 ",.03)
 ;;30
 ;;9002226.02101,"1078,55289-0976-60 ",.01)
 ;;55289-0976-60
 ;;9002226.02101,"1078,55289-0976-60 ",.02)
 ;;55289-0976-60
 ;;9002226.02101,"1078,55289-0976-60 ",.03)
 ;;30
 ;;9002226.02101,"1078,55289-0976-90 ",.01)
 ;;55289-0976-90
 ;;9002226.02101,"1078,55289-0976-90 ",.02)
 ;;55289-0976-90
 ;;9002226.02101,"1078,55289-0976-90 ",.03)
 ;;30
 ;;9002226.02101,"1078,55289-0976-93 ",.01)
 ;;55289-0976-93
 ;;9002226.02101,"1078,55289-0976-93 ",.02)
 ;;55289-0976-93
 ;;9002226.02101,"1078,55289-0976-93 ",.03)
 ;;30
 ;;9002226.02101,"1078,55289054030 ",.01)
 ;;55289054030
 ;;9002226.02101,"1078,55289054030 ",.02)
 ;;55289054030
 ;;9002226.02101,"1078,55289054030 ",.03)
 ;;30
 ;;9002226.02101,"1078,55289086215 ",.01)
 ;;55289086215
 ;;9002226.02101,"1078,55289086215 ",.02)
 ;;55289086215
 ;;9002226.02101,"1078,55289086215 ",.03)
 ;;30
 ;;9002226.02101,"1078,55289086230 ",.01)
 ;;55289086230
 ;;9002226.02101,"1078,55289086230 ",.02)
 ;;55289086230
 ;;9002226.02101,"1078,55289086230 ",.03)
 ;;30
 ;;9002226.02101,"1078,55289093830 ",.01)
 ;;55289093830
 ;;9002226.02101,"1078,55289093830 ",.02)
 ;;55289093830
 ;;9002226.02101,"1078,55289093830 ",.03)
 ;;30
 ;;9002226.02101,"1078,55887-0063-30 ",.01)
 ;;55887-0063-30
 ;;9002226.02101,"1078,55887-0063-30 ",.02)
 ;;55887-0063-30
 ;;9002226.02101,"1078,55887-0063-30 ",.03)
 ;;30
 ;;9002226.02101,"1078,55887-0173-30 ",.01)
 ;;55887-0173-30
 ;;9002226.02101,"1078,55887-0173-30 ",.02)
 ;;55887-0173-30
 ;;9002226.02101,"1078,55887-0173-30 ",.03)
 ;;30
 ;;9002226.02101,"1078,55887-0179-90 ",.01)
 ;;55887-0179-90
 ;;9002226.02101,"1078,55887-0179-90 ",.02)
 ;;55887-0179-90
 ;;9002226.02101,"1078,55887-0179-90 ",.03)
 ;;30
 ;;9002226.02101,"1078,55887-0212-90 ",.01)
 ;;55887-0212-90
 ;;9002226.02101,"1078,55887-0212-90 ",.02)
 ;;55887-0212-90
 ;;9002226.02101,"1078,55887-0212-90 ",.03)
 ;;30
 ;;9002226.02101,"1078,55887-0222-30 ",.01)
 ;;55887-0222-30
 ;;9002226.02101,"1078,55887-0222-30 ",.02)
 ;;55887-0222-30
 ;;9002226.02101,"1078,55887-0222-30 ",.03)
 ;;30
 ;;9002226.02101,"1078,55887-0273-30 ",.01)
 ;;55887-0273-30
 ;;9002226.02101,"1078,55887-0273-30 ",.02)
 ;;55887-0273-30
 ;;9002226.02101,"1078,55887-0273-30 ",.03)
 ;;30
 ;;9002226.02101,"1078,55887-0339-30 ",.01)
 ;;55887-0339-30
 ;;9002226.02101,"1078,55887-0339-30 ",.02)
 ;;55887-0339-30
 ;;9002226.02101,"1078,55887-0339-30 ",.03)
 ;;30
 ;;9002226.02101,"1078,55887-0339-60 ",.01)
 ;;55887-0339-60
 ;;9002226.02101,"1078,55887-0339-60 ",.02)
 ;;55887-0339-60
 ;;9002226.02101,"1078,55887-0339-60 ",.03)
 ;;30
 ;;9002226.02101,"1078,55887-0339-90 ",.01)
 ;;55887-0339-90
 ;;9002226.02101,"1078,55887-0339-90 ",.02)
 ;;55887-0339-90
 ;;9002226.02101,"1078,55887-0339-90 ",.03)
 ;;30
 ;;9002226.02101,"1078,55887-0368-96 ",.01)
 ;;55887-0368-96
 ;;9002226.02101,"1078,55887-0368-96 ",.02)
 ;;55887-0368-96
 ;;9002226.02101,"1078,55887-0368-96 ",.03)
 ;;30
 ;;9002226.02101,"1078,55887-0535-01 ",.01)
 ;;55887-0535-01
 ;;9002226.02101,"1078,55887-0535-01 ",.02)
 ;;55887-0535-01
 ;;9002226.02101,"1078,55887-0535-01 ",.03)
 ;;30
 ;;9002226.02101,"1078,55887-0535-30 ",.01)
 ;;55887-0535-30
 ;;9002226.02101,"1078,55887-0535-30 ",.02)
 ;;55887-0535-30
 ;;9002226.02101,"1078,55887-0535-30 ",.03)
 ;;30
 ;;9002226.02101,"1078,55887-0535-60 ",.01)
 ;;55887-0535-60
 ;;9002226.02101,"1078,55887-0535-60 ",.02)
 ;;55887-0535-60
 ;;9002226.02101,"1078,55887-0535-60 ",.03)
 ;;30
 ;;9002226.02101,"1078,55887-0535-90 ",.01)
 ;;55887-0535-90
 ;;9002226.02101,"1078,55887-0535-90 ",.02)
 ;;55887-0535-90
 ;;9002226.02101,"1078,55887-0535-90 ",.03)
 ;;30
 ;;9002226.02101,"1078,55887-0536-60 ",.01)
 ;;55887-0536-60
 ;;9002226.02101,"1078,55887-0536-60 ",.02)
 ;;55887-0536-60
 ;;9002226.02101,"1078,55887-0536-60 ",.03)
 ;;30
 ;;9002226.02101,"1078,55887-0536-90 ",.01)
 ;;55887-0536-90
 ;;9002226.02101,"1078,55887-0536-90 ",.02)
 ;;55887-0536-90
 ;;9002226.02101,"1078,55887-0536-90 ",.03)
 ;;30
 ;;9002226.02101,"1078,55887-0657-30 ",.01)
 ;;55887-0657-30
 ;;9002226.02101,"1078,55887-0657-30 ",.02)
 ;;55887-0657-30
 ;;9002226.02101,"1078,55887-0657-30 ",.03)
 ;;30
 ;;9002226.02101,"1078,55887-0657-60 ",.01)
 ;;55887-0657-60
 ;;9002226.02101,"1078,55887-0657-60 ",.02)
 ;;55887-0657-60
 ;;9002226.02101,"1078,55887-0657-60 ",.03)
 ;;30
 ;;9002226.02101,"1078,55887-0693-01 ",.01)
 ;;55887-0693-01
 ;;9002226.02101,"1078,55887-0693-01 ",.02)
 ;;55887-0693-01
 ;;9002226.02101,"1078,55887-0693-01 ",.03)
 ;;30
 ;;9002226.02101,"1078,55887-0693-30 ",.01)
 ;;55887-0693-30
 ;;9002226.02101,"1078,55887-0693-30 ",.02)
 ;;55887-0693-30
 ;;9002226.02101,"1078,55887-0693-30 ",.03)
 ;;30
 ;;9002226.02101,"1078,55887-0693-60 ",.01)
 ;;55887-0693-60
 ;;9002226.02101,"1078,55887-0693-60 ",.02)
 ;;55887-0693-60
 ;;9002226.02101,"1078,55887-0693-60 ",.03)
 ;;30
 ;;9002226.02101,"1078,55887-0693-90 ",.01)
 ;;55887-0693-90
 ;;9002226.02101,"1078,55887-0693-90 ",.02)
 ;;55887-0693-90
 ;;9002226.02101,"1078,55887-0693-90 ",.03)
 ;;30
 ;;9002226.02101,"1078,55887-0727-01 ",.01)
 ;;55887-0727-01
 ;;9002226.02101,"1078,55887-0727-01 ",.02)
 ;;55887-0727-01
 ;;9002226.02101,"1078,55887-0727-01 ",.03)
 ;;30
 ;;9002226.02101,"1078,55887-0727-30 ",.01)
 ;;55887-0727-30
 ;;9002226.02101,"1078,55887-0727-30 ",.02)
 ;;55887-0727-30
 ;;9002226.02101,"1078,55887-0727-30 ",.03)
 ;;30
 ;;9002226.02101,"1078,55887-0727-60 ",.01)
 ;;55887-0727-60
 ;;9002226.02101,"1078,55887-0727-60 ",.02)
 ;;55887-0727-60
 ;;9002226.02101,"1078,55887-0727-60 ",.03)
 ;;30
 ;;9002226.02101,"1078,55887-0845-30 ",.01)
 ;;55887-0845-30
 ;;9002226.02101,"1078,55887-0845-30 ",.02)
 ;;55887-0845-30
 ;;9002226.02101,"1078,55887-0845-30 ",.03)
 ;;30
 ;;9002226.02101,"1078,55887-0845-60 ",.01)
 ;;55887-0845-60
 ;;9002226.02101,"1078,55887-0845-60 ",.02)
 ;;55887-0845-60
 ;;9002226.02101,"1078,55887-0845-60 ",.03)
 ;;30
 ;;9002226.02101,"1078,55887-0965-30 ",.01)
 ;;55887-0965-30
 ;;9002226.02101,"1078,55887-0965-30 ",.02)
 ;;55887-0965-30
 ;;9002226.02101,"1078,55887-0965-30 ",.03)
 ;;30
 ;;9002226.02101,"1078,55887006230 ",.01)
 ;;55887006230
 ;;9002226.02101,"1078,55887006230 ",.02)
 ;;55887006230
 ;;9002226.02101,"1078,55887006230 ",.03)
 ;;30
 ;;9002226.02101,"1078,55887010030 ",.01)
 ;;55887010030
 ;;9002226.02101,"1078,55887010030 ",.02)
 ;;55887010030
 ;;9002226.02101,"1078,55887010030 ",.03)
 ;;30
 ;;9002226.02101,"1078,55887064630 ",.01)
 ;;55887064630
 ;;9002226.02101,"1078,55887064630 ",.02)
 ;;55887064630
 ;;9002226.02101,"1078,55887064630 ",.03)
 ;;30
 ;;9002226.02101,"1078,55887064660 ",.01)
 ;;55887064660
 ;;9002226.02101,"1078,55887064660 ",.02)
 ;;55887064660
 ;;9002226.02101,"1078,55887064660 ",.03)
 ;;30
 ;;9002226.02101,"1078,55887064690 ",.01)
 ;;55887064690
 ;;9002226.02101,"1078,55887064690 ",.02)
 ;;55887064690
 ;;9002226.02101,"1078,55887064690 ",.03)
 ;;30
 ;;9002226.02101,"1078,57237-0020-01 ",.01)
 ;;57237-0020-01
 ;;9002226.02101,"1078,57237-0020-01 ",.02)
 ;;57237-0020-01
 ;;9002226.02101,"1078,57237-0020-01 ",.03)
 ;;30
 ;;9002226.02101,"1078,57237-0021-01 ",.01)
 ;;57237-0021-01
 ;;9002226.02101,"1078,57237-0021-01 ",.02)
 ;;57237-0021-01
 ;;9002226.02101,"1078,57237-0021-01 ",.03)
 ;;30
 ;;9002226.02101,"1078,57237-0021-05 ",.01)
 ;;57237-0021-05
 ;;9002226.02101,"1078,57237-0021-05 ",.02)
 ;;57237-0021-05
 ;;9002226.02101,"1078,57237-0021-05 ",.03)
 ;;30
 ;;9002226.02101,"1078,57237-0021-99 ",.01)
 ;;57237-0021-99
 ;;9002226.02101,"1078,57237-0021-99 ",.02)
 ;;57237-0021-99
 ;;9002226.02101,"1078,57237-0021-99 ",.03)
 ;;30
 ;;9002226.02101,"1078,57237-0022-01 ",.01)
 ;;57237-0022-01
 ;;9002226.02101,"1078,57237-0022-01 ",.02)
 ;;57237-0022-01
 ;;9002226.02101,"1078,57237-0022-01 ",.03)
 ;;30
 ;;9002226.02101,"1078,57237-0022-05 ",.01)
 ;;57237-0022-05
 ;;9002226.02101,"1078,57237-0022-05 ",.02)
 ;;57237-0022-05
 ;;9002226.02101,"1078,57237-0022-05 ",.03)
 ;;30
 ;;9002226.02101,"1078,57237-0022-99 ",.01)
 ;;57237-0022-99