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

ATXXA61.m

Go to the documentation of this file.
ATXXA61 ;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,S42.481A ",.02)
 ;;S42.481A
 ;;9002226.02101,"873,S42.481A ",.03)
 ;;30
 ;;9002226.02101,"873,S42.482A ",.01)
 ;;S42.482A
 ;;9002226.02101,"873,S42.482A ",.02)
 ;;S42.482A
 ;;9002226.02101,"873,S42.482A ",.03)
 ;;30
 ;;9002226.02101,"873,S42.489A ",.01)
 ;;S42.489A
 ;;9002226.02101,"873,S42.489A ",.02)
 ;;S42.489A
 ;;9002226.02101,"873,S42.489A ",.03)
 ;;30
 ;;9002226.02101,"873,S42.491A ",.01)
 ;;S42.491A
 ;;9002226.02101,"873,S42.491A ",.02)
 ;;S42.491A
 ;;9002226.02101,"873,S42.491A ",.03)
 ;;30
 ;;9002226.02101,"873,S42.491B ",.01)
 ;;S42.491B
 ;;9002226.02101,"873,S42.491B ",.02)
 ;;S42.491B
 ;;9002226.02101,"873,S42.491B ",.03)
 ;;30
 ;;9002226.02101,"873,S42.492A ",.01)
 ;;S42.492A
 ;;9002226.02101,"873,S42.492A ",.02)
 ;;S42.492A
 ;;9002226.02101,"873,S42.492A ",.03)
 ;;30
 ;;9002226.02101,"873,S42.492B ",.01)
 ;;S42.492B
 ;;9002226.02101,"873,S42.492B ",.02)
 ;;S42.492B
 ;;9002226.02101,"873,S42.492B ",.03)
 ;;30
 ;;9002226.02101,"873,S42.493A ",.01)
 ;;S42.493A
 ;;9002226.02101,"873,S42.493A ",.02)
 ;;S42.493A
 ;;9002226.02101,"873,S42.493A ",.03)
 ;;30
 ;;9002226.02101,"873,S42.493B ",.01)
 ;;S42.493B
 ;;9002226.02101,"873,S42.493B ",.02)
 ;;S42.493B
 ;;9002226.02101,"873,S42.493B ",.03)
 ;;30
 ;;9002226.02101,"873,S42.494A ",.01)
 ;;S42.494A
 ;;9002226.02101,"873,S42.494A ",.02)
 ;;S42.494A
 ;;9002226.02101,"873,S42.494A ",.03)
 ;;30
 ;;9002226.02101,"873,S42.494B ",.01)
 ;;S42.494B
 ;;9002226.02101,"873,S42.494B ",.02)
 ;;S42.494B
 ;;9002226.02101,"873,S42.494B ",.03)
 ;;30
 ;;9002226.02101,"873,S42.495A ",.01)
 ;;S42.495A
 ;;9002226.02101,"873,S42.495A ",.02)
 ;;S42.495A
 ;;9002226.02101,"873,S42.495A ",.03)
 ;;30
 ;;9002226.02101,"873,S42.495B ",.01)
 ;;S42.495B
 ;;9002226.02101,"873,S42.495B ",.02)
 ;;S42.495B
 ;;9002226.02101,"873,S42.495B ",.03)
 ;;30
 ;;9002226.02101,"873,S42.496A ",.01)
 ;;S42.496A
 ;;9002226.02101,"873,S42.496A ",.02)
 ;;S42.496A
 ;;9002226.02101,"873,S42.496A ",.03)
 ;;30
 ;;9002226.02101,"873,S42.496B ",.01)
 ;;S42.496B
 ;;9002226.02101,"873,S42.496B ",.02)
 ;;S42.496B
 ;;9002226.02101,"873,S42.496B ",.03)
 ;;30
 ;;9002226.02101,"873,S42.90XA ",.01)
 ;;S42.90XA
 ;;9002226.02101,"873,S42.90XA ",.02)
 ;;S42.90XA
 ;;9002226.02101,"873,S42.90XA ",.03)
 ;;30
 ;;9002226.02101,"873,S42.90XB ",.01)
 ;;S42.90XB
 ;;9002226.02101,"873,S42.90XB ",.02)
 ;;S42.90XB
 ;;9002226.02101,"873,S42.90XB ",.03)
 ;;30
 ;;9002226.02101,"873,S42.91XA ",.01)
 ;;S42.91XA
 ;;9002226.02101,"873,S42.91XA ",.02)
 ;;S42.91XA
 ;;9002226.02101,"873,S42.91XA ",.03)
 ;;30
 ;;9002226.02101,"873,S42.91XB ",.01)
 ;;S42.91XB
 ;;9002226.02101,"873,S42.91XB ",.02)
 ;;S42.91XB
 ;;9002226.02101,"873,S42.91XB ",.03)
 ;;30
 ;;9002226.02101,"873,S42.92XA ",.01)
 ;;S42.92XA
 ;;9002226.02101,"873,S42.92XA ",.02)
 ;;S42.92XA
 ;;9002226.02101,"873,S42.92XA ",.03)
 ;;30
 ;;9002226.02101,"873,S42.92XB ",.01)
 ;;S42.92XB
 ;;9002226.02101,"873,S42.92XB ",.02)
 ;;S42.92XB
 ;;9002226.02101,"873,S42.92XB ",.03)
 ;;30
 ;;9002226.02101,"873,S43.001A ",.01)
 ;;S43.001A
 ;;9002226.02101,"873,S43.001A ",.02)
 ;;S43.001A
 ;;9002226.02101,"873,S43.001A ",.03)
 ;;30
 ;;9002226.02101,"873,S43.002A ",.01)
 ;;S43.002A
 ;;9002226.02101,"873,S43.002A ",.02)
 ;;S43.002A
 ;;9002226.02101,"873,S43.002A ",.03)
 ;;30
 ;;9002226.02101,"873,S43.003A ",.01)
 ;;S43.003A
 ;;9002226.02101,"873,S43.003A ",.02)
 ;;S43.003A
 ;;9002226.02101,"873,S43.003A ",.03)
 ;;30
 ;;9002226.02101,"873,S43.004A ",.01)
 ;;S43.004A
 ;;9002226.02101,"873,S43.004A ",.02)
 ;;S43.004A
 ;;9002226.02101,"873,S43.004A ",.03)
 ;;30
 ;;9002226.02101,"873,S43.005A ",.01)
 ;;S43.005A
 ;;9002226.02101,"873,S43.005A ",.02)
 ;;S43.005A
 ;;9002226.02101,"873,S43.005A ",.03)
 ;;30
 ;;9002226.02101,"873,S43.006A ",.01)
 ;;S43.006A
 ;;9002226.02101,"873,S43.006A ",.02)
 ;;S43.006A
 ;;9002226.02101,"873,S43.006A ",.03)
 ;;30
 ;;9002226.02101,"873,S43.011A ",.01)
 ;;S43.011A
 ;;9002226.02101,"873,S43.011A ",.02)
 ;;S43.011A
 ;;9002226.02101,"873,S43.011A ",.03)
 ;;30
 ;;9002226.02101,"873,S43.012A ",.01)
 ;;S43.012A
 ;;9002226.02101,"873,S43.012A ",.02)
 ;;S43.012A
 ;;9002226.02101,"873,S43.012A ",.03)
 ;;30
 ;;9002226.02101,"873,S43.013A ",.01)
 ;;S43.013A
 ;;9002226.02101,"873,S43.013A ",.02)
 ;;S43.013A
 ;;9002226.02101,"873,S43.013A ",.03)
 ;;30
 ;;9002226.02101,"873,S43.014A ",.01)
 ;;S43.014A
 ;;9002226.02101,"873,S43.014A ",.02)
 ;;S43.014A
 ;;9002226.02101,"873,S43.014A ",.03)
 ;;30
 ;;9002226.02101,"873,S43.015A ",.01)
 ;;S43.015A
 ;;9002226.02101,"873,S43.015A ",.02)
 ;;S43.015A
 ;;9002226.02101,"873,S43.015A ",.03)
 ;;30
 ;;9002226.02101,"873,S43.016A ",.01)
 ;;S43.016A
 ;;9002226.02101,"873,S43.016A ",.02)
 ;;S43.016A
 ;;9002226.02101,"873,S43.016A ",.03)
 ;;30
 ;;9002226.02101,"873,S43.021A ",.01)
 ;;S43.021A
 ;;9002226.02101,"873,S43.021A ",.02)
 ;;S43.021A
 ;;9002226.02101,"873,S43.021A ",.03)
 ;;30
 ;;9002226.02101,"873,S43.022A ",.01)
 ;;S43.022A
 ;;9002226.02101,"873,S43.022A ",.02)
 ;;S43.022A
 ;;9002226.02101,"873,S43.022A ",.03)
 ;;30
 ;;9002226.02101,"873,S43.023A ",.01)
 ;;S43.023A
 ;;9002226.02101,"873,S43.023A ",.02)
 ;;S43.023A
 ;;9002226.02101,"873,S43.023A ",.03)
 ;;30
 ;;9002226.02101,"873,S43.024A ",.01)
 ;;S43.024A
 ;;9002226.02101,"873,S43.024A ",.02)
 ;;S43.024A
 ;;9002226.02101,"873,S43.024A ",.03)
 ;;30
 ;;9002226.02101,"873,S43.025A ",.01)
 ;;S43.025A
 ;;9002226.02101,"873,S43.025A ",.02)
 ;;S43.025A
 ;;9002226.02101,"873,S43.025A ",.03)
 ;;30
 ;;9002226.02101,"873,S43.026A ",.01)
 ;;S43.026A
 ;;9002226.02101,"873,S43.026A ",.02)
 ;;S43.026A
 ;;9002226.02101,"873,S43.026A ",.03)
 ;;30
 ;;9002226.02101,"873,S43.031A ",.01)
 ;;S43.031A
 ;;9002226.02101,"873,S43.031A ",.02)
 ;;S43.031A
 ;;9002226.02101,"873,S43.031A ",.03)
 ;;30
 ;;9002226.02101,"873,S43.032A ",.01)
 ;;S43.032A
 ;;9002226.02101,"873,S43.032A ",.02)
 ;;S43.032A
 ;;9002226.02101,"873,S43.032A ",.03)
 ;;30
 ;;9002226.02101,"873,S43.033A ",.01)
 ;;S43.033A
 ;;9002226.02101,"873,S43.033A ",.02)
 ;;S43.033A
 ;;9002226.02101,"873,S43.033A ",.03)
 ;;30
 ;;9002226.02101,"873,S43.034A ",.01)
 ;;S43.034A
 ;;9002226.02101,"873,S43.034A ",.02)
 ;;S43.034A
 ;;9002226.02101,"873,S43.034A ",.03)
 ;;30
 ;;9002226.02101,"873,S43.035A ",.01)
 ;;S43.035A
 ;;9002226.02101,"873,S43.035A ",.02)
 ;;S43.035A
 ;;9002226.02101,"873,S43.035A ",.03)
 ;;30
 ;;9002226.02101,"873,S43.036A ",.01)
 ;;S43.036A
 ;;9002226.02101,"873,S43.036A ",.02)
 ;;S43.036A
 ;;9002226.02101,"873,S43.036A ",.03)
 ;;30
 ;;9002226.02101,"873,S43.081A ",.01)
 ;;S43.081A
 ;;9002226.02101,"873,S43.081A ",.02)
 ;;S43.081A
 ;;9002226.02101,"873,S43.081A ",.03)
 ;;30
 ;;9002226.02101,"873,S43.082A ",.01)
 ;;S43.082A
 ;;9002226.02101,"873,S43.082A ",.02)
 ;;S43.082A
 ;;9002226.02101,"873,S43.082A ",.03)
 ;;30
 ;;9002226.02101,"873,S43.083A ",.01)
 ;;S43.083A
 ;;9002226.02101,"873,S43.083A ",.02)
 ;;S43.083A
 ;;9002226.02101,"873,S43.083A ",.03)
 ;;30
 ;;9002226.02101,"873,S43.084A ",.01)
 ;;S43.084A
 ;;9002226.02101,"873,S43.084A ",.02)
 ;;S43.084A
 ;;9002226.02101,"873,S43.084A ",.03)
 ;;30
 ;;9002226.02101,"873,S43.085A ",.01)
 ;;S43.085A
 ;;9002226.02101,"873,S43.085A ",.02)
 ;;S43.085A
 ;;9002226.02101,"873,S43.085A ",.03)
 ;;30
 ;;9002226.02101,"873,S43.086A ",.01)
 ;;S43.086A
 ;;9002226.02101,"873,S43.086A ",.02)
 ;;S43.086A
 ;;9002226.02101,"873,S43.086A ",.03)
 ;;30
 ;;9002226.02101,"873,S43.101A ",.01)
 ;;S43.101A
 ;;9002226.02101,"873,S43.101A ",.02)
 ;;S43.101A
 ;;9002226.02101,"873,S43.101A ",.03)
 ;;30
 ;;9002226.02101,"873,S43.102A ",.01)
 ;;S43.102A
 ;;9002226.02101,"873,S43.102A ",.02)
 ;;S43.102A
 ;;9002226.02101,"873,S43.102A ",.03)
 ;;30
 ;;9002226.02101,"873,S43.109A ",.01)
 ;;S43.109A
 ;;9002226.02101,"873,S43.109A ",.02)
 ;;S43.109A
 ;;9002226.02101,"873,S43.109A ",.03)
 ;;30
 ;;9002226.02101,"873,S43.111A ",.01)
 ;;S43.111A
 ;;9002226.02101,"873,S43.111A ",.02)
 ;;S43.111A
 ;;9002226.02101,"873,S43.111A ",.03)
 ;;30
 ;;9002226.02101,"873,S43.112A ",.01)
 ;;S43.112A
 ;;9002226.02101,"873,S43.112A ",.02)
 ;;S43.112A
 ;;9002226.02101,"873,S43.112A ",.03)
 ;;30
 ;;9002226.02101,"873,S43.119A ",.01)
 ;;S43.119A
 ;;9002226.02101,"873,S43.119A ",.02)
 ;;S43.119A
 ;;9002226.02101,"873,S43.119A ",.03)
 ;;30
 ;;9002226.02101,"873,S43.121A ",.01)
 ;;S43.121A
 ;;9002226.02101,"873,S43.121A ",.02)
 ;;S43.121A
 ;;9002226.02101,"873,S43.121A ",.03)
 ;;30
 ;;9002226.02101,"873,S43.122A ",.01)
 ;;S43.122A
 ;;9002226.02101,"873,S43.122A ",.02)
 ;;S43.122A
 ;;9002226.02101,"873,S43.122A ",.03)
 ;;30
 ;;9002226.02101,"873,S43.129A ",.01)
 ;;S43.129A
 ;;9002226.02101,"873,S43.129A ",.02)
 ;;S43.129A
 ;;9002226.02101,"873,S43.129A ",.03)
 ;;30
 ;;9002226.02101,"873,S43.131A ",.01)
 ;;S43.131A
 ;;9002226.02101,"873,S43.131A ",.02)
 ;;S43.131A
 ;;9002226.02101,"873,S43.131A ",.03)
 ;;30
 ;;9002226.02101,"873,S43.132A ",.01)
 ;;S43.132A
 ;;9002226.02101,"873,S43.132A ",.02)
 ;;S43.132A
 ;;9002226.02101,"873,S43.132A ",.03)
 ;;30
 ;;9002226.02101,"873,S43.139A ",.01)
 ;;S43.139A
 ;;9002226.02101,"873,S43.139A ",.02)
 ;;S43.139A
 ;;9002226.02101,"873,S43.139A ",.03)
 ;;30
 ;;9002226.02101,"873,S43.141A ",.01)
 ;;S43.141A
 ;;9002226.02101,"873,S43.141A ",.02)
 ;;S43.141A
 ;;9002226.02101,"873,S43.141A ",.03)
 ;;30
 ;;9002226.02101,"873,S43.142A ",.01)
 ;;S43.142A
 ;;9002226.02101,"873,S43.142A ",.02)
 ;;S43.142A
 ;;9002226.02101,"873,S43.142A ",.03)
 ;;30
 ;;9002226.02101,"873,S43.149A ",.01)
 ;;S43.149A
 ;;9002226.02101,"873,S43.149A ",.02)
 ;;S43.149A
 ;;9002226.02101,"873,S43.149A ",.03)
 ;;30
 ;;9002226.02101,"873,S43.151A ",.01)
 ;;S43.151A
 ;;9002226.02101,"873,S43.151A ",.02)
 ;;S43.151A
 ;;9002226.02101,"873,S43.151A ",.03)
 ;;30
 ;;9002226.02101,"873,S43.152A ",.01)
 ;;S43.152A
 ;;9002226.02101,"873,S43.152A ",.02)
 ;;S43.152A
 ;;9002226.02101,"873,S43.152A ",.03)
 ;;30
 ;;9002226.02101,"873,S43.159A ",.01)
 ;;S43.159A
 ;;9002226.02101,"873,S43.159A ",.02)
 ;;S43.159A
 ;;9002226.02101,"873,S43.159A ",.03)
 ;;30
 ;;9002226.02101,"873,S43.201A ",.01)
 ;;S43.201A
 ;;9002226.02101,"873,S43.201A ",.02)
 ;;S43.201A
 ;;9002226.02101,"873,S43.201A ",.03)
 ;;30
 ;;9002226.02101,"873,S43.202A ",.01)
 ;;S43.202A
 ;;9002226.02101,"873,S43.202A ",.02)
 ;;S43.202A
 ;;9002226.02101,"873,S43.202A ",.03)
 ;;30
 ;;9002226.02101,"873,S43.203A ",.01)
 ;;S43.203A
 ;;9002226.02101,"873,S43.203A ",.02)
 ;;S43.203A
 ;;9002226.02101,"873,S43.203A ",.03)
 ;;30
 ;;9002226.02101,"873,S43.204A ",.01)
 ;;S43.204A
 ;;9002226.02101,"873,S43.204A ",.02)
 ;;S43.204A
 ;;9002226.02101,"873,S43.204A ",.03)
 ;;30
 ;;9002226.02101,"873,S43.205A ",.01)
 ;;S43.205A
 ;;9002226.02101,"873,S43.205A ",.02)
 ;;S43.205A
 ;;9002226.02101,"873,S43.205A ",.03)
 ;;30
 ;;9002226.02101,"873,S43.206A ",.01)
 ;;S43.206A
 ;;9002226.02101,"873,S43.206A ",.02)
 ;;S43.206A
 ;;9002226.02101,"873,S43.206A ",.03)
 ;;30
 ;;9002226.02101,"873,S43.211A ",.01)
 ;;S43.211A
 ;;9002226.02101,"873,S43.211A ",.02)
 ;;S43.211A
 ;;9002226.02101,"873,S43.211A ",.03)
 ;;30
 ;;9002226.02101,"873,S43.212A ",.01)
 ;;S43.212A
 ;;9002226.02101,"873,S43.212A ",.02)
 ;;S43.212A
 ;;9002226.02101,"873,S43.212A ",.03)
 ;;30
 ;;9002226.02101,"873,S43.213A ",.01)
 ;;S43.213A
 ;;9002226.02101,"873,S43.213A ",.02)
 ;;S43.213A
 ;;9002226.02101,"873,S43.213A ",.03)
 ;;30
 ;;9002226.02101,"873,S43.214A ",.01)
 ;;S43.214A
 ;;9002226.02101,"873,S43.214A ",.02)
 ;;S43.214A