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

ATXXA79.m

Go to the documentation of this file.
ATXXA79 ;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,S60.474A ",.02)
 ;;S60.474A
 ;;9002226.02101,"873,S60.474A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.475A ",.01)
 ;;S60.475A
 ;;9002226.02101,"873,S60.475A ",.02)
 ;;S60.475A
 ;;9002226.02101,"873,S60.475A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.476A ",.01)
 ;;S60.476A
 ;;9002226.02101,"873,S60.476A ",.02)
 ;;S60.476A
 ;;9002226.02101,"873,S60.476A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.477A ",.01)
 ;;S60.477A
 ;;9002226.02101,"873,S60.477A ",.02)
 ;;S60.477A
 ;;9002226.02101,"873,S60.477A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.478A ",.01)
 ;;S60.478A
 ;;9002226.02101,"873,S60.478A ",.02)
 ;;S60.478A
 ;;9002226.02101,"873,S60.478A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.479A ",.01)
 ;;S60.479A
 ;;9002226.02101,"873,S60.479A ",.02)
 ;;S60.479A
 ;;9002226.02101,"873,S60.479A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.511A ",.01)
 ;;S60.511A
 ;;9002226.02101,"873,S60.511A ",.02)
 ;;S60.511A
 ;;9002226.02101,"873,S60.511A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.512A ",.01)
 ;;S60.512A
 ;;9002226.02101,"873,S60.512A ",.02)
 ;;S60.512A
 ;;9002226.02101,"873,S60.512A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.519A ",.01)
 ;;S60.519A
 ;;9002226.02101,"873,S60.519A ",.02)
 ;;S60.519A
 ;;9002226.02101,"873,S60.519A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.541A ",.01)
 ;;S60.541A
 ;;9002226.02101,"873,S60.541A ",.02)
 ;;S60.541A
 ;;9002226.02101,"873,S60.541A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.542A ",.01)
 ;;S60.542A
 ;;9002226.02101,"873,S60.542A ",.02)
 ;;S60.542A
 ;;9002226.02101,"873,S60.542A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.549A ",.01)
 ;;S60.549A
 ;;9002226.02101,"873,S60.549A ",.02)
 ;;S60.549A
 ;;9002226.02101,"873,S60.549A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.551A ",.01)
 ;;S60.551A
 ;;9002226.02101,"873,S60.551A ",.02)
 ;;S60.551A
 ;;9002226.02101,"873,S60.551A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.552A ",.01)
 ;;S60.552A
 ;;9002226.02101,"873,S60.552A ",.02)
 ;;S60.552A
 ;;9002226.02101,"873,S60.552A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.559A ",.01)
 ;;S60.559A
 ;;9002226.02101,"873,S60.559A ",.02)
 ;;S60.559A
 ;;9002226.02101,"873,S60.559A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.571A ",.01)
 ;;S60.571A
 ;;9002226.02101,"873,S60.571A ",.02)
 ;;S60.571A
 ;;9002226.02101,"873,S60.571A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.572A ",.01)
 ;;S60.572A
 ;;9002226.02101,"873,S60.572A ",.02)
 ;;S60.572A
 ;;9002226.02101,"873,S60.572A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.579A ",.01)
 ;;S60.579A
 ;;9002226.02101,"873,S60.579A ",.02)
 ;;S60.579A
 ;;9002226.02101,"873,S60.579A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.811A ",.01)
 ;;S60.811A
 ;;9002226.02101,"873,S60.811A ",.02)
 ;;S60.811A
 ;;9002226.02101,"873,S60.811A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.812A ",.01)
 ;;S60.812A
 ;;9002226.02101,"873,S60.812A ",.02)
 ;;S60.812A
 ;;9002226.02101,"873,S60.812A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.819A ",.01)
 ;;S60.819A
 ;;9002226.02101,"873,S60.819A ",.02)
 ;;S60.819A
 ;;9002226.02101,"873,S60.819A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.841A ",.01)
 ;;S60.841A
 ;;9002226.02101,"873,S60.841A ",.02)
 ;;S60.841A
 ;;9002226.02101,"873,S60.841A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.842A ",.01)
 ;;S60.842A
 ;;9002226.02101,"873,S60.842A ",.02)
 ;;S60.842A
 ;;9002226.02101,"873,S60.842A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.849A ",.01)
 ;;S60.849A
 ;;9002226.02101,"873,S60.849A ",.02)
 ;;S60.849A
 ;;9002226.02101,"873,S60.849A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.851A ",.01)
 ;;S60.851A
 ;;9002226.02101,"873,S60.851A ",.02)
 ;;S60.851A
 ;;9002226.02101,"873,S60.851A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.852A ",.01)
 ;;S60.852A
 ;;9002226.02101,"873,S60.852A ",.02)
 ;;S60.852A
 ;;9002226.02101,"873,S60.852A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.859A ",.01)
 ;;S60.859A
 ;;9002226.02101,"873,S60.859A ",.02)
 ;;S60.859A
 ;;9002226.02101,"873,S60.859A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.871A ",.01)
 ;;S60.871A
 ;;9002226.02101,"873,S60.871A ",.02)
 ;;S60.871A
 ;;9002226.02101,"873,S60.871A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.872A ",.01)
 ;;S60.872A
 ;;9002226.02101,"873,S60.872A ",.02)
 ;;S60.872A
 ;;9002226.02101,"873,S60.872A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.879A ",.01)
 ;;S60.879A
 ;;9002226.02101,"873,S60.879A ",.02)
 ;;S60.879A
 ;;9002226.02101,"873,S60.879A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.911A ",.01)
 ;;S60.911A
 ;;9002226.02101,"873,S60.911A ",.02)
 ;;S60.911A
 ;;9002226.02101,"873,S60.911A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.912A ",.01)
 ;;S60.912A
 ;;9002226.02101,"873,S60.912A ",.02)
 ;;S60.912A
 ;;9002226.02101,"873,S60.912A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.919A ",.01)
 ;;S60.919A
 ;;9002226.02101,"873,S60.919A ",.02)
 ;;S60.919A
 ;;9002226.02101,"873,S60.919A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.921A ",.01)
 ;;S60.921A
 ;;9002226.02101,"873,S60.921A ",.02)
 ;;S60.921A
 ;;9002226.02101,"873,S60.921A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.922A ",.01)
 ;;S60.922A
 ;;9002226.02101,"873,S60.922A ",.02)
 ;;S60.922A
 ;;9002226.02101,"873,S60.922A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.929A ",.01)
 ;;S60.929A
 ;;9002226.02101,"873,S60.929A ",.02)
 ;;S60.929A
 ;;9002226.02101,"873,S60.929A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.931A ",.01)
 ;;S60.931A
 ;;9002226.02101,"873,S60.931A ",.02)
 ;;S60.931A
 ;;9002226.02101,"873,S60.931A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.932A ",.01)
 ;;S60.932A
 ;;9002226.02101,"873,S60.932A ",.02)
 ;;S60.932A
 ;;9002226.02101,"873,S60.932A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.939A ",.01)
 ;;S60.939A
 ;;9002226.02101,"873,S60.939A ",.02)
 ;;S60.939A
 ;;9002226.02101,"873,S60.939A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.940A ",.01)
 ;;S60.940A
 ;;9002226.02101,"873,S60.940A ",.02)
 ;;S60.940A
 ;;9002226.02101,"873,S60.940A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.941A ",.01)
 ;;S60.941A
 ;;9002226.02101,"873,S60.941A ",.02)
 ;;S60.941A
 ;;9002226.02101,"873,S60.941A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.942A ",.01)
 ;;S60.942A
 ;;9002226.02101,"873,S60.942A ",.02)
 ;;S60.942A
 ;;9002226.02101,"873,S60.942A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.943A ",.01)
 ;;S60.943A
 ;;9002226.02101,"873,S60.943A ",.02)
 ;;S60.943A
 ;;9002226.02101,"873,S60.943A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.944A ",.01)
 ;;S60.944A
 ;;9002226.02101,"873,S60.944A ",.02)
 ;;S60.944A
 ;;9002226.02101,"873,S60.944A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.945A ",.01)
 ;;S60.945A
 ;;9002226.02101,"873,S60.945A ",.02)
 ;;S60.945A
 ;;9002226.02101,"873,S60.945A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.946A ",.01)
 ;;S60.946A
 ;;9002226.02101,"873,S60.946A ",.02)
 ;;S60.946A
 ;;9002226.02101,"873,S60.946A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.947A ",.01)
 ;;S60.947A
 ;;9002226.02101,"873,S60.947A ",.02)
 ;;S60.947A
 ;;9002226.02101,"873,S60.947A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.948A ",.01)
 ;;S60.948A
 ;;9002226.02101,"873,S60.948A ",.02)
 ;;S60.948A
 ;;9002226.02101,"873,S60.948A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.949A ",.01)
 ;;S60.949A
 ;;9002226.02101,"873,S60.949A ",.02)
 ;;S60.949A
 ;;9002226.02101,"873,S60.949A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.001A ",.01)
 ;;S61.001A
 ;;9002226.02101,"873,S61.001A ",.02)
 ;;S61.001A
 ;;9002226.02101,"873,S61.001A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.002A ",.01)
 ;;S61.002A
 ;;9002226.02101,"873,S61.002A ",.02)
 ;;S61.002A
 ;;9002226.02101,"873,S61.002A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.009A ",.01)
 ;;S61.009A
 ;;9002226.02101,"873,S61.009A ",.02)
 ;;S61.009A
 ;;9002226.02101,"873,S61.009A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.011A ",.01)
 ;;S61.011A
 ;;9002226.02101,"873,S61.011A ",.02)
 ;;S61.011A
 ;;9002226.02101,"873,S61.011A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.012A ",.01)
 ;;S61.012A
 ;;9002226.02101,"873,S61.012A ",.02)
 ;;S61.012A
 ;;9002226.02101,"873,S61.012A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.019A ",.01)
 ;;S61.019A
 ;;9002226.02101,"873,S61.019A ",.02)
 ;;S61.019A
 ;;9002226.02101,"873,S61.019A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.021A ",.01)
 ;;S61.021A
 ;;9002226.02101,"873,S61.021A ",.02)
 ;;S61.021A
 ;;9002226.02101,"873,S61.021A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.022A ",.01)
 ;;S61.022A
 ;;9002226.02101,"873,S61.022A ",.02)
 ;;S61.022A
 ;;9002226.02101,"873,S61.022A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.029A ",.01)
 ;;S61.029A
 ;;9002226.02101,"873,S61.029A ",.02)
 ;;S61.029A
 ;;9002226.02101,"873,S61.029A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.031A ",.01)
 ;;S61.031A
 ;;9002226.02101,"873,S61.031A ",.02)
 ;;S61.031A
 ;;9002226.02101,"873,S61.031A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.032A ",.01)
 ;;S61.032A
 ;;9002226.02101,"873,S61.032A ",.02)
 ;;S61.032A
 ;;9002226.02101,"873,S61.032A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.039A ",.01)
 ;;S61.039A
 ;;9002226.02101,"873,S61.039A ",.02)
 ;;S61.039A
 ;;9002226.02101,"873,S61.039A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.041A ",.01)
 ;;S61.041A
 ;;9002226.02101,"873,S61.041A ",.02)
 ;;S61.041A
 ;;9002226.02101,"873,S61.041A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.042A ",.01)
 ;;S61.042A
 ;;9002226.02101,"873,S61.042A ",.02)
 ;;S61.042A
 ;;9002226.02101,"873,S61.042A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.049A ",.01)
 ;;S61.049A
 ;;9002226.02101,"873,S61.049A ",.02)
 ;;S61.049A
 ;;9002226.02101,"873,S61.049A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.051A ",.01)
 ;;S61.051A
 ;;9002226.02101,"873,S61.051A ",.02)
 ;;S61.051A
 ;;9002226.02101,"873,S61.051A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.052A ",.01)
 ;;S61.052A
 ;;9002226.02101,"873,S61.052A ",.02)
 ;;S61.052A
 ;;9002226.02101,"873,S61.052A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.059A ",.01)
 ;;S61.059A
 ;;9002226.02101,"873,S61.059A ",.02)
 ;;S61.059A
 ;;9002226.02101,"873,S61.059A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.101A ",.01)
 ;;S61.101A
 ;;9002226.02101,"873,S61.101A ",.02)
 ;;S61.101A
 ;;9002226.02101,"873,S61.101A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.102A ",.01)
 ;;S61.102A
 ;;9002226.02101,"873,S61.102A ",.02)
 ;;S61.102A
 ;;9002226.02101,"873,S61.102A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.109A ",.01)
 ;;S61.109A
 ;;9002226.02101,"873,S61.109A ",.02)
 ;;S61.109A
 ;;9002226.02101,"873,S61.109A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.111A ",.01)
 ;;S61.111A
 ;;9002226.02101,"873,S61.111A ",.02)
 ;;S61.111A
 ;;9002226.02101,"873,S61.111A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.112A ",.01)
 ;;S61.112A
 ;;9002226.02101,"873,S61.112A ",.02)
 ;;S61.112A
 ;;9002226.02101,"873,S61.112A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.119A ",.01)
 ;;S61.119A
 ;;9002226.02101,"873,S61.119A ",.02)
 ;;S61.119A
 ;;9002226.02101,"873,S61.119A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.121A ",.01)
 ;;S61.121A
 ;;9002226.02101,"873,S61.121A ",.02)
 ;;S61.121A
 ;;9002226.02101,"873,S61.121A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.122A ",.01)
 ;;S61.122A
 ;;9002226.02101,"873,S61.122A ",.02)
 ;;S61.122A
 ;;9002226.02101,"873,S61.122A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.129A ",.01)
 ;;S61.129A
 ;;9002226.02101,"873,S61.129A ",.02)
 ;;S61.129A
 ;;9002226.02101,"873,S61.129A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.131A ",.01)
 ;;S61.131A
 ;;9002226.02101,"873,S61.131A ",.02)
 ;;S61.131A
 ;;9002226.02101,"873,S61.131A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.132A ",.01)
 ;;S61.132A
 ;;9002226.02101,"873,S61.132A ",.02)
 ;;S61.132A
 ;;9002226.02101,"873,S61.132A ",.03)
 ;;30
 ;;9002226.02101,"873,S61.139A ",.01)
 ;;S61.139A
 ;;9002226.02101,"873,S61.139A ",.02)
 ;;S61.139A