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

BUD0ZA11.m

Go to the documentation of this file.
  1. BUD0ZA11 ; IHS/CMI/LAB -CREATED BY ^ATXSTX ON DEC 13, 2010 ;
  1. ;;10.0;IHS/RPMS UNIFORM DATA SYSTEM;;FEB 04, 2016;Build 50
  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,"1062,00002-7510-01 ",.02)
  1. ;;00002-7510-01
  1. ;;9002226.02101,"1062,00002-7511-01 ",.01)
  1. ;;00002-7511-01
  1. ;;9002226.02101,"1062,00002-7511-01 ",.02)
  1. ;;00002-7511-01
  1. ;;9002226.02101,"1062,00002-7512-01 ",.01)
  1. ;;00002-7512-01
  1. ;;9002226.02101,"1062,00002-7512-01 ",.02)
  1. ;;00002-7512-01
  1. ;;9002226.02101,"1062,00002-7515-01 ",.01)
  1. ;;00002-7515-01
  1. ;;9002226.02101,"1062,00002-7515-01 ",.02)
  1. ;;00002-7515-01
  1. ;;9002226.02101,"1062,00002-7515-59 ",.01)
  1. ;;00002-7515-59
  1. ;;9002226.02101,"1062,00002-7515-59 ",.02)
  1. ;;00002-7515-59
  1. ;;9002226.02101,"1062,00002-7516-01 ",.01)
  1. ;;00002-7516-01
  1. ;;9002226.02101,"1062,00002-7516-01 ",.02)
  1. ;;00002-7516-01
  1. ;;9002226.02101,"1062,00002-7516-59 ",.01)
  1. ;;00002-7516-59
  1. ;;9002226.02101,"1062,00002-7516-59 ",.02)
  1. ;;00002-7516-59
  1. ;;9002226.02101,"1062,00002-8211-01 ",.01)
  1. ;;00002-8211-01
  1. ;;9002226.02101,"1062,00002-8211-01 ",.02)
  1. ;;00002-8211-01
  1. ;;9002226.02101,"1062,00002-8215-01 ",.01)
  1. ;;00002-8215-01
  1. ;;9002226.02101,"1062,00002-8215-01 ",.02)
  1. ;;00002-8215-01
  1. ;;9002226.02101,"1062,00002-8311-01 ",.01)
  1. ;;00002-8311-01
  1. ;;9002226.02101,"1062,00002-8311-01 ",.02)
  1. ;;00002-8311-01
  1. ;;9002226.02101,"1062,00002-8315-01 ",.01)
  1. ;;00002-8315-01
  1. ;;9002226.02101,"1062,00002-8315-01 ",.02)
  1. ;;00002-8315-01
  1. ;;9002226.02101,"1062,00002-8411-01 ",.01)
  1. ;;00002-8411-01
  1. ;;9002226.02101,"1062,00002-8411-01 ",.02)
  1. ;;00002-8411-01
  1. ;;9002226.02101,"1062,00002-8415-01 ",.01)
  1. ;;00002-8415-01
  1. ;;9002226.02101,"1062,00002-8415-01 ",.02)
  1. ;;00002-8415-01
  1. ;;9002226.02101,"1062,00002-8501-01 ",.01)
  1. ;;00002-8501-01
  1. ;;9002226.02101,"1062,00002-8501-01 ",.02)
  1. ;;00002-8501-01
  1. ;;9002226.02101,"1062,00002-8615-01 ",.01)
  1. ;;00002-8615-01
  1. ;;9002226.02101,"1062,00002-8615-01 ",.02)
  1. ;;00002-8615-01
  1. ;;9002226.02101,"1062,00002-8715-01 ",.01)
  1. ;;00002-8715-01
  1. ;;9002226.02101,"1062,00002-8715-01 ",.02)
  1. ;;00002-8715-01
  1. ;;9002226.02101,"1062,00002-8725-01 ",.01)
  1. ;;00002-8725-01
  1. ;;9002226.02101,"1062,00002-8725-01 ",.02)
  1. ;;00002-8725-01
  1. ;;9002226.02101,"1062,00002-8725-59 ",.01)
  1. ;;00002-8725-59
  1. ;;9002226.02101,"1062,00002-8725-59 ",.02)
  1. ;;00002-8725-59
  1. ;;9002226.02101,"1062,00002-8730-01 ",.01)
  1. ;;00002-8730-01
  1. ;;9002226.02101,"1062,00002-8730-01 ",.02)
  1. ;;00002-8730-01
  1. ;;9002226.02101,"1062,00002-8730-59 ",.01)
  1. ;;00002-8730-59
  1. ;;9002226.02101,"1062,00002-8730-59 ",.02)
  1. ;;00002-8730-59
  1. ;;9002226.02101,"1062,00002-8770-01 ",.01)
  1. ;;00002-8770-01
  1. ;;9002226.02101,"1062,00002-8770-01 ",.02)
  1. ;;00002-8770-01
  1. ;;9002226.02101,"1062,00002-8770-59 ",.01)
  1. ;;00002-8770-59
  1. ;;9002226.02101,"1062,00002-8770-59 ",.02)
  1. ;;00002-8770-59
  1. ;;9002226.02101,"1062,00002-8793-01 ",.01)
  1. ;;00002-8793-01
  1. ;;9002226.02101,"1062,00002-8793-01 ",.02)
  1. ;;00002-8793-01
  1. ;;9002226.02101,"1062,00002-8793-59 ",.01)
  1. ;;00002-8793-59
  1. ;;9002226.02101,"1062,00002-8793-59 ",.02)
  1. ;;00002-8793-59
  1. ;;9002226.02101,"1062,00002-8794-01 ",.01)
  1. ;;00002-8794-01
  1. ;;9002226.02101,"1062,00002-8794-01 ",.02)
  1. ;;00002-8794-01
  1. ;;9002226.02101,"1062,00002-8794-59 ",.01)
  1. ;;00002-8794-59
  1. ;;9002226.02101,"1062,00002-8794-59 ",.02)
  1. ;;00002-8794-59
  1. ;;9002226.02101,"1062,00002-8797-01 ",.01)
  1. ;;00002-8797-01
  1. ;;9002226.02101,"1062,00002-8797-01 ",.02)
  1. ;;00002-8797-01
  1. ;;9002226.02101,"1062,00002-8797-59 ",.01)
  1. ;;00002-8797-59
  1. ;;9002226.02101,"1062,00002-8797-59 ",.02)
  1. ;;00002-8797-59
  1. ;;9002226.02101,"1062,00002-8798-01 ",.01)
  1. ;;00002-8798-01
  1. ;;9002226.02101,"1062,00002-8798-01 ",.02)
  1. ;;00002-8798-01
  1. ;;9002226.02101,"1062,00002-8798-59 ",.01)
  1. ;;00002-8798-59
  1. ;;9002226.02101,"1062,00002-8798-59 ",.02)
  1. ;;00002-8798-59
  1. ;;9002226.02101,"1062,00002-8799-01 ",.01)
  1. ;;00002-8799-01
  1. ;;9002226.02101,"1062,00002-8799-01 ",.02)
  1. ;;00002-8799-01
  1. ;;9002226.02101,"1062,00002-8799-59 ",.01)
  1. ;;00002-8799-59
  1. ;;9002226.02101,"1062,00002-8799-59 ",.02)
  1. ;;00002-8799-59
  1. ;;9002226.02101,"1062,00002-9515-01 ",.01)
  1. ;;00002-9515-01
  1. ;;9002226.02101,"1062,00002-9515-01 ",.02)
  1. ;;00002-9515-01
  1. ;;9002226.02101,"1062,00003-4214-11 ",.01)
  1. ;;00003-4214-11
  1. ;;9002226.02101,"1062,00003-4214-11 ",.02)
  1. ;;00003-4214-11
  1. ;;9002226.02101,"1062,00003-4215-11 ",.01)
  1. ;;00003-4215-11
  1. ;;9002226.02101,"1062,00003-4215-11 ",.02)
  1. ;;00003-4215-11
  1. ;;9002226.02101,"1062,00003-4215-21 ",.01)
  1. ;;00003-4215-21
  1. ;;9002226.02101,"1062,00003-4215-21 ",.02)
  1. ;;00003-4215-21
  1. ;;9002226.02101,"1062,00003-4215-41 ",.01)
  1. ;;00003-4215-41
  1. ;;9002226.02101,"1062,00003-4215-41 ",.02)
  1. ;;00003-4215-41
  1. ;;9002226.02101,"1062,00006-0112-01 ",.01)
  1. ;;00006-0112-01
  1. ;;9002226.02101,"1062,00006-0112-01 ",.02)
  1. ;;00006-0112-01
  1. ;;9002226.02101,"1062,00006-0112-28 ",.01)
  1. ;;00006-0112-28
  1. ;;9002226.02101,"1062,00006-0112-28 ",.02)
  1. ;;00006-0112-28
  1. ;;9002226.02101,"1062,00006-0112-31 ",.01)
  1. ;;00006-0112-31
  1. ;;9002226.02101,"1062,00006-0112-31 ",.02)
  1. ;;00006-0112-31
  1. ;;9002226.02101,"1062,00006-0112-54 ",.01)
  1. ;;00006-0112-54
  1. ;;9002226.02101,"1062,00006-0112-54 ",.02)
  1. ;;00006-0112-54
  1. ;;9002226.02101,"1062,00006-0221-01 ",.01)
  1. ;;00006-0221-01
  1. ;;9002226.02101,"1062,00006-0221-01 ",.02)
  1. ;;00006-0221-01
  1. ;;9002226.02101,"1062,00006-0221-28 ",.01)
  1. ;;00006-0221-28
  1. ;;9002226.02101,"1062,00006-0221-28 ",.02)
  1. ;;00006-0221-28