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

ATXXA94.m

Go to the documentation of this file.
ATXXA94 ;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,S65.419A ",.02)
 ;;S65.419A
 ;;9002226.02101,"873,S65.419A ",.03)
 ;;30
 ;;9002226.02101,"873,S65.491A ",.01)
 ;;S65.491A
 ;;9002226.02101,"873,S65.491A ",.02)
 ;;S65.491A
 ;;9002226.02101,"873,S65.491A ",.03)
 ;;30
 ;;9002226.02101,"873,S65.492A ",.01)
 ;;S65.492A
 ;;9002226.02101,"873,S65.492A ",.02)
 ;;S65.492A
 ;;9002226.02101,"873,S65.492A ",.03)
 ;;30
 ;;9002226.02101,"873,S65.499A ",.01)
 ;;S65.499A
 ;;9002226.02101,"873,S65.499A ",.02)
 ;;S65.499A
 ;;9002226.02101,"873,S65.499A ",.03)
 ;;30
 ;;9002226.02101,"873,S65.500A ",.01)
 ;;S65.500A
 ;;9002226.02101,"873,S65.500A ",.02)
 ;;S65.500A
 ;;9002226.02101,"873,S65.500A ",.03)
 ;;30
 ;;9002226.02101,"873,S65.501A ",.01)
 ;;S65.501A
 ;;9002226.02101,"873,S65.501A ",.02)
 ;;S65.501A
 ;;9002226.02101,"873,S65.501A ",.03)
 ;;30
 ;;9002226.02101,"873,S65.502A ",.01)
 ;;S65.502A
 ;;9002226.02101,"873,S65.502A ",.02)
 ;;S65.502A
 ;;9002226.02101,"873,S65.502A ",.03)
 ;;30
 ;;9002226.02101,"873,S65.503A ",.01)
 ;;S65.503A
 ;;9002226.02101,"873,S65.503A ",.02)
 ;;S65.503A
 ;;9002226.02101,"873,S65.503A ",.03)
 ;;30
 ;;9002226.02101,"873,S65.504A ",.01)
 ;;S65.504A
 ;;9002226.02101,"873,S65.504A ",.02)
 ;;S65.504A
 ;;9002226.02101,"873,S65.504A ",.03)
 ;;30
 ;;9002226.02101,"873,S65.505A ",.01)
 ;;S65.505A
 ;;9002226.02101,"873,S65.505A ",.02)
 ;;S65.505A
 ;;9002226.02101,"873,S65.505A ",.03)
 ;;30
 ;;9002226.02101,"873,S65.506A ",.01)
 ;;S65.506A
 ;;9002226.02101,"873,S65.506A ",.02)
 ;;S65.506A
 ;;9002226.02101,"873,S65.506A ",.03)
 ;;30
 ;;9002226.02101,"873,S65.507A ",.01)
 ;;S65.507A
 ;;9002226.02101,"873,S65.507A ",.02)
 ;;S65.507A
 ;;9002226.02101,"873,S65.507A ",.03)
 ;;30
 ;;9002226.02101,"873,S65.508A ",.01)
 ;;S65.508A
 ;;9002226.02101,"873,S65.508A ",.02)
 ;;S65.508A
 ;;9002226.02101,"873,S65.508A ",.03)
 ;;30
 ;;9002226.02101,"873,S65.509A ",.01)
 ;;S65.509A
 ;;9002226.02101,"873,S65.509A ",.02)
 ;;S65.509A
 ;;9002226.02101,"873,S65.509A ",.03)
 ;;30
 ;;9002226.02101,"873,S65.510A ",.01)
 ;;S65.510A
 ;;9002226.02101,"873,S65.510A ",.02)
 ;;S65.510A
 ;;9002226.02101,"873,S65.510A ",.03)
 ;;30
 ;;9002226.02101,"873,S65.511A ",.01)
 ;;S65.511A
 ;;9002226.02101,"873,S65.511A ",.02)
 ;;S65.511A
 ;;9002226.02101,"873,S65.511A ",.03)
 ;;30
 ;;9002226.02101,"873,S65.512A ",.01)
 ;;S65.512A
 ;;9002226.02101,"873,S65.512A ",.02)
 ;;S65.512A
 ;;9002226.02101,"873,S65.512A ",.03)
 ;;30
 ;;9002226.02101,"873,S65.513A ",.01)
 ;;S65.513A
 ;;9002226.02101,"873,S65.513A ",.02)
 ;;S65.513A
 ;;9002226.02101,"873,S65.513A ",.03)
 ;;30
 ;;9002226.02101,"873,S65.514A ",.01)
 ;;S65.514A
 ;;9002226.02101,"873,S65.514A ",.02)
 ;;S65.514A
 ;;9002226.02101,"873,S65.514A ",.03)
 ;;30
 ;;9002226.02101,"873,S65.515A ",.01)
 ;;S65.515A
 ;;9002226.02101,"873,S65.515A ",.02)
 ;;S65.515A
 ;;9002226.02101,"873,S65.515A ",.03)
 ;;30
 ;;9002226.02101,"873,S65.516A ",.01)
 ;;S65.516A
 ;;9002226.02101,"873,S65.516A ",.02)
 ;;S65.516A
 ;;9002226.02101,"873,S65.516A ",.03)
 ;;30
 ;;9002226.02101,"873,S65.517A ",.01)
 ;;S65.517A
 ;;9002226.02101,"873,S65.517A ",.02)
 ;;S65.517A
 ;;9002226.02101,"873,S65.517A ",.03)
 ;;30
 ;;9002226.02101,"873,S65.518A ",.01)
 ;;S65.518A
 ;;9002226.02101,"873,S65.518A ",.02)
 ;;S65.518A
 ;;9002226.02101,"873,S65.518A ",.03)
 ;;30
 ;;9002226.02101,"873,S65.519A ",.01)
 ;;S65.519A
 ;;9002226.02101,"873,S65.519A ",.02)
 ;;S65.519A
 ;;9002226.02101,"873,S65.519A ",.03)
 ;;30
 ;;9002226.02101,"873,S65.590A ",.01)
 ;;S65.590A
 ;;9002226.02101,"873,S65.590A ",.02)
 ;;S65.590A
 ;;9002226.02101,"873,S65.590A ",.03)
 ;;30
 ;;9002226.02101,"873,S65.591A ",.01)
 ;;S65.591A
 ;;9002226.02101,"873,S65.591A ",.02)
 ;;S65.591A
 ;;9002226.02101,"873,S65.591A ",.03)
 ;;30
 ;;9002226.02101,"873,S65.592A ",.01)
 ;;S65.592A
 ;;9002226.02101,"873,S65.592A ",.02)
 ;;S65.592A
 ;;9002226.02101,"873,S65.592A ",.03)
 ;;30
 ;;9002226.02101,"873,S65.593A ",.01)
 ;;S65.593A
 ;;9002226.02101,"873,S65.593A ",.02)
 ;;S65.593A
 ;;9002226.02101,"873,S65.593A ",.03)
 ;;30
 ;;9002226.02101,"873,S65.594A ",.01)
 ;;S65.594A
 ;;9002226.02101,"873,S65.594A ",.02)
 ;;S65.594A
 ;;9002226.02101,"873,S65.594A ",.03)
 ;;30
 ;;9002226.02101,"873,S65.595A ",.01)
 ;;S65.595A
 ;;9002226.02101,"873,S65.595A ",.02)
 ;;S65.595A
 ;;9002226.02101,"873,S65.595A ",.03)
 ;;30
 ;;9002226.02101,"873,S65.596A ",.01)
 ;;S65.596A
 ;;9002226.02101,"873,S65.596A ",.02)
 ;;S65.596A
 ;;9002226.02101,"873,S65.596A ",.03)
 ;;30
 ;;9002226.02101,"873,S65.597A ",.01)
 ;;S65.597A
 ;;9002226.02101,"873,S65.597A ",.02)
 ;;S65.597A
 ;;9002226.02101,"873,S65.597A ",.03)
 ;;30
 ;;9002226.02101,"873,S65.598A ",.01)
 ;;S65.598A
 ;;9002226.02101,"873,S65.598A ",.02)
 ;;S65.598A
 ;;9002226.02101,"873,S65.598A ",.03)
 ;;30
 ;;9002226.02101,"873,S65.599A ",.01)
 ;;S65.599A
 ;;9002226.02101,"873,S65.599A ",.02)
 ;;S65.599A
 ;;9002226.02101,"873,S65.599A ",.03)
 ;;30
 ;;9002226.02101,"873,S65.801A ",.01)
 ;;S65.801A
 ;;9002226.02101,"873,S65.801A ",.02)
 ;;S65.801A
 ;;9002226.02101,"873,S65.801A ",.03)
 ;;30
 ;;9002226.02101,"873,S65.802A ",.01)
 ;;S65.802A
 ;;9002226.02101,"873,S65.802A ",.02)
 ;;S65.802A
 ;;9002226.02101,"873,S65.802A ",.03)
 ;;30
 ;;9002226.02101,"873,S65.809A ",.01)
 ;;S65.809A
 ;;9002226.02101,"873,S65.809A ",.02)
 ;;S65.809A
 ;;9002226.02101,"873,S65.809A ",.03)
 ;;30
 ;;9002226.02101,"873,S65.811A ",.01)
 ;;S65.811A
 ;;9002226.02101,"873,S65.811A ",.02)
 ;;S65.811A
 ;;9002226.02101,"873,S65.811A ",.03)
 ;;30
 ;;9002226.02101,"873,S65.812A ",.01)
 ;;S65.812A
 ;;9002226.02101,"873,S65.812A ",.02)
 ;;S65.812A
 ;;9002226.02101,"873,S65.812A ",.03)
 ;;30
 ;;9002226.02101,"873,S65.819A ",.01)
 ;;S65.819A
 ;;9002226.02101,"873,S65.819A ",.02)
 ;;S65.819A
 ;;9002226.02101,"873,S65.819A ",.03)
 ;;30
 ;;9002226.02101,"873,S65.891A ",.01)
 ;;S65.891A
 ;;9002226.02101,"873,S65.891A ",.02)
 ;;S65.891A
 ;;9002226.02101,"873,S65.891A ",.03)
 ;;30
 ;;9002226.02101,"873,S65.892A ",.01)
 ;;S65.892A
 ;;9002226.02101,"873,S65.892A ",.02)
 ;;S65.892A
 ;;9002226.02101,"873,S65.892A ",.03)
 ;;30
 ;;9002226.02101,"873,S65.899A ",.01)
 ;;S65.899A
 ;;9002226.02101,"873,S65.899A ",.02)
 ;;S65.899A
 ;;9002226.02101,"873,S65.899A ",.03)
 ;;30
 ;;9002226.02101,"873,S65.901A ",.01)
 ;;S65.901A
 ;;9002226.02101,"873,S65.901A ",.02)
 ;;S65.901A
 ;;9002226.02101,"873,S65.901A ",.03)
 ;;30
 ;;9002226.02101,"873,S65.902A ",.01)
 ;;S65.902A
 ;;9002226.02101,"873,S65.902A ",.02)
 ;;S65.902A
 ;;9002226.02101,"873,S65.902A ",.03)
 ;;30
 ;;9002226.02101,"873,S65.909A ",.01)
 ;;S65.909A
 ;;9002226.02101,"873,S65.909A ",.02)
 ;;S65.909A
 ;;9002226.02101,"873,S65.909A ",.03)
 ;;30
 ;;9002226.02101,"873,S65.911A ",.01)
 ;;S65.911A
 ;;9002226.02101,"873,S65.911A ",.02)
 ;;S65.911A
 ;;9002226.02101,"873,S65.911A ",.03)
 ;;30
 ;;9002226.02101,"873,S65.912A ",.01)
 ;;S65.912A
 ;;9002226.02101,"873,S65.912A ",.02)
 ;;S65.912A
 ;;9002226.02101,"873,S65.912A ",.03)
 ;;30
 ;;9002226.02101,"873,S65.919A ",.01)
 ;;S65.919A
 ;;9002226.02101,"873,S65.919A ",.02)
 ;;S65.919A
 ;;9002226.02101,"873,S65.919A ",.03)
 ;;30
 ;;9002226.02101,"873,S65.991A ",.01)
 ;;S65.991A
 ;;9002226.02101,"873,S65.991A ",.02)
 ;;S65.991A
 ;;9002226.02101,"873,S65.991A ",.03)
 ;;30
 ;;9002226.02101,"873,S65.992A ",.01)
 ;;S65.992A
 ;;9002226.02101,"873,S65.992A ",.02)
 ;;S65.992A
 ;;9002226.02101,"873,S65.992A ",.03)
 ;;30
 ;;9002226.02101,"873,S65.999A ",.01)
 ;;S65.999A
 ;;9002226.02101,"873,S65.999A ",.02)
 ;;S65.999A
 ;;9002226.02101,"873,S65.999A ",.03)
 ;;30
 ;;9002226.02101,"873,S66.001A ",.01)
 ;;S66.001A
 ;;9002226.02101,"873,S66.001A ",.02)
 ;;S66.001A
 ;;9002226.02101,"873,S66.001A ",.03)
 ;;30
 ;;9002226.02101,"873,S66.002A ",.01)
 ;;S66.002A
 ;;9002226.02101,"873,S66.002A ",.02)
 ;;S66.002A
 ;;9002226.02101,"873,S66.002A ",.03)
 ;;30
 ;;9002226.02101,"873,S66.009A ",.01)
 ;;S66.009A
 ;;9002226.02101,"873,S66.009A ",.02)
 ;;S66.009A
 ;;9002226.02101,"873,S66.009A ",.03)
 ;;30
 ;;9002226.02101,"873,S66.011A ",.01)
 ;;S66.011A
 ;;9002226.02101,"873,S66.011A ",.02)
 ;;S66.011A
 ;;9002226.02101,"873,S66.011A ",.03)
 ;;30
 ;;9002226.02101,"873,S66.012A ",.01)
 ;;S66.012A
 ;;9002226.02101,"873,S66.012A ",.02)
 ;;S66.012A
 ;;9002226.02101,"873,S66.012A ",.03)
 ;;30
 ;;9002226.02101,"873,S66.019A ",.01)
 ;;S66.019A
 ;;9002226.02101,"873,S66.019A ",.02)
 ;;S66.019A
 ;;9002226.02101,"873,S66.019A ",.03)
 ;;30
 ;;9002226.02101,"873,S66.021A ",.01)
 ;;S66.021A
 ;;9002226.02101,"873,S66.021A ",.02)
 ;;S66.021A
 ;;9002226.02101,"873,S66.021A ",.03)
 ;;30
 ;;9002226.02101,"873,S66.022A ",.01)
 ;;S66.022A
 ;;9002226.02101,"873,S66.022A ",.02)
 ;;S66.022A
 ;;9002226.02101,"873,S66.022A ",.03)
 ;;30
 ;;9002226.02101,"873,S66.029A ",.01)
 ;;S66.029A
 ;;9002226.02101,"873,S66.029A ",.02)
 ;;S66.029A
 ;;9002226.02101,"873,S66.029A ",.03)
 ;;30
 ;;9002226.02101,"873,S66.091A ",.01)
 ;;S66.091A
 ;;9002226.02101,"873,S66.091A ",.02)
 ;;S66.091A
 ;;9002226.02101,"873,S66.091A ",.03)
 ;;30
 ;;9002226.02101,"873,S66.092A ",.01)
 ;;S66.092A
 ;;9002226.02101,"873,S66.092A ",.02)
 ;;S66.092A
 ;;9002226.02101,"873,S66.092A ",.03)
 ;;30
 ;;9002226.02101,"873,S66.099A ",.01)
 ;;S66.099A
 ;;9002226.02101,"873,S66.099A ",.02)
 ;;S66.099A
 ;;9002226.02101,"873,S66.099A ",.03)
 ;;30
 ;;9002226.02101,"873,S66.100A ",.01)
 ;;S66.100A
 ;;9002226.02101,"873,S66.100A ",.02)
 ;;S66.100A
 ;;9002226.02101,"873,S66.100A ",.03)
 ;;30
 ;;9002226.02101,"873,S66.101A ",.01)
 ;;S66.101A
 ;;9002226.02101,"873,S66.101A ",.02)
 ;;S66.101A
 ;;9002226.02101,"873,S66.101A ",.03)
 ;;30
 ;;9002226.02101,"873,S66.102A ",.01)
 ;;S66.102A
 ;;9002226.02101,"873,S66.102A ",.02)
 ;;S66.102A
 ;;9002226.02101,"873,S66.102A ",.03)
 ;;30
 ;;9002226.02101,"873,S66.103A ",.01)
 ;;S66.103A
 ;;9002226.02101,"873,S66.103A ",.02)
 ;;S66.103A
 ;;9002226.02101,"873,S66.103A ",.03)
 ;;30
 ;;9002226.02101,"873,S66.104A ",.01)
 ;;S66.104A
 ;;9002226.02101,"873,S66.104A ",.02)
 ;;S66.104A
 ;;9002226.02101,"873,S66.104A ",.03)
 ;;30
 ;;9002226.02101,"873,S66.105A ",.01)
 ;;S66.105A
 ;;9002226.02101,"873,S66.105A ",.02)
 ;;S66.105A
 ;;9002226.02101,"873,S66.105A ",.03)
 ;;30
 ;;9002226.02101,"873,S66.106A ",.01)
 ;;S66.106A
 ;;9002226.02101,"873,S66.106A ",.02)
 ;;S66.106A
 ;;9002226.02101,"873,S66.106A ",.03)
 ;;30
 ;;9002226.02101,"873,S66.107A ",.01)
 ;;S66.107A
 ;;9002226.02101,"873,S66.107A ",.02)
 ;;S66.107A
 ;;9002226.02101,"873,S66.107A ",.03)
 ;;30
 ;;9002226.02101,"873,S66.108A ",.01)
 ;;S66.108A
 ;;9002226.02101,"873,S66.108A ",.02)
 ;;S66.108A
 ;;9002226.02101,"873,S66.108A ",.03)
 ;;30
 ;;9002226.02101,"873,S66.109A ",.01)
 ;;S66.109A
 ;;9002226.02101,"873,S66.109A ",.02)
 ;;S66.109A
 ;;9002226.02101,"873,S66.109A ",.03)
 ;;30
 ;;9002226.02101,"873,S66.110A ",.01)
 ;;S66.110A
 ;;9002226.02101,"873,S66.110A ",.02)
 ;;S66.110A
 ;;9002226.02101,"873,S66.110A ",.03)
 ;;30
 ;;9002226.02101,"873,S66.111A ",.01)
 ;;S66.111A
 ;;9002226.02101,"873,S66.111A ",.02)
 ;;S66.111A
 ;;9002226.02101,"873,S66.111A ",.03)
 ;;30
 ;;9002226.02101,"873,S66.112A ",.01)
 ;;S66.112A
 ;;9002226.02101,"873,S66.112A ",.02)
 ;;S66.112A
 ;;9002226.02101,"873,S66.112A ",.03)
 ;;30
 ;;9002226.02101,"873,S66.113A ",.01)
 ;;S66.113A
 ;;9002226.02101,"873,S66.113A ",.02)
 ;;S66.113A
 ;;9002226.02101,"873,S66.113A ",.03)
 ;;30
 ;;9002226.02101,"873,S66.114A ",.01)
 ;;S66.114A
 ;;9002226.02101,"873,S66.114A ",.02)
 ;;S66.114A