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

ATXD5P22.m

Go to the documentation of this file.
ATXD5P22 ;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.191A ",.02)
 ;;Y37.191A 
 ;;9002226.02101,"169,Y37.191A ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.191D ",.01)
 ;;Y37.191D 
 ;;9002226.02101,"169,Y37.191D ",.02)
 ;;Y37.191D 
 ;;9002226.02101,"169,Y37.191D ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.191S ",.01)
 ;;Y37.191S 
 ;;9002226.02101,"169,Y37.191S ",.02)
 ;;Y37.191S 
 ;;9002226.02101,"169,Y37.191S ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.200A ",.01)
 ;;Y37.200A 
 ;;9002226.02101,"169,Y37.200A ",.02)
 ;;Y37.200A 
 ;;9002226.02101,"169,Y37.200A ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.200D ",.01)
 ;;Y37.200D 
 ;;9002226.02101,"169,Y37.200D ",.02)
 ;;Y37.200D 
 ;;9002226.02101,"169,Y37.200D ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.200S ",.01)
 ;;Y37.200S 
 ;;9002226.02101,"169,Y37.200S ",.02)
 ;;Y37.200S 
 ;;9002226.02101,"169,Y37.200S ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.201A ",.01)
 ;;Y37.201A 
 ;;9002226.02101,"169,Y37.201A ",.02)
 ;;Y37.201A 
 ;;9002226.02101,"169,Y37.201A ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.201D ",.01)
 ;;Y37.201D 
 ;;9002226.02101,"169,Y37.201D ",.02)
 ;;Y37.201D 
 ;;9002226.02101,"169,Y37.201D ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.201S ",.01)
 ;;Y37.201S 
 ;;9002226.02101,"169,Y37.201S ",.02)
 ;;Y37.201S 
 ;;9002226.02101,"169,Y37.201S ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.210A ",.01)
 ;;Y37.210A 
 ;;9002226.02101,"169,Y37.210A ",.02)
 ;;Y37.210A 
 ;;9002226.02101,"169,Y37.210A ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.210D ",.01)
 ;;Y37.210D 
 ;;9002226.02101,"169,Y37.210D ",.02)
 ;;Y37.210D 
 ;;9002226.02101,"169,Y37.210D ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.210S ",.01)
 ;;Y37.210S 
 ;;9002226.02101,"169,Y37.210S ",.02)
 ;;Y37.210S 
 ;;9002226.02101,"169,Y37.210S ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.211A ",.01)
 ;;Y37.211A 
 ;;9002226.02101,"169,Y37.211A ",.02)
 ;;Y37.211A 
 ;;9002226.02101,"169,Y37.211A ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.211D ",.01)
 ;;Y37.211D 
 ;;9002226.02101,"169,Y37.211D ",.02)
 ;;Y37.211D 
 ;;9002226.02101,"169,Y37.211D ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.211S ",.01)
 ;;Y37.211S 
 ;;9002226.02101,"169,Y37.211S ",.02)
 ;;Y37.211S 
 ;;9002226.02101,"169,Y37.211S ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.220A ",.01)
 ;;Y37.220A 
 ;;9002226.02101,"169,Y37.220A ",.02)
 ;;Y37.220A 
 ;;9002226.02101,"169,Y37.220A ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.220D ",.01)
 ;;Y37.220D 
 ;;9002226.02101,"169,Y37.220D ",.02)
 ;;Y37.220D 
 ;;9002226.02101,"169,Y37.220D ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.220S ",.01)
 ;;Y37.220S 
 ;;9002226.02101,"169,Y37.220S ",.02)
 ;;Y37.220S 
 ;;9002226.02101,"169,Y37.220S ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.221A ",.01)
 ;;Y37.221A 
 ;;9002226.02101,"169,Y37.221A ",.02)
 ;;Y37.221A 
 ;;9002226.02101,"169,Y37.221A ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.221D ",.01)
 ;;Y37.221D 
 ;;9002226.02101,"169,Y37.221D ",.02)
 ;;Y37.221D 
 ;;9002226.02101,"169,Y37.221D ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.221S ",.01)
 ;;Y37.221S 
 ;;9002226.02101,"169,Y37.221S ",.02)
 ;;Y37.221S 
 ;;9002226.02101,"169,Y37.221S ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.230A ",.01)
 ;;Y37.230A 
 ;;9002226.02101,"169,Y37.230A ",.02)
 ;;Y37.230A 
 ;;9002226.02101,"169,Y37.230A ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.230D ",.01)
 ;;Y37.230D 
 ;;9002226.02101,"169,Y37.230D ",.02)
 ;;Y37.230D 
 ;;9002226.02101,"169,Y37.230D ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.230S ",.01)
 ;;Y37.230S 
 ;;9002226.02101,"169,Y37.230S ",.02)
 ;;Y37.230S 
 ;;9002226.02101,"169,Y37.230S ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.231A ",.01)
 ;;Y37.231A 
 ;;9002226.02101,"169,Y37.231A ",.02)
 ;;Y37.231A 
 ;;9002226.02101,"169,Y37.231A ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.231D ",.01)
 ;;Y37.231D 
 ;;9002226.02101,"169,Y37.231D ",.02)
 ;;Y37.231D 
 ;;9002226.02101,"169,Y37.231D ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.231S ",.01)
 ;;Y37.231S 
 ;;9002226.02101,"169,Y37.231S ",.02)
 ;;Y37.231S 
 ;;9002226.02101,"169,Y37.231S ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.240A ",.01)
 ;;Y37.240A 
 ;;9002226.02101,"169,Y37.240A ",.02)
 ;;Y37.240A 
 ;;9002226.02101,"169,Y37.240A ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.240D ",.01)
 ;;Y37.240D 
 ;;9002226.02101,"169,Y37.240D ",.02)
 ;;Y37.240D 
 ;;9002226.02101,"169,Y37.240D ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.240S ",.01)
 ;;Y37.240S 
 ;;9002226.02101,"169,Y37.240S ",.02)
 ;;Y37.240S 
 ;;9002226.02101,"169,Y37.240S ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.241A ",.01)
 ;;Y37.241A 
 ;;9002226.02101,"169,Y37.241A ",.02)
 ;;Y37.241A 
 ;;9002226.02101,"169,Y37.241A ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.241D ",.01)
 ;;Y37.241D 
 ;;9002226.02101,"169,Y37.241D ",.02)
 ;;Y37.241D 
 ;;9002226.02101,"169,Y37.241D ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.241S ",.01)
 ;;Y37.241S 
 ;;9002226.02101,"169,Y37.241S ",.02)
 ;;Y37.241S 
 ;;9002226.02101,"169,Y37.241S ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.250A ",.01)
 ;;Y37.250A 
 ;;9002226.02101,"169,Y37.250A ",.02)
 ;;Y37.250A 
 ;;9002226.02101,"169,Y37.250A ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.250D ",.01)
 ;;Y37.250D 
 ;;9002226.02101,"169,Y37.250D ",.02)
 ;;Y37.250D 
 ;;9002226.02101,"169,Y37.250D ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.250S ",.01)
 ;;Y37.250S 
 ;;9002226.02101,"169,Y37.250S ",.02)
 ;;Y37.250S 
 ;;9002226.02101,"169,Y37.250S ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.251A ",.01)
 ;;Y37.251A 
 ;;9002226.02101,"169,Y37.251A ",.02)
 ;;Y37.251A 
 ;;9002226.02101,"169,Y37.251A ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.251D ",.01)
 ;;Y37.251D 
 ;;9002226.02101,"169,Y37.251D ",.02)
 ;;Y37.251D 
 ;;9002226.02101,"169,Y37.251D ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.251S ",.01)
 ;;Y37.251S 
 ;;9002226.02101,"169,Y37.251S ",.02)
 ;;Y37.251S 
 ;;9002226.02101,"169,Y37.251S ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.260A ",.01)
 ;;Y37.260A 
 ;;9002226.02101,"169,Y37.260A ",.02)
 ;;Y37.260A 
 ;;9002226.02101,"169,Y37.260A ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.260D ",.01)
 ;;Y37.260D 
 ;;9002226.02101,"169,Y37.260D ",.02)
 ;;Y37.260D 
 ;;9002226.02101,"169,Y37.260D ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.260S ",.01)
 ;;Y37.260S 
 ;;9002226.02101,"169,Y37.260S ",.02)
 ;;Y37.260S 
 ;;9002226.02101,"169,Y37.260S ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.261A ",.01)
 ;;Y37.261A 
 ;;9002226.02101,"169,Y37.261A ",.02)
 ;;Y37.261A 
 ;;9002226.02101,"169,Y37.261A ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.261D ",.01)
 ;;Y37.261D 
 ;;9002226.02101,"169,Y37.261D ",.02)
 ;;Y37.261D 
 ;;9002226.02101,"169,Y37.261D ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.261S ",.01)
 ;;Y37.261S 
 ;;9002226.02101,"169,Y37.261S ",.02)
 ;;Y37.261S 
 ;;9002226.02101,"169,Y37.261S ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.270A ",.01)
 ;;Y37.270A 
 ;;9002226.02101,"169,Y37.270A ",.02)
 ;;Y37.270A 
 ;;9002226.02101,"169,Y37.270A ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.270D ",.01)
 ;;Y37.270D 
 ;;9002226.02101,"169,Y37.270D ",.02)
 ;;Y37.270D 
 ;;9002226.02101,"169,Y37.270D ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.270S ",.01)
 ;;Y37.270S 
 ;;9002226.02101,"169,Y37.270S ",.02)
 ;;Y37.270S 
 ;;9002226.02101,"169,Y37.270S ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.271A ",.01)
 ;;Y37.271A 
 ;;9002226.02101,"169,Y37.271A ",.02)
 ;;Y37.271A 
 ;;9002226.02101,"169,Y37.271A ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.271D ",.01)
 ;;Y37.271D 
 ;;9002226.02101,"169,Y37.271D ",.02)
 ;;Y37.271D 
 ;;9002226.02101,"169,Y37.271D ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.271S ",.01)
 ;;Y37.271S 
 ;;9002226.02101,"169,Y37.271S ",.02)
 ;;Y37.271S 
 ;;9002226.02101,"169,Y37.271S ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.290A ",.01)
 ;;Y37.290A 
 ;;9002226.02101,"169,Y37.290A ",.02)
 ;;Y37.290A 
 ;;9002226.02101,"169,Y37.290A ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.290D ",.01)
 ;;Y37.290D 
 ;;9002226.02101,"169,Y37.290D ",.02)
 ;;Y37.290D 
 ;;9002226.02101,"169,Y37.290D ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.290S ",.01)
 ;;Y37.290S 
 ;;9002226.02101,"169,Y37.290S ",.02)
 ;;Y37.290S 
 ;;9002226.02101,"169,Y37.290S ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.291A ",.01)
 ;;Y37.291A 
 ;;9002226.02101,"169,Y37.291A ",.02)
 ;;Y37.291A 
 ;;9002226.02101,"169,Y37.291A ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.291D ",.01)
 ;;Y37.291D 
 ;;9002226.02101,"169,Y37.291D ",.02)
 ;;Y37.291D 
 ;;9002226.02101,"169,Y37.291D ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.291S ",.01)
 ;;Y37.291S 
 ;;9002226.02101,"169,Y37.291S ",.02)
 ;;Y37.291S 
 ;;9002226.02101,"169,Y37.291S ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.300A ",.01)
 ;;Y37.300A 
 ;;9002226.02101,"169,Y37.300A ",.02)
 ;;Y37.300A 
 ;;9002226.02101,"169,Y37.300A ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.300D ",.01)
 ;;Y37.300D 
 ;;9002226.02101,"169,Y37.300D ",.02)
 ;;Y37.300D 
 ;;9002226.02101,"169,Y37.300D ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.300S ",.01)
 ;;Y37.300S 
 ;;9002226.02101,"169,Y37.300S ",.02)
 ;;Y37.300S 
 ;;9002226.02101,"169,Y37.300S ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.301A ",.01)
 ;;Y37.301A 
 ;;9002226.02101,"169,Y37.301A ",.02)
 ;;Y37.301A 
 ;;9002226.02101,"169,Y37.301A ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.301D ",.01)
 ;;Y37.301D 
 ;;9002226.02101,"169,Y37.301D ",.02)
 ;;Y37.301D 
 ;;9002226.02101,"169,Y37.301D ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.301S ",.01)
 ;;Y37.301S 
 ;;9002226.02101,"169,Y37.301S ",.02)
 ;;Y37.301S 
 ;;9002226.02101,"169,Y37.301S ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.310A ",.01)
 ;;Y37.310A 
 ;;9002226.02101,"169,Y37.310A ",.02)
 ;;Y37.310A 
 ;;9002226.02101,"169,Y37.310A ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.310D ",.01)
 ;;Y37.310D 
 ;;9002226.02101,"169,Y37.310D ",.02)
 ;;Y37.310D 
 ;;9002226.02101,"169,Y37.310D ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.310S ",.01)
 ;;Y37.310S 
 ;;9002226.02101,"169,Y37.310S ",.02)
 ;;Y37.310S 
 ;;9002226.02101,"169,Y37.310S ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.311A ",.01)
 ;;Y37.311A 
 ;;9002226.02101,"169,Y37.311A ",.02)
 ;;Y37.311A 
 ;;9002226.02101,"169,Y37.311A ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.311D ",.01)
 ;;Y37.311D 
 ;;9002226.02101,"169,Y37.311D ",.02)
 ;;Y37.311D 
 ;;9002226.02101,"169,Y37.311D ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.311S ",.01)
 ;;Y37.311S 
 ;;9002226.02101,"169,Y37.311S ",.02)
 ;;Y37.311S 
 ;;9002226.02101,"169,Y37.311S ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.320A ",.01)
 ;;Y37.320A 
 ;;9002226.02101,"169,Y37.320A ",.02)
 ;;Y37.320A 
 ;;9002226.02101,"169,Y37.320A ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.320D ",.01)
 ;;Y37.320D 
 ;;9002226.02101,"169,Y37.320D ",.02)
 ;;Y37.320D 
 ;;9002226.02101,"169,Y37.320D ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.320S ",.01)
 ;;Y37.320S 
 ;;9002226.02101,"169,Y37.320S ",.02)
 ;;Y37.320S 
 ;;9002226.02101,"169,Y37.320S ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.321A ",.01)
 ;;Y37.321A 
 ;;9002226.02101,"169,Y37.321A ",.02)
 ;;Y37.321A 
 ;;9002226.02101,"169,Y37.321A ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.321D ",.01)
 ;;Y37.321D 
 ;;9002226.02101,"169,Y37.321D ",.02)
 ;;Y37.321D 
 ;;9002226.02101,"169,Y37.321D ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.321S ",.01)
 ;;Y37.321S 
 ;;9002226.02101,"169,Y37.321S ",.02)
 ;;Y37.321S 
 ;;9002226.02101,"169,Y37.321S ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.330A ",.01)
 ;;Y37.330A 
 ;;9002226.02101,"169,Y37.330A ",.02)
 ;;Y37.330A 
 ;;9002226.02101,"169,Y37.330A ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.330D ",.01)
 ;;Y37.330D 
 ;;9002226.02101,"169,Y37.330D ",.02)
 ;;Y37.330D 
 ;;9002226.02101,"169,Y37.330D ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.330S ",.01)
 ;;Y37.330S 
 ;;9002226.02101,"169,Y37.330S ",.02)
 ;;Y37.330S 
 ;;9002226.02101,"169,Y37.330S ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.331A ",.01)
 ;;Y37.331A 
 ;;9002226.02101,"169,Y37.331A ",.02)
 ;;Y37.331A 
 ;;9002226.02101,"169,Y37.331A ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.331D ",.01)
 ;;Y37.331D 
 ;;9002226.02101,"169,Y37.331D ",.02)
 ;;Y37.331D 
 ;;9002226.02101,"169,Y37.331D ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.331S ",.01)
 ;;Y37.331S 
 ;;9002226.02101,"169,Y37.331S ",.02)
 ;;Y37.331S 
 ;;9002226.02101,"169,Y37.331S ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.390A ",.01)
 ;;Y37.390A 
 ;;9002226.02101,"169,Y37.390A ",.02)
 ;;Y37.390A 
 ;;9002226.02101,"169,Y37.390A ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.390D ",.01)
 ;;Y37.390D 
 ;;9002226.02101,"169,Y37.390D ",.02)
 ;;Y37.390D 
 ;;9002226.02101,"169,Y37.390D ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.390S ",.01)
 ;;Y37.390S 
 ;;9002226.02101,"169,Y37.390S ",.02)
 ;;Y37.390S 
 ;;9002226.02101,"169,Y37.390S ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.391A ",.01)
 ;;Y37.391A 
 ;;9002226.02101,"169,Y37.391A ",.02)
 ;;Y37.391A 
 ;;9002226.02101,"169,Y37.391A ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.391D ",.01)
 ;;Y37.391D 
 ;;9002226.02101,"169,Y37.391D ",.02)
 ;;Y37.391D 
 ;;9002226.02101,"169,Y37.391D ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.391S ",.01)
 ;;Y37.391S 
 ;;9002226.02101,"169,Y37.391S ",.02)
 ;;Y37.391S 
 ;;9002226.02101,"169,Y37.391S ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.410A ",.01)
 ;;Y37.410A 
 ;;9002226.02101,"169,Y37.410A ",.02)
 ;;Y37.410A 
 ;;9002226.02101,"169,Y37.410A ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.410D ",.01)
 ;;Y37.410D 
 ;;9002226.02101,"169,Y37.410D ",.02)
 ;;Y37.410D 
 ;;9002226.02101,"169,Y37.410D ",.03)
 ;;30
 ;;9002226.02101,"169,Y37.410S ",.01)
 ;;Y37.410S 
 ;;9002226.02101,"169,Y37.410S ",.02)
 ;;Y37.410S 
 ;;9002226.02101,"169,Y37.410S ",.03)
 ;;30