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

ATXXA95.m

Go to the documentation of this file.
  1. ATXXA95 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON APR 29, 2014;
  1. ;;5.1;TAXONOMY;**11**;FEB 04, 1997;Build 48
  1. ;
  1. START ;
  1. K:'$G(ATXPGMC) ^TMP("ATX",$J)
  1. S ATXPGMC=$G(ATXPGMC)+1
  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
  1. Q
  1. ;
  1. TMP ;;TAXONOMY (WITH BULLETIN)
  1. ;;9002226.02101,"873,S66.114A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.115A ",.01)
  1. ;;S66.115A
  1. ;;9002226.02101,"873,S66.115A ",.02)
  1. ;;S66.115A
  1. ;;9002226.02101,"873,S66.115A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.116A ",.01)
  1. ;;S66.116A
  1. ;;9002226.02101,"873,S66.116A ",.02)
  1. ;;S66.116A
  1. ;;9002226.02101,"873,S66.116A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.117A ",.01)
  1. ;;S66.117A
  1. ;;9002226.02101,"873,S66.117A ",.02)
  1. ;;S66.117A
  1. ;;9002226.02101,"873,S66.117A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.118A ",.01)
  1. ;;S66.118A
  1. ;;9002226.02101,"873,S66.118A ",.02)
  1. ;;S66.118A
  1. ;;9002226.02101,"873,S66.118A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.119A ",.01)
  1. ;;S66.119A
  1. ;;9002226.02101,"873,S66.119A ",.02)
  1. ;;S66.119A
  1. ;;9002226.02101,"873,S66.119A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.120A ",.01)
  1. ;;S66.120A
  1. ;;9002226.02101,"873,S66.120A ",.02)
  1. ;;S66.120A
  1. ;;9002226.02101,"873,S66.120A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.121A ",.01)
  1. ;;S66.121A
  1. ;;9002226.02101,"873,S66.121A ",.02)
  1. ;;S66.121A
  1. ;;9002226.02101,"873,S66.121A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.122A ",.01)
  1. ;;S66.122A
  1. ;;9002226.02101,"873,S66.122A ",.02)
  1. ;;S66.122A
  1. ;;9002226.02101,"873,S66.122A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.123A ",.01)
  1. ;;S66.123A
  1. ;;9002226.02101,"873,S66.123A ",.02)
  1. ;;S66.123A
  1. ;;9002226.02101,"873,S66.123A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.124A ",.01)
  1. ;;S66.124A
  1. ;;9002226.02101,"873,S66.124A ",.02)
  1. ;;S66.124A
  1. ;;9002226.02101,"873,S66.124A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.125A ",.01)
  1. ;;S66.125A
  1. ;;9002226.02101,"873,S66.125A ",.02)
  1. ;;S66.125A
  1. ;;9002226.02101,"873,S66.125A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.126A ",.01)
  1. ;;S66.126A
  1. ;;9002226.02101,"873,S66.126A ",.02)
  1. ;;S66.126A
  1. ;;9002226.02101,"873,S66.126A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.127A ",.01)
  1. ;;S66.127A
  1. ;;9002226.02101,"873,S66.127A ",.02)
  1. ;;S66.127A
  1. ;;9002226.02101,"873,S66.127A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.128A ",.01)
  1. ;;S66.128A
  1. ;;9002226.02101,"873,S66.128A ",.02)
  1. ;;S66.128A
  1. ;;9002226.02101,"873,S66.128A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.129A ",.01)
  1. ;;S66.129A
  1. ;;9002226.02101,"873,S66.129A ",.02)
  1. ;;S66.129A
  1. ;;9002226.02101,"873,S66.129A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.190A ",.01)
  1. ;;S66.190A
  1. ;;9002226.02101,"873,S66.190A ",.02)
  1. ;;S66.190A
  1. ;;9002226.02101,"873,S66.190A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.191A ",.01)
  1. ;;S66.191A
  1. ;;9002226.02101,"873,S66.191A ",.02)
  1. ;;S66.191A
  1. ;;9002226.02101,"873,S66.191A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.192A ",.01)
  1. ;;S66.192A
  1. ;;9002226.02101,"873,S66.192A ",.02)
  1. ;;S66.192A
  1. ;;9002226.02101,"873,S66.192A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.193A ",.01)
  1. ;;S66.193A
  1. ;;9002226.02101,"873,S66.193A ",.02)
  1. ;;S66.193A
  1. ;;9002226.02101,"873,S66.193A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.194A ",.01)
  1. ;;S66.194A
  1. ;;9002226.02101,"873,S66.194A ",.02)
  1. ;;S66.194A
  1. ;;9002226.02101,"873,S66.194A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.195A ",.01)
  1. ;;S66.195A
  1. ;;9002226.02101,"873,S66.195A ",.02)
  1. ;;S66.195A
  1. ;;9002226.02101,"873,S66.195A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.196A ",.01)
  1. ;;S66.196A
  1. ;;9002226.02101,"873,S66.196A ",.02)
  1. ;;S66.196A
  1. ;;9002226.02101,"873,S66.196A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.197A ",.01)
  1. ;;S66.197A
  1. ;;9002226.02101,"873,S66.197A ",.02)
  1. ;;S66.197A
  1. ;;9002226.02101,"873,S66.197A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.198A ",.01)
  1. ;;S66.198A
  1. ;;9002226.02101,"873,S66.198A ",.02)
  1. ;;S66.198A
  1. ;;9002226.02101,"873,S66.198A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.199A ",.01)
  1. ;;S66.199A
  1. ;;9002226.02101,"873,S66.199A ",.02)
  1. ;;S66.199A
  1. ;;9002226.02101,"873,S66.199A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.201A ",.01)
  1. ;;S66.201A
  1. ;;9002226.02101,"873,S66.201A ",.02)
  1. ;;S66.201A
  1. ;;9002226.02101,"873,S66.201A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.202A ",.01)
  1. ;;S66.202A
  1. ;;9002226.02101,"873,S66.202A ",.02)
  1. ;;S66.202A
  1. ;;9002226.02101,"873,S66.202A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.209A ",.01)
  1. ;;S66.209A
  1. ;;9002226.02101,"873,S66.209A ",.02)
  1. ;;S66.209A
  1. ;;9002226.02101,"873,S66.209A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.211A ",.01)
  1. ;;S66.211A
  1. ;;9002226.02101,"873,S66.211A ",.02)
  1. ;;S66.211A
  1. ;;9002226.02101,"873,S66.211A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.212A ",.01)
  1. ;;S66.212A
  1. ;;9002226.02101,"873,S66.212A ",.02)
  1. ;;S66.212A
  1. ;;9002226.02101,"873,S66.212A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.219A ",.01)
  1. ;;S66.219A
  1. ;;9002226.02101,"873,S66.219A ",.02)
  1. ;;S66.219A
  1. ;;9002226.02101,"873,S66.219A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.221A ",.01)
  1. ;;S66.221A
  1. ;;9002226.02101,"873,S66.221A ",.02)
  1. ;;S66.221A
  1. ;;9002226.02101,"873,S66.221A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.222A ",.01)
  1. ;;S66.222A
  1. ;;9002226.02101,"873,S66.222A ",.02)
  1. ;;S66.222A
  1. ;;9002226.02101,"873,S66.222A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.229A ",.01)
  1. ;;S66.229A
  1. ;;9002226.02101,"873,S66.229A ",.02)
  1. ;;S66.229A
  1. ;;9002226.02101,"873,S66.229A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.291A ",.01)
  1. ;;S66.291A
  1. ;;9002226.02101,"873,S66.291A ",.02)
  1. ;;S66.291A
  1. ;;9002226.02101,"873,S66.291A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.292A ",.01)
  1. ;;S66.292A
  1. ;;9002226.02101,"873,S66.292A ",.02)
  1. ;;S66.292A
  1. ;;9002226.02101,"873,S66.292A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.299A ",.01)
  1. ;;S66.299A
  1. ;;9002226.02101,"873,S66.299A ",.02)
  1. ;;S66.299A
  1. ;;9002226.02101,"873,S66.299A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.300A ",.01)
  1. ;;S66.300A
  1. ;;9002226.02101,"873,S66.300A ",.02)
  1. ;;S66.300A
  1. ;;9002226.02101,"873,S66.300A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.301A ",.01)
  1. ;;S66.301A
  1. ;;9002226.02101,"873,S66.301A ",.02)
  1. ;;S66.301A
  1. ;;9002226.02101,"873,S66.301A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.302A ",.01)
  1. ;;S66.302A
  1. ;;9002226.02101,"873,S66.302A ",.02)
  1. ;;S66.302A
  1. ;;9002226.02101,"873,S66.302A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.303A ",.01)
  1. ;;S66.303A
  1. ;;9002226.02101,"873,S66.303A ",.02)
  1. ;;S66.303A
  1. ;;9002226.02101,"873,S66.303A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.304A ",.01)
  1. ;;S66.304A
  1. ;;9002226.02101,"873,S66.304A ",.02)
  1. ;;S66.304A
  1. ;;9002226.02101,"873,S66.304A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.305A ",.01)
  1. ;;S66.305A
  1. ;;9002226.02101,"873,S66.305A ",.02)
  1. ;;S66.305A
  1. ;;9002226.02101,"873,S66.305A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.306A ",.01)
  1. ;;S66.306A
  1. ;;9002226.02101,"873,S66.306A ",.02)
  1. ;;S66.306A
  1. ;;9002226.02101,"873,S66.306A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.307A ",.01)
  1. ;;S66.307A
  1. ;;9002226.02101,"873,S66.307A ",.02)
  1. ;;S66.307A
  1. ;;9002226.02101,"873,S66.307A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.308A ",.01)
  1. ;;S66.308A
  1. ;;9002226.02101,"873,S66.308A ",.02)
  1. ;;S66.308A
  1. ;;9002226.02101,"873,S66.308A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.309A ",.01)
  1. ;;S66.309A
  1. ;;9002226.02101,"873,S66.309A ",.02)
  1. ;;S66.309A
  1. ;;9002226.02101,"873,S66.309A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.310A ",.01)
  1. ;;S66.310A
  1. ;;9002226.02101,"873,S66.310A ",.02)
  1. ;;S66.310A
  1. ;;9002226.02101,"873,S66.310A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.311A ",.01)
  1. ;;S66.311A
  1. ;;9002226.02101,"873,S66.311A ",.02)
  1. ;;S66.311A
  1. ;;9002226.02101,"873,S66.311A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.312A ",.01)
  1. ;;S66.312A
  1. ;;9002226.02101,"873,S66.312A ",.02)
  1. ;;S66.312A
  1. ;;9002226.02101,"873,S66.312A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.313A ",.01)
  1. ;;S66.313A
  1. ;;9002226.02101,"873,S66.313A ",.02)
  1. ;;S66.313A
  1. ;;9002226.02101,"873,S66.313A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.314A ",.01)
  1. ;;S66.314A
  1. ;;9002226.02101,"873,S66.314A ",.02)
  1. ;;S66.314A
  1. ;;9002226.02101,"873,S66.314A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.315A ",.01)
  1. ;;S66.315A
  1. ;;9002226.02101,"873,S66.315A ",.02)
  1. ;;S66.315A
  1. ;;9002226.02101,"873,S66.315A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.316A ",.01)
  1. ;;S66.316A
  1. ;;9002226.02101,"873,S66.316A ",.02)
  1. ;;S66.316A
  1. ;;9002226.02101,"873,S66.316A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.317A ",.01)
  1. ;;S66.317A
  1. ;;9002226.02101,"873,S66.317A ",.02)
  1. ;;S66.317A
  1. ;;9002226.02101,"873,S66.317A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.318A ",.01)
  1. ;;S66.318A
  1. ;;9002226.02101,"873,S66.318A ",.02)
  1. ;;S66.318A
  1. ;;9002226.02101,"873,S66.318A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.319A ",.01)
  1. ;;S66.319A
  1. ;;9002226.02101,"873,S66.319A ",.02)
  1. ;;S66.319A
  1. ;;9002226.02101,"873,S66.319A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.320A ",.01)
  1. ;;S66.320A
  1. ;;9002226.02101,"873,S66.320A ",.02)
  1. ;;S66.320A
  1. ;;9002226.02101,"873,S66.320A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.321A ",.01)
  1. ;;S66.321A
  1. ;;9002226.02101,"873,S66.321A ",.02)
  1. ;;S66.321A
  1. ;;9002226.02101,"873,S66.321A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.322A ",.01)
  1. ;;S66.322A
  1. ;;9002226.02101,"873,S66.322A ",.02)
  1. ;;S66.322A
  1. ;;9002226.02101,"873,S66.322A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.323A ",.01)
  1. ;;S66.323A
  1. ;;9002226.02101,"873,S66.323A ",.02)
  1. ;;S66.323A
  1. ;;9002226.02101,"873,S66.323A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.324A ",.01)
  1. ;;S66.324A
  1. ;;9002226.02101,"873,S66.324A ",.02)
  1. ;;S66.324A
  1. ;;9002226.02101,"873,S66.324A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.325A ",.01)
  1. ;;S66.325A
  1. ;;9002226.02101,"873,S66.325A ",.02)
  1. ;;S66.325A
  1. ;;9002226.02101,"873,S66.325A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.326A ",.01)
  1. ;;S66.326A
  1. ;;9002226.02101,"873,S66.326A ",.02)
  1. ;;S66.326A
  1. ;;9002226.02101,"873,S66.326A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.327A ",.01)
  1. ;;S66.327A
  1. ;;9002226.02101,"873,S66.327A ",.02)
  1. ;;S66.327A
  1. ;;9002226.02101,"873,S66.327A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.328A ",.01)
  1. ;;S66.328A
  1. ;;9002226.02101,"873,S66.328A ",.02)
  1. ;;S66.328A
  1. ;;9002226.02101,"873,S66.328A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.329A ",.01)
  1. ;;S66.329A
  1. ;;9002226.02101,"873,S66.329A ",.02)
  1. ;;S66.329A
  1. ;;9002226.02101,"873,S66.329A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.390A ",.01)
  1. ;;S66.390A
  1. ;;9002226.02101,"873,S66.390A ",.02)
  1. ;;S66.390A
  1. ;;9002226.02101,"873,S66.390A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.391A ",.01)
  1. ;;S66.391A
  1. ;;9002226.02101,"873,S66.391A ",.02)
  1. ;;S66.391A
  1. ;;9002226.02101,"873,S66.391A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.392A ",.01)
  1. ;;S66.392A
  1. ;;9002226.02101,"873,S66.392A ",.02)
  1. ;;S66.392A
  1. ;;9002226.02101,"873,S66.392A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.393A ",.01)
  1. ;;S66.393A
  1. ;;9002226.02101,"873,S66.393A ",.02)
  1. ;;S66.393A
  1. ;;9002226.02101,"873,S66.393A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.394A ",.01)
  1. ;;S66.394A
  1. ;;9002226.02101,"873,S66.394A ",.02)
  1. ;;S66.394A
  1. ;;9002226.02101,"873,S66.394A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.395A ",.01)
  1. ;;S66.395A
  1. ;;9002226.02101,"873,S66.395A ",.02)
  1. ;;S66.395A
  1. ;;9002226.02101,"873,S66.395A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.396A ",.01)
  1. ;;S66.396A
  1. ;;9002226.02101,"873,S66.396A ",.02)
  1. ;;S66.396A
  1. ;;9002226.02101,"873,S66.396A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.397A ",.01)
  1. ;;S66.397A
  1. ;;9002226.02101,"873,S66.397A ",.02)
  1. ;;S66.397A
  1. ;;9002226.02101,"873,S66.397A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.398A ",.01)
  1. ;;S66.398A
  1. ;;9002226.02101,"873,S66.398A ",.02)
  1. ;;S66.398A
  1. ;;9002226.02101,"873,S66.398A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.399A ",.01)
  1. ;;S66.399A
  1. ;;9002226.02101,"873,S66.399A ",.02)
  1. ;;S66.399A
  1. ;;9002226.02101,"873,S66.399A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.401A ",.01)
  1. ;;S66.401A
  1. ;;9002226.02101,"873,S66.401A ",.02)
  1. ;;S66.401A
  1. ;;9002226.02101,"873,S66.401A ",.03)
  1. ;;30