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

ATXXA81.m

Go to the documentation of this file.
ATXXA81 ;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,S61.312A ",.01)
 ;;S61.312A
 ;;9002226.02101,"873,S61.312A ",.02)
 ;;S61.312A
 ;;9002226.02101,"873,S61.312A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.313A ",.01)
 ;;S61.313A
 ;;9002226.02101,"873,S61.313A ",.02)
 ;;S61.313A
 ;;9002226.02101,"873,S61.313A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.314A ",.01)
 ;;S61.314A
 ;;9002226.02101,"873,S61.314A ",.02)
 ;;S61.314A
 ;;9002226.02101,"873,S61.314A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.315A ",.01)
 ;;S61.315A
 ;;9002226.02101,"873,S61.315A ",.02)
 ;;S61.315A
 ;;9002226.02101,"873,S61.315A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.316A ",.01)
 ;;S61.316A
 ;;9002226.02101,"873,S61.316A ",.02)
 ;;S61.316A
 ;;9002226.02101,"873,S61.316A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.317A ",.01)
 ;;S61.317A
 ;;9002226.02101,"873,S61.317A ",.02)
 ;;S61.317A
 ;;9002226.02101,"873,S61.317A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.318A ",.01)
 ;;S61.318A
 ;;9002226.02101,"873,S61.318A ",.02)
 ;;S61.318A
 ;;9002226.02101,"873,S61.318A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.319A ",.01)
 ;;S61.319A
 ;;9002226.02101,"873,S61.319A ",.02)
 ;;S61.319A
 ;;9002226.02101,"873,S61.319A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.320A ",.01)
 ;;S61.320A
 ;;9002226.02101,"873,S61.320A ",.02)
 ;;S61.320A
 ;;9002226.02101,"873,S61.320A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.321A ",.01)
 ;;S61.321A
 ;;9002226.02101,"873,S61.321A ",.02)
 ;;S61.321A
 ;;9002226.02101,"873,S61.321A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.322A ",.01)
 ;;S61.322A
 ;;9002226.02101,"873,S61.322A ",.02)
 ;;S61.322A
 ;;9002226.02101,"873,S61.322A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.323A ",.01)
 ;;S61.323A
 ;;9002226.02101,"873,S61.323A ",.02)
 ;;S61.323A
 ;;9002226.02101,"873,S61.323A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.324A ",.01)
 ;;S61.324A
 ;;9002226.02101,"873,S61.324A ",.02)
 ;;S61.324A
 ;;9002226.02101,"873,S61.324A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.325A ",.01)
 ;;S61.325A
 ;;9002226.02101,"873,S61.325A ",.02)
 ;;S61.325A
 ;;9002226.02101,"873,S61.325A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.326A ",.01)
 ;;S61.326A
 ;;9002226.02101,"873,S61.326A ",.02)
 ;;S61.326A
 ;;9002226.02101,"873,S61.326A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.327A ",.01)
 ;;S61.327A
 ;;9002226.02101,"873,S61.327A ",.02)
 ;;S61.327A
 ;;9002226.02101,"873,S61.327A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.328A ",.01)
 ;;S61.328A
 ;;9002226.02101,"873,S61.328A ",.02)
 ;;S61.328A
 ;;9002226.02101,"873,S61.328A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.329A ",.01)
 ;;S61.329A
 ;;9002226.02101,"873,S61.329A ",.02)
 ;;S61.329A
 ;;9002226.02101,"873,S61.329A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.330A ",.01)
 ;;S61.330A
 ;;9002226.02101,"873,S61.330A ",.02)
 ;;S61.330A
 ;;9002226.02101,"873,S61.330A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.331A ",.01)
 ;;S61.331A
 ;;9002226.02101,"873,S61.331A ",.02)
 ;;S61.331A
 ;;9002226.02101,"873,S61.331A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.332A ",.01)
 ;;S61.332A
 ;;9002226.02101,"873,S61.332A ",.02)
 ;;S61.332A
 ;;9002226.02101,"873,S61.332A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.333A ",.01)
 ;;S61.333A
 ;;9002226.02101,"873,S61.333A ",.02)
 ;;S61.333A
 ;;9002226.02101,"873,S61.333A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.334A ",.01)
 ;;S61.334A
 ;;9002226.02101,"873,S61.334A ",.02)
 ;;S61.334A
 ;;9002226.02101,"873,S61.334A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.335A ",.01)
 ;;S61.335A
 ;;9002226.02101,"873,S61.335A ",.02)
 ;;S61.335A
 ;;9002226.02101,"873,S61.335A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.336A ",.01)
 ;;S61.336A
 ;;9002226.02101,"873,S61.336A ",.02)
 ;;S61.336A
 ;;9002226.02101,"873,S61.336A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.337A ",.01)
 ;;S61.337A
 ;;9002226.02101,"873,S61.337A ",.02)
 ;;S61.337A
 ;;9002226.02101,"873,S61.337A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.338A ",.01)
 ;;S61.338A
 ;;9002226.02101,"873,S61.338A ",.02)
 ;;S61.338A
 ;;9002226.02101,"873,S61.338A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.339A ",.01)
 ;;S61.339A
 ;;9002226.02101,"873,S61.339A ",.02)
 ;;S61.339A
 ;;9002226.02101,"873,S61.339A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.340A ",.01)
 ;;S61.340A
 ;;9002226.02101,"873,S61.340A ",.02)
 ;;S61.340A
 ;;9002226.02101,"873,S61.340A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.341A ",.01)
 ;;S61.341A
 ;;9002226.02101,"873,S61.341A ",.02)
 ;;S61.341A
 ;;9002226.02101,"873,S61.341A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.342A ",.01)
 ;;S61.342A
 ;;9002226.02101,"873,S61.342A ",.02)
 ;;S61.342A
 ;;9002226.02101,"873,S61.342A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.343A ",.01)
 ;;S61.343A
 ;;9002226.02101,"873,S61.343A ",.02)
 ;;S61.343A
 ;;9002226.02101,"873,S61.343A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.344A ",.01)
 ;;S61.344A
 ;;9002226.02101,"873,S61.344A ",.02)
 ;;S61.344A
 ;;9002226.02101,"873,S61.344A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.345A ",.01)
 ;;S61.345A
 ;;9002226.02101,"873,S61.345A ",.02)
 ;;S61.345A
 ;;9002226.02101,"873,S61.345A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.346A ",.01)
 ;;S61.346A
 ;;9002226.02101,"873,S61.346A ",.02)
 ;;S61.346A
 ;;9002226.02101,"873,S61.346A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.347A ",.01)
 ;;S61.347A
 ;;9002226.02101,"873,S61.347A ",.02)
 ;;S61.347A
 ;;9002226.02101,"873,S61.347A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.348A ",.01)
 ;;S61.348A
 ;;9002226.02101,"873,S61.348A ",.02)
 ;;S61.348A
 ;;9002226.02101,"873,S61.348A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.349A ",.01)
 ;;S61.349A
 ;;9002226.02101,"873,S61.349A ",.02)
 ;;S61.349A
 ;;9002226.02101,"873,S61.349A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.350A ",.01)
 ;;S61.350A
 ;;9002226.02101,"873,S61.350A ",.02)
 ;;S61.350A
 ;;9002226.02101,"873,S61.350A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.351A ",.01)
 ;;S61.351A
 ;;9002226.02101,"873,S61.351A ",.02)
 ;;S61.351A
 ;;9002226.02101,"873,S61.351A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.352A ",.01)
 ;;S61.352A
 ;;9002226.02101,"873,S61.352A ",.02)
 ;;S61.352A
 ;;9002226.02101,"873,S61.352A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.353A ",.01)
 ;;S61.353A
 ;;9002226.02101,"873,S61.353A ",.02)
 ;;S61.353A
 ;;9002226.02101,"873,S61.353A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.354A ",.01)
 ;;S61.354A
 ;;9002226.02101,"873,S61.354A ",.02)
 ;;S61.354A
 ;;9002226.02101,"873,S61.354A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.355A ",.01)
 ;;S61.355A
 ;;9002226.02101,"873,S61.355A ",.02)
 ;;S61.355A
 ;;9002226.02101,"873,S61.355A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.356A ",.01)
 ;;S61.356A
 ;;9002226.02101,"873,S61.356A ",.02)
 ;;S61.356A
 ;;9002226.02101,"873,S61.356A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.357A ",.01)
 ;;S61.357A
 ;;9002226.02101,"873,S61.357A ",.02)
 ;;S61.357A
 ;;9002226.02101,"873,S61.357A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.358A ",.01)
 ;;S61.358A
 ;;9002226.02101,"873,S61.358A ",.02)
 ;;S61.358A
 ;;9002226.02101,"873,S61.358A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.359A ",.01)
 ;;S61.359A
 ;;9002226.02101,"873,S61.359A ",.02)
 ;;S61.359A
 ;;9002226.02101,"873,S61.359A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.401A ",.01)
 ;;S61.401A
 ;;9002226.02101,"873,S61.401A ",.02)
 ;;S61.401A
 ;;9002226.02101,"873,S61.401A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.402A ",.01)
 ;;S61.402A
 ;;9002226.02101,"873,S61.402A ",.02)
 ;;S61.402A
 ;;9002226.02101,"873,S61.402A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.409A ",.01)
 ;;S61.409A
 ;;9002226.02101,"873,S61.409A ",.02)
 ;;S61.409A
 ;;9002226.02101,"873,S61.409A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.411A ",.01)
 ;;S61.411A
 ;;9002226.02101,"873,S61.411A ",.02)
 ;;S61.411A
 ;;9002226.02101,"873,S61.411A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.412A ",.01)
 ;;S61.412A
 ;;9002226.02101,"873,S61.412A ",.02)
 ;;S61.412A
 ;;9002226.02101,"873,S61.412A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.419A ",.01)
 ;;S61.419A
 ;;9002226.02101,"873,S61.419A ",.02)
 ;;S61.419A
 ;;9002226.02101,"873,S61.419A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.421A ",.01)
 ;;S61.421A
 ;;9002226.02101,"873,S61.421A ",.02)
 ;;S61.421A
 ;;9002226.02101,"873,S61.421A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.422A ",.01)
 ;;S61.422A
 ;;9002226.02101,"873,S61.422A ",.02)
 ;;S61.422A
 ;;9002226.02101,"873,S61.422A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.429A ",.01)
 ;;S61.429A
 ;;9002226.02101,"873,S61.429A ",.02)
 ;;S61.429A
 ;;9002226.02101,"873,S61.429A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.431A ",.01)
 ;;S61.431A
 ;;9002226.02101,"873,S61.431A ",.02)
 ;;S61.431A
 ;;9002226.02101,"873,S61.431A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.432A ",.01)
 ;;S61.432A
 ;;9002226.02101,"873,S61.432A ",.02)
 ;;S61.432A
 ;;9002226.02101,"873,S61.432A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.439A ",.01)
 ;;S61.439A
 ;;9002226.02101,"873,S61.439A ",.02)
 ;;S61.439A
 ;;9002226.02101,"873,S61.439A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.441A ",.01)
 ;;S61.441A
 ;;9002226.02101,"873,S61.441A ",.02)
 ;;S61.441A
 ;;9002226.02101,"873,S61.441A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.442A ",.01)
 ;;S61.442A
 ;;9002226.02101,"873,S61.442A ",.02)
 ;;S61.442A
 ;;9002226.02101,"873,S61.442A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.449A ",.01)
 ;;S61.449A
 ;;9002226.02101,"873,S61.449A ",.02)
 ;;S61.449A
 ;;9002226.02101,"873,S61.449A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.451A ",.01)
 ;;S61.451A
 ;;9002226.02101,"873,S61.451A ",.02)
 ;;S61.451A
 ;;9002226.02101,"873,S61.451A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.452A ",.01)
 ;;S61.452A
 ;;9002226.02101,"873,S61.452A ",.02)
 ;;S61.452A
 ;;9002226.02101,"873,S61.452A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.459A ",.01)
 ;;S61.459A
 ;;9002226.02101,"873,S61.459A ",.02)
 ;;S61.459A
 ;;9002226.02101,"873,S61.459A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.501A ",.01)
 ;;S61.501A
 ;;9002226.02101,"873,S61.501A ",.02)
 ;;S61.501A
 ;;9002226.02101,"873,S61.501A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.502A ",.01)
 ;;S61.502A
 ;;9002226.02101,"873,S61.502A ",.02)
 ;;S61.502A
 ;;9002226.02101,"873,S61.502A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.509A ",.01)
 ;;S61.509A
 ;;9002226.02101,"873,S61.509A ",.02)
 ;;S61.509A
 ;;9002226.02101,"873,S61.509A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.511A ",.01)
 ;;S61.511A
 ;;9002226.02101,"873,S61.511A ",.02)
 ;;S61.511A
 ;;9002226.02101,"873,S61.511A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.512A ",.01)
 ;;S61.512A
 ;;9002226.02101,"873,S61.512A ",.02)
 ;;S61.512A
 ;;9002226.02101,"873,S61.512A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.519A ",.01)
 ;;S61.519A
 ;;9002226.02101,"873,S61.519A ",.02)
 ;;S61.519A
 ;;9002226.02101,"873,S61.519A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.521A ",.01)
 ;;S61.521A
 ;;9002226.02101,"873,S61.521A ",.02)
 ;;S61.521A
 ;;9002226.02101,"873,S61.521A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.522A ",.01)
 ;;S61.522A
 ;;9002226.02101,"873,S61.522A ",.02)
 ;;S61.522A
 ;;9002226.02101,"873,S61.522A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.529A ",.01)
 ;;S61.529A
 ;;9002226.02101,"873,S61.529A ",.02)
 ;;S61.529A
 ;;9002226.02101,"873,S61.529A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.531A ",.01)
 ;;S61.531A
 ;;9002226.02101,"873,S61.531A ",.02)
 ;;S61.531A
 ;;9002226.02101,"873,S61.531A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.532A ",.01)
 ;;S61.532A
 ;;9002226.02101,"873,S61.532A ",.02)
 ;;S61.532A
 ;;9002226.02101,"873,S61.532A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.539A ",.01)
 ;;S61.539A
 ;;9002226.02101,"873,S61.539A ",.02)
 ;;S61.539A
 ;;9002226.02101,"873,S61.539A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.541A ",.01)
 ;;S61.541A