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

ATXXA144.m

Go to the documentation of this file.
ATXXA144 ;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,T26.90XA ",.02)
 ;;T26.90XA
 ;;9002226.02101,"873,T26.90XA ",.03)
 ;;30
 ;;9002226.02101,"873,T26.91XA ",.01)
 ;;T26.91XA
 ;;9002226.02101,"873,T26.91XA ",.02)
 ;;T26.91XA
 ;;9002226.02101,"873,T26.91XA ",.03)
 ;;30
 ;;9002226.02101,"873,T26.92XA ",.01)
 ;;T26.92XA
 ;;9002226.02101,"873,T26.92XA ",.02)
 ;;T26.92XA
 ;;9002226.02101,"873,T26.92XA ",.03)
 ;;30
 ;;9002226.02101,"873,T27.0XXA ",.01)
 ;;T27.0XXA
 ;;9002226.02101,"873,T27.0XXA ",.02)
 ;;T27.0XXA
 ;;9002226.02101,"873,T27.0XXA ",.03)
 ;;30
 ;;9002226.02101,"873,T27.1XXA ",.01)
 ;;T27.1XXA
 ;;9002226.02101,"873,T27.1XXA ",.02)
 ;;T27.1XXA
 ;;9002226.02101,"873,T27.1XXA ",.03)
 ;;30
 ;;9002226.02101,"873,T27.2XXA ",.01)
 ;;T27.2XXA
 ;;9002226.02101,"873,T27.2XXA ",.02)
 ;;T27.2XXA
 ;;9002226.02101,"873,T27.2XXA ",.03)
 ;;30
 ;;9002226.02101,"873,T27.3XXA ",.01)
 ;;T27.3XXA
 ;;9002226.02101,"873,T27.3XXA ",.02)
 ;;T27.3XXA
 ;;9002226.02101,"873,T27.3XXA ",.03)
 ;;30
 ;;9002226.02101,"873,T27.4XXA ",.01)
 ;;T27.4XXA
 ;;9002226.02101,"873,T27.4XXA ",.02)
 ;;T27.4XXA
 ;;9002226.02101,"873,T27.4XXA ",.03)
 ;;30
 ;;9002226.02101,"873,T27.5XXA ",.01)
 ;;T27.5XXA
 ;;9002226.02101,"873,T27.5XXA ",.02)
 ;;T27.5XXA
 ;;9002226.02101,"873,T27.5XXA ",.03)
 ;;30
 ;;9002226.02101,"873,T27.6XXA ",.01)
 ;;T27.6XXA
 ;;9002226.02101,"873,T27.6XXA ",.02)
 ;;T27.6XXA
 ;;9002226.02101,"873,T27.6XXA ",.03)
 ;;30
 ;;9002226.02101,"873,T27.7XXA ",.01)
 ;;T27.7XXA
 ;;9002226.02101,"873,T27.7XXA ",.02)
 ;;T27.7XXA
 ;;9002226.02101,"873,T27.7XXA ",.03)
 ;;30
 ;;9002226.02101,"873,T28.0XXA ",.01)
 ;;T28.0XXA
 ;;9002226.02101,"873,T28.0XXA ",.02)
 ;;T28.0XXA
 ;;9002226.02101,"873,T28.0XXA ",.03)
 ;;30
 ;;9002226.02101,"873,T28.1XXA ",.01)
 ;;T28.1XXA
 ;;9002226.02101,"873,T28.1XXA ",.02)
 ;;T28.1XXA
 ;;9002226.02101,"873,T28.1XXA ",.03)
 ;;30
 ;;9002226.02101,"873,T28.2XXA ",.01)
 ;;T28.2XXA
 ;;9002226.02101,"873,T28.2XXA ",.02)
 ;;T28.2XXA
 ;;9002226.02101,"873,T28.2XXA ",.03)
 ;;30
 ;;9002226.02101,"873,T28.3XXA ",.01)
 ;;T28.3XXA
 ;;9002226.02101,"873,T28.3XXA ",.02)
 ;;T28.3XXA
 ;;9002226.02101,"873,T28.3XXA ",.03)
 ;;30
 ;;9002226.02101,"873,T28.40XA ",.01)
 ;;T28.40XA
 ;;9002226.02101,"873,T28.40XA ",.02)
 ;;T28.40XA
 ;;9002226.02101,"873,T28.40XA ",.03)
 ;;30
 ;;9002226.02101,"873,T28.411A ",.01)
 ;;T28.411A
 ;;9002226.02101,"873,T28.411A ",.02)
 ;;T28.411A
 ;;9002226.02101,"873,T28.411A ",.03)
 ;;30
 ;;9002226.02101,"873,T28.412A ",.01)
 ;;T28.412A
 ;;9002226.02101,"873,T28.412A ",.02)
 ;;T28.412A
 ;;9002226.02101,"873,T28.412A ",.03)
 ;;30
 ;;9002226.02101,"873,T28.419A ",.01)
 ;;T28.419A
 ;;9002226.02101,"873,T28.419A ",.02)
 ;;T28.419A
 ;;9002226.02101,"873,T28.419A ",.03)
 ;;30
 ;;9002226.02101,"873,T28.49XA ",.01)
 ;;T28.49XA
 ;;9002226.02101,"873,T28.49XA ",.02)
 ;;T28.49XA
 ;;9002226.02101,"873,T28.49XA ",.03)
 ;;30
 ;;9002226.02101,"873,T28.5XXA ",.01)
 ;;T28.5XXA
 ;;9002226.02101,"873,T28.5XXA ",.02)
 ;;T28.5XXA
 ;;9002226.02101,"873,T28.5XXA ",.03)
 ;;30
 ;;9002226.02101,"873,T28.6XXA ",.01)
 ;;T28.6XXA
 ;;9002226.02101,"873,T28.6XXA ",.02)
 ;;T28.6XXA
 ;;9002226.02101,"873,T28.6XXA ",.03)
 ;;30
 ;;9002226.02101,"873,T28.7XXA ",.01)
 ;;T28.7XXA
 ;;9002226.02101,"873,T28.7XXA ",.02)
 ;;T28.7XXA
 ;;9002226.02101,"873,T28.7XXA ",.03)
 ;;30
 ;;9002226.02101,"873,T28.8XXA ",.01)
 ;;T28.8XXA
 ;;9002226.02101,"873,T28.8XXA ",.02)
 ;;T28.8XXA
 ;;9002226.02101,"873,T28.8XXA ",.03)
 ;;30
 ;;9002226.02101,"873,T28.90XA ",.01)
 ;;T28.90XA
 ;;9002226.02101,"873,T28.90XA ",.02)
 ;;T28.90XA
 ;;9002226.02101,"873,T28.90XA ",.03)
 ;;30
 ;;9002226.02101,"873,T28.911A ",.01)
 ;;T28.911A
 ;;9002226.02101,"873,T28.911A ",.02)
 ;;T28.911A
 ;;9002226.02101,"873,T28.911A ",.03)
 ;;30
 ;;9002226.02101,"873,T28.912A ",.01)
 ;;T28.912A
 ;;9002226.02101,"873,T28.912A ",.02)
 ;;T28.912A
 ;;9002226.02101,"873,T28.912A ",.03)
 ;;30
 ;;9002226.02101,"873,T28.919A ",.01)
 ;;T28.919A
 ;;9002226.02101,"873,T28.919A ",.02)
 ;;T28.919A
 ;;9002226.02101,"873,T28.919A ",.03)
 ;;30
 ;;9002226.02101,"873,T28.99XA ",.01)
 ;;T28.99XA
 ;;9002226.02101,"873,T28.99XA ",.02)
 ;;T28.99XA
 ;;9002226.02101,"873,T28.99XA ",.03)
 ;;30
 ;;9002226.02101,"873,T30.0 ",.01)
 ;;T30.0
 ;;9002226.02101,"873,T30.0 ",.02)
 ;;T30.0
 ;;9002226.02101,"873,T30.0 ",.03)
 ;;30
 ;;9002226.02101,"873,T30.4 ",.01)
 ;;T30.4
 ;;9002226.02101,"873,T30.4 ",.02)
 ;;T30.4
 ;;9002226.02101,"873,T30.4 ",.03)
 ;;30
 ;;9002226.02101,"873,T31.0 ",.01)
 ;;T31.0
 ;;9002226.02101,"873,T31.0 ",.02)
 ;;T31.0
 ;;9002226.02101,"873,T31.0 ",.03)
 ;;30
 ;;9002226.02101,"873,T31.10 ",.01)
 ;;T31.10
 ;;9002226.02101,"873,T31.10 ",.02)
 ;;T31.10
 ;;9002226.02101,"873,T31.10 ",.03)
 ;;30
 ;;9002226.02101,"873,T31.11 ",.01)
 ;;T31.11
 ;;9002226.02101,"873,T31.11 ",.02)
 ;;T31.11
 ;;9002226.02101,"873,T31.11 ",.03)
 ;;30
 ;;9002226.02101,"873,T31.20 ",.01)
 ;;T31.20
 ;;9002226.02101,"873,T31.20 ",.02)
 ;;T31.20
 ;;9002226.02101,"873,T31.20 ",.03)
 ;;30
 ;;9002226.02101,"873,T31.21 ",.01)
 ;;T31.21
 ;;9002226.02101,"873,T31.21 ",.02)
 ;;T31.21
 ;;9002226.02101,"873,T31.21 ",.03)
 ;;30
 ;;9002226.02101,"873,T31.22 ",.01)
 ;;T31.22
 ;;9002226.02101,"873,T31.22 ",.02)
 ;;T31.22
 ;;9002226.02101,"873,T31.22 ",.03)
 ;;30
 ;;9002226.02101,"873,T31.30 ",.01)
 ;;T31.30
 ;;9002226.02101,"873,T31.30 ",.02)
 ;;T31.30
 ;;9002226.02101,"873,T31.30 ",.03)
 ;;30
 ;;9002226.02101,"873,T31.31 ",.01)
 ;;T31.31
 ;;9002226.02101,"873,T31.31 ",.02)
 ;;T31.31
 ;;9002226.02101,"873,T31.31 ",.03)
 ;;30
 ;;9002226.02101,"873,T31.32 ",.01)
 ;;T31.32
 ;;9002226.02101,"873,T31.32 ",.02)
 ;;T31.32
 ;;9002226.02101,"873,T31.32 ",.03)
 ;;30
 ;;9002226.02101,"873,T31.33 ",.01)
 ;;T31.33
 ;;9002226.02101,"873,T31.33 ",.02)
 ;;T31.33
 ;;9002226.02101,"873,T31.33 ",.03)
 ;;30
 ;;9002226.02101,"873,T31.40 ",.01)
 ;;T31.40
 ;;9002226.02101,"873,T31.40 ",.02)
 ;;T31.40
 ;;9002226.02101,"873,T31.40 ",.03)
 ;;30
 ;;9002226.02101,"873,T31.41 ",.01)
 ;;T31.41
 ;;9002226.02101,"873,T31.41 ",.02)
 ;;T31.41
 ;;9002226.02101,"873,T31.41 ",.03)
 ;;30
 ;;9002226.02101,"873,T31.42 ",.01)
 ;;T31.42
 ;;9002226.02101,"873,T31.42 ",.02)
 ;;T31.42
 ;;9002226.02101,"873,T31.42 ",.03)
 ;;30
 ;;9002226.02101,"873,T31.43 ",.01)
 ;;T31.43
 ;;9002226.02101,"873,T31.43 ",.02)
 ;;T31.43
 ;;9002226.02101,"873,T31.43 ",.03)
 ;;30
 ;;9002226.02101,"873,T31.44 ",.01)
 ;;T31.44
 ;;9002226.02101,"873,T31.44 ",.02)
 ;;T31.44
 ;;9002226.02101,"873,T31.44 ",.03)
 ;;30
 ;;9002226.02101,"873,T31.50 ",.01)
 ;;T31.50
 ;;9002226.02101,"873,T31.50 ",.02)
 ;;T31.50
 ;;9002226.02101,"873,T31.50 ",.03)
 ;;30
 ;;9002226.02101,"873,T31.51 ",.01)
 ;;T31.51
 ;;9002226.02101,"873,T31.51 ",.02)
 ;;T31.51
 ;;9002226.02101,"873,T31.51 ",.03)
 ;;30
 ;;9002226.02101,"873,T31.52 ",.01)
 ;;T31.52
 ;;9002226.02101,"873,T31.52 ",.02)
 ;;T31.52
 ;;9002226.02101,"873,T31.52 ",.03)
 ;;30
 ;;9002226.02101,"873,T31.53 ",.01)
 ;;T31.53
 ;;9002226.02101,"873,T31.53 ",.02)
 ;;T31.53
 ;;9002226.02101,"873,T31.53 ",.03)
 ;;30
 ;;9002226.02101,"873,T31.54 ",.01)
 ;;T31.54
 ;;9002226.02101,"873,T31.54 ",.02)
 ;;T31.54
 ;;9002226.02101,"873,T31.54 ",.03)
 ;;30
 ;;9002226.02101,"873,T31.55 ",.01)
 ;;T31.55
 ;;9002226.02101,"873,T31.55 ",.02)
 ;;T31.55
 ;;9002226.02101,"873,T31.55 ",.03)
 ;;30
 ;;9002226.02101,"873,T31.60 ",.01)
 ;;T31.60
 ;;9002226.02101,"873,T31.60 ",.02)
 ;;T31.60
 ;;9002226.02101,"873,T31.60 ",.03)
 ;;30
 ;;9002226.02101,"873,T31.61 ",.01)
 ;;T31.61
 ;;9002226.02101,"873,T31.61 ",.02)
 ;;T31.61
 ;;9002226.02101,"873,T31.61 ",.03)
 ;;30
 ;;9002226.02101,"873,T31.62 ",.01)
 ;;T31.62
 ;;9002226.02101,"873,T31.62 ",.02)
 ;;T31.62
 ;;9002226.02101,"873,T31.62 ",.03)
 ;;30
 ;;9002226.02101,"873,T31.63 ",.01)
 ;;T31.63
 ;;9002226.02101,"873,T31.63 ",.02)
 ;;T31.63
 ;;9002226.02101,"873,T31.63 ",.03)
 ;;30
 ;;9002226.02101,"873,T31.64 ",.01)
 ;;T31.64
 ;;9002226.02101,"873,T31.64 ",.02)
 ;;T31.64
 ;;9002226.02101,"873,T31.64 ",.03)
 ;;30
 ;;9002226.02101,"873,T31.65 ",.01)
 ;;T31.65
 ;;9002226.02101,"873,T31.65 ",.02)
 ;;T31.65
 ;;9002226.02101,"873,T31.65 ",.03)
 ;;30
 ;;9002226.02101,"873,T31.66 ",.01)
 ;;T31.66
 ;;9002226.02101,"873,T31.66 ",.02)
 ;;T31.66
 ;;9002226.02101,"873,T31.66 ",.03)
 ;;30
 ;;9002226.02101,"873,T31.70 ",.01)
 ;;T31.70
 ;;9002226.02101,"873,T31.70 ",.02)
 ;;T31.70
 ;;9002226.02101,"873,T31.70 ",.03)
 ;;30
 ;;9002226.02101,"873,T31.71 ",.01)
 ;;T31.71
 ;;9002226.02101,"873,T31.71 ",.02)
 ;;T31.71
 ;;9002226.02101,"873,T31.71 ",.03)
 ;;30
 ;;9002226.02101,"873,T31.72 ",.01)
 ;;T31.72
 ;;9002226.02101,"873,T31.72 ",.02)
 ;;T31.72
 ;;9002226.02101,"873,T31.72 ",.03)
 ;;30
 ;;9002226.02101,"873,T31.73 ",.01)
 ;;T31.73
 ;;9002226.02101,"873,T31.73 ",.02)
 ;;T31.73
 ;;9002226.02101,"873,T31.73 ",.03)
 ;;30
 ;;9002226.02101,"873,T31.74 ",.01)
 ;;T31.74
 ;;9002226.02101,"873,T31.74 ",.02)
 ;;T31.74
 ;;9002226.02101,"873,T31.74 ",.03)
 ;;30
 ;;9002226.02101,"873,T31.75 ",.01)
 ;;T31.75
 ;;9002226.02101,"873,T31.75 ",.02)
 ;;T31.75
 ;;9002226.02101,"873,T31.75 ",.03)
 ;;30
 ;;9002226.02101,"873,T31.76 ",.01)
 ;;T31.76
 ;;9002226.02101,"873,T31.76 ",.02)
 ;;T31.76
 ;;9002226.02101,"873,T31.76 ",.03)
 ;;30
 ;;9002226.02101,"873,T31.77 ",.01)
 ;;T31.77
 ;;9002226.02101,"873,T31.77 ",.02)
 ;;T31.77
 ;;9002226.02101,"873,T31.77 ",.03)
 ;;30
 ;;9002226.02101,"873,T31.80 ",.01)
 ;;T31.80
 ;;9002226.02101,"873,T31.80 ",.02)
 ;;T31.80
 ;;9002226.02101,"873,T31.80 ",.03)
 ;;30
 ;;9002226.02101,"873,T31.81 ",.01)
 ;;T31.81
 ;;9002226.02101,"873,T31.81 ",.02)
 ;;T31.81
 ;;9002226.02101,"873,T31.81 ",.03)
 ;;30
 ;;9002226.02101,"873,T31.82 ",.01)
 ;;T31.82
 ;;9002226.02101,"873,T31.82 ",.02)
 ;;T31.82
 ;;9002226.02101,"873,T31.82 ",.03)
 ;;30
 ;;9002226.02101,"873,T31.83 ",.01)
 ;;T31.83
 ;;9002226.02101,"873,T31.83 ",.02)
 ;;T31.83
 ;;9002226.02101,"873,T31.83 ",.03)
 ;;30
 ;;9002226.02101,"873,T31.84 ",.01)
 ;;T31.84
 ;;9002226.02101,"873,T31.84 ",.02)
 ;;T31.84
 ;;9002226.02101,"873,T31.84 ",.03)
 ;;30
 ;;9002226.02101,"873,T31.85 ",.01)
 ;;T31.85
 ;;9002226.02101,"873,T31.85 ",.02)
 ;;T31.85
 ;;9002226.02101,"873,T31.85 ",.03)
 ;;30
 ;;9002226.02101,"873,T31.86 ",.01)
 ;;T31.86
 ;;9002226.02101,"873,T31.86 ",.02)
 ;;T31.86
 ;;9002226.02101,"873,T31.86 ",.03)
 ;;30
 ;;9002226.02101,"873,T31.87 ",.01)
 ;;T31.87
 ;;9002226.02101,"873,T31.87 ",.02)
 ;;T31.87
 ;;9002226.02101,"873,T31.87 ",.03)
 ;;30
 ;;9002226.02101,"873,T31.88 ",.01)
 ;;T31.88
 ;;9002226.02101,"873,T31.88 ",.02)
 ;;T31.88
 ;;9002226.02101,"873,T31.88 ",.03)
 ;;30
 ;;9002226.02101,"873,T31.90 ",.01)
 ;;T31.90
 ;;9002226.02101,"873,T31.90 ",.02)
 ;;T31.90
 ;;9002226.02101,"873,T31.90 ",.03)
 ;;30
 ;;9002226.02101,"873,T31.91 ",.01)
 ;;T31.91
 ;;9002226.02101,"873,T31.91 ",.02)
 ;;T31.91
 ;;9002226.02101,"873,T31.91 ",.03)
 ;;30
 ;;9002226.02101,"873,T31.92 ",.01)
 ;;T31.92
 ;;9002226.02101,"873,T31.92 ",.02)
 ;;T31.92
 ;;9002226.02101,"873,T31.92 ",.03)
 ;;30
 ;;9002226.02101,"873,T31.93 ",.01)
 ;;T31.93
 ;;9002226.02101,"873,T31.93 ",.02)
 ;;T31.93
 ;;9002226.02101,"873,T31.93 ",.03)
 ;;30
 ;;9002226.02101,"873,T31.94 ",.01)
 ;;T31.94
 ;;9002226.02101,"873,T31.94 ",.02)
 ;;T31.94
 ;;9002226.02101,"873,T31.94 ",.03)
 ;;30
 ;;9002226.02101,"873,T31.95 ",.01)
 ;;T31.95
 ;;9002226.02101,"873,T31.95 ",.02)
 ;;T31.95
 ;;9002226.02101,"873,T31.95 ",.03)
 ;;30