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

ATXXA107.m

Go to the documentation of this file.
ATXXA107 ;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,S76.392A ",.03)
 ;;30
 ;;9002226.02101,"873,S76.399A ",.01)
 ;;S76.399A
 ;;9002226.02101,"873,S76.399A ",.02)
 ;;S76.399A
 ;;9002226.02101,"873,S76.399A ",.03)
 ;;30
 ;;9002226.02101,"873,S76.801A ",.01)
 ;;S76.801A
 ;;9002226.02101,"873,S76.801A ",.02)
 ;;S76.801A
 ;;9002226.02101,"873,S76.801A ",.03)
 ;;30
 ;;9002226.02101,"873,S76.802A ",.01)
 ;;S76.802A
 ;;9002226.02101,"873,S76.802A ",.02)
 ;;S76.802A
 ;;9002226.02101,"873,S76.802A ",.03)
 ;;30
 ;;9002226.02101,"873,S76.809A ",.01)
 ;;S76.809A
 ;;9002226.02101,"873,S76.809A ",.02)
 ;;S76.809A
 ;;9002226.02101,"873,S76.809A ",.03)
 ;;30
 ;;9002226.02101,"873,S76.811A ",.01)
 ;;S76.811A
 ;;9002226.02101,"873,S76.811A ",.02)
 ;;S76.811A
 ;;9002226.02101,"873,S76.811A ",.03)
 ;;30
 ;;9002226.02101,"873,S76.812A ",.01)
 ;;S76.812A
 ;;9002226.02101,"873,S76.812A ",.02)
 ;;S76.812A
 ;;9002226.02101,"873,S76.812A ",.03)
 ;;30
 ;;9002226.02101,"873,S76.819A ",.01)
 ;;S76.819A
 ;;9002226.02101,"873,S76.819A ",.02)
 ;;S76.819A
 ;;9002226.02101,"873,S76.819A ",.03)
 ;;30
 ;;9002226.02101,"873,S76.821A ",.01)
 ;;S76.821A
 ;;9002226.02101,"873,S76.821A ",.02)
 ;;S76.821A
 ;;9002226.02101,"873,S76.821A ",.03)
 ;;30
 ;;9002226.02101,"873,S76.822A ",.01)
 ;;S76.822A
 ;;9002226.02101,"873,S76.822A ",.02)
 ;;S76.822A
 ;;9002226.02101,"873,S76.822A ",.03)
 ;;30
 ;;9002226.02101,"873,S76.829A ",.01)
 ;;S76.829A
 ;;9002226.02101,"873,S76.829A ",.02)
 ;;S76.829A
 ;;9002226.02101,"873,S76.829A ",.03)
 ;;30
 ;;9002226.02101,"873,S76.891A ",.01)
 ;;S76.891A
 ;;9002226.02101,"873,S76.891A ",.02)
 ;;S76.891A
 ;;9002226.02101,"873,S76.891A ",.03)
 ;;30
 ;;9002226.02101,"873,S76.892A ",.01)
 ;;S76.892A
 ;;9002226.02101,"873,S76.892A ",.02)
 ;;S76.892A
 ;;9002226.02101,"873,S76.892A ",.03)
 ;;30
 ;;9002226.02101,"873,S76.899A ",.01)
 ;;S76.899A
 ;;9002226.02101,"873,S76.899A ",.02)
 ;;S76.899A
 ;;9002226.02101,"873,S76.899A ",.03)
 ;;30
 ;;9002226.02101,"873,S76.901A ",.01)
 ;;S76.901A
 ;;9002226.02101,"873,S76.901A ",.02)
 ;;S76.901A
 ;;9002226.02101,"873,S76.901A ",.03)
 ;;30
 ;;9002226.02101,"873,S76.902A ",.01)
 ;;S76.902A
 ;;9002226.02101,"873,S76.902A ",.02)
 ;;S76.902A
 ;;9002226.02101,"873,S76.902A ",.03)
 ;;30
 ;;9002226.02101,"873,S76.909A ",.01)
 ;;S76.909A
 ;;9002226.02101,"873,S76.909A ",.02)
 ;;S76.909A
 ;;9002226.02101,"873,S76.909A ",.03)
 ;;30
 ;;9002226.02101,"873,S76.911A ",.01)
 ;;S76.911A
 ;;9002226.02101,"873,S76.911A ",.02)
 ;;S76.911A
 ;;9002226.02101,"873,S76.911A ",.03)
 ;;30
 ;;9002226.02101,"873,S76.912A ",.01)
 ;;S76.912A
 ;;9002226.02101,"873,S76.912A ",.02)
 ;;S76.912A
 ;;9002226.02101,"873,S76.912A ",.03)
 ;;30
 ;;9002226.02101,"873,S76.919A ",.01)
 ;;S76.919A
 ;;9002226.02101,"873,S76.919A ",.02)
 ;;S76.919A
 ;;9002226.02101,"873,S76.919A ",.03)
 ;;30
 ;;9002226.02101,"873,S76.921A ",.01)
 ;;S76.921A
 ;;9002226.02101,"873,S76.921A ",.02)
 ;;S76.921A
 ;;9002226.02101,"873,S76.921A ",.03)
 ;;30
 ;;9002226.02101,"873,S76.922A ",.01)
 ;;S76.922A
 ;;9002226.02101,"873,S76.922A ",.02)
 ;;S76.922A
 ;;9002226.02101,"873,S76.922A ",.03)
 ;;30
 ;;9002226.02101,"873,S76.929A ",.01)
 ;;S76.929A
 ;;9002226.02101,"873,S76.929A ",.02)
 ;;S76.929A
 ;;9002226.02101,"873,S76.929A ",.03)
 ;;30
 ;;9002226.02101,"873,S76.991A ",.01)
 ;;S76.991A
 ;;9002226.02101,"873,S76.991A ",.02)
 ;;S76.991A
 ;;9002226.02101,"873,S76.991A ",.03)
 ;;30
 ;;9002226.02101,"873,S76.992A ",.01)
 ;;S76.992A
 ;;9002226.02101,"873,S76.992A ",.02)
 ;;S76.992A
 ;;9002226.02101,"873,S76.992A ",.03)
 ;;30
 ;;9002226.02101,"873,S76.999A ",.01)
 ;;S76.999A
 ;;9002226.02101,"873,S76.999A ",.02)
 ;;S76.999A
 ;;9002226.02101,"873,S76.999A ",.03)
 ;;30
 ;;9002226.02101,"873,S77.00XA ",.01)
 ;;S77.00XA
 ;;9002226.02101,"873,S77.00XA ",.02)
 ;;S77.00XA
 ;;9002226.02101,"873,S77.00XA ",.03)
 ;;30
 ;;9002226.02101,"873,S77.01XA ",.01)
 ;;S77.01XA
 ;;9002226.02101,"873,S77.01XA ",.02)
 ;;S77.01XA
 ;;9002226.02101,"873,S77.01XA ",.03)
 ;;30
 ;;9002226.02101,"873,S77.02XA ",.01)
 ;;S77.02XA
 ;;9002226.02101,"873,S77.02XA ",.02)
 ;;S77.02XA
 ;;9002226.02101,"873,S77.02XA ",.03)
 ;;30
 ;;9002226.02101,"873,S77.10XA ",.01)
 ;;S77.10XA
 ;;9002226.02101,"873,S77.10XA ",.02)
 ;;S77.10XA
 ;;9002226.02101,"873,S77.10XA ",.03)
 ;;30
 ;;9002226.02101,"873,S77.11XA ",.01)
 ;;S77.11XA
 ;;9002226.02101,"873,S77.11XA ",.02)
 ;;S77.11XA
 ;;9002226.02101,"873,S77.11XA ",.03)
 ;;30
 ;;9002226.02101,"873,S77.12XA ",.01)
 ;;S77.12XA
 ;;9002226.02101,"873,S77.12XA ",.02)
 ;;S77.12XA
 ;;9002226.02101,"873,S77.12XA ",.03)
 ;;30
 ;;9002226.02101,"873,S77.20XA ",.01)
 ;;S77.20XA
 ;;9002226.02101,"873,S77.20XA ",.02)
 ;;S77.20XA
 ;;9002226.02101,"873,S77.20XA ",.03)
 ;;30
 ;;9002226.02101,"873,S77.21XA ",.01)
 ;;S77.21XA
 ;;9002226.02101,"873,S77.21XA ",.02)
 ;;S77.21XA
 ;;9002226.02101,"873,S77.21XA ",.03)
 ;;30
 ;;9002226.02101,"873,S77.22XA ",.01)
 ;;S77.22XA
 ;;9002226.02101,"873,S77.22XA ",.02)
 ;;S77.22XA
 ;;9002226.02101,"873,S77.22XA ",.03)
 ;;30
 ;;9002226.02101,"873,S78.011A ",.01)
 ;;S78.011A
 ;;9002226.02101,"873,S78.011A ",.02)
 ;;S78.011A
 ;;9002226.02101,"873,S78.011A ",.03)
 ;;30
 ;;9002226.02101,"873,S78.012A ",.01)
 ;;S78.012A
 ;;9002226.02101,"873,S78.012A ",.02)
 ;;S78.012A
 ;;9002226.02101,"873,S78.012A ",.03)
 ;;30
 ;;9002226.02101,"873,S78.019A ",.01)
 ;;S78.019A
 ;;9002226.02101,"873,S78.019A ",.02)
 ;;S78.019A
 ;;9002226.02101,"873,S78.019A ",.03)
 ;;30
 ;;9002226.02101,"873,S78.021A ",.01)
 ;;S78.021A
 ;;9002226.02101,"873,S78.021A ",.02)
 ;;S78.021A
 ;;9002226.02101,"873,S78.021A ",.03)
 ;;30
 ;;9002226.02101,"873,S78.022A ",.01)
 ;;S78.022A
 ;;9002226.02101,"873,S78.022A ",.02)
 ;;S78.022A
 ;;9002226.02101,"873,S78.022A ",.03)
 ;;30
 ;;9002226.02101,"873,S78.029A ",.01)
 ;;S78.029A
 ;;9002226.02101,"873,S78.029A ",.02)
 ;;S78.029A
 ;;9002226.02101,"873,S78.029A ",.03)
 ;;30
 ;;9002226.02101,"873,S78.111A ",.01)
 ;;S78.111A
 ;;9002226.02101,"873,S78.111A ",.02)
 ;;S78.111A
 ;;9002226.02101,"873,S78.111A ",.03)
 ;;30
 ;;9002226.02101,"873,S78.112A ",.01)
 ;;S78.112A
 ;;9002226.02101,"873,S78.112A ",.02)
 ;;S78.112A
 ;;9002226.02101,"873,S78.112A ",.03)
 ;;30
 ;;9002226.02101,"873,S78.119A ",.01)
 ;;S78.119A
 ;;9002226.02101,"873,S78.119A ",.02)
 ;;S78.119A
 ;;9002226.02101,"873,S78.119A ",.03)
 ;;30
 ;;9002226.02101,"873,S78.121A ",.01)
 ;;S78.121A
 ;;9002226.02101,"873,S78.121A ",.02)
 ;;S78.121A
 ;;9002226.02101,"873,S78.121A ",.03)
 ;;30
 ;;9002226.02101,"873,S78.122A ",.01)
 ;;S78.122A
 ;;9002226.02101,"873,S78.122A ",.02)
 ;;S78.122A
 ;;9002226.02101,"873,S78.122A ",.03)
 ;;30
 ;;9002226.02101,"873,S78.129A ",.01)
 ;;S78.129A
 ;;9002226.02101,"873,S78.129A ",.02)
 ;;S78.129A
 ;;9002226.02101,"873,S78.129A ",.03)
 ;;30
 ;;9002226.02101,"873,S78.911A ",.01)
 ;;S78.911A
 ;;9002226.02101,"873,S78.911A ",.02)
 ;;S78.911A
 ;;9002226.02101,"873,S78.911A ",.03)
 ;;30
 ;;9002226.02101,"873,S78.912A ",.01)
 ;;S78.912A
 ;;9002226.02101,"873,S78.912A ",.02)
 ;;S78.912A
 ;;9002226.02101,"873,S78.912A ",.03)
 ;;30
 ;;9002226.02101,"873,S78.919A ",.01)
 ;;S78.919A
 ;;9002226.02101,"873,S78.919A ",.02)
 ;;S78.919A
 ;;9002226.02101,"873,S78.919A ",.03)
 ;;30
 ;;9002226.02101,"873,S78.921A ",.01)
 ;;S78.921A
 ;;9002226.02101,"873,S78.921A ",.02)
 ;;S78.921A
 ;;9002226.02101,"873,S78.921A ",.03)
 ;;30
 ;;9002226.02101,"873,S78.922A ",.01)
 ;;S78.922A
 ;;9002226.02101,"873,S78.922A ",.02)
 ;;S78.922A
 ;;9002226.02101,"873,S78.922A ",.03)
 ;;30
 ;;9002226.02101,"873,S78.929A ",.01)
 ;;S78.929A
 ;;9002226.02101,"873,S78.929A ",.02)
 ;;S78.929A
 ;;9002226.02101,"873,S78.929A ",.03)
 ;;30
 ;;9002226.02101,"873,S79.001A ",.01)
 ;;S79.001A
 ;;9002226.02101,"873,S79.001A ",.02)
 ;;S79.001A
 ;;9002226.02101,"873,S79.001A ",.03)
 ;;30
 ;;9002226.02101,"873,S79.002A ",.01)
 ;;S79.002A
 ;;9002226.02101,"873,S79.002A ",.02)
 ;;S79.002A
 ;;9002226.02101,"873,S79.002A ",.03)
 ;;30
 ;;9002226.02101,"873,S79.009A ",.01)
 ;;S79.009A
 ;;9002226.02101,"873,S79.009A ",.02)
 ;;S79.009A
 ;;9002226.02101,"873,S79.009A ",.03)
 ;;30
 ;;9002226.02101,"873,S79.011A ",.01)
 ;;S79.011A
 ;;9002226.02101,"873,S79.011A ",.02)
 ;;S79.011A
 ;;9002226.02101,"873,S79.011A ",.03)
 ;;30
 ;;9002226.02101,"873,S79.012A ",.01)
 ;;S79.012A
 ;;9002226.02101,"873,S79.012A ",.02)
 ;;S79.012A
 ;;9002226.02101,"873,S79.012A ",.03)
 ;;30
 ;;9002226.02101,"873,S79.019A ",.01)
 ;;S79.019A
 ;;9002226.02101,"873,S79.019A ",.02)
 ;;S79.019A
 ;;9002226.02101,"873,S79.019A ",.03)
 ;;30
 ;;9002226.02101,"873,S79.091A ",.01)
 ;;S79.091A
 ;;9002226.02101,"873,S79.091A ",.02)
 ;;S79.091A
 ;;9002226.02101,"873,S79.091A ",.03)
 ;;30
 ;;9002226.02101,"873,S79.092A ",.01)
 ;;S79.092A
 ;;9002226.02101,"873,S79.092A ",.02)
 ;;S79.092A
 ;;9002226.02101,"873,S79.092A ",.03)
 ;;30
 ;;9002226.02101,"873,S79.099A ",.01)
 ;;S79.099A
 ;;9002226.02101,"873,S79.099A ",.02)
 ;;S79.099A
 ;;9002226.02101,"873,S79.099A ",.03)
 ;;30
 ;;9002226.02101,"873,S79.101A ",.01)
 ;;S79.101A
 ;;9002226.02101,"873,S79.101A ",.02)
 ;;S79.101A
 ;;9002226.02101,"873,S79.101A ",.03)
 ;;30
 ;;9002226.02101,"873,S79.102A ",.01)
 ;;S79.102A
 ;;9002226.02101,"873,S79.102A ",.02)
 ;;S79.102A
 ;;9002226.02101,"873,S79.102A ",.03)
 ;;30
 ;;9002226.02101,"873,S79.109A ",.01)
 ;;S79.109A
 ;;9002226.02101,"873,S79.109A ",.02)
 ;;S79.109A
 ;;9002226.02101,"873,S79.109A ",.03)
 ;;30
 ;;9002226.02101,"873,S79.111A ",.01)
 ;;S79.111A
 ;;9002226.02101,"873,S79.111A ",.02)
 ;;S79.111A
 ;;9002226.02101,"873,S79.111A ",.03)
 ;;30
 ;;9002226.02101,"873,S79.112A ",.01)
 ;;S79.112A
 ;;9002226.02101,"873,S79.112A ",.02)
 ;;S79.112A
 ;;9002226.02101,"873,S79.112A ",.03)
 ;;30
 ;;9002226.02101,"873,S79.119A ",.01)
 ;;S79.119A
 ;;9002226.02101,"873,S79.119A ",.02)
 ;;S79.119A
 ;;9002226.02101,"873,S79.119A ",.03)
 ;;30
 ;;9002226.02101,"873,S79.121A ",.01)
 ;;S79.121A
 ;;9002226.02101,"873,S79.121A ",.02)
 ;;S79.121A
 ;;9002226.02101,"873,S79.121A ",.03)
 ;;30
 ;;9002226.02101,"873,S79.122A ",.01)
 ;;S79.122A
 ;;9002226.02101,"873,S79.122A ",.02)
 ;;S79.122A
 ;;9002226.02101,"873,S79.122A ",.03)
 ;;30
 ;;9002226.02101,"873,S79.129A ",.01)
 ;;S79.129A
 ;;9002226.02101,"873,S79.129A ",.02)
 ;;S79.129A
 ;;9002226.02101,"873,S79.129A ",.03)
 ;;30
 ;;9002226.02101,"873,S79.131A ",.01)
 ;;S79.131A
 ;;9002226.02101,"873,S79.131A ",.02)
 ;;S79.131A
 ;;9002226.02101,"873,S79.131A ",.03)
 ;;30
 ;;9002226.02101,"873,S79.132A ",.01)
 ;;S79.132A
 ;;9002226.02101,"873,S79.132A ",.02)
 ;;S79.132A
 ;;9002226.02101,"873,S79.132A ",.03)
 ;;30
 ;;9002226.02101,"873,S79.139A ",.01)
 ;;S79.139A
 ;;9002226.02101,"873,S79.139A ",.02)
 ;;S79.139A
 ;;9002226.02101,"873,S79.139A ",.03)
 ;;30
 ;;9002226.02101,"873,S79.141A ",.01)
 ;;S79.141A
 ;;9002226.02101,"873,S79.141A ",.02)
 ;;S79.141A
 ;;9002226.02101,"873,S79.141A ",.03)
 ;;30
 ;;9002226.02101,"873,S79.142A ",.01)
 ;;S79.142A
 ;;9002226.02101,"873,S79.142A ",.02)
 ;;S79.142A
 ;;9002226.02101,"873,S79.142A ",.03)
 ;;30
 ;;9002226.02101,"873,S79.149A ",.01)
 ;;S79.149A
 ;;9002226.02101,"873,S79.149A ",.02)
 ;;S79.149A
 ;;9002226.02101,"873,S79.149A ",.03)
 ;;30
 ;;9002226.02101,"873,S79.191A ",.01)
 ;;S79.191A
 ;;9002226.02101,"873,S79.191A ",.02)
 ;;S79.191A
 ;;9002226.02101,"873,S79.191A ",.03)
 ;;30
 ;;9002226.02101,"873,S79.192A ",.01)
 ;;S79.192A
 ;;9002226.02101,"873,S79.192A ",.02)
 ;;S79.192A
 ;;9002226.02101,"873,S79.192A ",.03)
 ;;30