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

ATXXA122.m

Go to the documentation of this file.
ATXXA122 ;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,S90.551A ",.03)
 ;;30
 ;;9002226.02101,"873,S90.552A ",.01)
 ;;S90.552A
 ;;9002226.02101,"873,S90.552A ",.02)
 ;;S90.552A
 ;;9002226.02101,"873,S90.552A ",.03)
 ;;30
 ;;9002226.02101,"873,S90.559A ",.01)
 ;;S90.559A
 ;;9002226.02101,"873,S90.559A ",.02)
 ;;S90.559A
 ;;9002226.02101,"873,S90.559A ",.03)
 ;;30
 ;;9002226.02101,"873,S90.571A ",.01)
 ;;S90.571A
 ;;9002226.02101,"873,S90.571A ",.02)
 ;;S90.571A
 ;;9002226.02101,"873,S90.571A ",.03)
 ;;30
 ;;9002226.02101,"873,S90.572A ",.01)
 ;;S90.572A
 ;;9002226.02101,"873,S90.572A ",.02)
 ;;S90.572A
 ;;9002226.02101,"873,S90.572A ",.03)
 ;;30
 ;;9002226.02101,"873,S90.579A ",.01)
 ;;S90.579A
 ;;9002226.02101,"873,S90.579A ",.02)
 ;;S90.579A
 ;;9002226.02101,"873,S90.579A ",.03)
 ;;30
 ;;9002226.02101,"873,S90.811A ",.01)
 ;;S90.811A
 ;;9002226.02101,"873,S90.811A ",.02)
 ;;S90.811A
 ;;9002226.02101,"873,S90.811A ",.03)
 ;;30
 ;;9002226.02101,"873,S90.812A ",.01)
 ;;S90.812A
 ;;9002226.02101,"873,S90.812A ",.02)
 ;;S90.812A
 ;;9002226.02101,"873,S90.812A ",.03)
 ;;30
 ;;9002226.02101,"873,S90.819A ",.01)
 ;;S90.819A
 ;;9002226.02101,"873,S90.819A ",.02)
 ;;S90.819A
 ;;9002226.02101,"873,S90.819A ",.03)
 ;;30
 ;;9002226.02101,"873,S90.841A ",.01)
 ;;S90.841A
 ;;9002226.02101,"873,S90.841A ",.02)
 ;;S90.841A
 ;;9002226.02101,"873,S90.841A ",.03)
 ;;30
 ;;9002226.02101,"873,S90.842A ",.01)
 ;;S90.842A
 ;;9002226.02101,"873,S90.842A ",.02)
 ;;S90.842A
 ;;9002226.02101,"873,S90.842A ",.03)
 ;;30
 ;;9002226.02101,"873,S90.849A ",.01)
 ;;S90.849A
 ;;9002226.02101,"873,S90.849A ",.02)
 ;;S90.849A
 ;;9002226.02101,"873,S90.849A ",.03)
 ;;30
 ;;9002226.02101,"873,S90.851A ",.01)
 ;;S90.851A
 ;;9002226.02101,"873,S90.851A ",.02)
 ;;S90.851A
 ;;9002226.02101,"873,S90.851A ",.03)
 ;;30
 ;;9002226.02101,"873,S90.852A ",.01)
 ;;S90.852A
 ;;9002226.02101,"873,S90.852A ",.02)
 ;;S90.852A
 ;;9002226.02101,"873,S90.852A ",.03)
 ;;30
 ;;9002226.02101,"873,S90.859A ",.01)
 ;;S90.859A
 ;;9002226.02101,"873,S90.859A ",.02)
 ;;S90.859A
 ;;9002226.02101,"873,S90.859A ",.03)
 ;;30
 ;;9002226.02101,"873,S90.871A ",.01)
 ;;S90.871A
 ;;9002226.02101,"873,S90.871A ",.02)
 ;;S90.871A
 ;;9002226.02101,"873,S90.871A ",.03)
 ;;30
 ;;9002226.02101,"873,S90.872A ",.01)
 ;;S90.872A
 ;;9002226.02101,"873,S90.872A ",.02)
 ;;S90.872A
 ;;9002226.02101,"873,S90.872A ",.03)
 ;;30
 ;;9002226.02101,"873,S90.879A ",.01)
 ;;S90.879A
 ;;9002226.02101,"873,S90.879A ",.02)
 ;;S90.879A
 ;;9002226.02101,"873,S90.879A ",.03)
 ;;30
 ;;9002226.02101,"873,S90.911A ",.01)
 ;;S90.911A
 ;;9002226.02101,"873,S90.911A ",.02)
 ;;S90.911A
 ;;9002226.02101,"873,S90.911A ",.03)
 ;;30
 ;;9002226.02101,"873,S90.912A ",.01)
 ;;S90.912A
 ;;9002226.02101,"873,S90.912A ",.02)
 ;;S90.912A
 ;;9002226.02101,"873,S90.912A ",.03)
 ;;30
 ;;9002226.02101,"873,S90.919A ",.01)
 ;;S90.919A
 ;;9002226.02101,"873,S90.919A ",.02)
 ;;S90.919A
 ;;9002226.02101,"873,S90.919A ",.03)
 ;;30
 ;;9002226.02101,"873,S90.921A ",.01)
 ;;S90.921A
 ;;9002226.02101,"873,S90.921A ",.02)
 ;;S90.921A
 ;;9002226.02101,"873,S90.921A ",.03)
 ;;30
 ;;9002226.02101,"873,S90.922A ",.01)
 ;;S90.922A
 ;;9002226.02101,"873,S90.922A ",.02)
 ;;S90.922A
 ;;9002226.02101,"873,S90.922A ",.03)
 ;;30
 ;;9002226.02101,"873,S90.929A ",.01)
 ;;S90.929A
 ;;9002226.02101,"873,S90.929A ",.02)
 ;;S90.929A
 ;;9002226.02101,"873,S90.929A ",.03)
 ;;30
 ;;9002226.02101,"873,S90.931A ",.01)
 ;;S90.931A
 ;;9002226.02101,"873,S90.931A ",.02)
 ;;S90.931A
 ;;9002226.02101,"873,S90.931A ",.03)
 ;;30
 ;;9002226.02101,"873,S90.932A ",.01)
 ;;S90.932A
 ;;9002226.02101,"873,S90.932A ",.02)
 ;;S90.932A
 ;;9002226.02101,"873,S90.932A ",.03)
 ;;30
 ;;9002226.02101,"873,S90.933A ",.01)
 ;;S90.933A
 ;;9002226.02101,"873,S90.933A ",.02)
 ;;S90.933A
 ;;9002226.02101,"873,S90.933A ",.03)
 ;;30
 ;;9002226.02101,"873,S90.934A ",.01)
 ;;S90.934A
 ;;9002226.02101,"873,S90.934A ",.02)
 ;;S90.934A
 ;;9002226.02101,"873,S90.934A ",.03)
 ;;30
 ;;9002226.02101,"873,S90.935A ",.01)
 ;;S90.935A
 ;;9002226.02101,"873,S90.935A ",.02)
 ;;S90.935A
 ;;9002226.02101,"873,S90.935A ",.03)
 ;;30
 ;;9002226.02101,"873,S90.936A ",.01)
 ;;S90.936A
 ;;9002226.02101,"873,S90.936A ",.02)
 ;;S90.936A
 ;;9002226.02101,"873,S90.936A ",.03)
 ;;30
 ;;9002226.02101,"873,S91.001A ",.01)
 ;;S91.001A
 ;;9002226.02101,"873,S91.001A ",.02)
 ;;S91.001A
 ;;9002226.02101,"873,S91.001A ",.03)
 ;;30
 ;;9002226.02101,"873,S91.002A ",.01)
 ;;S91.002A
 ;;9002226.02101,"873,S91.002A ",.02)
 ;;S91.002A
 ;;9002226.02101,"873,S91.002A ",.03)
 ;;30
 ;;9002226.02101,"873,S91.009A ",.01)
 ;;S91.009A
 ;;9002226.02101,"873,S91.009A ",.02)
 ;;S91.009A
 ;;9002226.02101,"873,S91.009A ",.03)
 ;;30
 ;;9002226.02101,"873,S91.011A ",.01)
 ;;S91.011A
 ;;9002226.02101,"873,S91.011A ",.02)
 ;;S91.011A
 ;;9002226.02101,"873,S91.011A ",.03)
 ;;30
 ;;9002226.02101,"873,S91.012A ",.01)
 ;;S91.012A
 ;;9002226.02101,"873,S91.012A ",.02)
 ;;S91.012A
 ;;9002226.02101,"873,S91.012A ",.03)
 ;;30
 ;;9002226.02101,"873,S91.019A ",.01)
 ;;S91.019A
 ;;9002226.02101,"873,S91.019A ",.02)
 ;;S91.019A
 ;;9002226.02101,"873,S91.019A ",.03)
 ;;30
 ;;9002226.02101,"873,S91.021A ",.01)
 ;;S91.021A
 ;;9002226.02101,"873,S91.021A ",.02)
 ;;S91.021A
 ;;9002226.02101,"873,S91.021A ",.03)
 ;;30
 ;;9002226.02101,"873,S91.022A ",.01)
 ;;S91.022A
 ;;9002226.02101,"873,S91.022A ",.02)
 ;;S91.022A
 ;;9002226.02101,"873,S91.022A ",.03)
 ;;30
 ;;9002226.02101,"873,S91.029A ",.01)
 ;;S91.029A
 ;;9002226.02101,"873,S91.029A ",.02)
 ;;S91.029A
 ;;9002226.02101,"873,S91.029A ",.03)
 ;;30
 ;;9002226.02101,"873,S91.031A ",.01)
 ;;S91.031A
 ;;9002226.02101,"873,S91.031A ",.02)
 ;;S91.031A
 ;;9002226.02101,"873,S91.031A ",.03)
 ;;30
 ;;9002226.02101,"873,S91.032A ",.01)
 ;;S91.032A
 ;;9002226.02101,"873,S91.032A ",.02)
 ;;S91.032A
 ;;9002226.02101,"873,S91.032A ",.03)
 ;;30
 ;;9002226.02101,"873,S91.039A ",.01)
 ;;S91.039A
 ;;9002226.02101,"873,S91.039A ",.02)
 ;;S91.039A
 ;;9002226.02101,"873,S91.039A ",.03)
 ;;30
 ;;9002226.02101,"873,S91.041A ",.01)
 ;;S91.041A
 ;;9002226.02101,"873,S91.041A ",.02)
 ;;S91.041A
 ;;9002226.02101,"873,S91.041A ",.03)
 ;;30
 ;;9002226.02101,"873,S91.042A ",.01)
 ;;S91.042A
 ;;9002226.02101,"873,S91.042A ",.02)
 ;;S91.042A
 ;;9002226.02101,"873,S91.042A ",.03)
 ;;30
 ;;9002226.02101,"873,S91.049A ",.01)
 ;;S91.049A
 ;;9002226.02101,"873,S91.049A ",.02)
 ;;S91.049A
 ;;9002226.02101,"873,S91.049A ",.03)
 ;;30
 ;;9002226.02101,"873,S91.051A ",.01)
 ;;S91.051A
 ;;9002226.02101,"873,S91.051A ",.02)
 ;;S91.051A
 ;;9002226.02101,"873,S91.051A ",.03)
 ;;30
 ;;9002226.02101,"873,S91.052A ",.01)
 ;;S91.052A
 ;;9002226.02101,"873,S91.052A ",.02)
 ;;S91.052A
 ;;9002226.02101,"873,S91.052A ",.03)
 ;;30
 ;;9002226.02101,"873,S91.059A ",.01)
 ;;S91.059A
 ;;9002226.02101,"873,S91.059A ",.02)
 ;;S91.059A
 ;;9002226.02101,"873,S91.059A ",.03)
 ;;30
 ;;9002226.02101,"873,S91.101A ",.01)
 ;;S91.101A
 ;;9002226.02101,"873,S91.101A ",.02)
 ;;S91.101A
 ;;9002226.02101,"873,S91.101A ",.03)
 ;;30
 ;;9002226.02101,"873,S91.102A ",.01)
 ;;S91.102A
 ;;9002226.02101,"873,S91.102A ",.02)
 ;;S91.102A
 ;;9002226.02101,"873,S91.102A ",.03)
 ;;30
 ;;9002226.02101,"873,S91.103A ",.01)
 ;;S91.103A
 ;;9002226.02101,"873,S91.103A ",.02)
 ;;S91.103A
 ;;9002226.02101,"873,S91.103A ",.03)
 ;;30
 ;;9002226.02101,"873,S91.104A ",.01)
 ;;S91.104A
 ;;9002226.02101,"873,S91.104A ",.02)
 ;;S91.104A
 ;;9002226.02101,"873,S91.104A ",.03)
 ;;30
 ;;9002226.02101,"873,S91.105A ",.01)
 ;;S91.105A
 ;;9002226.02101,"873,S91.105A ",.02)
 ;;S91.105A
 ;;9002226.02101,"873,S91.105A ",.03)
 ;;30
 ;;9002226.02101,"873,S91.106A ",.01)
 ;;S91.106A
 ;;9002226.02101,"873,S91.106A ",.02)
 ;;S91.106A
 ;;9002226.02101,"873,S91.106A ",.03)
 ;;30
 ;;9002226.02101,"873,S91.109A ",.01)
 ;;S91.109A
 ;;9002226.02101,"873,S91.109A ",.02)
 ;;S91.109A
 ;;9002226.02101,"873,S91.109A ",.03)
 ;;30
 ;;9002226.02101,"873,S91.111A ",.01)
 ;;S91.111A
 ;;9002226.02101,"873,S91.111A ",.02)
 ;;S91.111A
 ;;9002226.02101,"873,S91.111A ",.03)
 ;;30
 ;;9002226.02101,"873,S91.112A ",.01)
 ;;S91.112A
 ;;9002226.02101,"873,S91.112A ",.02)
 ;;S91.112A
 ;;9002226.02101,"873,S91.112A ",.03)
 ;;30
 ;;9002226.02101,"873,S91.113A ",.01)
 ;;S91.113A
 ;;9002226.02101,"873,S91.113A ",.02)
 ;;S91.113A
 ;;9002226.02101,"873,S91.113A ",.03)
 ;;30
 ;;9002226.02101,"873,S91.114A ",.01)
 ;;S91.114A
 ;;9002226.02101,"873,S91.114A ",.02)
 ;;S91.114A
 ;;9002226.02101,"873,S91.114A ",.03)
 ;;30
 ;;9002226.02101,"873,S91.115A ",.01)
 ;;S91.115A
 ;;9002226.02101,"873,S91.115A ",.02)
 ;;S91.115A
 ;;9002226.02101,"873,S91.115A ",.03)
 ;;30
 ;;9002226.02101,"873,S91.116A ",.01)
 ;;S91.116A
 ;;9002226.02101,"873,S91.116A ",.02)
 ;;S91.116A
 ;;9002226.02101,"873,S91.116A ",.03)
 ;;30
 ;;9002226.02101,"873,S91.119A ",.01)
 ;;S91.119A
 ;;9002226.02101,"873,S91.119A ",.02)
 ;;S91.119A
 ;;9002226.02101,"873,S91.119A ",.03)
 ;;30
 ;;9002226.02101,"873,S91.121A ",.01)
 ;;S91.121A
 ;;9002226.02101,"873,S91.121A ",.02)
 ;;S91.121A
 ;;9002226.02101,"873,S91.121A ",.03)
 ;;30
 ;;9002226.02101,"873,S91.122A ",.01)
 ;;S91.122A
 ;;9002226.02101,"873,S91.122A ",.02)
 ;;S91.122A
 ;;9002226.02101,"873,S91.122A ",.03)
 ;;30
 ;;9002226.02101,"873,S91.123A ",.01)
 ;;S91.123A
 ;;9002226.02101,"873,S91.123A ",.02)
 ;;S91.123A
 ;;9002226.02101,"873,S91.123A ",.03)
 ;;30
 ;;9002226.02101,"873,S91.124A ",.01)
 ;;S91.124A
 ;;9002226.02101,"873,S91.124A ",.02)
 ;;S91.124A
 ;;9002226.02101,"873,S91.124A ",.03)
 ;;30
 ;;9002226.02101,"873,S91.125A ",.01)
 ;;S91.125A
 ;;9002226.02101,"873,S91.125A ",.02)
 ;;S91.125A
 ;;9002226.02101,"873,S91.125A ",.03)
 ;;30
 ;;9002226.02101,"873,S91.126A ",.01)
 ;;S91.126A
 ;;9002226.02101,"873,S91.126A ",.02)
 ;;S91.126A
 ;;9002226.02101,"873,S91.126A ",.03)
 ;;30
 ;;9002226.02101,"873,S91.129A ",.01)
 ;;S91.129A
 ;;9002226.02101,"873,S91.129A ",.02)
 ;;S91.129A
 ;;9002226.02101,"873,S91.129A ",.03)
 ;;30
 ;;9002226.02101,"873,S91.131A ",.01)
 ;;S91.131A
 ;;9002226.02101,"873,S91.131A ",.02)
 ;;S91.131A
 ;;9002226.02101,"873,S91.131A ",.03)
 ;;30
 ;;9002226.02101,"873,S91.132A ",.01)
 ;;S91.132A
 ;;9002226.02101,"873,S91.132A ",.02)
 ;;S91.132A
 ;;9002226.02101,"873,S91.132A ",.03)
 ;;30
 ;;9002226.02101,"873,S91.133A ",.01)
 ;;S91.133A
 ;;9002226.02101,"873,S91.133A ",.02)
 ;;S91.133A
 ;;9002226.02101,"873,S91.133A ",.03)
 ;;30
 ;;9002226.02101,"873,S91.134A ",.01)
 ;;S91.134A
 ;;9002226.02101,"873,S91.134A ",.02)
 ;;S91.134A
 ;;9002226.02101,"873,S91.134A ",.03)
 ;;30
 ;;9002226.02101,"873,S91.135A ",.01)
 ;;S91.135A
 ;;9002226.02101,"873,S91.135A ",.02)
 ;;S91.135A
 ;;9002226.02101,"873,S91.135A ",.03)
 ;;30
 ;;9002226.02101,"873,S91.136A ",.01)
 ;;S91.136A
 ;;9002226.02101,"873,S91.136A ",.02)
 ;;S91.136A
 ;;9002226.02101,"873,S91.136A ",.03)
 ;;30
 ;;9002226.02101,"873,S91.139A ",.01)
 ;;S91.139A
 ;;9002226.02101,"873,S91.139A ",.02)
 ;;S91.139A
 ;;9002226.02101,"873,S91.139A ",.03)
 ;;30
 ;;9002226.02101,"873,S91.141A ",.01)
 ;;S91.141A
 ;;9002226.02101,"873,S91.141A ",.02)
 ;;S91.141A
 ;;9002226.02101,"873,S91.141A ",.03)
 ;;30
 ;;9002226.02101,"873,S91.142A ",.01)
 ;;S91.142A
 ;;9002226.02101,"873,S91.142A ",.02)
 ;;S91.142A
 ;;9002226.02101,"873,S91.142A ",.03)
 ;;30
 ;;9002226.02101,"873,S91.143A ",.01)
 ;;S91.143A
 ;;9002226.02101,"873,S91.143A ",.02)
 ;;S91.143A
 ;;9002226.02101,"873,S91.143A ",.03)
 ;;30