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

BUDD1D31.m

Go to the documentation of this file.
  1. BUDD1D31 ; 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,68084-0327-01 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,68084-0327-11 ",.01)
  1. ;;68084-0327-11
  1. ;;9002226.02101,"1078,68084-0327-11 ",.02)
  1. ;;68084-0327-11
  1. ;;9002226.02101,"1078,68084-0327-11 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,68084-0458-11 ",.01)
  1. ;;68084-0458-11
  1. ;;9002226.02101,"1078,68084-0458-11 ",.02)
  1. ;;68084-0458-11
  1. ;;9002226.02101,"1078,68084-0458-11 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,68084-0458-21 ",.01)
  1. ;;68084-0458-21
  1. ;;9002226.02101,"1078,68084-0458-21 ",.02)
  1. ;;68084-0458-21
  1. ;;9002226.02101,"1078,68084-0458-21 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,68084-0459-11 ",.01)
  1. ;;68084-0459-11
  1. ;;9002226.02101,"1078,68084-0459-11 ",.02)
  1. ;;68084-0459-11
  1. ;;9002226.02101,"1078,68084-0459-11 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,68084-0459-21 ",.01)
  1. ;;68084-0459-21
  1. ;;9002226.02101,"1078,68084-0459-21 ",.02)
  1. ;;68084-0459-21
  1. ;;9002226.02101,"1078,68084-0459-21 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,68084-0629-01 ",.01)
  1. ;;68084-0629-01
  1. ;;9002226.02101,"1078,68084-0629-01 ",.02)
  1. ;;68084-0629-01
  1. ;;9002226.02101,"1078,68084-0629-01 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,68084-0629-11 ",.01)
  1. ;;68084-0629-11
  1. ;;9002226.02101,"1078,68084-0629-11 ",.02)
  1. ;;68084-0629-11
  1. ;;9002226.02101,"1078,68084-0629-11 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,68084-0649-01 ",.01)
  1. ;;68084-0649-01
  1. ;;9002226.02101,"1078,68084-0649-01 ",.02)
  1. ;;68084-0649-01
  1. ;;9002226.02101,"1078,68084-0649-01 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,68084-0745-25 ",.01)
  1. ;;68084-0745-25
  1. ;;9002226.02101,"1078,68084-0745-25 ",.02)
  1. ;;68084-0745-25
  1. ;;9002226.02101,"1078,68084-0745-25 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,68084-0788-21 ",.01)
  1. ;;68084-0788-21
  1. ;;9002226.02101,"1078,68084-0788-21 ",.02)
  1. ;;68084-0788-21
  1. ;;9002226.02101,"1078,68084-0788-21 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,68084-0807-01 ",.01)
  1. ;;68084-0807-01
  1. ;;9002226.02101,"1078,68084-0807-01 ",.02)
  1. ;;68084-0807-01
  1. ;;9002226.02101,"1078,68084-0807-01 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,68084-0878-01 ",.01)
  1. ;;68084-0878-01
  1. ;;9002226.02101,"1078,68084-0878-01 ",.02)
  1. ;;68084-0878-01
  1. ;;9002226.02101,"1078,68084-0878-01 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,68084-0878-11 ",.01)
  1. ;;68084-0878-11
  1. ;;9002226.02101,"1078,68084-0878-11 ",.02)
  1. ;;68084-0878-11
  1. ;;9002226.02101,"1078,68084-0878-11 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,68084-0954-25 ",.01)
  1. ;;68084-0954-25
  1. ;;9002226.02101,"1078,68084-0954-25 ",.02)
  1. ;;68084-0954-25
  1. ;;9002226.02101,"1078,68084-0954-25 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,68084-0954-95 ",.01)
  1. ;;68084-0954-95
  1. ;;9002226.02101,"1078,68084-0954-95 ",.02)
  1. ;;68084-0954-95
  1. ;;9002226.02101,"1078,68084-0954-95 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,68084-0967-25 ",.01)
  1. ;;68084-0967-25
  1. ;;9002226.02101,"1078,68084-0967-25 ",.02)
  1. ;;68084-0967-25
  1. ;;9002226.02101,"1078,68084-0967-25 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,68084-0967-95 ",.01)
  1. ;;68084-0967-95
  1. ;;9002226.02101,"1078,68084-0967-95 ",.02)
  1. ;;68084-0967-95
  1. ;;9002226.02101,"1078,68084-0967-95 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,68084063001 ",.01)
  1. ;;68084063001
  1. ;;9002226.02101,"1078,68084063001 ",.02)
  1. ;;68084063001
  1. ;;9002226.02101,"1078,68084063001 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,68084063011 ",.01)
  1. ;;68084063011
  1. ;;9002226.02101,"1078,68084063011 ",.02)
  1. ;;68084063011
  1. ;;9002226.02101,"1078,68084063011 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,68084063101 ",.01)
  1. ;;68084063101
  1. ;;9002226.02101,"1078,68084063101 ",.02)
  1. ;;68084063101
  1. ;;9002226.02101,"1078,68084063101 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,68084063111 ",.01)
  1. ;;68084063111
  1. ;;9002226.02101,"1078,68084063111 ",.02)
  1. ;;68084063111
  1. ;;9002226.02101,"1078,68084063111 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,68084065201 ",.01)
  1. ;;68084065201
  1. ;;9002226.02101,"1078,68084065201 ",.02)
  1. ;;68084065201
  1. ;;9002226.02101,"1078,68084065201 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,68084066001 ",.01)
  1. ;;68084066001
  1. ;;9002226.02101,"1078,68084066001 ",.02)
  1. ;;68084066001
  1. ;;9002226.02101,"1078,68084066001 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,68115-0154-90 ",.01)
  1. ;;68115-0154-90
  1. ;;9002226.02101,"1078,68115-0154-90 ",.02)
  1. ;;68115-0154-90
  1. ;;9002226.02101,"1078,68115-0154-90 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,68115-0156-30 ",.01)
  1. ;;68115-0156-30
  1. ;;9002226.02101,"1078,68115-0156-30 ",.02)
  1. ;;68115-0156-30
  1. ;;9002226.02101,"1078,68115-0156-30 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,68115-0157-30 ",.01)
  1. ;;68115-0157-30
  1. ;;9002226.02101,"1078,68115-0157-30 ",.02)
  1. ;;68115-0157-30
  1. ;;9002226.02101,"1078,68115-0157-30 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,68115-0158-30 ",.01)
  1. ;;68115-0158-30
  1. ;;9002226.02101,"1078,68115-0158-30 ",.02)
  1. ;;68115-0158-30
  1. ;;9002226.02101,"1078,68115-0158-30 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,68115-0159-30 ",.01)
  1. ;;68115-0159-30
  1. ;;9002226.02101,"1078,68115-0159-30 ",.02)
  1. ;;68115-0159-30
  1. ;;9002226.02101,"1078,68115-0159-30 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,68115-0159-60 ",.01)
  1. ;;68115-0159-60
  1. ;;9002226.02101,"1078,68115-0159-60 ",.02)
  1. ;;68115-0159-60
  1. ;;9002226.02101,"1078,68115-0159-60 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,68115-0160-90 ",.01)
  1. ;;68115-0160-90
  1. ;;9002226.02101,"1078,68115-0160-90 ",.02)
  1. ;;68115-0160-90
  1. ;;9002226.02101,"1078,68115-0160-90 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,68115-0161-90 ",.01)
  1. ;;68115-0161-90
  1. ;;9002226.02101,"1078,68115-0161-90 ",.02)
  1. ;;68115-0161-90
  1. ;;9002226.02101,"1078,68115-0161-90 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,68645-0150-54 ",.01)
  1. ;;68645-0150-54
  1. ;;9002226.02101,"1078,68645-0150-54 ",.02)
  1. ;;68645-0150-54
  1. ;;9002226.02101,"1078,68645-0150-54 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,68645-0151-59 ",.01)
  1. ;;68645-0151-59
  1. ;;9002226.02101,"1078,68645-0151-59 ",.02)
  1. ;;68645-0151-59
  1. ;;9002226.02101,"1078,68645-0151-59 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,68645-0210-54 ",.01)
  1. ;;68645-0210-54
  1. ;;9002226.02101,"1078,68645-0210-54 ",.02)
  1. ;;68645-0210-54
  1. ;;9002226.02101,"1078,68645-0210-54 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,68645-0211-54 ",.01)
  1. ;;68645-0211-54
  1. ;;9002226.02101,"1078,68645-0211-54 ",.02)
  1. ;;68645-0211-54
  1. ;;9002226.02101,"1078,68645-0211-54 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,69543-0123-10 ",.01)
  1. ;;69543-0123-10
  1. ;;9002226.02101,"1078,69543-0123-10 ",.02)
  1. ;;69543-0123-10
  1. ;;9002226.02101,"1078,69543-0123-10 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,69543-0124-10 ",.01)
  1. ;;69543-0124-10
  1. ;;9002226.02101,"1078,69543-0124-10 ",.02)
  1. ;;69543-0124-10
  1. ;;9002226.02101,"1078,69543-0124-10 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,69543-0125-10 ",.01)
  1. ;;69543-0125-10
  1. ;;9002226.02101,"1078,69543-0125-10 ",.02)
  1. ;;69543-0125-10
  1. ;;9002226.02101,"1078,69543-0125-10 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,76439-0120-10 ",.01)
  1. ;;76439-0120-10
  1. ;;9002226.02101,"1078,76439-0120-10 ",.02)
  1. ;;76439-0120-10
  1. ;;9002226.02101,"1078,76439-0120-10 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,76439-0120-11 ",.01)
  1. ;;76439-0120-11
  1. ;;9002226.02101,"1078,76439-0120-11 ",.02)
  1. ;;76439-0120-11
  1. ;;9002226.02101,"1078,76439-0120-11 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,76439-0121-10 ",.01)
  1. ;;76439-0121-10
  1. ;;9002226.02101,"1078,76439-0121-10 ",.02)
  1. ;;76439-0121-10
  1. ;;9002226.02101,"1078,76439-0121-10 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,76439-0121-11 ",.01)
  1. ;;76439-0121-11
  1. ;;9002226.02101,"1078,76439-0121-11 ",.02)
  1. ;;76439-0121-11
  1. ;;9002226.02101,"1078,76439-0121-11 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,76439-0122-10 ",.01)
  1. ;;76439-0122-10
  1. ;;9002226.02101,"1078,76439-0122-10 ",.02)
  1. ;;76439-0122-10
  1. ;;9002226.02101,"1078,76439-0122-10 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,76439-0122-11 ",.01)
  1. ;;76439-0122-11
  1. ;;9002226.02101,"1078,76439-0122-11 ",.02)
  1. ;;76439-0122-11
  1. ;;9002226.02101,"1078,76439-0122-11 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,76439-0123-10 ",.01)
  1. ;;76439-0123-10
  1. ;;9002226.02101,"1078,76439-0123-10 ",.02)
  1. ;;76439-0123-10
  1. ;;9002226.02101,"1078,76439-0123-10 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,76439-0124-10 ",.01)
  1. ;;76439-0124-10
  1. ;;9002226.02101,"1078,76439-0124-10 ",.02)
  1. ;;76439-0124-10
  1. ;;9002226.02101,"1078,76439-0124-10 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1078,76439-0125-10 ",.01)
  1. ;;76439-0125-10
  1. ;;9002226.02101,"1078,76439-0125-10 ",.02)
  1. ;;76439-0125-10
  1. ;;9002226.02101,"1078,76439-0125-10 ",.03)
  1. ;;30