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

ATXXA59.m

Go to the documentation of this file.
ATXXA59 ;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,S42.323B ",.03)
 ;;30
 ;;9002226.02101,"873,S42.324A ",.01)
 ;;S42.324A
 ;;9002226.02101,"873,S42.324A ",.02)
 ;;S42.324A
 ;;9002226.02101,"873,S42.324A ",.03)
 ;;30
 ;;9002226.02101,"873,S42.324B ",.01)
 ;;S42.324B
 ;;9002226.02101,"873,S42.324B ",.02)
 ;;S42.324B
 ;;9002226.02101,"873,S42.324B ",.03)
 ;;30
 ;;9002226.02101,"873,S42.325A ",.01)
 ;;S42.325A
 ;;9002226.02101,"873,S42.325A ",.02)
 ;;S42.325A
 ;;9002226.02101,"873,S42.325A ",.03)
 ;;30
 ;;9002226.02101,"873,S42.325B ",.01)
 ;;S42.325B
 ;;9002226.02101,"873,S42.325B ",.02)
 ;;S42.325B
 ;;9002226.02101,"873,S42.325B ",.03)
 ;;30
 ;;9002226.02101,"873,S42.326A ",.01)
 ;;S42.326A
 ;;9002226.02101,"873,S42.326A ",.02)
 ;;S42.326A
 ;;9002226.02101,"873,S42.326A ",.03)
 ;;30
 ;;9002226.02101,"873,S42.326B ",.01)
 ;;S42.326B
 ;;9002226.02101,"873,S42.326B ",.02)
 ;;S42.326B
 ;;9002226.02101,"873,S42.326B ",.03)
 ;;30
 ;;9002226.02101,"873,S42.331A ",.01)
 ;;S42.331A
 ;;9002226.02101,"873,S42.331A ",.02)
 ;;S42.331A
 ;;9002226.02101,"873,S42.331A ",.03)
 ;;30
 ;;9002226.02101,"873,S42.331B ",.01)
 ;;S42.331B
 ;;9002226.02101,"873,S42.331B ",.02)
 ;;S42.331B
 ;;9002226.02101,"873,S42.331B ",.03)
 ;;30
 ;;9002226.02101,"873,S42.332A ",.01)
 ;;S42.332A
 ;;9002226.02101,"873,S42.332A ",.02)
 ;;S42.332A
 ;;9002226.02101,"873,S42.332A ",.03)
 ;;30
 ;;9002226.02101,"873,S42.332B ",.01)
 ;;S42.332B
 ;;9002226.02101,"873,S42.332B ",.02)
 ;;S42.332B
 ;;9002226.02101,"873,S42.332B ",.03)
 ;;30
 ;;9002226.02101,"873,S42.333A ",.01)
 ;;S42.333A
 ;;9002226.02101,"873,S42.333A ",.02)
 ;;S42.333A
 ;;9002226.02101,"873,S42.333A ",.03)
 ;;30
 ;;9002226.02101,"873,S42.333B ",.01)
 ;;S42.333B
 ;;9002226.02101,"873,S42.333B ",.02)
 ;;S42.333B
 ;;9002226.02101,"873,S42.333B ",.03)
 ;;30
 ;;9002226.02101,"873,S42.334A ",.01)
 ;;S42.334A
 ;;9002226.02101,"873,S42.334A ",.02)
 ;;S42.334A
 ;;9002226.02101,"873,S42.334A ",.03)
 ;;30
 ;;9002226.02101,"873,S42.334B ",.01)
 ;;S42.334B
 ;;9002226.02101,"873,S42.334B ",.02)
 ;;S42.334B
 ;;9002226.02101,"873,S42.334B ",.03)
 ;;30
 ;;9002226.02101,"873,S42.335A ",.01)
 ;;S42.335A
 ;;9002226.02101,"873,S42.335A ",.02)
 ;;S42.335A
 ;;9002226.02101,"873,S42.335A ",.03)
 ;;30
 ;;9002226.02101,"873,S42.335B ",.01)
 ;;S42.335B
 ;;9002226.02101,"873,S42.335B ",.02)
 ;;S42.335B
 ;;9002226.02101,"873,S42.335B ",.03)
 ;;30
 ;;9002226.02101,"873,S42.336A ",.01)
 ;;S42.336A
 ;;9002226.02101,"873,S42.336A ",.02)
 ;;S42.336A
 ;;9002226.02101,"873,S42.336A ",.03)
 ;;30
 ;;9002226.02101,"873,S42.336B ",.01)
 ;;S42.336B
 ;;9002226.02101,"873,S42.336B ",.02)
 ;;S42.336B
 ;;9002226.02101,"873,S42.336B ",.03)
 ;;30
 ;;9002226.02101,"873,S42.341A ",.01)
 ;;S42.341A
 ;;9002226.02101,"873,S42.341A ",.02)
 ;;S42.341A
 ;;9002226.02101,"873,S42.341A ",.03)
 ;;30
 ;;9002226.02101,"873,S42.341B ",.01)
 ;;S42.341B
 ;;9002226.02101,"873,S42.341B ",.02)
 ;;S42.341B
 ;;9002226.02101,"873,S42.341B ",.03)
 ;;30
 ;;9002226.02101,"873,S42.342A ",.01)
 ;;S42.342A
 ;;9002226.02101,"873,S42.342A ",.02)
 ;;S42.342A
 ;;9002226.02101,"873,S42.342A ",.03)
 ;;30
 ;;9002226.02101,"873,S42.342B ",.01)
 ;;S42.342B
 ;;9002226.02101,"873,S42.342B ",.02)
 ;;S42.342B
 ;;9002226.02101,"873,S42.342B ",.03)
 ;;30
 ;;9002226.02101,"873,S42.343A ",.01)
 ;;S42.343A
 ;;9002226.02101,"873,S42.343A ",.02)
 ;;S42.343A
 ;;9002226.02101,"873,S42.343A ",.03)
 ;;30
 ;;9002226.02101,"873,S42.343B ",.01)
 ;;S42.343B
 ;;9002226.02101,"873,S42.343B ",.02)
 ;;S42.343B
 ;;9002226.02101,"873,S42.343B ",.03)
 ;;30
 ;;9002226.02101,"873,S42.344A ",.01)
 ;;S42.344A
 ;;9002226.02101,"873,S42.344A ",.02)
 ;;S42.344A
 ;;9002226.02101,"873,S42.344A ",.03)
 ;;30
 ;;9002226.02101,"873,S42.344B ",.01)
 ;;S42.344B
 ;;9002226.02101,"873,S42.344B ",.02)
 ;;S42.344B
 ;;9002226.02101,"873,S42.344B ",.03)
 ;;30
 ;;9002226.02101,"873,S42.345A ",.01)
 ;;S42.345A
 ;;9002226.02101,"873,S42.345A ",.02)
 ;;S42.345A
 ;;9002226.02101,"873,S42.345A ",.03)
 ;;30
 ;;9002226.02101,"873,S42.345B ",.01)
 ;;S42.345B
 ;;9002226.02101,"873,S42.345B ",.02)
 ;;S42.345B
 ;;9002226.02101,"873,S42.345B ",.03)
 ;;30
 ;;9002226.02101,"873,S42.346A ",.01)
 ;;S42.346A
 ;;9002226.02101,"873,S42.346A ",.02)
 ;;S42.346A
 ;;9002226.02101,"873,S42.346A ",.03)
 ;;30
 ;;9002226.02101,"873,S42.346B ",.01)
 ;;S42.346B
 ;;9002226.02101,"873,S42.346B ",.02)
 ;;S42.346B
 ;;9002226.02101,"873,S42.346B ",.03)
 ;;30
 ;;9002226.02101,"873,S42.351A ",.01)
 ;;S42.351A
 ;;9002226.02101,"873,S42.351A ",.02)
 ;;S42.351A
 ;;9002226.02101,"873,S42.351A ",.03)
 ;;30
 ;;9002226.02101,"873,S42.351B ",.01)
 ;;S42.351B
 ;;9002226.02101,"873,S42.351B ",.02)
 ;;S42.351B
 ;;9002226.02101,"873,S42.351B ",.03)
 ;;30
 ;;9002226.02101,"873,S42.352A ",.01)
 ;;S42.352A
 ;;9002226.02101,"873,S42.352A ",.02)
 ;;S42.352A
 ;;9002226.02101,"873,S42.352A ",.03)
 ;;30
 ;;9002226.02101,"873,S42.352B ",.01)
 ;;S42.352B
 ;;9002226.02101,"873,S42.352B ",.02)
 ;;S42.352B
 ;;9002226.02101,"873,S42.352B ",.03)
 ;;30
 ;;9002226.02101,"873,S42.353A ",.01)
 ;;S42.353A
 ;;9002226.02101,"873,S42.353A ",.02)
 ;;S42.353A
 ;;9002226.02101,"873,S42.353A ",.03)
 ;;30
 ;;9002226.02101,"873,S42.353B ",.01)
 ;;S42.353B
 ;;9002226.02101,"873,S42.353B ",.02)
 ;;S42.353B
 ;;9002226.02101,"873,S42.353B ",.03)
 ;;30
 ;;9002226.02101,"873,S42.354A ",.01)
 ;;S42.354A
 ;;9002226.02101,"873,S42.354A ",.02)
 ;;S42.354A
 ;;9002226.02101,"873,S42.354A ",.03)
 ;;30
 ;;9002226.02101,"873,S42.354B ",.01)
 ;;S42.354B
 ;;9002226.02101,"873,S42.354B ",.02)
 ;;S42.354B
 ;;9002226.02101,"873,S42.354B ",.03)
 ;;30
 ;;9002226.02101,"873,S42.355A ",.01)
 ;;S42.355A
 ;;9002226.02101,"873,S42.355A ",.02)
 ;;S42.355A
 ;;9002226.02101,"873,S42.355A ",.03)
 ;;30
 ;;9002226.02101,"873,S42.355B ",.01)
 ;;S42.355B
 ;;9002226.02101,"873,S42.355B ",.02)
 ;;S42.355B
 ;;9002226.02101,"873,S42.355B ",.03)
 ;;30
 ;;9002226.02101,"873,S42.356A ",.01)
 ;;S42.356A
 ;;9002226.02101,"873,S42.356A ",.02)
 ;;S42.356A
 ;;9002226.02101,"873,S42.356A ",.03)
 ;;30
 ;;9002226.02101,"873,S42.356B ",.01)
 ;;S42.356B
 ;;9002226.02101,"873,S42.356B ",.02)
 ;;S42.356B
 ;;9002226.02101,"873,S42.356B ",.03)
 ;;30
 ;;9002226.02101,"873,S42.361A ",.01)
 ;;S42.361A
 ;;9002226.02101,"873,S42.361A ",.02)
 ;;S42.361A
 ;;9002226.02101,"873,S42.361A ",.03)
 ;;30
 ;;9002226.02101,"873,S42.361B ",.01)
 ;;S42.361B
 ;;9002226.02101,"873,S42.361B ",.02)
 ;;S42.361B
 ;;9002226.02101,"873,S42.361B ",.03)
 ;;30
 ;;9002226.02101,"873,S42.362A ",.01)
 ;;S42.362A
 ;;9002226.02101,"873,S42.362A ",.02)
 ;;S42.362A
 ;;9002226.02101,"873,S42.362A ",.03)
 ;;30
 ;;9002226.02101,"873,S42.362B ",.01)
 ;;S42.362B
 ;;9002226.02101,"873,S42.362B ",.02)
 ;;S42.362B
 ;;9002226.02101,"873,S42.362B ",.03)
 ;;30
 ;;9002226.02101,"873,S42.363A ",.01)
 ;;S42.363A
 ;;9002226.02101,"873,S42.363A ",.02)
 ;;S42.363A
 ;;9002226.02101,"873,S42.363A ",.03)
 ;;30
 ;;9002226.02101,"873,S42.363B ",.01)
 ;;S42.363B
 ;;9002226.02101,"873,S42.363B ",.02)
 ;;S42.363B
 ;;9002226.02101,"873,S42.363B ",.03)
 ;;30
 ;;9002226.02101,"873,S42.364A ",.01)
 ;;S42.364A
 ;;9002226.02101,"873,S42.364A ",.02)
 ;;S42.364A
 ;;9002226.02101,"873,S42.364A ",.03)
 ;;30
 ;;9002226.02101,"873,S42.364B ",.01)
 ;;S42.364B
 ;;9002226.02101,"873,S42.364B ",.02)
 ;;S42.364B
 ;;9002226.02101,"873,S42.364B ",.03)
 ;;30
 ;;9002226.02101,"873,S42.365A ",.01)
 ;;S42.365A
 ;;9002226.02101,"873,S42.365A ",.02)
 ;;S42.365A
 ;;9002226.02101,"873,S42.365A ",.03)
 ;;30
 ;;9002226.02101,"873,S42.365B ",.01)
 ;;S42.365B
 ;;9002226.02101,"873,S42.365B ",.02)
 ;;S42.365B
 ;;9002226.02101,"873,S42.365B ",.03)
 ;;30
 ;;9002226.02101,"873,S42.366A ",.01)
 ;;S42.366A
 ;;9002226.02101,"873,S42.366A ",.02)
 ;;S42.366A
 ;;9002226.02101,"873,S42.366A ",.03)
 ;;30
 ;;9002226.02101,"873,S42.366B ",.01)
 ;;S42.366B
 ;;9002226.02101,"873,S42.366B ",.02)
 ;;S42.366B
 ;;9002226.02101,"873,S42.366B ",.03)
 ;;30
 ;;9002226.02101,"873,S42.391A ",.01)
 ;;S42.391A
 ;;9002226.02101,"873,S42.391A ",.02)
 ;;S42.391A
 ;;9002226.02101,"873,S42.391A ",.03)
 ;;30
 ;;9002226.02101,"873,S42.391B ",.01)
 ;;S42.391B
 ;;9002226.02101,"873,S42.391B ",.02)
 ;;S42.391B
 ;;9002226.02101,"873,S42.391B ",.03)
 ;;30
 ;;9002226.02101,"873,S42.392A ",.01)
 ;;S42.392A
 ;;9002226.02101,"873,S42.392A ",.02)
 ;;S42.392A
 ;;9002226.02101,"873,S42.392A ",.03)
 ;;30
 ;;9002226.02101,"873,S42.392B ",.01)
 ;;S42.392B
 ;;9002226.02101,"873,S42.392B ",.02)
 ;;S42.392B
 ;;9002226.02101,"873,S42.392B ",.03)
 ;;30
 ;;9002226.02101,"873,S42.399A ",.01)
 ;;S42.399A
 ;;9002226.02101,"873,S42.399A ",.02)
 ;;S42.399A
 ;;9002226.02101,"873,S42.399A ",.03)
 ;;30
 ;;9002226.02101,"873,S42.399B ",.01)
 ;;S42.399B
 ;;9002226.02101,"873,S42.399B ",.02)
 ;;S42.399B
 ;;9002226.02101,"873,S42.399B ",.03)
 ;;30
 ;;9002226.02101,"873,S42.401A ",.01)
 ;;S42.401A
 ;;9002226.02101,"873,S42.401A ",.02)
 ;;S42.401A
 ;;9002226.02101,"873,S42.401A ",.03)
 ;;30
 ;;9002226.02101,"873,S42.401B ",.01)
 ;;S42.401B
 ;;9002226.02101,"873,S42.401B ",.02)
 ;;S42.401B
 ;;9002226.02101,"873,S42.401B ",.03)
 ;;30
 ;;9002226.02101,"873,S42.402A ",.01)
 ;;S42.402A
 ;;9002226.02101,"873,S42.402A ",.02)
 ;;S42.402A
 ;;9002226.02101,"873,S42.402A ",.03)
 ;;30
 ;;9002226.02101,"873,S42.402B ",.01)
 ;;S42.402B
 ;;9002226.02101,"873,S42.402B ",.02)
 ;;S42.402B
 ;;9002226.02101,"873,S42.402B ",.03)
 ;;30
 ;;9002226.02101,"873,S42.409A ",.01)
 ;;S42.409A
 ;;9002226.02101,"873,S42.409A ",.02)
 ;;S42.409A
 ;;9002226.02101,"873,S42.409A ",.03)
 ;;30
 ;;9002226.02101,"873,S42.409B ",.01)
 ;;S42.409B
 ;;9002226.02101,"873,S42.409B ",.02)
 ;;S42.409B
 ;;9002226.02101,"873,S42.409B ",.03)
 ;;30
 ;;9002226.02101,"873,S42.411A ",.01)
 ;;S42.411A
 ;;9002226.02101,"873,S42.411A ",.02)
 ;;S42.411A
 ;;9002226.02101,"873,S42.411A ",.03)
 ;;30
 ;;9002226.02101,"873,S42.411B ",.01)
 ;;S42.411B
 ;;9002226.02101,"873,S42.411B ",.02)
 ;;S42.411B
 ;;9002226.02101,"873,S42.411B ",.03)
 ;;30
 ;;9002226.02101,"873,S42.412A ",.01)
 ;;S42.412A
 ;;9002226.02101,"873,S42.412A ",.02)
 ;;S42.412A
 ;;9002226.02101,"873,S42.412A ",.03)
 ;;30
 ;;9002226.02101,"873,S42.412B ",.01)
 ;;S42.412B
 ;;9002226.02101,"873,S42.412B ",.02)
 ;;S42.412B
 ;;9002226.02101,"873,S42.412B ",.03)
 ;;30
 ;;9002226.02101,"873,S42.413A ",.01)
 ;;S42.413A
 ;;9002226.02101,"873,S42.413A ",.02)
 ;;S42.413A
 ;;9002226.02101,"873,S42.413A ",.03)
 ;;30
 ;;9002226.02101,"873,S42.413B ",.01)
 ;;S42.413B
 ;;9002226.02101,"873,S42.413B ",.02)
 ;;S42.413B
 ;;9002226.02101,"873,S42.413B ",.03)
 ;;30
 ;;9002226.02101,"873,S42.414A ",.01)
 ;;S42.414A
 ;;9002226.02101,"873,S42.414A ",.02)
 ;;S42.414A
 ;;9002226.02101,"873,S42.414A ",.03)
 ;;30
 ;;9002226.02101,"873,S42.414B ",.01)
 ;;S42.414B
 ;;9002226.02101,"873,S42.414B ",.02)
 ;;S42.414B
 ;;9002226.02101,"873,S42.414B ",.03)
 ;;30
 ;;9002226.02101,"873,S42.415A ",.01)
 ;;S42.415A
 ;;9002226.02101,"873,S42.415A ",.02)
 ;;S42.415A
 ;;9002226.02101,"873,S42.415A ",.03)
 ;;30
 ;;9002226.02101,"873,S42.415B ",.01)
 ;;S42.415B
 ;;9002226.02101,"873,S42.415B ",.02)
 ;;S42.415B
 ;;9002226.02101,"873,S42.415B ",.03)
 ;;30
 ;;9002226.02101,"873,S42.416A ",.01)
 ;;S42.416A
 ;;9002226.02101,"873,S42.416A ",.02)
 ;;S42.416A
 ;;9002226.02101,"873,S42.416A ",.03)
 ;;30
 ;;9002226.02101,"873,S42.416B ",.01)
 ;;S42.416B
 ;;9002226.02101,"873,S42.416B ",.02)
 ;;S42.416B
 ;;9002226.02101,"873,S42.416B ",.03)
 ;;30