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

ATXD5P23.m

Go to the documentation of this file.
ATXD5P23 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON NOV 12, 2013;
 ;;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,"169,Y37.411A ",.01)
 ;;Y37.411A 
 ;;9002226.02101,"169,Y37.411A ",.02)
 ;;Y37.411A 
 ;;9002226.02101,"169,Y37.411A ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.411D ",.01)
 ;;Y37.411D 
 ;;9002226.02101,"169,Y37.411D ",.02)
 ;;Y37.411D 
 ;;9002226.02101,"169,Y37.411D ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.411S ",.01)
 ;;Y37.411S 
 ;;9002226.02101,"169,Y37.411S ",.02)
 ;;Y37.411S 
 ;;9002226.02101,"169,Y37.411S ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.420A ",.01)
 ;;Y37.420A 
 ;;9002226.02101,"169,Y37.420A ",.02)
 ;;Y37.420A 
 ;;9002226.02101,"169,Y37.420A ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.420D ",.01)
 ;;Y37.420D 
 ;;9002226.02101,"169,Y37.420D ",.02)
 ;;Y37.420D 
 ;;9002226.02101,"169,Y37.420D ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.420S ",.01)
 ;;Y37.420S 
 ;;9002226.02101,"169,Y37.420S ",.02)
 ;;Y37.420S 
 ;;9002226.02101,"169,Y37.420S ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.421A ",.01)
 ;;Y37.421A 
 ;;9002226.02101,"169,Y37.421A ",.02)
 ;;Y37.421A 
 ;;9002226.02101,"169,Y37.421A ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.421D ",.01)
 ;;Y37.421D 
 ;;9002226.02101,"169,Y37.421D ",.02)
 ;;Y37.421D 
 ;;9002226.02101,"169,Y37.421D ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.421S ",.01)
 ;;Y37.421S 
 ;;9002226.02101,"169,Y37.421S ",.02)
 ;;Y37.421S 
 ;;9002226.02101,"169,Y37.421S ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.430A ",.01)
 ;;Y37.430A 
 ;;9002226.02101,"169,Y37.430A ",.02)
 ;;Y37.430A 
 ;;9002226.02101,"169,Y37.430A ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.430D ",.01)
 ;;Y37.430D 
 ;;9002226.02101,"169,Y37.430D ",.02)
 ;;Y37.430D 
 ;;9002226.02101,"169,Y37.430D ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.430S ",.01)
 ;;Y37.430S 
 ;;9002226.02101,"169,Y37.430S ",.02)
 ;;Y37.430S 
 ;;9002226.02101,"169,Y37.430S ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.431A ",.01)
 ;;Y37.431A 
 ;;9002226.02101,"169,Y37.431A ",.02)
 ;;Y37.431A 
 ;;9002226.02101,"169,Y37.431A ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.431D ",.01)
 ;;Y37.431D 
 ;;9002226.02101,"169,Y37.431D ",.02)
 ;;Y37.431D 
 ;;9002226.02101,"169,Y37.431D ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.431S ",.01)
 ;;Y37.431S 
 ;;9002226.02101,"169,Y37.431S ",.02)
 ;;Y37.431S 
 ;;9002226.02101,"169,Y37.431S ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.440A ",.01)
 ;;Y37.440A 
 ;;9002226.02101,"169,Y37.440A ",.02)
 ;;Y37.440A 
 ;;9002226.02101,"169,Y37.440A ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.440D ",.01)
 ;;Y37.440D 
 ;;9002226.02101,"169,Y37.440D ",.02)
 ;;Y37.440D 
 ;;9002226.02101,"169,Y37.440D ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.440S ",.01)
 ;;Y37.440S 
 ;;9002226.02101,"169,Y37.440S ",.02)
 ;;Y37.440S 
 ;;9002226.02101,"169,Y37.440S ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.441A ",.01)
 ;;Y37.441A 
 ;;9002226.02101,"169,Y37.441A ",.02)
 ;;Y37.441A 
 ;;9002226.02101,"169,Y37.441A ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.441D ",.01)
 ;;Y37.441D 
 ;;9002226.02101,"169,Y37.441D ",.02)
 ;;Y37.441D 
 ;;9002226.02101,"169,Y37.441D ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.441S ",.01)
 ;;Y37.441S 
 ;;9002226.02101,"169,Y37.441S ",.02)
 ;;Y37.441S 
 ;;9002226.02101,"169,Y37.441S ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.450A ",.01)
 ;;Y37.450A 
 ;;9002226.02101,"169,Y37.450A ",.02)
 ;;Y37.450A 
 ;;9002226.02101,"169,Y37.450A ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.450D ",.01)
 ;;Y37.450D 
 ;;9002226.02101,"169,Y37.450D ",.02)
 ;;Y37.450D 
 ;;9002226.02101,"169,Y37.450D ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.450S ",.01)
 ;;Y37.450S 
 ;;9002226.02101,"169,Y37.450S ",.02)
 ;;Y37.450S 
 ;;9002226.02101,"169,Y37.450S ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.451A ",.01)
 ;;Y37.451A 
 ;;9002226.02101,"169,Y37.451A ",.02)
 ;;Y37.451A 
 ;;9002226.02101,"169,Y37.451A ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.451D ",.01)
 ;;Y37.451D 
 ;;9002226.02101,"169,Y37.451D ",.02)
 ;;Y37.451D 
 ;;9002226.02101,"169,Y37.451D ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.451S ",.01)
 ;;Y37.451S 
 ;;9002226.02101,"169,Y37.451S ",.02)
 ;;Y37.451S 
 ;;9002226.02101,"169,Y37.451S ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.460A ",.01)
 ;;Y37.460A 
 ;;9002226.02101,"169,Y37.460A ",.02)
 ;;Y37.460A 
 ;;9002226.02101,"169,Y37.460A ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.460D ",.01)
 ;;Y37.460D 
 ;;9002226.02101,"169,Y37.460D ",.02)
 ;;Y37.460D 
 ;;9002226.02101,"169,Y37.460D ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.460S ",.01)
 ;;Y37.460S 
 ;;9002226.02101,"169,Y37.460S ",.02)
 ;;Y37.460S 
 ;;9002226.02101,"169,Y37.460S ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.461A ",.01)
 ;;Y37.461A 
 ;;9002226.02101,"169,Y37.461A ",.02)
 ;;Y37.461A 
 ;;9002226.02101,"169,Y37.461A ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.461D ",.01)
 ;;Y37.461D 
 ;;9002226.02101,"169,Y37.461D ",.02)
 ;;Y37.461D 
 ;;9002226.02101,"169,Y37.461D ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.461S ",.01)
 ;;Y37.461S 
 ;;9002226.02101,"169,Y37.461S ",.02)
 ;;Y37.461S 
 ;;9002226.02101,"169,Y37.461S ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.470A ",.01)
 ;;Y37.470A 
 ;;9002226.02101,"169,Y37.470A ",.02)
 ;;Y37.470A 
 ;;9002226.02101,"169,Y37.470A ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.470D ",.01)
 ;;Y37.470D 
 ;;9002226.02101,"169,Y37.470D ",.02)
 ;;Y37.470D 
 ;;9002226.02101,"169,Y37.470D ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.470S ",.01)
 ;;Y37.470S 
 ;;9002226.02101,"169,Y37.470S ",.02)
 ;;Y37.470S 
 ;;9002226.02101,"169,Y37.470S ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.471A ",.01)
 ;;Y37.471A 
 ;;9002226.02101,"169,Y37.471A ",.02)
 ;;Y37.471A 
 ;;9002226.02101,"169,Y37.471A ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.471D ",.01)
 ;;Y37.471D 
 ;;9002226.02101,"169,Y37.471D ",.02)
 ;;Y37.471D 
 ;;9002226.02101,"169,Y37.471D ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.471S ",.01)
 ;;Y37.471S 
 ;;9002226.02101,"169,Y37.471S ",.02)
 ;;Y37.471S 
 ;;9002226.02101,"169,Y37.471S ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.490A ",.01)
 ;;Y37.490A 
 ;;9002226.02101,"169,Y37.490A ",.02)
 ;;Y37.490A 
 ;;9002226.02101,"169,Y37.490A ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.490D ",.01)
 ;;Y37.490D 
 ;;9002226.02101,"169,Y37.490D ",.02)
 ;;Y37.490D 
 ;;9002226.02101,"169,Y37.490D ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.490S ",.01)
 ;;Y37.490S 
 ;;9002226.02101,"169,Y37.490S ",.02)
 ;;Y37.490S 
 ;;9002226.02101,"169,Y37.490S ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.491A ",.01)
 ;;Y37.491A 
 ;;9002226.02101,"169,Y37.491A ",.02)
 ;;Y37.491A 
 ;;9002226.02101,"169,Y37.491A ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.491D ",.01)
 ;;Y37.491D 
 ;;9002226.02101,"169,Y37.491D ",.02)
 ;;Y37.491D 
 ;;9002226.02101,"169,Y37.491D ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.491S ",.01)
 ;;Y37.491S 
 ;;9002226.02101,"169,Y37.491S ",.02)
 ;;Y37.491S 
 ;;9002226.02101,"169,Y37.491S ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.500A ",.01)
 ;;Y37.500A 
 ;;9002226.02101,"169,Y37.500A ",.02)
 ;;Y37.500A 
 ;;9002226.02101,"169,Y37.500A ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.500D ",.01)
 ;;Y37.500D 
 ;;9002226.02101,"169,Y37.500D ",.02)
 ;;Y37.500D 
 ;;9002226.02101,"169,Y37.500D ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.500S ",.01)
 ;;Y37.500S 
 ;;9002226.02101,"169,Y37.500S ",.02)
 ;;Y37.500S 
 ;;9002226.02101,"169,Y37.500S ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.501A ",.01)
 ;;Y37.501A 
 ;;9002226.02101,"169,Y37.501A ",.02)
 ;;Y37.501A 
 ;;9002226.02101,"169,Y37.501A ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.501D ",.01)
 ;;Y37.501D 
 ;;9002226.02101,"169,Y37.501D ",.02)
 ;;Y37.501D 
 ;;9002226.02101,"169,Y37.501D ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.501S ",.01)
 ;;Y37.501S 
 ;;9002226.02101,"169,Y37.501S ",.02)
 ;;Y37.501S 
 ;;9002226.02101,"169,Y37.501S ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.510A ",.01)
 ;;Y37.510A 
 ;;9002226.02101,"169,Y37.510A ",.02)
 ;;Y37.510A 
 ;;9002226.02101,"169,Y37.510A ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.510D ",.01)
 ;;Y37.510D 
 ;;9002226.02101,"169,Y37.510D ",.02)
 ;;Y37.510D 
 ;;9002226.02101,"169,Y37.510D ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.510S ",.01)
 ;;Y37.510S 
 ;;9002226.02101,"169,Y37.510S ",.02)
 ;;Y37.510S 
 ;;9002226.02101,"169,Y37.510S ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.511A ",.01)
 ;;Y37.511A 
 ;;9002226.02101,"169,Y37.511A ",.02)
 ;;Y37.511A 
 ;;9002226.02101,"169,Y37.511A ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.511D ",.01)
 ;;Y37.511D 
 ;;9002226.02101,"169,Y37.511D ",.02)
 ;;Y37.511D 
 ;;9002226.02101,"169,Y37.511D ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.511S ",.01)
 ;;Y37.511S 
 ;;9002226.02101,"169,Y37.511S ",.02)
 ;;Y37.511S 
 ;;9002226.02101,"169,Y37.511S ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.520A ",.01)
 ;;Y37.520A 
 ;;9002226.02101,"169,Y37.520A ",.02)
 ;;Y37.520A 
 ;;9002226.02101,"169,Y37.520A ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.520D ",.01)
 ;;Y37.520D 
 ;;9002226.02101,"169,Y37.520D ",.02)
 ;;Y37.520D 
 ;;9002226.02101,"169,Y37.520D ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.520S ",.01)
 ;;Y37.520S 
 ;;9002226.02101,"169,Y37.520S ",.02)
 ;;Y37.520S 
 ;;9002226.02101,"169,Y37.520S ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.521A ",.01)
 ;;Y37.521A 
 ;;9002226.02101,"169,Y37.521A ",.02)
 ;;Y37.521A 
 ;;9002226.02101,"169,Y37.521A ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.521D ",.01)
 ;;Y37.521D 
 ;;9002226.02101,"169,Y37.521D ",.02)
 ;;Y37.521D 
 ;;9002226.02101,"169,Y37.521D ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.521S ",.01)
 ;;Y37.521S 
 ;;9002226.02101,"169,Y37.521S ",.02)
 ;;Y37.521S 
 ;;9002226.02101,"169,Y37.521S ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.530A ",.01)
 ;;Y37.530A 
 ;;9002226.02101,"169,Y37.530A ",.02)
 ;;Y37.530A 
 ;;9002226.02101,"169,Y37.530A ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.530D ",.01)
 ;;Y37.530D 
 ;;9002226.02101,"169,Y37.530D ",.02)
 ;;Y37.530D 
 ;;9002226.02101,"169,Y37.530D ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.530S ",.01)
 ;;Y37.530S 
 ;;9002226.02101,"169,Y37.530S ",.02)
 ;;Y37.530S 
 ;;9002226.02101,"169,Y37.530S ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.531A ",.01)
 ;;Y37.531A 
 ;;9002226.02101,"169,Y37.531A ",.02)
 ;;Y37.531A 
 ;;9002226.02101,"169,Y37.531A ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.531D ",.01)
 ;;Y37.531D 
 ;;9002226.02101,"169,Y37.531D ",.02)
 ;;Y37.531D 
 ;;9002226.02101,"169,Y37.531D ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.531S ",.01)
 ;;Y37.531S 
 ;;9002226.02101,"169,Y37.531S ",.02)
 ;;Y37.531S 
 ;;9002226.02101,"169,Y37.531S ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.540A ",.01)
 ;;Y37.540A 
 ;;9002226.02101,"169,Y37.540A ",.02)
 ;;Y37.540A 
 ;;9002226.02101,"169,Y37.540A ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.540D ",.01)
 ;;Y37.540D 
 ;;9002226.02101,"169,Y37.540D ",.02)
 ;;Y37.540D 
 ;;9002226.02101,"169,Y37.540D ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.540S ",.01)
 ;;Y37.540S 
 ;;9002226.02101,"169,Y37.540S ",.02)
 ;;Y37.540S 
 ;;9002226.02101,"169,Y37.540S ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.541A ",.01)
 ;;Y37.541A 
 ;;9002226.02101,"169,Y37.541A ",.02)
 ;;Y37.541A 
 ;;9002226.02101,"169,Y37.541A ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.541D ",.01)
 ;;Y37.541D 
 ;;9002226.02101,"169,Y37.541D ",.02)
 ;;Y37.541D 
 ;;9002226.02101,"169,Y37.541D ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.541S ",.01)
 ;;Y37.541S 
 ;;9002226.02101,"169,Y37.541S ",.02)
 ;;Y37.541S 
 ;;9002226.02101,"169,Y37.541S ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.590A ",.01)
 ;;Y37.590A 
 ;;9002226.02101,"169,Y37.590A ",.02)
 ;;Y37.590A 
 ;;9002226.02101,"169,Y37.590A ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.590D ",.01)
 ;;Y37.590D 
 ;;9002226.02101,"169,Y37.590D ",.02)
 ;;Y37.590D 
 ;;9002226.02101,"169,Y37.590D ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.590S ",.01)
 ;;Y37.590S 
 ;;9002226.02101,"169,Y37.590S ",.02)
 ;;Y37.590S 
 ;;9002226.02101,"169,Y37.590S ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.591A ",.01)
 ;;Y37.591A 
 ;;9002226.02101,"169,Y37.591A ",.02)
 ;;Y37.591A 
 ;;9002226.02101,"169,Y37.591A ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.591D ",.01)
 ;;Y37.591D 
 ;;9002226.02101,"169,Y37.591D ",.02)
 ;;Y37.591D 
 ;;9002226.02101,"169,Y37.591D ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.591S ",.01)
 ;;Y37.591S 
 ;;9002226.02101,"169,Y37.591S ",.02)
 ;;Y37.591S 
 ;;9002226.02101,"169,Y37.591S ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.6X0A ",.01)
 ;;Y37.6X0A 
 ;;9002226.02101,"169,Y37.6X0A ",.02)
 ;;Y37.6X0A 
 ;;9002226.02101,"169,Y37.6X0A ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.6X0D ",.01)
 ;;Y37.6X0D 
 ;;9002226.02101,"169,Y37.6X0D ",.02)
 ;;Y37.6X0D 
 ;;9002226.02101,"169,Y37.6X0D ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.6X0S ",.01)
 ;;Y37.6X0S 
 ;;9002226.02101,"169,Y37.6X0S ",.02)
 ;;Y37.6X0S 
 ;;9002226.02101,"169,Y37.6X0S ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.6X1A ",.01)
 ;;Y37.6X1A 
 ;;9002226.02101,"169,Y37.6X1A ",.02)
 ;;Y37.6X1A 
 ;;9002226.02101,"169,Y37.6X1A ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.6X1D ",.01)
 ;;Y37.6X1D 
 ;;9002226.02101,"169,Y37.6X1D ",.02)
 ;;Y37.6X1D 
 ;;9002226.02101,"169,Y37.6X1D ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.6X1S ",.01)
 ;;Y37.6X1S 
 ;;9002226.02101,"169,Y37.6X1S ",.02)
 ;;Y37.6X1S 
 ;;9002226.02101,"169,Y37.6X1S ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.7X0A ",.01)
 ;;Y37.7X0A 
 ;;9002226.02101,"169,Y37.7X0A ",.02)
 ;;Y37.7X0A 
 ;;9002226.02101,"169,Y37.7X0A ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.7X0D ",.01)
 ;;Y37.7X0D 
 ;;9002226.02101,"169,Y37.7X0D ",.02)
 ;;Y37.7X0D 
 ;;9002226.02101,"169,Y37.7X0D ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.7X0S ",.01)
 ;;Y37.7X0S 
 ;;9002226.02101,"169,Y37.7X0S ",.02)
 ;;Y37.7X0S