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

ATXXA141.m

Go to the documentation of this file.
  1. ATXXA141 ;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,T24.029A ",.02)
  1. ;;T24.029A
  1. ;;9002226.02101,"873,T24.029A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,T24.031A ",.01)
  1. ;;T24.031A
  1. ;;9002226.02101,"873,T24.031A ",.02)
  1. ;;T24.031A
  1. ;;9002226.02101,"873,T24.031A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,T24.032A ",.01)
  1. ;;T24.032A
  1. ;;9002226.02101,"873,T24.032A ",.02)
  1. ;;T24.032A
  1. ;;9002226.02101,"873,T24.032A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,T24.039A ",.01)
  1. ;;T24.039A
  1. ;;9002226.02101,"873,T24.039A ",.02)
  1. ;;T24.039A
  1. ;;9002226.02101,"873,T24.039A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,T24.091A ",.01)
  1. ;;T24.091A
  1. ;;9002226.02101,"873,T24.091A ",.02)
  1. ;;T24.091A
  1. ;;9002226.02101,"873,T24.091A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,T24.092A ",.01)
  1. ;;T24.092A
  1. ;;9002226.02101,"873,T24.092A ",.02)
  1. ;;T24.092A
  1. ;;9002226.02101,"873,T24.092A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,T24.099A ",.01)
  1. ;;T24.099A
  1. ;;9002226.02101,"873,T24.099A ",.02)
  1. ;;T24.099A
  1. ;;9002226.02101,"873,T24.099A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,T24.101A ",.01)
  1. ;;T24.101A
  1. ;;9002226.02101,"873,T24.101A ",.02)
  1. ;;T24.101A
  1. ;;9002226.02101,"873,T24.101A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,T24.102A ",.01)
  1. ;;T24.102A
  1. ;;9002226.02101,"873,T24.102A ",.02)
  1. ;;T24.102A
  1. ;;9002226.02101,"873,T24.102A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,T24.109A ",.01)
  1. ;;T24.109A
  1. ;;9002226.02101,"873,T24.109A ",.02)
  1. ;;T24.109A
  1. ;;9002226.02101,"873,T24.109A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,T24.111A ",.01)
  1. ;;T24.111A
  1. ;;9002226.02101,"873,T24.111A ",.02)
  1. ;;T24.111A
  1. ;;9002226.02101,"873,T24.111A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,T24.112A ",.01)
  1. ;;T24.112A
  1. ;;9002226.02101,"873,T24.112A ",.02)
  1. ;;T24.112A
  1. ;;9002226.02101,"873,T24.112A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,T24.119A ",.01)
  1. ;;T24.119A
  1. ;;9002226.02101,"873,T24.119A ",.02)
  1. ;;T24.119A
  1. ;;9002226.02101,"873,T24.119A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,T24.121A ",.01)
  1. ;;T24.121A
  1. ;;9002226.02101,"873,T24.121A ",.02)
  1. ;;T24.121A
  1. ;;9002226.02101,"873,T24.121A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,T24.122A ",.01)
  1. ;;T24.122A
  1. ;;9002226.02101,"873,T24.122A ",.02)
  1. ;;T24.122A
  1. ;;9002226.02101,"873,T24.122A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,T24.129A ",.01)
  1. ;;T24.129A
  1. ;;9002226.02101,"873,T24.129A ",.02)
  1. ;;T24.129A
  1. ;;9002226.02101,"873,T24.129A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,T24.131A ",.01)
  1. ;;T24.131A
  1. ;;9002226.02101,"873,T24.131A ",.02)
  1. ;;T24.131A
  1. ;;9002226.02101,"873,T24.131A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,T24.132A ",.01)
  1. ;;T24.132A
  1. ;;9002226.02101,"873,T24.132A ",.02)
  1. ;;T24.132A
  1. ;;9002226.02101,"873,T24.132A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,T24.139A ",.01)
  1. ;;T24.139A
  1. ;;9002226.02101,"873,T24.139A ",.02)
  1. ;;T24.139A
  1. ;;9002226.02101,"873,T24.139A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,T24.191A ",.01)
  1. ;;T24.191A
  1. ;;9002226.02101,"873,T24.191A ",.02)
  1. ;;T24.191A
  1. ;;9002226.02101,"873,T24.191A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,T24.192A ",.01)
  1. ;;T24.192A
  1. ;;9002226.02101,"873,T24.192A ",.02)
  1. ;;T24.192A
  1. ;;9002226.02101,"873,T24.192A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,T24.199A ",.01)
  1. ;;T24.199A
  1. ;;9002226.02101,"873,T24.199A ",.02)
  1. ;;T24.199A
  1. ;;9002226.02101,"873,T24.199A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,T24.201A ",.01)
  1. ;;T24.201A
  1. ;;9002226.02101,"873,T24.201A ",.02)
  1. ;;T24.201A
  1. ;;9002226.02101,"873,T24.201A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,T24.202A ",.01)
  1. ;;T24.202A
  1. ;;9002226.02101,"873,T24.202A ",.02)
  1. ;;T24.202A
  1. ;;9002226.02101,"873,T24.202A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,T24.209A ",.01)
  1. ;;T24.209A
  1. ;;9002226.02101,"873,T24.209A ",.02)
  1. ;;T24.209A
  1. ;;9002226.02101,"873,T24.209A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,T24.211A ",.01)
  1. ;;T24.211A
  1. ;;9002226.02101,"873,T24.211A ",.02)
  1. ;;T24.211A
  1. ;;9002226.02101,"873,T24.211A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,T24.212A ",.01)
  1. ;;T24.212A
  1. ;;9002226.02101,"873,T24.212A ",.02)
  1. ;;T24.212A
  1. ;;9002226.02101,"873,T24.212A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,T24.219A ",.01)
  1. ;;T24.219A
  1. ;;9002226.02101,"873,T24.219A ",.02)
  1. ;;T24.219A
  1. ;;9002226.02101,"873,T24.219A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,T24.221A ",.01)
  1. ;;T24.221A
  1. ;;9002226.02101,"873,T24.221A ",.02)
  1. ;;T24.221A
  1. ;;9002226.02101,"873,T24.221A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,T24.222A ",.01)
  1. ;;T24.222A
  1. ;;9002226.02101,"873,T24.222A ",.02)
  1. ;;T24.222A
  1. ;;9002226.02101,"873,T24.222A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,T24.229A ",.01)
  1. ;;T24.229A
  1. ;;9002226.02101,"873,T24.229A ",.02)
  1. ;;T24.229A
  1. ;;9002226.02101,"873,T24.229A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,T24.231A ",.01)
  1. ;;T24.231A
  1. ;;9002226.02101,"873,T24.231A ",.02)
  1. ;;T24.231A
  1. ;;9002226.02101,"873,T24.231A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,T24.232A ",.01)
  1. ;;T24.232A
  1. ;;9002226.02101,"873,T24.232A ",.02)
  1. ;;T24.232A
  1. ;;9002226.02101,"873,T24.232A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,T24.239A ",.01)
  1. ;;T24.239A
  1. ;;9002226.02101,"873,T24.239A ",.02)
  1. ;;T24.239A
  1. ;;9002226.02101,"873,T24.239A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,T24.291A ",.01)
  1. ;;T24.291A
  1. ;;9002226.02101,"873,T24.291A ",.02)
  1. ;;T24.291A
  1. ;;9002226.02101,"873,T24.291A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,T24.292A ",.01)
  1. ;;T24.292A
  1. ;;9002226.02101,"873,T24.292A ",.02)
  1. ;;T24.292A
  1. ;;9002226.02101,"873,T24.292A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,T24.299A ",.01)
  1. ;;T24.299A
  1. ;;9002226.02101,"873,T24.299A ",.02)
  1. ;;T24.299A
  1. ;;9002226.02101,"873,T24.299A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,T24.301A ",.01)
  1. ;;T24.301A
  1. ;;9002226.02101,"873,T24.301A ",.02)
  1. ;;T24.301A
  1. ;;9002226.02101,"873,T24.301A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,T24.302A ",.01)
  1. ;;T24.302A
  1. ;;9002226.02101,"873,T24.302A ",.02)
  1. ;;T24.302A
  1. ;;9002226.02101,"873,T24.302A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,T24.309A ",.01)
  1. ;;T24.309A
  1. ;;9002226.02101,"873,T24.309A ",.02)
  1. ;;T24.309A
  1. ;;9002226.02101,"873,T24.309A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,T24.311A ",.01)
  1. ;;T24.311A
  1. ;;9002226.02101,"873,T24.311A ",.02)
  1. ;;T24.311A
  1. ;;9002226.02101,"873,T24.311A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,T24.312A ",.01)
  1. ;;T24.312A
  1. ;;9002226.02101,"873,T24.312A ",.02)
  1. ;;T24.312A
  1. ;;9002226.02101,"873,T24.312A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,T24.319A ",.01)
  1. ;;T24.319A
  1. ;;9002226.02101,"873,T24.319A ",.02)
  1. ;;T24.319A
  1. ;;9002226.02101,"873,T24.319A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,T24.321A ",.01)
  1. ;;T24.321A
  1. ;;9002226.02101,"873,T24.321A ",.02)
  1. ;;T24.321A
  1. ;;9002226.02101,"873,T24.321A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,T24.322A ",.01)
  1. ;;T24.322A
  1. ;;9002226.02101,"873,T24.322A ",.02)
  1. ;;T24.322A
  1. ;;9002226.02101,"873,T24.322A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,T24.329A ",.01)
  1. ;;T24.329A
  1. ;;9002226.02101,"873,T24.329A ",.02)
  1. ;;T24.329A
  1. ;;9002226.02101,"873,T24.329A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,T24.331A ",.01)
  1. ;;T24.331A
  1. ;;9002226.02101,"873,T24.331A ",.02)
  1. ;;T24.331A
  1. ;;9002226.02101,"873,T24.331A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,T24.332A ",.01)
  1. ;;T24.332A
  1. ;;9002226.02101,"873,T24.332A ",.02)
  1. ;;T24.332A
  1. ;;9002226.02101,"873,T24.332A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,T24.339A ",.01)
  1. ;;T24.339A
  1. ;;9002226.02101,"873,T24.339A ",.02)
  1. ;;T24.339A
  1. ;;9002226.02101,"873,T24.339A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,T24.391A ",.01)
  1. ;;T24.391A
  1. ;;9002226.02101,"873,T24.391A ",.02)
  1. ;;T24.391A
  1. ;;9002226.02101,"873,T24.391A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,T24.392A ",.01)
  1. ;;T24.392A
  1. ;;9002226.02101,"873,T24.392A ",.02)
  1. ;;T24.392A
  1. ;;9002226.02101,"873,T24.392A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,T24.399A ",.01)
  1. ;;T24.399A
  1. ;;9002226.02101,"873,T24.399A ",.02)
  1. ;;T24.399A
  1. ;;9002226.02101,"873,T24.399A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,T24.401A ",.01)
  1. ;;T24.401A
  1. ;;9002226.02101,"873,T24.401A ",.02)
  1. ;;T24.401A
  1. ;;9002226.02101,"873,T24.401A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,T24.402A ",.01)
  1. ;;T24.402A
  1. ;;9002226.02101,"873,T24.402A ",.02)
  1. ;;T24.402A
  1. ;;9002226.02101,"873,T24.402A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,T24.409A ",.01)
  1. ;;T24.409A
  1. ;;9002226.02101,"873,T24.409A ",.02)
  1. ;;T24.409A
  1. ;;9002226.02101,"873,T24.409A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,T24.411A ",.01)
  1. ;;T24.411A
  1. ;;9002226.02101,"873,T24.411A ",.02)
  1. ;;T24.411A
  1. ;;9002226.02101,"873,T24.411A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,T24.412A ",.01)
  1. ;;T24.412A
  1. ;;9002226.02101,"873,T24.412A ",.02)
  1. ;;T24.412A
  1. ;;9002226.02101,"873,T24.412A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,T24.419A ",.01)
  1. ;;T24.419A
  1. ;;9002226.02101,"873,T24.419A ",.02)
  1. ;;T24.419A
  1. ;;9002226.02101,"873,T24.419A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,T24.421A ",.01)
  1. ;;T24.421A
  1. ;;9002226.02101,"873,T24.421A ",.02)
  1. ;;T24.421A
  1. ;;9002226.02101,"873,T24.421A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,T24.422A ",.01)
  1. ;;T24.422A
  1. ;;9002226.02101,"873,T24.422A ",.02)
  1. ;;T24.422A
  1. ;;9002226.02101,"873,T24.422A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,T24.429A ",.01)
  1. ;;T24.429A
  1. ;;9002226.02101,"873,T24.429A ",.02)
  1. ;;T24.429A
  1. ;;9002226.02101,"873,T24.429A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,T24.431A ",.01)
  1. ;;T24.431A
  1. ;;9002226.02101,"873,T24.431A ",.02)
  1. ;;T24.431A
  1. ;;9002226.02101,"873,T24.431A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,T24.432A ",.01)
  1. ;;T24.432A
  1. ;;9002226.02101,"873,T24.432A ",.02)
  1. ;;T24.432A
  1. ;;9002226.02101,"873,T24.432A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,T24.439A ",.01)
  1. ;;T24.439A
  1. ;;9002226.02101,"873,T24.439A ",.02)
  1. ;;T24.439A
  1. ;;9002226.02101,"873,T24.439A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,T24.491A ",.01)
  1. ;;T24.491A
  1. ;;9002226.02101,"873,T24.491A ",.02)
  1. ;;T24.491A
  1. ;;9002226.02101,"873,T24.491A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,T24.492A ",.01)
  1. ;;T24.492A
  1. ;;9002226.02101,"873,T24.492A ",.02)
  1. ;;T24.492A
  1. ;;9002226.02101,"873,T24.492A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,T24.499A ",.01)
  1. ;;T24.499A
  1. ;;9002226.02101,"873,T24.499A ",.02)
  1. ;;T24.499A
  1. ;;9002226.02101,"873,T24.499A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,T24.501A ",.01)
  1. ;;T24.501A
  1. ;;9002226.02101,"873,T24.501A ",.02)
  1. ;;T24.501A
  1. ;;9002226.02101,"873,T24.501A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,T24.502A ",.01)
  1. ;;T24.502A
  1. ;;9002226.02101,"873,T24.502A ",.02)
  1. ;;T24.502A
  1. ;;9002226.02101,"873,T24.502A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,T24.509A ",.01)
  1. ;;T24.509A
  1. ;;9002226.02101,"873,T24.509A ",.02)
  1. ;;T24.509A
  1. ;;9002226.02101,"873,T24.509A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,T24.511A ",.01)
  1. ;;T24.511A
  1. ;;9002226.02101,"873,T24.511A ",.02)
  1. ;;T24.511A
  1. ;;9002226.02101,"873,T24.511A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,T24.512A ",.01)
  1. ;;T24.512A
  1. ;;9002226.02101,"873,T24.512A ",.02)
  1. ;;T24.512A
  1. ;;9002226.02101,"873,T24.512A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,T24.519A ",.01)
  1. ;;T24.519A
  1. ;;9002226.02101,"873,T24.519A ",.02)
  1. ;;T24.519A
  1. ;;9002226.02101,"873,T24.519A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,T24.521A ",.01)
  1. ;;T24.521A
  1. ;;9002226.02101,"873,T24.521A ",.02)
  1. ;;T24.521A
  1. ;;9002226.02101,"873,T24.521A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,T24.522A ",.01)
  1. ;;T24.522A
  1. ;;9002226.02101,"873,T24.522A ",.02)
  1. ;;T24.522A
  1. ;;9002226.02101,"873,T24.522A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,T24.529A ",.01)
  1. ;;T24.529A
  1. ;;9002226.02101,"873,T24.529A ",.02)
  1. ;;T24.529A
  1. ;;9002226.02101,"873,T24.529A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,T24.531A ",.01)
  1. ;;T24.531A
  1. ;;9002226.02101,"873,T24.531A ",.02)
  1. ;;T24.531A
  1. ;;9002226.02101,"873,T24.531A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,T24.532A ",.01)
  1. ;;T24.532A
  1. ;;9002226.02101,"873,T24.532A ",.02)
  1. ;;T24.532A
  1. ;;9002226.02101,"873,T24.532A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,T24.539A ",.01)
  1. ;;T24.539A
  1. ;;9002226.02101,"873,T24.539A ",.02)
  1. ;;T24.539A