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

ATXF1E5.m

Go to the documentation of this file.
  1. ATXF1E5 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON JUL 09, 2015;
  1. ;;5.1;TAXONOMY;**12**;FEB 04, 1997;Build 5
  1. ;
  1. START ;
  1. K:'$G(ATXPGMC) ^TMP("ATX",$J)
  1. S ATXPGMC=$G(ATXPGMC)+1
  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
  1. Q
  1. ;
  1. TMP ;;TAXONOMY (WITH BULLETIN)
  1. ;;9002226.02101,"487,O41.1015 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O41.1019 ",.01)
  1. ;;O41.1019
  1. ;;9002226.02101,"487,O41.1019 ",.02)
  1. ;;O41.1019
  1. ;;9002226.02101,"487,O41.1019 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O41.1210 ",.01)
  1. ;;O41.1210
  1. ;;9002226.02101,"487,O41.1210 ",.02)
  1. ;;O41.1210
  1. ;;9002226.02101,"487,O41.1210 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O41.1211 ",.01)
  1. ;;O41.1211
  1. ;;9002226.02101,"487,O41.1211 ",.02)
  1. ;;O41.1211
  1. ;;9002226.02101,"487,O41.1211 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O41.1212 ",.01)
  1. ;;O41.1212
  1. ;;9002226.02101,"487,O41.1212 ",.02)
  1. ;;O41.1212
  1. ;;9002226.02101,"487,O41.1212 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O41.1213 ",.01)
  1. ;;O41.1213
  1. ;;9002226.02101,"487,O41.1213 ",.02)
  1. ;;O41.1213
  1. ;;9002226.02101,"487,O41.1213 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O41.1214 ",.01)
  1. ;;O41.1214
  1. ;;9002226.02101,"487,O41.1214 ",.02)
  1. ;;O41.1214
  1. ;;9002226.02101,"487,O41.1214 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O41.1215 ",.01)
  1. ;;O41.1215
  1. ;;9002226.02101,"487,O41.1215 ",.02)
  1. ;;O41.1215
  1. ;;9002226.02101,"487,O41.1215 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O41.1219 ",.01)
  1. ;;O41.1219
  1. ;;9002226.02101,"487,O41.1219 ",.02)
  1. ;;O41.1219
  1. ;;9002226.02101,"487,O41.1219 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O41.1410 ",.01)
  1. ;;O41.1410
  1. ;;9002226.02101,"487,O41.1410 ",.02)
  1. ;;O41.1410
  1. ;;9002226.02101,"487,O41.1410 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O41.1411 ",.01)
  1. ;;O41.1411
  1. ;;9002226.02101,"487,O41.1411 ",.02)
  1. ;;O41.1411
  1. ;;9002226.02101,"487,O41.1411 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O41.1412 ",.01)
  1. ;;O41.1412
  1. ;;9002226.02101,"487,O41.1412 ",.02)
  1. ;;O41.1412
  1. ;;9002226.02101,"487,O41.1412 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O41.1413 ",.01)
  1. ;;O41.1413
  1. ;;9002226.02101,"487,O41.1413 ",.02)
  1. ;;O41.1413
  1. ;;9002226.02101,"487,O41.1413 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O41.1414 ",.01)
  1. ;;O41.1414
  1. ;;9002226.02101,"487,O41.1414 ",.02)
  1. ;;O41.1414
  1. ;;9002226.02101,"487,O41.1414 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O41.1415 ",.01)
  1. ;;O41.1415
  1. ;;9002226.02101,"487,O41.1415 ",.02)
  1. ;;O41.1415
  1. ;;9002226.02101,"487,O41.1415 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O41.1419 ",.01)
  1. ;;O41.1419
  1. ;;9002226.02101,"487,O41.1419 ",.02)
  1. ;;O41.1419
  1. ;;9002226.02101,"487,O41.1419 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O41.8X10 ",.01)
  1. ;;O41.8X10
  1. ;;9002226.02101,"487,O41.8X10 ",.02)
  1. ;;O41.8X10
  1. ;;9002226.02101,"487,O41.8X10 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O41.8X11 ",.01)
  1. ;;O41.8X11
  1. ;;9002226.02101,"487,O41.8X11 ",.02)
  1. ;;O41.8X11
  1. ;;9002226.02101,"487,O41.8X11 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O41.8X12 ",.01)
  1. ;;O41.8X12
  1. ;;9002226.02101,"487,O41.8X12 ",.02)
  1. ;;O41.8X12
  1. ;;9002226.02101,"487,O41.8X12 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O41.8X13 ",.01)
  1. ;;O41.8X13
  1. ;;9002226.02101,"487,O41.8X13 ",.02)
  1. ;;O41.8X13
  1. ;;9002226.02101,"487,O41.8X13 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O41.8X14 ",.01)
  1. ;;O41.8X14
  1. ;;9002226.02101,"487,O41.8X14 ",.02)
  1. ;;O41.8X14
  1. ;;9002226.02101,"487,O41.8X14 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O41.8X15 ",.01)
  1. ;;O41.8X15
  1. ;;9002226.02101,"487,O41.8X15 ",.02)
  1. ;;O41.8X15
  1. ;;9002226.02101,"487,O41.8X15 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O41.8X19 ",.01)
  1. ;;O41.8X19
  1. ;;9002226.02101,"487,O41.8X19 ",.02)
  1. ;;O41.8X19
  1. ;;9002226.02101,"487,O41.8X19 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O41.91X0 ",.01)
  1. ;;O41.91X0
  1. ;;9002226.02101,"487,O41.91X0 ",.02)
  1. ;;O41.91X0
  1. ;;9002226.02101,"487,O41.91X0 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O41.91X1 ",.01)
  1. ;;O41.91X1
  1. ;;9002226.02101,"487,O41.91X1 ",.02)
  1. ;;O41.91X1
  1. ;;9002226.02101,"487,O41.91X1 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O41.91X2 ",.01)
  1. ;;O41.91X2
  1. ;;9002226.02101,"487,O41.91X2 ",.02)
  1. ;;O41.91X2
  1. ;;9002226.02101,"487,O41.91X2 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O41.91X3 ",.01)
  1. ;;O41.91X3
  1. ;;9002226.02101,"487,O41.91X3 ",.02)
  1. ;;O41.91X3
  1. ;;9002226.02101,"487,O41.91X3 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O41.91X4 ",.01)
  1. ;;O41.91X4
  1. ;;9002226.02101,"487,O41.91X4 ",.02)
  1. ;;O41.91X4
  1. ;;9002226.02101,"487,O41.91X4 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O41.91X5 ",.01)
  1. ;;O41.91X5
  1. ;;9002226.02101,"487,O41.91X5 ",.02)
  1. ;;O41.91X5
  1. ;;9002226.02101,"487,O41.91X5 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O41.91X9 ",.01)
  1. ;;O41.91X9
  1. ;;9002226.02101,"487,O41.91X9 ",.02)
  1. ;;O41.91X9
  1. ;;9002226.02101,"487,O41.91X9 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O42.011 ",.01)
  1. ;;O42.011
  1. ;;9002226.02101,"487,O42.011 ",.02)
  1. ;;O42.011
  1. ;;9002226.02101,"487,O42.011 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O42.111 ",.01)
  1. ;;O42.111
  1. ;;9002226.02101,"487,O42.111 ",.02)
  1. ;;O42.111
  1. ;;9002226.02101,"487,O42.111 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O42.911 ",.01)
  1. ;;O42.911
  1. ;;9002226.02101,"487,O42.911 ",.02)
  1. ;;O42.911
  1. ;;9002226.02101,"487,O42.911 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O43.011 ",.01)
  1. ;;O43.011
  1. ;;9002226.02101,"487,O43.011 ",.02)
  1. ;;O43.011
  1. ;;9002226.02101,"487,O43.011 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O43.021 ",.01)
  1. ;;O43.021
  1. ;;9002226.02101,"487,O43.021 ",.02)
  1. ;;O43.021
  1. ;;9002226.02101,"487,O43.021 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O43.101 ",.01)
  1. ;;O43.101
  1. ;;9002226.02101,"487,O43.101 ",.02)
  1. ;;O43.101
  1. ;;9002226.02101,"487,O43.101 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O43.111 ",.01)
  1. ;;O43.111
  1. ;;9002226.02101,"487,O43.111 ",.02)
  1. ;;O43.111
  1. ;;9002226.02101,"487,O43.111 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O43.121 ",.01)
  1. ;;O43.121
  1. ;;9002226.02101,"487,O43.121 ",.02)
  1. ;;O43.121
  1. ;;9002226.02101,"487,O43.121 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O43.191 ",.01)
  1. ;;O43.191
  1. ;;9002226.02101,"487,O43.191 ",.02)
  1. ;;O43.191
  1. ;;9002226.02101,"487,O43.191 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O43.211 ",.01)
  1. ;;O43.211
  1. ;;9002226.02101,"487,O43.211 ",.02)
  1. ;;O43.211
  1. ;;9002226.02101,"487,O43.211 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O43.221 ",.01)
  1. ;;O43.221
  1. ;;9002226.02101,"487,O43.221 ",.02)
  1. ;;O43.221
  1. ;;9002226.02101,"487,O43.221 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O43.231 ",.01)
  1. ;;O43.231
  1. ;;9002226.02101,"487,O43.231 ",.02)
  1. ;;O43.231
  1. ;;9002226.02101,"487,O43.231 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O43.811 ",.01)
  1. ;;O43.811
  1. ;;9002226.02101,"487,O43.811 ",.02)
  1. ;;O43.811
  1. ;;9002226.02101,"487,O43.811 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O43.891 ",.01)
  1. ;;O43.891
  1. ;;9002226.02101,"487,O43.891 ",.02)
  1. ;;O43.891
  1. ;;9002226.02101,"487,O43.891 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O43.91 ",.01)
  1. ;;O43.91
  1. ;;9002226.02101,"487,O43.91 ",.02)
  1. ;;O43.91
  1. ;;9002226.02101,"487,O43.91 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O44.01 ",.01)
  1. ;;O44.01
  1. ;;9002226.02101,"487,O44.01 ",.02)
  1. ;;O44.01
  1. ;;9002226.02101,"487,O44.01 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O44.11 ",.01)
  1. ;;O44.11
  1. ;;9002226.02101,"487,O44.11 ",.02)
  1. ;;O44.11
  1. ;;9002226.02101,"487,O44.11 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O45.001 ",.01)
  1. ;;O45.001
  1. ;;9002226.02101,"487,O45.001 ",.02)
  1. ;;O45.001
  1. ;;9002226.02101,"487,O45.001 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O45.011 ",.01)
  1. ;;O45.011
  1. ;;9002226.02101,"487,O45.011 ",.02)
  1. ;;O45.011
  1. ;;9002226.02101,"487,O45.011 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O45.021 ",.01)
  1. ;;O45.021
  1. ;;9002226.02101,"487,O45.021 ",.02)
  1. ;;O45.021
  1. ;;9002226.02101,"487,O45.021 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O45.091 ",.01)
  1. ;;O45.091
  1. ;;9002226.02101,"487,O45.091 ",.02)
  1. ;;O45.091
  1. ;;9002226.02101,"487,O45.091 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O45.8X1 ",.01)
  1. ;;O45.8X1
  1. ;;9002226.02101,"487,O45.8X1 ",.02)
  1. ;;O45.8X1
  1. ;;9002226.02101,"487,O45.8X1 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O45.91 ",.01)
  1. ;;O45.91
  1. ;;9002226.02101,"487,O45.91 ",.02)
  1. ;;O45.91
  1. ;;9002226.02101,"487,O45.91 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O46.001 ",.01)
  1. ;;O46.001
  1. ;;9002226.02101,"487,O46.001 ",.02)
  1. ;;O46.001
  1. ;;9002226.02101,"487,O46.001 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O46.011 ",.01)
  1. ;;O46.011
  1. ;;9002226.02101,"487,O46.011 ",.02)
  1. ;;O46.011
  1. ;;9002226.02101,"487,O46.011 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O46.021 ",.01)
  1. ;;O46.021
  1. ;;9002226.02101,"487,O46.021 ",.02)
  1. ;;O46.021
  1. ;;9002226.02101,"487,O46.021 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O46.091 ",.01)
  1. ;;O46.091
  1. ;;9002226.02101,"487,O46.091 ",.02)
  1. ;;O46.091
  1. ;;9002226.02101,"487,O46.091 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O46.8X1 ",.01)
  1. ;;O46.8X1
  1. ;;9002226.02101,"487,O46.8X1 ",.02)
  1. ;;O46.8X1
  1. ;;9002226.02101,"487,O46.8X1 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O46.91 ",.01)
  1. ;;O46.91
  1. ;;9002226.02101,"487,O46.91 ",.02)
  1. ;;O46.91
  1. ;;9002226.02101,"487,O46.91 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O88.011 ",.01)
  1. ;;O88.011
  1. ;;9002226.02101,"487,O88.011 ",.02)
  1. ;;O88.011
  1. ;;9002226.02101,"487,O88.011 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O88.111 ",.01)
  1. ;;O88.111
  1. ;;9002226.02101,"487,O88.111 ",.02)
  1. ;;O88.111
  1. ;;9002226.02101,"487,O88.111 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O88.211 ",.01)
  1. ;;O88.211
  1. ;;9002226.02101,"487,O88.211 ",.02)
  1. ;;O88.211
  1. ;;9002226.02101,"487,O88.211 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O88.311 ",.01)
  1. ;;O88.311
  1. ;;9002226.02101,"487,O88.311 ",.02)
  1. ;;O88.311
  1. ;;9002226.02101,"487,O88.311 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O88.811 ",.01)
  1. ;;O88.811
  1. ;;9002226.02101,"487,O88.811 ",.02)
  1. ;;O88.811
  1. ;;9002226.02101,"487,O88.811 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O91.011 ",.01)
  1. ;;O91.011
  1. ;;9002226.02101,"487,O91.011 ",.02)
  1. ;;O91.011
  1. ;;9002226.02101,"487,O91.011 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O91.111 ",.01)
  1. ;;O91.111
  1. ;;9002226.02101,"487,O91.111 ",.02)
  1. ;;O91.111
  1. ;;9002226.02101,"487,O91.111 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O91.211 ",.01)
  1. ;;O91.211
  1. ;;9002226.02101,"487,O91.211 ",.02)
  1. ;;O91.211
  1. ;;9002226.02101,"487,O91.211 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O92.011 ",.01)
  1. ;;O92.011
  1. ;;9002226.02101,"487,O92.011 ",.02)
  1. ;;O92.011
  1. ;;9002226.02101,"487,O92.011 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O98.011 ",.01)
  1. ;;O98.011
  1. ;;9002226.02101,"487,O98.011 ",.02)
  1. ;;O98.011
  1. ;;9002226.02101,"487,O98.011 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O98.111 ",.01)
  1. ;;O98.111
  1. ;;9002226.02101,"487,O98.111 ",.02)
  1. ;;O98.111
  1. ;;9002226.02101,"487,O98.111 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O98.211 ",.01)
  1. ;;O98.211
  1. ;;9002226.02101,"487,O98.211 ",.02)
  1. ;;O98.211
  1. ;;9002226.02101,"487,O98.211 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O98.311 ",.01)
  1. ;;O98.311
  1. ;;9002226.02101,"487,O98.311 ",.02)
  1. ;;O98.311
  1. ;;9002226.02101,"487,O98.311 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O98.411 ",.01)
  1. ;;O98.411
  1. ;;9002226.02101,"487,O98.411 ",.02)
  1. ;;O98.411
  1. ;;9002226.02101,"487,O98.411 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O98.511 ",.01)
  1. ;;O98.511
  1. ;;9002226.02101,"487,O98.511 ",.02)
  1. ;;O98.511
  1. ;;9002226.02101,"487,O98.511 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O98.611 ",.01)
  1. ;;O98.611
  1. ;;9002226.02101,"487,O98.611 ",.02)
  1. ;;O98.611
  1. ;;9002226.02101,"487,O98.611 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O98.711 ",.01)
  1. ;;O98.711
  1. ;;9002226.02101,"487,O98.711 ",.02)
  1. ;;O98.711
  1. ;;9002226.02101,"487,O98.711 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O98.811 ",.01)
  1. ;;O98.811
  1. ;;9002226.02101,"487,O98.811 ",.02)
  1. ;;O98.811
  1. ;;9002226.02101,"487,O98.811 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O98.911 ",.01)
  1. ;;O98.911
  1. ;;9002226.02101,"487,O98.911 ",.02)
  1. ;;O98.911
  1. ;;9002226.02101,"487,O98.911 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O99.011 ",.01)
  1. ;;O99.011
  1. ;;9002226.02101,"487,O99.011 ",.02)
  1. ;;O99.011
  1. ;;9002226.02101,"487,O99.011 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O99.111 ",.01)
  1. ;;O99.111
  1. ;;9002226.02101,"487,O99.111 ",.02)
  1. ;;O99.111
  1. ;;9002226.02101,"487,O99.111 ",.03)
  1. ;;30
  1. ;;9002226.02101,"487,O99.211 ",.01)
  1. ;;O99.211
  1. ;;9002226.02101,"487,O99.211 ",.02)
  1. ;;O99.211