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

ATXXA35.m

Go to the documentation of this file.
ATXXA35 ;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,S12.111A ",.03)
 ;;30
 ;;9002226.02101,"873,S12.111B ",.01)
 ;;S12.111B
 ;;9002226.02101,"873,S12.111B ",.02)
 ;;S12.111B
 ;;9002226.02101,"873,S12.111B ",.03)
 ;;30
 ;;9002226.02101,"873,S12.112A ",.01)
 ;;S12.112A
 ;;9002226.02101,"873,S12.112A ",.02)
 ;;S12.112A
 ;;9002226.02101,"873,S12.112A ",.03)
 ;;30
 ;;9002226.02101,"873,S12.112B ",.01)
 ;;S12.112B
 ;;9002226.02101,"873,S12.112B ",.02)
 ;;S12.112B
 ;;9002226.02101,"873,S12.112B ",.03)
 ;;30
 ;;9002226.02101,"873,S12.120A ",.01)
 ;;S12.120A
 ;;9002226.02101,"873,S12.120A ",.02)
 ;;S12.120A
 ;;9002226.02101,"873,S12.120A ",.03)
 ;;30
 ;;9002226.02101,"873,S12.120B ",.01)
 ;;S12.120B
 ;;9002226.02101,"873,S12.120B ",.02)
 ;;S12.120B
 ;;9002226.02101,"873,S12.120B ",.03)
 ;;30
 ;;9002226.02101,"873,S12.121A ",.01)
 ;;S12.121A
 ;;9002226.02101,"873,S12.121A ",.02)
 ;;S12.121A
 ;;9002226.02101,"873,S12.121A ",.03)
 ;;30
 ;;9002226.02101,"873,S12.121B ",.01)
 ;;S12.121B
 ;;9002226.02101,"873,S12.121B ",.02)
 ;;S12.121B
 ;;9002226.02101,"873,S12.121B ",.03)
 ;;30
 ;;9002226.02101,"873,S12.130A ",.01)
 ;;S12.130A
 ;;9002226.02101,"873,S12.130A ",.02)
 ;;S12.130A
 ;;9002226.02101,"873,S12.130A ",.03)
 ;;30
 ;;9002226.02101,"873,S12.130B ",.01)
 ;;S12.130B
 ;;9002226.02101,"873,S12.130B ",.02)
 ;;S12.130B
 ;;9002226.02101,"873,S12.130B ",.03)
 ;;30
 ;;9002226.02101,"873,S12.131A ",.01)
 ;;S12.131A
 ;;9002226.02101,"873,S12.131A ",.02)
 ;;S12.131A
 ;;9002226.02101,"873,S12.131A ",.03)
 ;;30
 ;;9002226.02101,"873,S12.131B ",.01)
 ;;S12.131B
 ;;9002226.02101,"873,S12.131B ",.02)
 ;;S12.131B
 ;;9002226.02101,"873,S12.131B ",.03)
 ;;30
 ;;9002226.02101,"873,S12.14XA ",.01)
 ;;S12.14XA
 ;;9002226.02101,"873,S12.14XA ",.02)
 ;;S12.14XA
 ;;9002226.02101,"873,S12.14XA ",.03)
 ;;30
 ;;9002226.02101,"873,S12.14XB ",.01)
 ;;S12.14XB
 ;;9002226.02101,"873,S12.14XB ",.02)
 ;;S12.14XB
 ;;9002226.02101,"873,S12.14XB ",.03)
 ;;30
 ;;9002226.02101,"873,S12.150A ",.01)
 ;;S12.150A
 ;;9002226.02101,"873,S12.150A ",.02)
 ;;S12.150A
 ;;9002226.02101,"873,S12.150A ",.03)
 ;;30
 ;;9002226.02101,"873,S12.150B ",.01)
 ;;S12.150B
 ;;9002226.02101,"873,S12.150B ",.02)
 ;;S12.150B
 ;;9002226.02101,"873,S12.150B ",.03)
 ;;30
 ;;9002226.02101,"873,S12.151A ",.01)
 ;;S12.151A
 ;;9002226.02101,"873,S12.151A ",.02)
 ;;S12.151A
 ;;9002226.02101,"873,S12.151A ",.03)
 ;;30
 ;;9002226.02101,"873,S12.151B ",.01)
 ;;S12.151B
 ;;9002226.02101,"873,S12.151B ",.02)
 ;;S12.151B
 ;;9002226.02101,"873,S12.151B ",.03)
 ;;30
 ;;9002226.02101,"873,S12.190A ",.01)
 ;;S12.190A
 ;;9002226.02101,"873,S12.190A ",.02)
 ;;S12.190A
 ;;9002226.02101,"873,S12.190A ",.03)
 ;;30
 ;;9002226.02101,"873,S12.190B ",.01)
 ;;S12.190B
 ;;9002226.02101,"873,S12.190B ",.02)
 ;;S12.190B
 ;;9002226.02101,"873,S12.190B ",.03)
 ;;30
 ;;9002226.02101,"873,S12.191A ",.01)
 ;;S12.191A
 ;;9002226.02101,"873,S12.191A ",.02)
 ;;S12.191A
 ;;9002226.02101,"873,S12.191A ",.03)
 ;;30
 ;;9002226.02101,"873,S12.191B ",.01)
 ;;S12.191B
 ;;9002226.02101,"873,S12.191B ",.02)
 ;;S12.191B
 ;;9002226.02101,"873,S12.191B ",.03)
 ;;30
 ;;9002226.02101,"873,S12.200A ",.01)
 ;;S12.200A
 ;;9002226.02101,"873,S12.200A ",.02)
 ;;S12.200A
 ;;9002226.02101,"873,S12.200A ",.03)
 ;;30
 ;;9002226.02101,"873,S12.200B ",.01)
 ;;S12.200B
 ;;9002226.02101,"873,S12.200B ",.02)
 ;;S12.200B
 ;;9002226.02101,"873,S12.200B ",.03)
 ;;30
 ;;9002226.02101,"873,S12.201A ",.01)
 ;;S12.201A
 ;;9002226.02101,"873,S12.201A ",.02)
 ;;S12.201A
 ;;9002226.02101,"873,S12.201A ",.03)
 ;;30
 ;;9002226.02101,"873,S12.201B ",.01)
 ;;S12.201B
 ;;9002226.02101,"873,S12.201B ",.02)
 ;;S12.201B
 ;;9002226.02101,"873,S12.201B ",.03)
 ;;30
 ;;9002226.02101,"873,S12.230A ",.01)
 ;;S12.230A
 ;;9002226.02101,"873,S12.230A ",.02)
 ;;S12.230A
 ;;9002226.02101,"873,S12.230A ",.03)
 ;;30
 ;;9002226.02101,"873,S12.230B ",.01)
 ;;S12.230B
 ;;9002226.02101,"873,S12.230B ",.02)
 ;;S12.230B
 ;;9002226.02101,"873,S12.230B ",.03)
 ;;30
 ;;9002226.02101,"873,S12.231A ",.01)
 ;;S12.231A
 ;;9002226.02101,"873,S12.231A ",.02)
 ;;S12.231A
 ;;9002226.02101,"873,S12.231A ",.03)
 ;;30
 ;;9002226.02101,"873,S12.231B ",.01)
 ;;S12.231B
 ;;9002226.02101,"873,S12.231B ",.02)
 ;;S12.231B
 ;;9002226.02101,"873,S12.231B ",.03)
 ;;30
 ;;9002226.02101,"873,S12.24XA ",.01)
 ;;S12.24XA
 ;;9002226.02101,"873,S12.24XA ",.02)
 ;;S12.24XA
 ;;9002226.02101,"873,S12.24XA ",.03)
 ;;30
 ;;9002226.02101,"873,S12.24XB ",.01)
 ;;S12.24XB
 ;;9002226.02101,"873,S12.24XB ",.02)
 ;;S12.24XB
 ;;9002226.02101,"873,S12.24XB ",.03)
 ;;30
 ;;9002226.02101,"873,S12.250A ",.01)
 ;;S12.250A
 ;;9002226.02101,"873,S12.250A ",.02)
 ;;S12.250A
 ;;9002226.02101,"873,S12.250A ",.03)
 ;;30
 ;;9002226.02101,"873,S12.250B ",.01)
 ;;S12.250B
 ;;9002226.02101,"873,S12.250B ",.02)
 ;;S12.250B
 ;;9002226.02101,"873,S12.250B ",.03)
 ;;30
 ;;9002226.02101,"873,S12.251A ",.01)
 ;;S12.251A
 ;;9002226.02101,"873,S12.251A ",.02)
 ;;S12.251A
 ;;9002226.02101,"873,S12.251A ",.03)
 ;;30
 ;;9002226.02101,"873,S12.251B ",.01)
 ;;S12.251B
 ;;9002226.02101,"873,S12.251B ",.02)
 ;;S12.251B
 ;;9002226.02101,"873,S12.251B ",.03)
 ;;30
 ;;9002226.02101,"873,S12.290A ",.01)
 ;;S12.290A
 ;;9002226.02101,"873,S12.290A ",.02)
 ;;S12.290A
 ;;9002226.02101,"873,S12.290A ",.03)
 ;;30
 ;;9002226.02101,"873,S12.290B ",.01)
 ;;S12.290B
 ;;9002226.02101,"873,S12.290B ",.02)
 ;;S12.290B
 ;;9002226.02101,"873,S12.290B ",.03)
 ;;30
 ;;9002226.02101,"873,S12.291A ",.01)
 ;;S12.291A
 ;;9002226.02101,"873,S12.291A ",.02)
 ;;S12.291A
 ;;9002226.02101,"873,S12.291A ",.03)
 ;;30
 ;;9002226.02101,"873,S12.291B ",.01)
 ;;S12.291B
 ;;9002226.02101,"873,S12.291B ",.02)
 ;;S12.291B
 ;;9002226.02101,"873,S12.291B ",.03)
 ;;30
 ;;9002226.02101,"873,S12.300A ",.01)
 ;;S12.300A
 ;;9002226.02101,"873,S12.300A ",.02)
 ;;S12.300A
 ;;9002226.02101,"873,S12.300A ",.03)
 ;;30
 ;;9002226.02101,"873,S12.300B ",.01)
 ;;S12.300B
 ;;9002226.02101,"873,S12.300B ",.02)
 ;;S12.300B
 ;;9002226.02101,"873,S12.300B ",.03)
 ;;30
 ;;9002226.02101,"873,S12.301A ",.01)
 ;;S12.301A
 ;;9002226.02101,"873,S12.301A ",.02)
 ;;S12.301A
 ;;9002226.02101,"873,S12.301A ",.03)
 ;;30
 ;;9002226.02101,"873,S12.301B ",.01)
 ;;S12.301B
 ;;9002226.02101,"873,S12.301B ",.02)
 ;;S12.301B
 ;;9002226.02101,"873,S12.301B ",.03)
 ;;30
 ;;9002226.02101,"873,S12.330A ",.01)
 ;;S12.330A
 ;;9002226.02101,"873,S12.330A ",.02)
 ;;S12.330A
 ;;9002226.02101,"873,S12.330A ",.03)
 ;;30
 ;;9002226.02101,"873,S12.330B ",.01)
 ;;S12.330B
 ;;9002226.02101,"873,S12.330B ",.02)
 ;;S12.330B
 ;;9002226.02101,"873,S12.330B ",.03)
 ;;30
 ;;9002226.02101,"873,S12.331A ",.01)
 ;;S12.331A
 ;;9002226.02101,"873,S12.331A ",.02)
 ;;S12.331A
 ;;9002226.02101,"873,S12.331A ",.03)
 ;;30
 ;;9002226.02101,"873,S12.331B ",.01)
 ;;S12.331B
 ;;9002226.02101,"873,S12.331B ",.02)
 ;;S12.331B
 ;;9002226.02101,"873,S12.331B ",.03)
 ;;30
 ;;9002226.02101,"873,S12.34XA ",.01)
 ;;S12.34XA
 ;;9002226.02101,"873,S12.34XA ",.02)
 ;;S12.34XA
 ;;9002226.02101,"873,S12.34XA ",.03)
 ;;30
 ;;9002226.02101,"873,S12.34XB ",.01)
 ;;S12.34XB
 ;;9002226.02101,"873,S12.34XB ",.02)
 ;;S12.34XB
 ;;9002226.02101,"873,S12.34XB ",.03)
 ;;30
 ;;9002226.02101,"873,S12.350A ",.01)
 ;;S12.350A
 ;;9002226.02101,"873,S12.350A ",.02)
 ;;S12.350A
 ;;9002226.02101,"873,S12.350A ",.03)
 ;;30
 ;;9002226.02101,"873,S12.350B ",.01)
 ;;S12.350B
 ;;9002226.02101,"873,S12.350B ",.02)
 ;;S12.350B
 ;;9002226.02101,"873,S12.350B ",.03)
 ;;30
 ;;9002226.02101,"873,S12.351A ",.01)
 ;;S12.351A
 ;;9002226.02101,"873,S12.351A ",.02)
 ;;S12.351A
 ;;9002226.02101,"873,S12.351A ",.03)
 ;;30
 ;;9002226.02101,"873,S12.351B ",.01)
 ;;S12.351B
 ;;9002226.02101,"873,S12.351B ",.02)
 ;;S12.351B
 ;;9002226.02101,"873,S12.351B ",.03)
 ;;30
 ;;9002226.02101,"873,S12.390A ",.01)
 ;;S12.390A
 ;;9002226.02101,"873,S12.390A ",.02)
 ;;S12.390A
 ;;9002226.02101,"873,S12.390A ",.03)
 ;;30
 ;;9002226.02101,"873,S12.390B ",.01)
 ;;S12.390B
 ;;9002226.02101,"873,S12.390B ",.02)
 ;;S12.390B
 ;;9002226.02101,"873,S12.390B ",.03)
 ;;30
 ;;9002226.02101,"873,S12.391A ",.01)
 ;;S12.391A
 ;;9002226.02101,"873,S12.391A ",.02)
 ;;S12.391A
 ;;9002226.02101,"873,S12.391A ",.03)
 ;;30
 ;;9002226.02101,"873,S12.391B ",.01)
 ;;S12.391B
 ;;9002226.02101,"873,S12.391B ",.02)
 ;;S12.391B
 ;;9002226.02101,"873,S12.391B ",.03)
 ;;30
 ;;9002226.02101,"873,S12.400A ",.01)
 ;;S12.400A
 ;;9002226.02101,"873,S12.400A ",.02)
 ;;S12.400A
 ;;9002226.02101,"873,S12.400A ",.03)
 ;;30
 ;;9002226.02101,"873,S12.400B ",.01)
 ;;S12.400B
 ;;9002226.02101,"873,S12.400B ",.02)
 ;;S12.400B
 ;;9002226.02101,"873,S12.400B ",.03)
 ;;30
 ;;9002226.02101,"873,S12.401A ",.01)
 ;;S12.401A
 ;;9002226.02101,"873,S12.401A ",.02)
 ;;S12.401A
 ;;9002226.02101,"873,S12.401A ",.03)
 ;;30
 ;;9002226.02101,"873,S12.401B ",.01)
 ;;S12.401B
 ;;9002226.02101,"873,S12.401B ",.02)
 ;;S12.401B
 ;;9002226.02101,"873,S12.401B ",.03)
 ;;30
 ;;9002226.02101,"873,S12.430A ",.01)
 ;;S12.430A
 ;;9002226.02101,"873,S12.430A ",.02)
 ;;S12.430A
 ;;9002226.02101,"873,S12.430A ",.03)
 ;;30
 ;;9002226.02101,"873,S12.430B ",.01)
 ;;S12.430B
 ;;9002226.02101,"873,S12.430B ",.02)
 ;;S12.430B
 ;;9002226.02101,"873,S12.430B ",.03)
 ;;30
 ;;9002226.02101,"873,S12.431A ",.01)
 ;;S12.431A
 ;;9002226.02101,"873,S12.431A ",.02)
 ;;S12.431A
 ;;9002226.02101,"873,S12.431A ",.03)
 ;;30
 ;;9002226.02101,"873,S12.431B ",.01)
 ;;S12.431B
 ;;9002226.02101,"873,S12.431B ",.02)
 ;;S12.431B
 ;;9002226.02101,"873,S12.431B ",.03)
 ;;30
 ;;9002226.02101,"873,S12.44XA ",.01)
 ;;S12.44XA
 ;;9002226.02101,"873,S12.44XA ",.02)
 ;;S12.44XA
 ;;9002226.02101,"873,S12.44XA ",.03)
 ;;30
 ;;9002226.02101,"873,S12.44XB ",.01)
 ;;S12.44XB
 ;;9002226.02101,"873,S12.44XB ",.02)
 ;;S12.44XB
 ;;9002226.02101,"873,S12.44XB ",.03)
 ;;30
 ;;9002226.02101,"873,S12.450A ",.01)
 ;;S12.450A
 ;;9002226.02101,"873,S12.450A ",.02)
 ;;S12.450A
 ;;9002226.02101,"873,S12.450A ",.03)
 ;;30
 ;;9002226.02101,"873,S12.450B ",.01)
 ;;S12.450B
 ;;9002226.02101,"873,S12.450B ",.02)
 ;;S12.450B
 ;;9002226.02101,"873,S12.450B ",.03)
 ;;30
 ;;9002226.02101,"873,S12.451A ",.01)
 ;;S12.451A
 ;;9002226.02101,"873,S12.451A ",.02)
 ;;S12.451A
 ;;9002226.02101,"873,S12.451A ",.03)
 ;;30
 ;;9002226.02101,"873,S12.451B ",.01)
 ;;S12.451B
 ;;9002226.02101,"873,S12.451B ",.02)
 ;;S12.451B
 ;;9002226.02101,"873,S12.451B ",.03)
 ;;30
 ;;9002226.02101,"873,S12.490A ",.01)
 ;;S12.490A
 ;;9002226.02101,"873,S12.490A ",.02)
 ;;S12.490A
 ;;9002226.02101,"873,S12.490A ",.03)
 ;;30
 ;;9002226.02101,"873,S12.490B ",.01)
 ;;S12.490B
 ;;9002226.02101,"873,S12.490B ",.02)
 ;;S12.490B
 ;;9002226.02101,"873,S12.490B ",.03)
 ;;30
 ;;9002226.02101,"873,S12.491A ",.01)
 ;;S12.491A
 ;;9002226.02101,"873,S12.491A ",.02)
 ;;S12.491A
 ;;9002226.02101,"873,S12.491A ",.03)
 ;;30
 ;;9002226.02101,"873,S12.491B ",.01)
 ;;S12.491B
 ;;9002226.02101,"873,S12.491B ",.02)
 ;;S12.491B
 ;;9002226.02101,"873,S12.491B ",.03)
 ;;30
 ;;9002226.02101,"873,S12.500A ",.01)
 ;;S12.500A
 ;;9002226.02101,"873,S12.500A ",.02)
 ;;S12.500A
 ;;9002226.02101,"873,S12.500A ",.03)
 ;;30
 ;;9002226.02101,"873,S12.500B ",.01)
 ;;S12.500B
 ;;9002226.02101,"873,S12.500B ",.02)
 ;;S12.500B
 ;;9002226.02101,"873,S12.500B ",.03)
 ;;30
 ;;9002226.02101,"873,S12.501A ",.01)
 ;;S12.501A
 ;;9002226.02101,"873,S12.501A ",.02)
 ;;S12.501A
 ;;9002226.02101,"873,S12.501A ",.03)
 ;;30