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

BUD2ZD8.m

Go to the documentation of this file.
  1. BUD2ZD8 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON NOV 16, 2012;
  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,"1327,55567005413 ",.01)
  1. ;;55567005413
  1. ;;9002226.02101,"1327,55567005413 ",.02)
  1. ;;55567005413
  1. ;;9002226.02101,"1327,55567005418 ",.01)
  1. ;;55567005418
  1. ;;9002226.02101,"1327,55567005418 ",.02)
  1. ;;55567005418
  1. ;;9002226.02101,"1327,55567005425 ",.01)
  1. ;;55567005425
  1. ;;9002226.02101,"1327,55567005425 ",.02)
  1. ;;55567005425
  1. ;;9002226.02101,"1327,55670013113 ",.01)
  1. ;;55670013113
  1. ;;9002226.02101,"1327,55670013113 ",.02)
  1. ;;55670013113
  1. ;;9002226.02101,"1327,55670013199 ",.01)
  1. ;;55670013199
  1. ;;9002226.02101,"1327,55670013199 ",.02)
  1. ;;55670013199
  1. ;;9002226.02101,"1327,55670067613 ",.01)
  1. ;;55670067613
  1. ;;9002226.02101,"1327,55670067613 ",.02)
  1. ;;55670067613
  1. ;;9002226.02101,"1327,55670067699 ",.01)
  1. ;;55670067699
  1. ;;9002226.02101,"1327,55670067699 ",.02)
  1. ;;55670067699
  1. ;;9002226.02101,"1327,55887038630 ",.01)
  1. ;;55887038630
  1. ;;9002226.02101,"1327,55887038630 ",.02)
  1. ;;55887038630
  1. ;;9002226.02101,"1327,55887046630 ",.01)
  1. ;;55887046630
  1. ;;9002226.02101,"1327,55887046630 ",.02)
  1. ;;55887046630
  1. ;;9002226.02101,"1327,55887069001 ",.01)
  1. ;;55887069001
  1. ;;9002226.02101,"1327,55887069001 ",.02)
  1. ;;55887069001
  1. ;;9002226.02101,"1327,55910046768 ",.01)
  1. ;;55910046768
  1. ;;9002226.02101,"1327,55910046768 ",.02)
  1. ;;55910046768
  1. ;;9002226.02101,"1327,55966002809 ",.01)
  1. ;;55966002809
  1. ;;9002226.02101,"1327,55966002809 ",.02)
  1. ;;55966002809
  1. ;;9002226.02101,"1327,55966002820 ",.01)
  1. ;;55966002820
  1. ;;9002226.02101,"1327,55966002820 ",.02)
  1. ;;55966002820
  1. ;;9002226.02101,"1327,55966004501 ",.01)
  1. ;;55966004501
  1. ;;9002226.02101,"1327,55966004501 ",.02)
  1. ;;55966004501
  1. ;;9002226.02101,"1327,55966004509 ",.01)
  1. ;;55966004509
  1. ;;9002226.02101,"1327,55966004509 ",.02)
  1. ;;55966004509
  1. ;;9002226.02101,"1327,55966004801 ",.01)
  1. ;;55966004801
  1. ;;9002226.02101,"1327,55966004801 ",.02)
  1. ;;55966004801
  1. ;;9002226.02101,"1327,55966004805 ",.01)
  1. ;;55966004805
  1. ;;9002226.02101,"1327,55966004805 ",.02)
  1. ;;55966004805
  1. ;;9002226.02101,"1327,55966004809 ",.01)
  1. ;;55966004809
  1. ;;9002226.02101,"1327,55966004809 ",.02)
  1. ;;55966004809
  1. ;;9002226.02101,"1327,55966004810 ",.01)
  1. ;;55966004810
  1. ;;9002226.02101,"1327,55966004810 ",.02)
  1. ;;55966004810
  1. ;;9002226.02101,"1327,55966004815 ",.01)
  1. ;;55966004815
  1. ;;9002226.02101,"1327,55966004815 ",.02)
  1. ;;55966004815
  1. ;;9002226.02101,"1327,55966004837 ",.01)
  1. ;;55966004837
  1. ;;9002226.02101,"1327,55966004837 ",.02)
  1. ;;55966004837
  1. ;;9002226.02101,"1327,55966008903 ",.01)
  1. ;;55966008903
  1. ;;9002226.02101,"1327,55966008903 ",.02)
  1. ;;55966008903
  1. ;;9002226.02101,"1327,55966008909 ",.01)
  1. ;;55966008909
  1. ;;9002226.02101,"1327,55966008909 ",.02)
  1. ;;55966008909
  1. ;;9002226.02101,"1327,55966010706 ",.01)
  1. ;;55966010706
  1. ;;9002226.02101,"1327,55966010706 ",.02)
  1. ;;55966010706
  1. ;;9002226.02101,"1327,55966010709 ",.01)
  1. ;;55966010709
  1. ;;9002226.02101,"1327,55966010709 ",.02)
  1. ;;55966010709
  1. ;;9002226.02101,"1327,56062041678 ",.01)
  1. ;;56062041678
  1. ;;9002226.02101,"1327,56062041678 ",.02)
  1. ;;56062041678
  1. ;;9002226.02101,"1327,56062042902 ",.01)
  1. ;;56062042902
  1. ;;9002226.02101,"1327,56062042902 ",.02)
  1. ;;56062042902
  1. ;;9002226.02101,"1327,57394028652 ",.01)
  1. ;;57394028652
  1. ;;9002226.02101,"1327,57394028652 ",.02)
  1. ;;57394028652
  1. ;;9002226.02101,"1327,57394028662 ",.01)
  1. ;;57394028662
  1. ;;9002226.02101,"1327,57394028662 ",.02)
  1. ;;57394028662
  1. ;;9002226.02101,"1327,57480010601 ",.01)
  1. ;;57480010601
  1. ;;9002226.02101,"1327,57480010601 ",.02)
  1. ;;57480010601
  1. ;;9002226.02101,"1327,57480010606 ",.01)
  1. ;;57480010606
  1. ;;9002226.02101,"1327,57480010606 ",.02)
  1. ;;57480010606
  1. ;;9002226.02101,"1327,57561048002 ",.01)
  1. ;;57561048002
  1. ;;9002226.02101,"1327,57561048002 ",.02)
  1. ;;57561048002
  1. ;;9002226.02101,"1327,57664032706 ",.01)
  1. ;;57664032706
  1. ;;9002226.02101,"1327,57664032706 ",.02)
  1. ;;57664032706
  1. ;;9002226.02101,"1327,57664032713 ",.01)
  1. ;;57664032713
  1. ;;9002226.02101,"1327,57664032713 ",.02)
  1. ;;57664032713
  1. ;;9002226.02101,"1327,57664032783 ",.01)
  1. ;;57664032783
  1. ;;9002226.02101,"1327,57664032783 ",.02)
  1. ;;57664032783
  1. ;;9002226.02101,"1327,57866109003 ",.01)
  1. ;;57866109003
  1. ;;9002226.02101,"1327,57866109003 ",.02)
  1. ;;57866109003
  1. ;;9002226.02101,"1327,57866109103 ",.01)
  1. ;;57866109103
  1. ;;9002226.02101,"1327,57866109103 ",.02)
  1. ;;57866109103
  1. ;;9002226.02101,"1327,57896050001 ",.01)
  1. ;;57896050001
  1. ;;9002226.02101,"1327,57896050001 ",.02)
  1. ;;57896050001
  1. ;;9002226.02101,"1327,57896050010 ",.01)
  1. ;;57896050010
  1. ;;9002226.02101,"1327,57896050010 ",.02)
  1. ;;57896050010
  1. ;;9002226.02101,"1327,57896050101 ",.01)
  1. ;;57896050101
  1. ;;9002226.02101,"1327,57896050101 ",.02)
  1. ;;57896050101
  1. ;;9002226.02101,"1327,57896050110 ",.01)
  1. ;;57896050110
  1. ;;9002226.02101,"1327,57896050110 ",.02)
  1. ;;57896050110
  1. ;;9002226.02101,"1327,57896090101 ",.01)
  1. ;;57896090101
  1. ;;9002226.02101,"1327,57896090101 ",.02)
  1. ;;57896090101
  1. ;;9002226.02101,"1327,57896090110 ",.01)
  1. ;;57896090110
  1. ;;9002226.02101,"1327,57896090110 ",.02)
  1. ;;57896090110
  1. ;;9002226.02101,"1327,57896090125 ",.01)
  1. ;;57896090125
  1. ;;9002226.02101,"1327,57896090125 ",.02)
  1. ;;57896090125
  1. ;;9002226.02101,"1327,57896092101 ",.01)
  1. ;;57896092101
  1. ;;9002226.02101,"1327,57896092101 ",.02)
  1. ;;57896092101
  1. ;;9002226.02101,"1327,57896092110 ",.01)
  1. ;;57896092110
  1. ;;9002226.02101,"1327,57896092110 ",.02)
  1. ;;57896092110
  1. ;;9002226.02101,"1327,57896093101 ",.01)
  1. ;;57896093101
  1. ;;9002226.02101,"1327,57896093101 ",.02)
  1. ;;57896093101
  1. ;;9002226.02101,"1327,57896098101 ",.01)
  1. ;;57896098101
  1. ;;9002226.02101,"1327,57896098101 ",.02)
  1. ;;57896098101
  1. ;;9002226.02101,"1327,58005008051 ",.01)
  1. ;;58005008051
  1. ;;9002226.02101,"1327,58005008051 ",.02)
  1. ;;58005008051
  1. ;;9002226.02101,"1327,58005008075 ",.01)
  1. ;;58005008075
  1. ;;9002226.02101,"1327,58005008075 ",.02)
  1. ;;58005008075
  1. ;;9002226.02101,"1327,58005013103 ",.01)
  1. ;;58005013103
  1. ;;9002226.02101,"1327,58005013103 ",.02)
  1. ;;58005013103
  1. ;;9002226.02101,"1327,58005048002 ",.01)
  1. ;;58005048002
  1. ;;9002226.02101,"1327,58005048002 ",.02)
  1. ;;58005048002
  1. ;;9002226.02101,"1327,58016001401 ",.01)
  1. ;;58016001401
  1. ;;9002226.02101,"1327,58016001401 ",.02)
  1. ;;58016001401
  1. ;;9002226.02101,"1327,58016001402 ",.01)
  1. ;;58016001402
  1. ;;9002226.02101,"1327,58016001402 ",.02)
  1. ;;58016001402
  1. ;;9002226.02101,"1327,58016001403 ",.01)
  1. ;;58016001403
  1. ;;9002226.02101,"1327,58016001403 ",.02)
  1. ;;58016001403
  1. ;;9002226.02101,"1327,58016001404 ",.01)
  1. ;;58016001404
  1. ;;9002226.02101,"1327,58016001404 ",.02)
  1. ;;58016001404
  1. ;;9002226.02101,"1327,58016001405 ",.01)
  1. ;;58016001405
  1. ;;9002226.02101,"1327,58016001405 ",.02)
  1. ;;58016001405
  1. ;;9002226.02101,"1327,58016001406 ",.01)
  1. ;;58016001406
  1. ;;9002226.02101,"1327,58016001406 ",.02)
  1. ;;58016001406
  1. ;;9002226.02101,"1327,58016001407 ",.01)
  1. ;;58016001407
  1. ;;9002226.02101,"1327,58016001407 ",.02)
  1. ;;58016001407
  1. ;;9002226.02101,"1327,58016001408 ",.01)
  1. ;;58016001408
  1. ;;9002226.02101,"1327,58016001408 ",.02)
  1. ;;58016001408
  1. ;;9002226.02101,"1327,58016001409 ",.01)
  1. ;;58016001409
  1. ;;9002226.02101,"1327,58016001409 ",.02)
  1. ;;58016001409
  1. ;;9002226.02101,"1327,58016001410 ",.01)
  1. ;;58016001410
  1. ;;9002226.02101,"1327,58016001410 ",.02)
  1. ;;58016001410
  1. ;;9002226.02101,"1327,58016020700 ",.01)
  1. ;;58016020700
  1. ;;9002226.02101,"1327,58016020700 ",.02)
  1. ;;58016020700
  1. ;;9002226.02101,"1327,58016022500 ",.01)
  1. ;;58016022500
  1. ;;9002226.02101,"1327,58016022500 ",.02)
  1. ;;58016022500
  1. ;;9002226.02101,"1327,58016022520 ",.01)
  1. ;;58016022520
  1. ;;9002226.02101,"1327,58016022520 ",.02)
  1. ;;58016022520
  1. ;;9002226.02101,"1327,58016022530 ",.01)
  1. ;;58016022530
  1. ;;9002226.02101,"1327,58016022530 ",.02)
  1. ;;58016022530
  1. ;;9002226.02101,"1327,58016022560 ",.01)
  1. ;;58016022560
  1. ;;9002226.02101,"1327,58016022560 ",.02)
  1. ;;58016022560
  1. ;;9002226.02101,"1327,59088012059 ",.01)
  1. ;;59088012059
  1. ;;9002226.02101,"1327,59088012059 ",.02)
  1. ;;59088012059
  1. ;;9002226.02101,"1327,59618009915 ",.01)
  1. ;;59618009915
  1. ;;9002226.02101,"1327,59618009915 ",.02)
  1. ;;59618009915
  1. ;;9002226.02101,"1327,59779021807 ",.01)
  1. ;;59779021807
  1. ;;9002226.02101,"1327,59779021807 ",.02)
  1. ;;59779021807
  1. ;;9002226.02101,"1327,59779022712 ",.01)
  1. ;;59779022712
  1. ;;9002226.02101,"1327,59779022712 ",.02)
  1. ;;59779022712
  1. ;;9002226.02101,"1327,59779022713 ",.01)
  1. ;;59779022713
  1. ;;9002226.02101,"1327,59779022713 ",.02)
  1. ;;59779022713
  1. ;;9002226.02101,"1327,59779024916 ",.01)
  1. ;;59779024916
  1. ;;9002226.02101,"1327,59779024916 ",.02)
  1. ;;59779024916
  1. ;;9002226.02101,"1327,59779027408 ",.01)
  1. ;;59779027408
  1. ;;9002226.02101,"1327,59779027408 ",.02)
  1. ;;59779027408
  1. ;;9002226.02101,"1327,59779027468 ",.01)
  1. ;;59779027468
  1. ;;9002226.02101,"1327,59779027468 ",.02)
  1. ;;59779027468
  1. ;;9002226.02101,"1327,59779038912 ",.01)
  1. ;;59779038912
  1. ;;9002226.02101,"1327,59779038912 ",.02)
  1. ;;59779038912
  1. ;;9002226.02101,"1327,59779041405 ",.01)
  1. ;;59779041405
  1. ;;9002226.02101,"1327,59779041405 ",.02)
  1. ;;59779041405
  1. ;;9002226.02101,"1327,59779041407 ",.01)
  1. ;;59779041407
  1. ;;9002226.02101,"1327,59779041407 ",.02)
  1. ;;59779041407
  1. ;;9002226.02101,"1327,59779041412 ",.01)
  1. ;;59779041412
  1. ;;9002226.02101,"1327,59779041412 ",.02)
  1. ;;59779041412
  1. ;;9002226.02101,"1327,59779041417 ",.01)
  1. ;;59779041417
  1. ;;9002226.02101,"1327,59779041417 ",.02)
  1. ;;59779041417
  1. ;;9002226.02101,"1327,59779041432 ",.01)
  1. ;;59779041432
  1. ;;9002226.02101,"1327,59779041432 ",.02)
  1. ;;59779041432
  1. ;;9002226.02101,"1327,59779041678 ",.01)
  1. ;;59779041678
  1. ;;9002226.02101,"1327,59779041678 ",.02)
  1. ;;59779041678
  1. ;;9002226.02101,"1327,59779041687 ",.01)
  1. ;;59779041687
  1. ;;9002226.02101,"1327,59779041687 ",.02)
  1. ;;59779041687
  1. ;;9002226.02101,"1327,59779041690 ",.01)
  1. ;;59779041690
  1. ;;9002226.02101,"1327,59779041690 ",.02)
  1. ;;59779041690
  1. ;;9002226.02101,"1327,59779046708 ",.01)
  1. ;;59779046708
  1. ;;9002226.02101,"1327,59779046708 ",.02)
  1. ;;59779046708
  1. ;;9002226.02101,"1327,59779046768 ",.01)
  1. ;;59779046768
  1. ;;9002226.02101,"1327,59779046768 ",.02)
  1. ;;59779046768
  1. ;;9002226.02101,"1327,60429076405 ",.01)
  1. ;;60429076405
  1. ;;9002226.02101,"1327,60429076405 ",.02)
  1. ;;60429076405
  1. ;;9002226.02101,"1327,60429076430 ",.01)
  1. ;;60429076430
  1. ;;9002226.02101,"1327,60429076430 ",.02)
  1. ;;60429076430
  1. ;;9002226.02101,"1327,60429076460 ",.01)
  1. ;;60429076460
  1. ;;9002226.02101,"1327,60429076460 ",.02)
  1. ;;60429076460
  1. ;;9002226.02101,"1327,60505002702 ",.01)
  1. ;;60505002702
  1. ;;9002226.02101,"1327,60505002702 ",.02)
  1. ;;60505002702
  1. ;;9002226.02101,"1327,60505002704 ",.01)
  1. ;;60505002704
  1. ;;9002226.02101,"1327,60505002704 ",.02)
  1. ;;60505002704
  1. ;;9002226.02101,"1327,60505002707 ",.01)
  1. ;;60505002707
  1. ;;9002226.02101,"1327,60505002707 ",.02)
  1. ;;60505002707
  1. ;;9002226.02101,"1327,60505002709 ",.01)
  1. ;;60505002709
  1. ;;9002226.02101,"1327,60505002709 ",.02)
  1. ;;60505002709
  1. ;;9002226.02101,"1327,60505025301 ",.01)
  1. ;;60505025301
  1. ;;9002226.02101,"1327,60505025301 ",.02)
  1. ;;60505025301
  1. ;;9002226.02101,"1327,60505025302 ",.01)
  1. ;;60505025302
  1. ;;9002226.02101,"1327,60505025302 ",.02)
  1. ;;60505025302
  1. ;;9002226.02101,"1327,60505025303 ",.01)
  1. ;;60505025303
  1. ;;9002226.02101,"1327,60505025303 ",.02)
  1. ;;60505025303
  1. ;;9002226.02101,"1327,60505025304 ",.01)
  1. ;;60505025304
  1. ;;9002226.02101,"1327,60505025304 ",.02)
  1. ;;60505025304
  1. ;;9002226.02101,"1327,60809010855 ",.01)
  1. ;;60809010855
  1. ;;9002226.02101,"1327,60809010855 ",.02)
  1. ;;60809010855
  1. ;;9002226.02101,"1327,60809010872 ",.01)
  1. ;;60809010872
  1. ;;9002226.02101,"1327,60809010872 ",.02)
  1. ;;60809010872
  1. ;;9002226.02101,"1327,60814010901 ",.01)
  1. ;;60814010901
  1. ;;9002226.02101,"1327,60814010901 ",.02)
  1. ;;60814010901
  1. ;;9002226.02101,"1327,60814010910 ",.01)
  1. ;;60814010910
  1. ;;9002226.02101,"1327,60814010910 ",.02)
  1. ;;60814010910
  1. ;;9002226.02101,"1327,60814010999 ",.01)
  1. ;;60814010999
  1. ;;9002226.02101,"1327,60814010999 ",.02)
  1. ;;60814010999
  1. ;;9002226.02101,"1327,60814011010 ",.01)
  1. ;;60814011010
  1. ;;9002226.02101,"1327,60814011010 ",.02)
  1. ;;60814011010
  1. ;;9002226.02101,"1327,60814011025 ",.01)
  1. ;;60814011025
  1. ;;9002226.02101,"1327,60814011025 ",.02)
  1. ;;60814011025
  1. ;;9002226.02101,"1327,60814011110 ",.01)
  1. ;;60814011110
  1. ;;9002226.02101,"1327,60814011110 ",.02)
  1. ;;60814011110
  1. ;;9002226.02101,"1327,60814017536 ",.01)
  1. ;;60814017536
  1. ;;9002226.02101,"1327,60814017536 ",.02)
  1. ;;60814017536
  1. ;;9002226.02101,"1327,62107002507 ",.01)
  1. ;;62107002507
  1. ;;9002226.02101,"1327,62107002507 ",.02)
  1. ;;62107002507
  1. ;;9002226.02101,"1327,62107002532 ",.01)
  1. ;;62107002532
  1. ;;9002226.02101,"1327,62107002532 ",.02)
  1. ;;62107002532
  1. ;;9002226.02101,"1327,62107002636 ",.01)
  1. ;;62107002636
  1. ;;9002226.02101,"1327,62107002636 ",.02)
  1. ;;62107002636
  1. ;;9002226.02101,"1327,62107002726 ",.01)
  1. ;;62107002726
  1. ;;9002226.02101,"1327,62107002726 ",.02)
  1. ;;62107002726
  1. ;;9002226.02101,"1327,62107002732 ",.01)
  1. ;;62107002732
  1. ;;9002226.02101,"1327,62107002732 ",.02)
  1. ;;62107002732
  1. ;;9002226.02101,"1327,62211022050 ",.01)
  1. ;;62211022050
  1. ;;9002226.02101,"1327,62211022050 ",.02)
  1. ;;62211022050
  1. ;;9002226.02101,"1327,62211022099 ",.01)
  1. ;;62211022099
  1. ;;9002226.02101,"1327,62211022099 ",.02)
  1. ;;62211022099
  1. ;;9002226.02101,"1327,62211022540 ",.01)
  1. ;;62211022540
  1. ;;9002226.02101,"1327,62211022540 ",.02)
  1. ;;62211022540
  1. ;;9002226.02101,"1327,62211022599 ",.01)
  1. ;;62211022599
  1. ;;9002226.02101,"1327,62211022599 ",.02)
  1. ;;62211022599
  1. ;;9002226.02101,"1327,62211031201 ",.01)
  1. ;;62211031201
  1. ;;9002226.02101,"1327,62211031201 ",.02)
  1. ;;62211031201
  1. ;;9002226.02101,"1327,62211031299 ",.01)
  1. ;;62211031299