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

ATXXA63.m

Go to the documentation of this file.
ATXXA63 ;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,S45.002A ",.01)
 ;;S45.002A
 ;;9002226.02101,"873,S45.002A ",.02)
 ;;S45.002A
 ;;9002226.02101,"873,S45.002A ",.03)
 ;;30
 ;;9002226.02101,"873,S45.009A ",.01)
 ;;S45.009A
 ;;9002226.02101,"873,S45.009A ",.02)
 ;;S45.009A
 ;;9002226.02101,"873,S45.009A ",.03)
 ;;30
 ;;9002226.02101,"873,S45.011A ",.01)
 ;;S45.011A
 ;;9002226.02101,"873,S45.011A ",.02)
 ;;S45.011A
 ;;9002226.02101,"873,S45.011A ",.03)
 ;;30
 ;;9002226.02101,"873,S45.012A ",.01)
 ;;S45.012A
 ;;9002226.02101,"873,S45.012A ",.02)
 ;;S45.012A
 ;;9002226.02101,"873,S45.012A ",.03)
 ;;30
 ;;9002226.02101,"873,S45.019A ",.01)
 ;;S45.019A
 ;;9002226.02101,"873,S45.019A ",.02)
 ;;S45.019A
 ;;9002226.02101,"873,S45.019A ",.03)
 ;;30
 ;;9002226.02101,"873,S45.091A ",.01)
 ;;S45.091A
 ;;9002226.02101,"873,S45.091A ",.02)
 ;;S45.091A
 ;;9002226.02101,"873,S45.091A ",.03)
 ;;30
 ;;9002226.02101,"873,S45.092A ",.01)
 ;;S45.092A
 ;;9002226.02101,"873,S45.092A ",.02)
 ;;S45.092A
 ;;9002226.02101,"873,S45.092A ",.03)
 ;;30
 ;;9002226.02101,"873,S45.099A ",.01)
 ;;S45.099A
 ;;9002226.02101,"873,S45.099A ",.02)
 ;;S45.099A
 ;;9002226.02101,"873,S45.099A ",.03)
 ;;30
 ;;9002226.02101,"873,S45.101A ",.01)
 ;;S45.101A
 ;;9002226.02101,"873,S45.101A ",.02)
 ;;S45.101A
 ;;9002226.02101,"873,S45.101A ",.03)
 ;;30
 ;;9002226.02101,"873,S45.102A ",.01)
 ;;S45.102A
 ;;9002226.02101,"873,S45.102A ",.02)
 ;;S45.102A
 ;;9002226.02101,"873,S45.102A ",.03)
 ;;30
 ;;9002226.02101,"873,S45.109A ",.01)
 ;;S45.109A
 ;;9002226.02101,"873,S45.109A ",.02)
 ;;S45.109A
 ;;9002226.02101,"873,S45.109A ",.03)
 ;;30
 ;;9002226.02101,"873,S45.111A ",.01)
 ;;S45.111A
 ;;9002226.02101,"873,S45.111A ",.02)
 ;;S45.111A
 ;;9002226.02101,"873,S45.111A ",.03)
 ;;30
 ;;9002226.02101,"873,S45.112A ",.01)
 ;;S45.112A
 ;;9002226.02101,"873,S45.112A ",.02)
 ;;S45.112A
 ;;9002226.02101,"873,S45.112A ",.03)
 ;;30
 ;;9002226.02101,"873,S45.119A ",.01)
 ;;S45.119A
 ;;9002226.02101,"873,S45.119A ",.02)
 ;;S45.119A
 ;;9002226.02101,"873,S45.119A ",.03)
 ;;30
 ;;9002226.02101,"873,S45.191A ",.01)
 ;;S45.191A
 ;;9002226.02101,"873,S45.191A ",.02)
 ;;S45.191A
 ;;9002226.02101,"873,S45.191A ",.03)
 ;;30
 ;;9002226.02101,"873,S45.192A ",.01)
 ;;S45.192A
 ;;9002226.02101,"873,S45.192A ",.02)
 ;;S45.192A
 ;;9002226.02101,"873,S45.192A ",.03)
 ;;30
 ;;9002226.02101,"873,S45.199A ",.01)
 ;;S45.199A
 ;;9002226.02101,"873,S45.199A ",.02)
 ;;S45.199A
 ;;9002226.02101,"873,S45.199A ",.03)
 ;;30
 ;;9002226.02101,"873,S45.201A ",.01)
 ;;S45.201A
 ;;9002226.02101,"873,S45.201A ",.02)
 ;;S45.201A
 ;;9002226.02101,"873,S45.201A ",.03)
 ;;30
 ;;9002226.02101,"873,S45.202A ",.01)
 ;;S45.202A
 ;;9002226.02101,"873,S45.202A ",.02)
 ;;S45.202A
 ;;9002226.02101,"873,S45.202A ",.03)
 ;;30
 ;;9002226.02101,"873,S45.209A ",.01)
 ;;S45.209A
 ;;9002226.02101,"873,S45.209A ",.02)
 ;;S45.209A
 ;;9002226.02101,"873,S45.209A ",.03)
 ;;30
 ;;9002226.02101,"873,S45.211A ",.01)
 ;;S45.211A
 ;;9002226.02101,"873,S45.211A ",.02)
 ;;S45.211A
 ;;9002226.02101,"873,S45.211A ",.03)
 ;;30
 ;;9002226.02101,"873,S45.212A ",.01)
 ;;S45.212A
 ;;9002226.02101,"873,S45.212A ",.02)
 ;;S45.212A
 ;;9002226.02101,"873,S45.212A ",.03)
 ;;30
 ;;9002226.02101,"873,S45.219A ",.01)
 ;;S45.219A
 ;;9002226.02101,"873,S45.219A ",.02)
 ;;S45.219A
 ;;9002226.02101,"873,S45.219A ",.03)
 ;;30
 ;;9002226.02101,"873,S45.291A ",.01)
 ;;S45.291A
 ;;9002226.02101,"873,S45.291A ",.02)
 ;;S45.291A
 ;;9002226.02101,"873,S45.291A ",.03)
 ;;30
 ;;9002226.02101,"873,S45.292A ",.01)
 ;;S45.292A
 ;;9002226.02101,"873,S45.292A ",.02)
 ;;S45.292A
 ;;9002226.02101,"873,S45.292A ",.03)
 ;;30
 ;;9002226.02101,"873,S45.299A ",.01)
 ;;S45.299A
 ;;9002226.02101,"873,S45.299A ",.02)
 ;;S45.299A
 ;;9002226.02101,"873,S45.299A ",.03)
 ;;30
 ;;9002226.02101,"873,S45.301A ",.01)
 ;;S45.301A
 ;;9002226.02101,"873,S45.301A ",.02)
 ;;S45.301A
 ;;9002226.02101,"873,S45.301A ",.03)
 ;;30
 ;;9002226.02101,"873,S45.302A ",.01)
 ;;S45.302A
 ;;9002226.02101,"873,S45.302A ",.02)
 ;;S45.302A
 ;;9002226.02101,"873,S45.302A ",.03)
 ;;30
 ;;9002226.02101,"873,S45.309A ",.01)
 ;;S45.309A
 ;;9002226.02101,"873,S45.309A ",.02)
 ;;S45.309A
 ;;9002226.02101,"873,S45.309A ",.03)
 ;;30
 ;;9002226.02101,"873,S45.311A ",.01)
 ;;S45.311A
 ;;9002226.02101,"873,S45.311A ",.02)
 ;;S45.311A
 ;;9002226.02101,"873,S45.311A ",.03)
 ;;30
 ;;9002226.02101,"873,S45.312A ",.01)
 ;;S45.312A
 ;;9002226.02101,"873,S45.312A ",.02)
 ;;S45.312A
 ;;9002226.02101,"873,S45.312A ",.03)
 ;;30
 ;;9002226.02101,"873,S45.319A ",.01)
 ;;S45.319A
 ;;9002226.02101,"873,S45.319A ",.02)
 ;;S45.319A
 ;;9002226.02101,"873,S45.319A ",.03)
 ;;30
 ;;9002226.02101,"873,S45.391A ",.01)
 ;;S45.391A
 ;;9002226.02101,"873,S45.391A ",.02)
 ;;S45.391A
 ;;9002226.02101,"873,S45.391A ",.03)
 ;;30
 ;;9002226.02101,"873,S45.392A ",.01)
 ;;S45.392A
 ;;9002226.02101,"873,S45.392A ",.02)
 ;;S45.392A
 ;;9002226.02101,"873,S45.392A ",.03)
 ;;30
 ;;9002226.02101,"873,S45.399A ",.01)
 ;;S45.399A
 ;;9002226.02101,"873,S45.399A ",.02)
 ;;S45.399A
 ;;9002226.02101,"873,S45.399A ",.03)
 ;;30
 ;;9002226.02101,"873,S45.801A ",.01)
 ;;S45.801A
 ;;9002226.02101,"873,S45.801A ",.02)
 ;;S45.801A
 ;;9002226.02101,"873,S45.801A ",.03)
 ;;30
 ;;9002226.02101,"873,S45.802A ",.01)
 ;;S45.802A
 ;;9002226.02101,"873,S45.802A ",.02)
 ;;S45.802A
 ;;9002226.02101,"873,S45.802A ",.03)
 ;;30
 ;;9002226.02101,"873,S45.809A ",.01)
 ;;S45.809A
 ;;9002226.02101,"873,S45.809A ",.02)
 ;;S45.809A
 ;;9002226.02101,"873,S45.809A ",.03)
 ;;30
 ;;9002226.02101,"873,S45.811A ",.01)
 ;;S45.811A
 ;;9002226.02101,"873,S45.811A ",.02)
 ;;S45.811A
 ;;9002226.02101,"873,S45.811A ",.03)
 ;;30
 ;;9002226.02101,"873,S45.812A ",.01)
 ;;S45.812A
 ;;9002226.02101,"873,S45.812A ",.02)
 ;;S45.812A
 ;;9002226.02101,"873,S45.812A ",.03)
 ;;30
 ;;9002226.02101,"873,S45.819A ",.01)
 ;;S45.819A
 ;;9002226.02101,"873,S45.819A ",.02)
 ;;S45.819A
 ;;9002226.02101,"873,S45.819A ",.03)
 ;;30
 ;;9002226.02101,"873,S45.891A ",.01)
 ;;S45.891A
 ;;9002226.02101,"873,S45.891A ",.02)
 ;;S45.891A
 ;;9002226.02101,"873,S45.891A ",.03)
 ;;30
 ;;9002226.02101,"873,S45.892A ",.01)
 ;;S45.892A
 ;;9002226.02101,"873,S45.892A ",.02)
 ;;S45.892A
 ;;9002226.02101,"873,S45.892A ",.03)
 ;;30
 ;;9002226.02101,"873,S45.899A ",.01)
 ;;S45.899A
 ;;9002226.02101,"873,S45.899A ",.02)
 ;;S45.899A
 ;;9002226.02101,"873,S45.899A ",.03)
 ;;30
 ;;9002226.02101,"873,S45.901A ",.01)
 ;;S45.901A
 ;;9002226.02101,"873,S45.901A ",.02)
 ;;S45.901A
 ;;9002226.02101,"873,S45.901A ",.03)
 ;;30
 ;;9002226.02101,"873,S45.902A ",.01)
 ;;S45.902A
 ;;9002226.02101,"873,S45.902A ",.02)
 ;;S45.902A
 ;;9002226.02101,"873,S45.902A ",.03)
 ;;30
 ;;9002226.02101,"873,S45.909A ",.01)
 ;;S45.909A
 ;;9002226.02101,"873,S45.909A ",.02)
 ;;S45.909A
 ;;9002226.02101,"873,S45.909A ",.03)
 ;;30
 ;;9002226.02101,"873,S45.911A ",.01)
 ;;S45.911A
 ;;9002226.02101,"873,S45.911A ",.02)
 ;;S45.911A
 ;;9002226.02101,"873,S45.911A ",.03)
 ;;30
 ;;9002226.02101,"873,S45.912A ",.01)
 ;;S45.912A
 ;;9002226.02101,"873,S45.912A ",.02)
 ;;S45.912A
 ;;9002226.02101,"873,S45.912A ",.03)
 ;;30
 ;;9002226.02101,"873,S45.919A ",.01)
 ;;S45.919A
 ;;9002226.02101,"873,S45.919A ",.02)
 ;;S45.919A
 ;;9002226.02101,"873,S45.919A ",.03)
 ;;30
 ;;9002226.02101,"873,S45.991A ",.01)
 ;;S45.991A
 ;;9002226.02101,"873,S45.991A ",.02)
 ;;S45.991A
 ;;9002226.02101,"873,S45.991A ",.03)
 ;;30
 ;;9002226.02101,"873,S45.992A ",.01)
 ;;S45.992A
 ;;9002226.02101,"873,S45.992A ",.02)
 ;;S45.992A
 ;;9002226.02101,"873,S45.992A ",.03)
 ;;30
 ;;9002226.02101,"873,S45.999A ",.01)
 ;;S45.999A
 ;;9002226.02101,"873,S45.999A ",.02)
 ;;S45.999A
 ;;9002226.02101,"873,S45.999A ",.03)
 ;;30
 ;;9002226.02101,"873,S46.001A ",.01)
 ;;S46.001A
 ;;9002226.02101,"873,S46.001A ",.02)
 ;;S46.001A
 ;;9002226.02101,"873,S46.001A ",.03)
 ;;30
 ;;9002226.02101,"873,S46.002A ",.01)
 ;;S46.002A
 ;;9002226.02101,"873,S46.002A ",.02)
 ;;S46.002A
 ;;9002226.02101,"873,S46.002A ",.03)
 ;;30
 ;;9002226.02101,"873,S46.009A ",.01)
 ;;S46.009A
 ;;9002226.02101,"873,S46.009A ",.02)
 ;;S46.009A
 ;;9002226.02101,"873,S46.009A ",.03)
 ;;30
 ;;9002226.02101,"873,S46.011A ",.01)
 ;;S46.011A
 ;;9002226.02101,"873,S46.011A ",.02)
 ;;S46.011A
 ;;9002226.02101,"873,S46.011A ",.03)
 ;;30
 ;;9002226.02101,"873,S46.012A ",.01)
 ;;S46.012A
 ;;9002226.02101,"873,S46.012A ",.02)
 ;;S46.012A
 ;;9002226.02101,"873,S46.012A ",.03)
 ;;30
 ;;9002226.02101,"873,S46.019A ",.01)
 ;;S46.019A
 ;;9002226.02101,"873,S46.019A ",.02)
 ;;S46.019A
 ;;9002226.02101,"873,S46.019A ",.03)
 ;;30
 ;;9002226.02101,"873,S46.021A ",.01)
 ;;S46.021A
 ;;9002226.02101,"873,S46.021A ",.02)
 ;;S46.021A
 ;;9002226.02101,"873,S46.021A ",.03)
 ;;30
 ;;9002226.02101,"873,S46.022A ",.01)
 ;;S46.022A
 ;;9002226.02101,"873,S46.022A ",.02)
 ;;S46.022A
 ;;9002226.02101,"873,S46.022A ",.03)
 ;;30
 ;;9002226.02101,"873,S46.029A ",.01)
 ;;S46.029A
 ;;9002226.02101,"873,S46.029A ",.02)
 ;;S46.029A
 ;;9002226.02101,"873,S46.029A ",.03)
 ;;30
 ;;9002226.02101,"873,S46.091A ",.01)
 ;;S46.091A
 ;;9002226.02101,"873,S46.091A ",.02)
 ;;S46.091A
 ;;9002226.02101,"873,S46.091A ",.03)
 ;;30
 ;;9002226.02101,"873,S46.092A ",.01)
 ;;S46.092A
 ;;9002226.02101,"873,S46.092A ",.02)
 ;;S46.092A
 ;;9002226.02101,"873,S46.092A ",.03)
 ;;30
 ;;9002226.02101,"873,S46.099A ",.01)
 ;;S46.099A
 ;;9002226.02101,"873,S46.099A ",.02)
 ;;S46.099A
 ;;9002226.02101,"873,S46.099A ",.03)
 ;;30
 ;;9002226.02101,"873,S46.101A ",.01)
 ;;S46.101A
 ;;9002226.02101,"873,S46.101A ",.02)
 ;;S46.101A
 ;;9002226.02101,"873,S46.101A ",.03)
 ;;30
 ;;9002226.02101,"873,S46.102A ",.01)
 ;;S46.102A
 ;;9002226.02101,"873,S46.102A ",.02)
 ;;S46.102A
 ;;9002226.02101,"873,S46.102A ",.03)
 ;;30
 ;;9002226.02101,"873,S46.109A ",.01)
 ;;S46.109A
 ;;9002226.02101,"873,S46.109A ",.02)
 ;;S46.109A
 ;;9002226.02101,"873,S46.109A ",.03)
 ;;30
 ;;9002226.02101,"873,S46.111A ",.01)
 ;;S46.111A
 ;;9002226.02101,"873,S46.111A ",.02)
 ;;S46.111A
 ;;9002226.02101,"873,S46.111A ",.03)
 ;;30
 ;;9002226.02101,"873,S46.112A ",.01)
 ;;S46.112A
 ;;9002226.02101,"873,S46.112A ",.02)
 ;;S46.112A
 ;;9002226.02101,"873,S46.112A ",.03)
 ;;30
 ;;9002226.02101,"873,S46.119A ",.01)
 ;;S46.119A
 ;;9002226.02101,"873,S46.119A ",.02)
 ;;S46.119A
 ;;9002226.02101,"873,S46.119A ",.03)
 ;;30
 ;;9002226.02101,"873,S46.121A ",.01)
 ;;S46.121A
 ;;9002226.02101,"873,S46.121A ",.02)
 ;;S46.121A
 ;;9002226.02101,"873,S46.121A ",.03)
 ;;30
 ;;9002226.02101,"873,S46.122A ",.01)
 ;;S46.122A
 ;;9002226.02101,"873,S46.122A ",.02)
 ;;S46.122A
 ;;9002226.02101,"873,S46.122A ",.03)
 ;;30
 ;;9002226.02101,"873,S46.129A ",.01)
 ;;S46.129A
 ;;9002226.02101,"873,S46.129A ",.02)
 ;;S46.129A
 ;;9002226.02101,"873,S46.129A ",.03)
 ;;30
 ;;9002226.02101,"873,S46.191A ",.01)
 ;;S46.191A
 ;;9002226.02101,"873,S46.191A ",.02)
 ;;S46.191A
 ;;9002226.02101,"873,S46.191A ",.03)
 ;;30
 ;;9002226.02101,"873,S46.192A ",.01)
 ;;S46.192A
 ;;9002226.02101,"873,S46.192A ",.02)
 ;;S46.192A
 ;;9002226.02101,"873,S46.192A ",.03)
 ;;30
 ;;9002226.02101,"873,S46.199A ",.01)
 ;;S46.199A
 ;;9002226.02101,"873,S46.199A ",.02)
 ;;S46.199A
 ;;9002226.02101,"873,S46.199A ",.03)
 ;;30
 ;;9002226.02101,"873,S46.201A ",.01)
 ;;S46.201A
 ;;9002226.02101,"873,S46.201A ",.02)
 ;;S46.201A
 ;;9002226.02101,"873,S46.201A ",.03)
 ;;30
 ;;9002226.02101,"873,S46.202A ",.01)
 ;;S46.202A