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

ATXXB58.m

Go to the documentation of this file.
ATXXB58 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON APR 29, 2014;
 ;;5.1;TAXONOMY;**11**;FEB 04, 1997;Build 48
 ;
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,"1804,069M00Z ",.01)
 ;;069M00Z 
 ;;9002226.02101,"1804,069M00Z ",.02)
 ;;069M00Z 
 ;;9002226.02101,"1804,069M00Z ",.03)
 ;;31
 ;;9002226.02101,"1804,069M0ZZ ",.01)
 ;;069M0ZZ 
 ;;9002226.02101,"1804,069M0ZZ ",.02)
 ;;069M0ZZ 
 ;;9002226.02101,"1804,069M0ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,069M30Z ",.01)
 ;;069M30Z 
 ;;9002226.02101,"1804,069M30Z ",.02)
 ;;069M30Z 
 ;;9002226.02101,"1804,069M30Z ",.03)
 ;;31
 ;;9002226.02101,"1804,069M3ZZ ",.01)
 ;;069M3ZZ 
 ;;9002226.02101,"1804,069M3ZZ ",.02)
 ;;069M3ZZ 
 ;;9002226.02101,"1804,069M3ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,069M40Z ",.01)
 ;;069M40Z 
 ;;9002226.02101,"1804,069M40Z ",.02)
 ;;069M40Z 
 ;;9002226.02101,"1804,069M40Z ",.03)
 ;;31
 ;;9002226.02101,"1804,069M4ZZ ",.01)
 ;;069M4ZZ 
 ;;9002226.02101,"1804,069M4ZZ ",.02)
 ;;069M4ZZ 
 ;;9002226.02101,"1804,069M4ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,069N00Z ",.01)
 ;;069N00Z 
 ;;9002226.02101,"1804,069N00Z ",.02)
 ;;069N00Z 
 ;;9002226.02101,"1804,069N00Z ",.03)
 ;;31
 ;;9002226.02101,"1804,069N0ZZ ",.01)
 ;;069N0ZZ 
 ;;9002226.02101,"1804,069N0ZZ ",.02)
 ;;069N0ZZ 
 ;;9002226.02101,"1804,069N0ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,069N30Z ",.01)
 ;;069N30Z 
 ;;9002226.02101,"1804,069N30Z ",.02)
 ;;069N30Z 
 ;;9002226.02101,"1804,069N30Z ",.03)
 ;;31
 ;;9002226.02101,"1804,069N3ZZ ",.01)
 ;;069N3ZZ 
 ;;9002226.02101,"1804,069N3ZZ ",.02)
 ;;069N3ZZ 
 ;;9002226.02101,"1804,069N3ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,069N40Z ",.01)
 ;;069N40Z 
 ;;9002226.02101,"1804,069N40Z ",.02)
 ;;069N40Z 
 ;;9002226.02101,"1804,069N40Z ",.03)
 ;;31
 ;;9002226.02101,"1804,069N4ZZ ",.01)
 ;;069N4ZZ 
 ;;9002226.02101,"1804,069N4ZZ ",.02)
 ;;069N4ZZ 
 ;;9002226.02101,"1804,069N4ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,069P00Z ",.01)
 ;;069P00Z 
 ;;9002226.02101,"1804,069P00Z ",.02)
 ;;069P00Z 
 ;;9002226.02101,"1804,069P00Z ",.03)
 ;;31
 ;;9002226.02101,"1804,069P0ZZ ",.01)
 ;;069P0ZZ 
 ;;9002226.02101,"1804,069P0ZZ ",.02)
 ;;069P0ZZ 
 ;;9002226.02101,"1804,069P0ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,069P30Z ",.01)
 ;;069P30Z 
 ;;9002226.02101,"1804,069P30Z ",.02)
 ;;069P30Z 
 ;;9002226.02101,"1804,069P30Z ",.03)
 ;;31
 ;;9002226.02101,"1804,069P3ZZ ",.01)
 ;;069P3ZZ 
 ;;9002226.02101,"1804,069P3ZZ ",.02)
 ;;069P3ZZ 
 ;;9002226.02101,"1804,069P3ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,069P40Z ",.01)
 ;;069P40Z 
 ;;9002226.02101,"1804,069P40Z ",.02)
 ;;069P40Z 
 ;;9002226.02101,"1804,069P40Z ",.03)
 ;;31
 ;;9002226.02101,"1804,069P4ZZ ",.01)
 ;;069P4ZZ 
 ;;9002226.02101,"1804,069P4ZZ ",.02)
 ;;069P4ZZ 
 ;;9002226.02101,"1804,069P4ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,069Q00Z ",.01)
 ;;069Q00Z 
 ;;9002226.02101,"1804,069Q00Z ",.02)
 ;;069Q00Z 
 ;;9002226.02101,"1804,069Q00Z ",.03)
 ;;31
 ;;9002226.02101,"1804,069Q0ZZ ",.01)
 ;;069Q0ZZ 
 ;;9002226.02101,"1804,069Q0ZZ ",.02)
 ;;069Q0ZZ 
 ;;9002226.02101,"1804,069Q0ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,069Q30Z ",.01)
 ;;069Q30Z 
 ;;9002226.02101,"1804,069Q30Z ",.02)
 ;;069Q30Z 
 ;;9002226.02101,"1804,069Q30Z ",.03)
 ;;31
 ;;9002226.02101,"1804,069Q3ZZ ",.01)
 ;;069Q3ZZ 
 ;;9002226.02101,"1804,069Q3ZZ ",.02)
 ;;069Q3ZZ 
 ;;9002226.02101,"1804,069Q3ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,069Q40Z ",.01)
 ;;069Q40Z 
 ;;9002226.02101,"1804,069Q40Z ",.02)
 ;;069Q40Z 
 ;;9002226.02101,"1804,069Q40Z ",.03)
 ;;31
 ;;9002226.02101,"1804,069Q4ZZ ",.01)
 ;;069Q4ZZ 
 ;;9002226.02101,"1804,069Q4ZZ ",.02)
 ;;069Q4ZZ 
 ;;9002226.02101,"1804,069Q4ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,069R00Z ",.01)
 ;;069R00Z 
 ;;9002226.02101,"1804,069R00Z ",.02)
 ;;069R00Z 
 ;;9002226.02101,"1804,069R00Z ",.03)
 ;;31
 ;;9002226.02101,"1804,069R0ZZ ",.01)
 ;;069R0ZZ 
 ;;9002226.02101,"1804,069R0ZZ ",.02)
 ;;069R0ZZ 
 ;;9002226.02101,"1804,069R0ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,069R30Z ",.01)
 ;;069R30Z 
 ;;9002226.02101,"1804,069R30Z ",.02)
 ;;069R30Z 
 ;;9002226.02101,"1804,069R30Z ",.03)
 ;;31
 ;;9002226.02101,"1804,069R3ZZ ",.01)
 ;;069R3ZZ 
 ;;9002226.02101,"1804,069R3ZZ ",.02)
 ;;069R3ZZ 
 ;;9002226.02101,"1804,069R3ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,069R40Z ",.01)
 ;;069R40Z 
 ;;9002226.02101,"1804,069R40Z ",.02)
 ;;069R40Z 
 ;;9002226.02101,"1804,069R40Z ",.03)
 ;;31
 ;;9002226.02101,"1804,069R4ZZ ",.01)
 ;;069R4ZZ 
 ;;9002226.02101,"1804,069R4ZZ ",.02)
 ;;069R4ZZ 
 ;;9002226.02101,"1804,069R4ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,069S00Z ",.01)
 ;;069S00Z 
 ;;9002226.02101,"1804,069S00Z ",.02)
 ;;069S00Z 
 ;;9002226.02101,"1804,069S00Z ",.03)
 ;;31
 ;;9002226.02101,"1804,069S0ZZ ",.01)
 ;;069S0ZZ 
 ;;9002226.02101,"1804,069S0ZZ ",.02)
 ;;069S0ZZ 
 ;;9002226.02101,"1804,069S0ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,069S30Z ",.01)
 ;;069S30Z 
 ;;9002226.02101,"1804,069S30Z ",.02)
 ;;069S30Z 
 ;;9002226.02101,"1804,069S30Z ",.03)
 ;;31
 ;;9002226.02101,"1804,069S3ZZ ",.01)
 ;;069S3ZZ 
 ;;9002226.02101,"1804,069S3ZZ ",.02)
 ;;069S3ZZ 
 ;;9002226.02101,"1804,069S3ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,069S40Z ",.01)
 ;;069S40Z 
 ;;9002226.02101,"1804,069S40Z ",.02)
 ;;069S40Z 
 ;;9002226.02101,"1804,069S40Z ",.03)
 ;;31
 ;;9002226.02101,"1804,069S4ZZ ",.01)
 ;;069S4ZZ 
 ;;9002226.02101,"1804,069S4ZZ ",.02)
 ;;069S4ZZ 
 ;;9002226.02101,"1804,069S4ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,069T00Z ",.01)
 ;;069T00Z 
 ;;9002226.02101,"1804,069T00Z ",.02)
 ;;069T00Z 
 ;;9002226.02101,"1804,069T00Z ",.03)
 ;;31
 ;;9002226.02101,"1804,069T0ZZ ",.01)
 ;;069T0ZZ 
 ;;9002226.02101,"1804,069T0ZZ ",.02)
 ;;069T0ZZ 
 ;;9002226.02101,"1804,069T0ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,069T30Z ",.01)
 ;;069T30Z 
 ;;9002226.02101,"1804,069T30Z ",.02)
 ;;069T30Z 
 ;;9002226.02101,"1804,069T30Z ",.03)
 ;;31
 ;;9002226.02101,"1804,069T3ZZ ",.01)
 ;;069T3ZZ 
 ;;9002226.02101,"1804,069T3ZZ ",.02)
 ;;069T3ZZ 
 ;;9002226.02101,"1804,069T3ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,069T40Z ",.01)
 ;;069T40Z 
 ;;9002226.02101,"1804,069T40Z ",.02)
 ;;069T40Z 
 ;;9002226.02101,"1804,069T40Z ",.03)
 ;;31
 ;;9002226.02101,"1804,069T4ZZ ",.01)
 ;;069T4ZZ 
 ;;9002226.02101,"1804,069T4ZZ ",.02)
 ;;069T4ZZ 
 ;;9002226.02101,"1804,069T4ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,069V00Z ",.01)
 ;;069V00Z 
 ;;9002226.02101,"1804,069V00Z ",.02)
 ;;069V00Z 
 ;;9002226.02101,"1804,069V00Z ",.03)
 ;;31
 ;;9002226.02101,"1804,069V0ZZ ",.01)
 ;;069V0ZZ 
 ;;9002226.02101,"1804,069V0ZZ ",.02)
 ;;069V0ZZ 
 ;;9002226.02101,"1804,069V0ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,069V30Z ",.01)
 ;;069V30Z 
 ;;9002226.02101,"1804,069V30Z ",.02)
 ;;069V30Z 
 ;;9002226.02101,"1804,069V30Z ",.03)
 ;;31
 ;;9002226.02101,"1804,069V3ZZ ",.01)
 ;;069V3ZZ 
 ;;9002226.02101,"1804,069V3ZZ ",.02)
 ;;069V3ZZ 
 ;;9002226.02101,"1804,069V3ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,069V40Z ",.01)
 ;;069V40Z 
 ;;9002226.02101,"1804,069V40Z ",.02)
 ;;069V40Z 
 ;;9002226.02101,"1804,069V40Z ",.03)
 ;;31
 ;;9002226.02101,"1804,069V4ZZ ",.01)
 ;;069V4ZZ 
 ;;9002226.02101,"1804,069V4ZZ ",.02)
 ;;069V4ZZ 
 ;;9002226.02101,"1804,069V4ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,069Y00Z ",.01)
 ;;069Y00Z 
 ;;9002226.02101,"1804,069Y00Z ",.02)
 ;;069Y00Z 
 ;;9002226.02101,"1804,069Y00Z ",.03)
 ;;31
 ;;9002226.02101,"1804,069Y0ZZ ",.01)
 ;;069Y0ZZ 
 ;;9002226.02101,"1804,069Y0ZZ ",.02)
 ;;069Y0ZZ 
 ;;9002226.02101,"1804,069Y0ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,069Y30Z ",.01)
 ;;069Y30Z 
 ;;9002226.02101,"1804,069Y30Z ",.02)
 ;;069Y30Z 
 ;;9002226.02101,"1804,069Y30Z ",.03)
 ;;31
 ;;9002226.02101,"1804,069Y3ZZ ",.01)
 ;;069Y3ZZ 
 ;;9002226.02101,"1804,069Y3ZZ ",.02)
 ;;069Y3ZZ 
 ;;9002226.02101,"1804,069Y3ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,069Y40Z ",.01)
 ;;069Y40Z 
 ;;9002226.02101,"1804,069Y40Z ",.02)
 ;;069Y40Z 
 ;;9002226.02101,"1804,069Y40Z ",.03)
 ;;31
 ;;9002226.02101,"1804,069Y4ZZ ",.01)
 ;;069Y4ZZ 
 ;;9002226.02101,"1804,069Y4ZZ ",.02)
 ;;069Y4ZZ 
 ;;9002226.02101,"1804,069Y4ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,06H003T ",.01)
 ;;06H003T 
 ;;9002226.02101,"1804,06H003T ",.02)
 ;;06H003T 
 ;;9002226.02101,"1804,06H003T ",.03)
 ;;31
 ;;9002226.02101,"1804,06H003Z ",.01)
 ;;06H003Z 
 ;;9002226.02101,"1804,06H003Z ",.02)
 ;;06H003Z 
 ;;9002226.02101,"1804,06H003Z ",.03)
 ;;31
 ;;9002226.02101,"1804,06H033T ",.01)
 ;;06H033T 
 ;;9002226.02101,"1804,06H033T ",.02)
 ;;06H033T 
 ;;9002226.02101,"1804,06H033T ",.03)
 ;;31
 ;;9002226.02101,"1804,06H033Z ",.01)
 ;;06H033Z 
 ;;9002226.02101,"1804,06H033Z ",.02)
 ;;06H033Z 
 ;;9002226.02101,"1804,06H033Z ",.03)
 ;;31
 ;;9002226.02101,"1804,06H043Z ",.01)
 ;;06H043Z 
 ;;9002226.02101,"1804,06H043Z ",.02)
 ;;06H043Z 
 ;;9002226.02101,"1804,06H043Z ",.03)
 ;;31
 ;;9002226.02101,"1804,06H103Z ",.01)
 ;;06H103Z 
 ;;9002226.02101,"1804,06H103Z ",.02)
 ;;06H103Z 
 ;;9002226.02101,"1804,06H103Z ",.03)
 ;;31
 ;;9002226.02101,"1804,06H133Z ",.01)
 ;;06H133Z 
 ;;9002226.02101,"1804,06H133Z ",.02)
 ;;06H133Z 
 ;;9002226.02101,"1804,06H133Z ",.03)
 ;;31
 ;;9002226.02101,"1804,06H143Z ",.01)
 ;;06H143Z 
 ;;9002226.02101,"1804,06H143Z ",.02)
 ;;06H143Z 
 ;;9002226.02101,"1804,06H143Z ",.03)
 ;;31
 ;;9002226.02101,"1804,06H203Z ",.01)
 ;;06H203Z 
 ;;9002226.02101,"1804,06H203Z ",.02)
 ;;06H203Z 
 ;;9002226.02101,"1804,06H203Z ",.03)
 ;;31
 ;;9002226.02101,"1804,06H233Z ",.01)
 ;;06H233Z 
 ;;9002226.02101,"1804,06H233Z ",.02)
 ;;06H233Z 
 ;;9002226.02101,"1804,06H233Z ",.03)
 ;;31
 ;;9002226.02101,"1804,06H243Z ",.01)
 ;;06H243Z 
 ;;9002226.02101,"1804,06H243Z ",.02)
 ;;06H243Z 
 ;;9002226.02101,"1804,06H243Z ",.03)
 ;;31
 ;;9002226.02101,"1804,06H303Z ",.01)
 ;;06H303Z 
 ;;9002226.02101,"1804,06H303Z ",.02)
 ;;06H303Z 
 ;;9002226.02101,"1804,06H303Z ",.03)
 ;;31
 ;;9002226.02101,"1804,06H333Z ",.01)
 ;;06H333Z 
 ;;9002226.02101,"1804,06H333Z ",.02)
 ;;06H333Z 
 ;;9002226.02101,"1804,06H333Z ",.03)
 ;;31
 ;;9002226.02101,"1804,06H343Z ",.01)
 ;;06H343Z 
 ;;9002226.02101,"1804,06H343Z ",.02)
 ;;06H343Z 
 ;;9002226.02101,"1804,06H343Z ",.03)
 ;;31
 ;;9002226.02101,"1804,06H403Z ",.01)
 ;;06H403Z 
 ;;9002226.02101,"1804,06H403Z ",.02)
 ;;06H403Z 
 ;;9002226.02101,"1804,06H403Z ",.03)
 ;;31
 ;;9002226.02101,"1804,06H433Z ",.01)
 ;;06H433Z 
 ;;9002226.02101,"1804,06H433Z ",.02)
 ;;06H433Z 
 ;;9002226.02101,"1804,06H433Z ",.03)
 ;;31
 ;;9002226.02101,"1804,06H443Z ",.01)
 ;;06H443Z 
 ;;9002226.02101,"1804,06H443Z ",.02)
 ;;06H443Z 
 ;;9002226.02101,"1804,06H443Z ",.03)
 ;;31
 ;;9002226.02101,"1804,06H503Z ",.01)
 ;;06H503Z 
 ;;9002226.02101,"1804,06H503Z ",.02)
 ;;06H503Z 
 ;;9002226.02101,"1804,06H503Z ",.03)
 ;;31
 ;;9002226.02101,"1804,06H533Z ",.01)
 ;;06H533Z 
 ;;9002226.02101,"1804,06H533Z ",.02)
 ;;06H533Z 
 ;;9002226.02101,"1804,06H533Z ",.03)
 ;;31
 ;;9002226.02101,"1804,06H543Z ",.01)
 ;;06H543Z 
 ;;9002226.02101,"1804,06H543Z ",.02)
 ;;06H543Z 
 ;;9002226.02101,"1804,06H543Z ",.03)
 ;;31
 ;;9002226.02101,"1804,06H603Z ",.01)
 ;;06H603Z 
 ;;9002226.02101,"1804,06H603Z ",.02)
 ;;06H603Z 
 ;;9002226.02101,"1804,06H603Z ",.03)
 ;;31
 ;;9002226.02101,"1804,06H633Z ",.01)
 ;;06H633Z 
 ;;9002226.02101,"1804,06H633Z ",.02)
 ;;06H633Z 
 ;;9002226.02101,"1804,06H633Z ",.03)
 ;;31
 ;;9002226.02101,"1804,06H643Z ",.01)
 ;;06H643Z 
 ;;9002226.02101,"1804,06H643Z ",.02)
 ;;06H643Z 
 ;;9002226.02101,"1804,06H643Z ",.03)
 ;;31
 ;;9002226.02101,"1804,06H703Z ",.01)
 ;;06H703Z 
 ;;9002226.02101,"1804,06H703Z ",.02)
 ;;06H703Z 
 ;;9002226.02101,"1804,06H703Z ",.03)
 ;;31
 ;;9002226.02101,"1804,06H733Z ",.01)
 ;;06H733Z