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

ATXF1A22.m

Go to the documentation of this file.
  1. ATXF1A22 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON JUL 22, 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,"1075,O36.72X1 ",.01)
  1. ;;O36.72X1
  1. ;;9002226.02101,"1075,O36.72X1 ",.02)
  1. ;;O36.72X1
  1. ;;9002226.02101,"1075,O36.72X1 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.72X2 ",.01)
  1. ;;O36.72X2
  1. ;;9002226.02101,"1075,O36.72X2 ",.02)
  1. ;;O36.72X2
  1. ;;9002226.02101,"1075,O36.72X2 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.72X3 ",.01)
  1. ;;O36.72X3
  1. ;;9002226.02101,"1075,O36.72X3 ",.02)
  1. ;;O36.72X3
  1. ;;9002226.02101,"1075,O36.72X3 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.72X4 ",.01)
  1. ;;O36.72X4
  1. ;;9002226.02101,"1075,O36.72X4 ",.02)
  1. ;;O36.72X4
  1. ;;9002226.02101,"1075,O36.72X4 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.72X5 ",.01)
  1. ;;O36.72X5
  1. ;;9002226.02101,"1075,O36.72X5 ",.02)
  1. ;;O36.72X5
  1. ;;9002226.02101,"1075,O36.72X5 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.72X9 ",.01)
  1. ;;O36.72X9
  1. ;;9002226.02101,"1075,O36.72X9 ",.02)
  1. ;;O36.72X9
  1. ;;9002226.02101,"1075,O36.72X9 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.73X0 ",.01)
  1. ;;O36.73X0
  1. ;;9002226.02101,"1075,O36.73X0 ",.02)
  1. ;;O36.73X0
  1. ;;9002226.02101,"1075,O36.73X0 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.73X1 ",.01)
  1. ;;O36.73X1
  1. ;;9002226.02101,"1075,O36.73X1 ",.02)
  1. ;;O36.73X1
  1. ;;9002226.02101,"1075,O36.73X1 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.73X2 ",.01)
  1. ;;O36.73X2
  1. ;;9002226.02101,"1075,O36.73X2 ",.02)
  1. ;;O36.73X2
  1. ;;9002226.02101,"1075,O36.73X2 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.73X3 ",.01)
  1. ;;O36.73X3
  1. ;;9002226.02101,"1075,O36.73X3 ",.02)
  1. ;;O36.73X3
  1. ;;9002226.02101,"1075,O36.73X3 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.73X4 ",.01)
  1. ;;O36.73X4
  1. ;;9002226.02101,"1075,O36.73X4 ",.02)
  1. ;;O36.73X4
  1. ;;9002226.02101,"1075,O36.73X4 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.73X5 ",.01)
  1. ;;O36.73X5
  1. ;;9002226.02101,"1075,O36.73X5 ",.02)
  1. ;;O36.73X5
  1. ;;9002226.02101,"1075,O36.73X5 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.73X9 ",.01)
  1. ;;O36.73X9
  1. ;;9002226.02101,"1075,O36.73X9 ",.02)
  1. ;;O36.73X9
  1. ;;9002226.02101,"1075,O36.73X9 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.80X0 ",.01)
  1. ;;O36.80X0
  1. ;;9002226.02101,"1075,O36.80X0 ",.02)
  1. ;;O36.80X0
  1. ;;9002226.02101,"1075,O36.80X0 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.80X1 ",.01)
  1. ;;O36.80X1
  1. ;;9002226.02101,"1075,O36.80X1 ",.02)
  1. ;;O36.80X1
  1. ;;9002226.02101,"1075,O36.80X1 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.80X2 ",.01)
  1. ;;O36.80X2
  1. ;;9002226.02101,"1075,O36.80X2 ",.02)
  1. ;;O36.80X2
  1. ;;9002226.02101,"1075,O36.80X2 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.80X3 ",.01)
  1. ;;O36.80X3
  1. ;;9002226.02101,"1075,O36.80X3 ",.02)
  1. ;;O36.80X3
  1. ;;9002226.02101,"1075,O36.80X3 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.80X4 ",.01)
  1. ;;O36.80X4
  1. ;;9002226.02101,"1075,O36.80X4 ",.02)
  1. ;;O36.80X4
  1. ;;9002226.02101,"1075,O36.80X4 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.80X5 ",.01)
  1. ;;O36.80X5
  1. ;;9002226.02101,"1075,O36.80X5 ",.02)
  1. ;;O36.80X5
  1. ;;9002226.02101,"1075,O36.80X5 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.80X9 ",.01)
  1. ;;O36.80X9
  1. ;;9002226.02101,"1075,O36.80X9 ",.02)
  1. ;;O36.80X9
  1. ;;9002226.02101,"1075,O36.80X9 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.8120 ",.01)
  1. ;;O36.8120
  1. ;;9002226.02101,"1075,O36.8120 ",.02)
  1. ;;O36.8120
  1. ;;9002226.02101,"1075,O36.8120 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.8121 ",.01)
  1. ;;O36.8121
  1. ;;9002226.02101,"1075,O36.8121 ",.02)
  1. ;;O36.8121
  1. ;;9002226.02101,"1075,O36.8121 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.8122 ",.01)
  1. ;;O36.8122
  1. ;;9002226.02101,"1075,O36.8122 ",.02)
  1. ;;O36.8122
  1. ;;9002226.02101,"1075,O36.8122 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.8123 ",.01)
  1. ;;O36.8123
  1. ;;9002226.02101,"1075,O36.8123 ",.02)
  1. ;;O36.8123
  1. ;;9002226.02101,"1075,O36.8123 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.8124 ",.01)
  1. ;;O36.8124
  1. ;;9002226.02101,"1075,O36.8124 ",.02)
  1. ;;O36.8124
  1. ;;9002226.02101,"1075,O36.8124 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.8125 ",.01)
  1. ;;O36.8125
  1. ;;9002226.02101,"1075,O36.8125 ",.02)
  1. ;;O36.8125
  1. ;;9002226.02101,"1075,O36.8125 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.8129 ",.01)
  1. ;;O36.8129
  1. ;;9002226.02101,"1075,O36.8129 ",.02)
  1. ;;O36.8129
  1. ;;9002226.02101,"1075,O36.8129 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.8130 ",.01)
  1. ;;O36.8130
  1. ;;9002226.02101,"1075,O36.8130 ",.02)
  1. ;;O36.8130
  1. ;;9002226.02101,"1075,O36.8130 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.8131 ",.01)
  1. ;;O36.8131
  1. ;;9002226.02101,"1075,O36.8131 ",.02)
  1. ;;O36.8131
  1. ;;9002226.02101,"1075,O36.8131 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.8132 ",.01)
  1. ;;O36.8132
  1. ;;9002226.02101,"1075,O36.8132 ",.02)
  1. ;;O36.8132
  1. ;;9002226.02101,"1075,O36.8132 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.8133 ",.01)
  1. ;;O36.8133
  1. ;;9002226.02101,"1075,O36.8133 ",.02)
  1. ;;O36.8133
  1. ;;9002226.02101,"1075,O36.8133 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.8134 ",.01)
  1. ;;O36.8134
  1. ;;9002226.02101,"1075,O36.8134 ",.02)
  1. ;;O36.8134
  1. ;;9002226.02101,"1075,O36.8134 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.8135 ",.01)
  1. ;;O36.8135
  1. ;;9002226.02101,"1075,O36.8135 ",.02)
  1. ;;O36.8135
  1. ;;9002226.02101,"1075,O36.8135 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.8139 ",.01)
  1. ;;O36.8139
  1. ;;9002226.02101,"1075,O36.8139 ",.02)
  1. ;;O36.8139
  1. ;;9002226.02101,"1075,O36.8139 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.8190 ",.01)
  1. ;;O36.8190
  1. ;;9002226.02101,"1075,O36.8190 ",.02)
  1. ;;O36.8190
  1. ;;9002226.02101,"1075,O36.8190 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.8191 ",.01)
  1. ;;O36.8191
  1. ;;9002226.02101,"1075,O36.8191 ",.02)
  1. ;;O36.8191
  1. ;;9002226.02101,"1075,O36.8191 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.8192 ",.01)
  1. ;;O36.8192
  1. ;;9002226.02101,"1075,O36.8192 ",.02)
  1. ;;O36.8192
  1. ;;9002226.02101,"1075,O36.8192 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.8193 ",.01)
  1. ;;O36.8193
  1. ;;9002226.02101,"1075,O36.8193 ",.02)
  1. ;;O36.8193
  1. ;;9002226.02101,"1075,O36.8193 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.8194 ",.01)
  1. ;;O36.8194
  1. ;;9002226.02101,"1075,O36.8194 ",.02)
  1. ;;O36.8194
  1. ;;9002226.02101,"1075,O36.8194 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.8195 ",.01)
  1. ;;O36.8195
  1. ;;9002226.02101,"1075,O36.8195 ",.02)
  1. ;;O36.8195
  1. ;;9002226.02101,"1075,O36.8195 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.8199 ",.01)
  1. ;;O36.8199
  1. ;;9002226.02101,"1075,O36.8199 ",.02)
  1. ;;O36.8199
  1. ;;9002226.02101,"1075,O36.8199 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.8210 ",.01)
  1. ;;O36.8210
  1. ;;9002226.02101,"1075,O36.8210 ",.02)
  1. ;;O36.8210
  1. ;;9002226.02101,"1075,O36.8210 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.8211 ",.01)
  1. ;;O36.8211
  1. ;;9002226.02101,"1075,O36.8211 ",.02)
  1. ;;O36.8211
  1. ;;9002226.02101,"1075,O36.8211 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.8212 ",.01)
  1. ;;O36.8212
  1. ;;9002226.02101,"1075,O36.8212 ",.02)
  1. ;;O36.8212
  1. ;;9002226.02101,"1075,O36.8212 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.8213 ",.01)
  1. ;;O36.8213
  1. ;;9002226.02101,"1075,O36.8213 ",.02)
  1. ;;O36.8213
  1. ;;9002226.02101,"1075,O36.8213 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.8214 ",.01)
  1. ;;O36.8214
  1. ;;9002226.02101,"1075,O36.8214 ",.02)
  1. ;;O36.8214
  1. ;;9002226.02101,"1075,O36.8214 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.8215 ",.01)
  1. ;;O36.8215
  1. ;;9002226.02101,"1075,O36.8215 ",.02)
  1. ;;O36.8215
  1. ;;9002226.02101,"1075,O36.8215 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.8219 ",.01)
  1. ;;O36.8219
  1. ;;9002226.02101,"1075,O36.8219 ",.02)
  1. ;;O36.8219
  1. ;;9002226.02101,"1075,O36.8219 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.8220 ",.01)
  1. ;;O36.8220
  1. ;;9002226.02101,"1075,O36.8220 ",.02)
  1. ;;O36.8220
  1. ;;9002226.02101,"1075,O36.8220 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.8221 ",.01)
  1. ;;O36.8221
  1. ;;9002226.02101,"1075,O36.8221 ",.02)
  1. ;;O36.8221
  1. ;;9002226.02101,"1075,O36.8221 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.8222 ",.01)
  1. ;;O36.8222
  1. ;;9002226.02101,"1075,O36.8222 ",.02)
  1. ;;O36.8222
  1. ;;9002226.02101,"1075,O36.8222 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.8223 ",.01)
  1. ;;O36.8223
  1. ;;9002226.02101,"1075,O36.8223 ",.02)
  1. ;;O36.8223
  1. ;;9002226.02101,"1075,O36.8223 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.8224 ",.01)
  1. ;;O36.8224
  1. ;;9002226.02101,"1075,O36.8224 ",.02)
  1. ;;O36.8224
  1. ;;9002226.02101,"1075,O36.8224 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.8225 ",.01)
  1. ;;O36.8225
  1. ;;9002226.02101,"1075,O36.8225 ",.02)
  1. ;;O36.8225
  1. ;;9002226.02101,"1075,O36.8225 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.8229 ",.01)
  1. ;;O36.8229
  1. ;;9002226.02101,"1075,O36.8229 ",.02)
  1. ;;O36.8229
  1. ;;9002226.02101,"1075,O36.8229 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.8230 ",.01)
  1. ;;O36.8230
  1. ;;9002226.02101,"1075,O36.8230 ",.02)
  1. ;;O36.8230
  1. ;;9002226.02101,"1075,O36.8230 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.8231 ",.01)
  1. ;;O36.8231
  1. ;;9002226.02101,"1075,O36.8231 ",.02)
  1. ;;O36.8231
  1. ;;9002226.02101,"1075,O36.8231 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.8232 ",.01)
  1. ;;O36.8232
  1. ;;9002226.02101,"1075,O36.8232 ",.02)
  1. ;;O36.8232
  1. ;;9002226.02101,"1075,O36.8232 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.8233 ",.01)
  1. ;;O36.8233
  1. ;;9002226.02101,"1075,O36.8233 ",.02)
  1. ;;O36.8233
  1. ;;9002226.02101,"1075,O36.8233 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.8234 ",.01)
  1. ;;O36.8234
  1. ;;9002226.02101,"1075,O36.8234 ",.02)
  1. ;;O36.8234
  1. ;;9002226.02101,"1075,O36.8234 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.8235 ",.01)
  1. ;;O36.8235
  1. ;;9002226.02101,"1075,O36.8235 ",.02)
  1. ;;O36.8235
  1. ;;9002226.02101,"1075,O36.8235 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.8239 ",.01)
  1. ;;O36.8239
  1. ;;9002226.02101,"1075,O36.8239 ",.02)
  1. ;;O36.8239
  1. ;;9002226.02101,"1075,O36.8239 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.8290 ",.01)
  1. ;;O36.8290
  1. ;;9002226.02101,"1075,O36.8290 ",.02)
  1. ;;O36.8290
  1. ;;9002226.02101,"1075,O36.8290 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.8291 ",.01)
  1. ;;O36.8291
  1. ;;9002226.02101,"1075,O36.8291 ",.02)
  1. ;;O36.8291
  1. ;;9002226.02101,"1075,O36.8291 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.8292 ",.01)
  1. ;;O36.8292
  1. ;;9002226.02101,"1075,O36.8292 ",.02)
  1. ;;O36.8292
  1. ;;9002226.02101,"1075,O36.8292 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.8293 ",.01)
  1. ;;O36.8293
  1. ;;9002226.02101,"1075,O36.8293 ",.02)
  1. ;;O36.8293
  1. ;;9002226.02101,"1075,O36.8293 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.8294 ",.01)
  1. ;;O36.8294
  1. ;;9002226.02101,"1075,O36.8294 ",.02)
  1. ;;O36.8294
  1. ;;9002226.02101,"1075,O36.8294 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.8295 ",.01)
  1. ;;O36.8295
  1. ;;9002226.02101,"1075,O36.8295 ",.02)
  1. ;;O36.8295
  1. ;;9002226.02101,"1075,O36.8295 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.8299 ",.01)
  1. ;;O36.8299
  1. ;;9002226.02101,"1075,O36.8299 ",.02)
  1. ;;O36.8299
  1. ;;9002226.02101,"1075,O36.8299 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.8910 ",.01)
  1. ;;O36.8910
  1. ;;9002226.02101,"1075,O36.8910 ",.02)
  1. ;;O36.8910
  1. ;;9002226.02101,"1075,O36.8910 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.8911 ",.01)
  1. ;;O36.8911
  1. ;;9002226.02101,"1075,O36.8911 ",.02)
  1. ;;O36.8911
  1. ;;9002226.02101,"1075,O36.8911 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.8912 ",.01)
  1. ;;O36.8912
  1. ;;9002226.02101,"1075,O36.8912 ",.02)
  1. ;;O36.8912
  1. ;;9002226.02101,"1075,O36.8912 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.8913 ",.01)
  1. ;;O36.8913
  1. ;;9002226.02101,"1075,O36.8913 ",.02)
  1. ;;O36.8913
  1. ;;9002226.02101,"1075,O36.8913 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.8914 ",.01)
  1. ;;O36.8914
  1. ;;9002226.02101,"1075,O36.8914 ",.02)
  1. ;;O36.8914
  1. ;;9002226.02101,"1075,O36.8914 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.8915 ",.01)
  1. ;;O36.8915
  1. ;;9002226.02101,"1075,O36.8915 ",.02)
  1. ;;O36.8915
  1. ;;9002226.02101,"1075,O36.8915 ",.03)
  1. ;;30
  1. ;;9002226.02101,"1075,O36.8919 ",.01)
  1. ;;O36.8919
  1. ;;9002226.02101,"1075,O36.8919 ",.02)
  1. ;;O36.8919
  1. ;;9002226.02101,"1075,O36.8919 ",.03)
  1. ;;30