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

ATXXA74.m

Go to the documentation of this file.
ATXXA74 ;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,"873,S53.432A ",.03)
 ;;30
 ;;9002226.02101,"873,S53.439A ",.01)
 ;;S53.439A
 ;;9002226.02101,"873,S53.439A ",.02)
 ;;S53.439A
 ;;9002226.02101,"873,S53.439A ",.03)
 ;;30
 ;;9002226.02101,"873,S53.441A ",.01)
 ;;S53.441A
 ;;9002226.02101,"873,S53.441A ",.02)
 ;;S53.441A
 ;;9002226.02101,"873,S53.441A ",.03)
 ;;30
 ;;9002226.02101,"873,S53.442A ",.01)
 ;;S53.442A
 ;;9002226.02101,"873,S53.442A ",.02)
 ;;S53.442A
 ;;9002226.02101,"873,S53.442A ",.03)
 ;;30
 ;;9002226.02101,"873,S53.449A ",.01)
 ;;S53.449A
 ;;9002226.02101,"873,S53.449A ",.02)
 ;;S53.449A
 ;;9002226.02101,"873,S53.449A ",.03)
 ;;30
 ;;9002226.02101,"873,S53.491A ",.01)
 ;;S53.491A
 ;;9002226.02101,"873,S53.491A ",.02)
 ;;S53.491A
 ;;9002226.02101,"873,S53.491A ",.03)
 ;;30
 ;;9002226.02101,"873,S53.492A ",.01)
 ;;S53.492A
 ;;9002226.02101,"873,S53.492A ",.02)
 ;;S53.492A
 ;;9002226.02101,"873,S53.492A ",.03)
 ;;30
 ;;9002226.02101,"873,S53.499A ",.01)
 ;;S53.499A
 ;;9002226.02101,"873,S53.499A ",.02)
 ;;S53.499A
 ;;9002226.02101,"873,S53.499A ",.03)
 ;;30
 ;;9002226.02101,"873,S54.00XA ",.01)
 ;;S54.00XA
 ;;9002226.02101,"873,S54.00XA ",.02)
 ;;S54.00XA
 ;;9002226.02101,"873,S54.00XA ",.03)
 ;;30
 ;;9002226.02101,"873,S54.01XA ",.01)
 ;;S54.01XA
 ;;9002226.02101,"873,S54.01XA ",.02)
 ;;S54.01XA
 ;;9002226.02101,"873,S54.01XA ",.03)
 ;;30
 ;;9002226.02101,"873,S54.02XA ",.01)
 ;;S54.02XA
 ;;9002226.02101,"873,S54.02XA ",.02)
 ;;S54.02XA
 ;;9002226.02101,"873,S54.02XA ",.03)
 ;;30
 ;;9002226.02101,"873,S54.10XA ",.01)
 ;;S54.10XA
 ;;9002226.02101,"873,S54.10XA ",.02)
 ;;S54.10XA
 ;;9002226.02101,"873,S54.10XA ",.03)
 ;;30
 ;;9002226.02101,"873,S54.11XA ",.01)
 ;;S54.11XA
 ;;9002226.02101,"873,S54.11XA ",.02)
 ;;S54.11XA
 ;;9002226.02101,"873,S54.11XA ",.03)
 ;;30
 ;;9002226.02101,"873,S54.12XA ",.01)
 ;;S54.12XA
 ;;9002226.02101,"873,S54.12XA ",.02)
 ;;S54.12XA
 ;;9002226.02101,"873,S54.12XA ",.03)
 ;;30
 ;;9002226.02101,"873,S54.20XA ",.01)
 ;;S54.20XA
 ;;9002226.02101,"873,S54.20XA ",.02)
 ;;S54.20XA
 ;;9002226.02101,"873,S54.20XA ",.03)
 ;;30
 ;;9002226.02101,"873,S54.21XA ",.01)
 ;;S54.21XA
 ;;9002226.02101,"873,S54.21XA ",.02)
 ;;S54.21XA
 ;;9002226.02101,"873,S54.21XA ",.03)
 ;;30
 ;;9002226.02101,"873,S54.22XA ",.01)
 ;;S54.22XA
 ;;9002226.02101,"873,S54.22XA ",.02)
 ;;S54.22XA
 ;;9002226.02101,"873,S54.22XA ",.03)
 ;;30
 ;;9002226.02101,"873,S54.30XA ",.01)
 ;;S54.30XA
 ;;9002226.02101,"873,S54.30XA ",.02)
 ;;S54.30XA
 ;;9002226.02101,"873,S54.30XA ",.03)
 ;;30
 ;;9002226.02101,"873,S54.31XA ",.01)
 ;;S54.31XA
 ;;9002226.02101,"873,S54.31XA ",.02)
 ;;S54.31XA
 ;;9002226.02101,"873,S54.31XA ",.03)
 ;;30
 ;;9002226.02101,"873,S54.32XA ",.01)
 ;;S54.32XA
 ;;9002226.02101,"873,S54.32XA ",.02)
 ;;S54.32XA
 ;;9002226.02101,"873,S54.32XA ",.03)
 ;;30
 ;;9002226.02101,"873,S54.8X1A ",.01)
 ;;S54.8X1A
 ;;9002226.02101,"873,S54.8X1A ",.02)
 ;;S54.8X1A
 ;;9002226.02101,"873,S54.8X1A ",.03)
 ;;30
 ;;9002226.02101,"873,S54.8X2A ",.01)
 ;;S54.8X2A
 ;;9002226.02101,"873,S54.8X2A ",.02)
 ;;S54.8X2A
 ;;9002226.02101,"873,S54.8X2A ",.03)
 ;;30
 ;;9002226.02101,"873,S54.8X9A ",.01)
 ;;S54.8X9A
 ;;9002226.02101,"873,S54.8X9A ",.02)
 ;;S54.8X9A
 ;;9002226.02101,"873,S54.8X9A ",.03)
 ;;30
 ;;9002226.02101,"873,S54.90XA ",.01)
 ;;S54.90XA
 ;;9002226.02101,"873,S54.90XA ",.02)
 ;;S54.90XA
 ;;9002226.02101,"873,S54.90XA ",.03)
 ;;30
 ;;9002226.02101,"873,S54.91XA ",.01)
 ;;S54.91XA
 ;;9002226.02101,"873,S54.91XA ",.02)
 ;;S54.91XA
 ;;9002226.02101,"873,S54.91XA ",.03)
 ;;30
 ;;9002226.02101,"873,S54.92XA ",.01)
 ;;S54.92XA
 ;;9002226.02101,"873,S54.92XA ",.02)
 ;;S54.92XA
 ;;9002226.02101,"873,S54.92XA ",.03)
 ;;30
 ;;9002226.02101,"873,S55.001A ",.01)
 ;;S55.001A
 ;;9002226.02101,"873,S55.001A ",.02)
 ;;S55.001A
 ;;9002226.02101,"873,S55.001A ",.03)
 ;;30
 ;;9002226.02101,"873,S55.002A ",.01)
 ;;S55.002A
 ;;9002226.02101,"873,S55.002A ",.02)
 ;;S55.002A
 ;;9002226.02101,"873,S55.002A ",.03)
 ;;30
 ;;9002226.02101,"873,S55.009A ",.01)
 ;;S55.009A
 ;;9002226.02101,"873,S55.009A ",.02)
 ;;S55.009A
 ;;9002226.02101,"873,S55.009A ",.03)
 ;;30
 ;;9002226.02101,"873,S55.011A ",.01)
 ;;S55.011A
 ;;9002226.02101,"873,S55.011A ",.02)
 ;;S55.011A
 ;;9002226.02101,"873,S55.011A ",.03)
 ;;30
 ;;9002226.02101,"873,S55.012A ",.01)
 ;;S55.012A
 ;;9002226.02101,"873,S55.012A ",.02)
 ;;S55.012A
 ;;9002226.02101,"873,S55.012A ",.03)
 ;;30
 ;;9002226.02101,"873,S55.019A ",.01)
 ;;S55.019A
 ;;9002226.02101,"873,S55.019A ",.02)
 ;;S55.019A
 ;;9002226.02101,"873,S55.019A ",.03)
 ;;30
 ;;9002226.02101,"873,S55.091A ",.01)
 ;;S55.091A
 ;;9002226.02101,"873,S55.091A ",.02)
 ;;S55.091A
 ;;9002226.02101,"873,S55.091A ",.03)
 ;;30
 ;;9002226.02101,"873,S55.092A ",.01)
 ;;S55.092A
 ;;9002226.02101,"873,S55.092A ",.02)
 ;;S55.092A
 ;;9002226.02101,"873,S55.092A ",.03)
 ;;30
 ;;9002226.02101,"873,S55.099A ",.01)
 ;;S55.099A
 ;;9002226.02101,"873,S55.099A ",.02)
 ;;S55.099A
 ;;9002226.02101,"873,S55.099A ",.03)
 ;;30
 ;;9002226.02101,"873,S55.101A ",.01)
 ;;S55.101A
 ;;9002226.02101,"873,S55.101A ",.02)
 ;;S55.101A
 ;;9002226.02101,"873,S55.101A ",.03)
 ;;30
 ;;9002226.02101,"873,S55.102A ",.01)
 ;;S55.102A
 ;;9002226.02101,"873,S55.102A ",.02)
 ;;S55.102A
 ;;9002226.02101,"873,S55.102A ",.03)
 ;;30
 ;;9002226.02101,"873,S55.109A ",.01)
 ;;S55.109A
 ;;9002226.02101,"873,S55.109A ",.02)
 ;;S55.109A
 ;;9002226.02101,"873,S55.109A ",.03)
 ;;30
 ;;9002226.02101,"873,S55.111A ",.01)
 ;;S55.111A
 ;;9002226.02101,"873,S55.111A ",.02)
 ;;S55.111A
 ;;9002226.02101,"873,S55.111A ",.03)
 ;;30
 ;;9002226.02101,"873,S55.112A ",.01)
 ;;S55.112A
 ;;9002226.02101,"873,S55.112A ",.02)
 ;;S55.112A
 ;;9002226.02101,"873,S55.112A ",.03)
 ;;30
 ;;9002226.02101,"873,S55.119A ",.01)
 ;;S55.119A
 ;;9002226.02101,"873,S55.119A ",.02)
 ;;S55.119A
 ;;9002226.02101,"873,S55.119A ",.03)
 ;;30
 ;;9002226.02101,"873,S55.191A ",.01)
 ;;S55.191A
 ;;9002226.02101,"873,S55.191A ",.02)
 ;;S55.191A
 ;;9002226.02101,"873,S55.191A ",.03)
 ;;30
 ;;9002226.02101,"873,S55.192A ",.01)
 ;;S55.192A
 ;;9002226.02101,"873,S55.192A ",.02)
 ;;S55.192A
 ;;9002226.02101,"873,S55.192A ",.03)
 ;;30
 ;;9002226.02101,"873,S55.199A ",.01)
 ;;S55.199A
 ;;9002226.02101,"873,S55.199A ",.02)
 ;;S55.199A
 ;;9002226.02101,"873,S55.199A ",.03)
 ;;30
 ;;9002226.02101,"873,S55.201A ",.01)
 ;;S55.201A
 ;;9002226.02101,"873,S55.201A ",.02)
 ;;S55.201A
 ;;9002226.02101,"873,S55.201A ",.03)
 ;;30
 ;;9002226.02101,"873,S55.202A ",.01)
 ;;S55.202A
 ;;9002226.02101,"873,S55.202A ",.02)
 ;;S55.202A
 ;;9002226.02101,"873,S55.202A ",.03)
 ;;30
 ;;9002226.02101,"873,S55.209A ",.01)
 ;;S55.209A
 ;;9002226.02101,"873,S55.209A ",.02)
 ;;S55.209A
 ;;9002226.02101,"873,S55.209A ",.03)
 ;;30
 ;;9002226.02101,"873,S55.211A ",.01)
 ;;S55.211A
 ;;9002226.02101,"873,S55.211A ",.02)
 ;;S55.211A
 ;;9002226.02101,"873,S55.211A ",.03)
 ;;30
 ;;9002226.02101,"873,S55.212A ",.01)
 ;;S55.212A
 ;;9002226.02101,"873,S55.212A ",.02)
 ;;S55.212A
 ;;9002226.02101,"873,S55.212A ",.03)
 ;;30
 ;;9002226.02101,"873,S55.219A ",.01)
 ;;S55.219A
 ;;9002226.02101,"873,S55.219A ",.02)
 ;;S55.219A
 ;;9002226.02101,"873,S55.219A ",.03)
 ;;30
 ;;9002226.02101,"873,S55.291A ",.01)
 ;;S55.291A
 ;;9002226.02101,"873,S55.291A ",.02)
 ;;S55.291A
 ;;9002226.02101,"873,S55.291A ",.03)
 ;;30
 ;;9002226.02101,"873,S55.292A ",.01)
 ;;S55.292A
 ;;9002226.02101,"873,S55.292A ",.02)
 ;;S55.292A
 ;;9002226.02101,"873,S55.292A ",.03)
 ;;30
 ;;9002226.02101,"873,S55.299A ",.01)
 ;;S55.299A
 ;;9002226.02101,"873,S55.299A ",.02)
 ;;S55.299A
 ;;9002226.02101,"873,S55.299A ",.03)
 ;;30
 ;;9002226.02101,"873,S55.801A ",.01)
 ;;S55.801A
 ;;9002226.02101,"873,S55.801A ",.02)
 ;;S55.801A
 ;;9002226.02101,"873,S55.801A ",.03)
 ;;30
 ;;9002226.02101,"873,S55.802A ",.01)
 ;;S55.802A
 ;;9002226.02101,"873,S55.802A ",.02)
 ;;S55.802A
 ;;9002226.02101,"873,S55.802A ",.03)
 ;;30
 ;;9002226.02101,"873,S55.809A ",.01)
 ;;S55.809A
 ;;9002226.02101,"873,S55.809A ",.02)
 ;;S55.809A
 ;;9002226.02101,"873,S55.809A ",.03)
 ;;30
 ;;9002226.02101,"873,S55.811A ",.01)
 ;;S55.811A
 ;;9002226.02101,"873,S55.811A ",.02)
 ;;S55.811A
 ;;9002226.02101,"873,S55.811A ",.03)
 ;;30
 ;;9002226.02101,"873,S55.812A ",.01)
 ;;S55.812A
 ;;9002226.02101,"873,S55.812A ",.02)
 ;;S55.812A
 ;;9002226.02101,"873,S55.812A ",.03)
 ;;30
 ;;9002226.02101,"873,S55.819A ",.01)
 ;;S55.819A
 ;;9002226.02101,"873,S55.819A ",.02)
 ;;S55.819A
 ;;9002226.02101,"873,S55.819A ",.03)
 ;;30
 ;;9002226.02101,"873,S55.891A ",.01)
 ;;S55.891A
 ;;9002226.02101,"873,S55.891A ",.02)
 ;;S55.891A
 ;;9002226.02101,"873,S55.891A ",.03)
 ;;30
 ;;9002226.02101,"873,S55.892A ",.01)
 ;;S55.892A
 ;;9002226.02101,"873,S55.892A ",.02)
 ;;S55.892A
 ;;9002226.02101,"873,S55.892A ",.03)
 ;;30
 ;;9002226.02101,"873,S55.899A ",.01)
 ;;S55.899A
 ;;9002226.02101,"873,S55.899A ",.02)
 ;;S55.899A
 ;;9002226.02101,"873,S55.899A ",.03)
 ;;30
 ;;9002226.02101,"873,S55.901A ",.01)
 ;;S55.901A
 ;;9002226.02101,"873,S55.901A ",.02)
 ;;S55.901A
 ;;9002226.02101,"873,S55.901A ",.03)
 ;;30
 ;;9002226.02101,"873,S55.902A ",.01)
 ;;S55.902A
 ;;9002226.02101,"873,S55.902A ",.02)
 ;;S55.902A
 ;;9002226.02101,"873,S55.902A ",.03)
 ;;30
 ;;9002226.02101,"873,S55.909A ",.01)
 ;;S55.909A
 ;;9002226.02101,"873,S55.909A ",.02)
 ;;S55.909A
 ;;9002226.02101,"873,S55.909A ",.03)
 ;;30
 ;;9002226.02101,"873,S55.911A ",.01)
 ;;S55.911A
 ;;9002226.02101,"873,S55.911A ",.02)
 ;;S55.911A
 ;;9002226.02101,"873,S55.911A ",.03)
 ;;30
 ;;9002226.02101,"873,S55.912A ",.01)
 ;;S55.912A
 ;;9002226.02101,"873,S55.912A ",.02)
 ;;S55.912A
 ;;9002226.02101,"873,S55.912A ",.03)
 ;;30
 ;;9002226.02101,"873,S55.919A ",.01)
 ;;S55.919A
 ;;9002226.02101,"873,S55.919A ",.02)
 ;;S55.919A
 ;;9002226.02101,"873,S55.919A ",.03)
 ;;30
 ;;9002226.02101,"873,S55.991A ",.01)
 ;;S55.991A
 ;;9002226.02101,"873,S55.991A ",.02)
 ;;S55.991A
 ;;9002226.02101,"873,S55.991A ",.03)
 ;;30
 ;;9002226.02101,"873,S55.992A ",.01)
 ;;S55.992A
 ;;9002226.02101,"873,S55.992A ",.02)
 ;;S55.992A
 ;;9002226.02101,"873,S55.992A ",.03)
 ;;30
 ;;9002226.02101,"873,S55.999A ",.01)
 ;;S55.999A
 ;;9002226.02101,"873,S55.999A ",.02)
 ;;S55.999A
 ;;9002226.02101,"873,S55.999A ",.03)
 ;;30
 ;;9002226.02101,"873,S56.001A ",.01)
 ;;S56.001A
 ;;9002226.02101,"873,S56.001A ",.02)
 ;;S56.001A
 ;;9002226.02101,"873,S56.001A ",.03)
 ;;30
 ;;9002226.02101,"873,S56.002A ",.01)
 ;;S56.002A
 ;;9002226.02101,"873,S56.002A ",.02)
 ;;S56.002A
 ;;9002226.02101,"873,S56.002A ",.03)
 ;;30
 ;;9002226.02101,"873,S56.009A ",.01)
 ;;S56.009A
 ;;9002226.02101,"873,S56.009A ",.02)
 ;;S56.009A
 ;;9002226.02101,"873,S56.009A ",.03)
 ;;30
 ;;9002226.02101,"873,S56.011A ",.01)
 ;;S56.011A
 ;;9002226.02101,"873,S56.011A ",.02)
 ;;S56.011A
 ;;9002226.02101,"873,S56.011A ",.03)
 ;;30
 ;;9002226.02101,"873,S56.012A ",.01)
 ;;S56.012A
 ;;9002226.02101,"873,S56.012A ",.02)
 ;;S56.012A
 ;;9002226.02101,"873,S56.012A ",.03)
 ;;30
 ;;9002226.02101,"873,S56.019A ",.01)
 ;;S56.019A
 ;;9002226.02101,"873,S56.019A ",.02)
 ;;S56.019A
 ;;9002226.02101,"873,S56.019A ",.03)
 ;;30
 ;;9002226.02101,"873,S56.021A ",.01)
 ;;S56.021A
 ;;9002226.02101,"873,S56.021A ",.02)
 ;;S56.021A
 ;;9002226.02101,"873,S56.021A ",.03)
 ;;30
 ;;9002226.02101,"873,S56.022A ",.01)
 ;;S56.022A
 ;;9002226.02101,"873,S56.022A ",.02)
 ;;S56.022A
 ;;9002226.02101,"873,S56.022A ",.03)
 ;;30