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

ATXXA22.m

Go to the documentation of this file.
ATXXA22 ;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)
 ;;21,"S97.00XA ")
 ;;8092
 ;;21,"S97.01XA ")
 ;;8093
 ;;21,"S97.02XA ")
 ;;8094
 ;;21,"S97.101A ")
 ;;8095
 ;;21,"S97.102A ")
 ;;8096
 ;;21,"S97.109A ")
 ;;8097
 ;;21,"S97.111A ")
 ;;8098
 ;;21,"S97.112A ")
 ;;8099
 ;;21,"S97.119A ")
 ;;8100
 ;;21,"S97.121A ")
 ;;8101
 ;;21,"S97.122A ")
 ;;8102
 ;;21,"S97.129A ")
 ;;8103
 ;;21,"S97.80XA ")
 ;;8104
 ;;21,"S97.81XA ")
 ;;8105
 ;;21,"S97.82XA ")
 ;;8106
 ;;21,"S98.011A ")
 ;;8107
 ;;21,"S98.012A ")
 ;;8108
 ;;21,"S98.019A ")
 ;;8109
 ;;21,"S98.021A ")
 ;;8110
 ;;21,"S98.022A ")
 ;;8111
 ;;21,"S98.029A ")
 ;;8112
 ;;21,"S98.111A ")
 ;;8113
 ;;21,"S98.112A ")
 ;;8114
 ;;21,"S98.119A ")
 ;;8115
 ;;21,"S98.121A ")
 ;;8116
 ;;21,"S98.122A ")
 ;;8117
 ;;21,"S98.129A ")
 ;;8118
 ;;21,"S98.131A ")
 ;;8119
 ;;21,"S98.132A ")
 ;;8120
 ;;21,"S98.139A ")
 ;;8121
 ;;21,"S98.141A ")
 ;;8122
 ;;21,"S98.142A ")
 ;;8123
 ;;21,"S98.149A ")
 ;;8124
 ;;21,"S98.211A ")
 ;;8125
 ;;21,"S98.212A ")
 ;;8126
 ;;21,"S98.219A ")
 ;;8127
 ;;21,"S98.221A ")
 ;;8128
 ;;21,"S98.222A ")
 ;;8129
 ;;21,"S98.229A ")
 ;;8130
 ;;21,"S98.311A ")
 ;;8131
 ;;21,"S98.312A ")
 ;;8132
 ;;21,"S98.319A ")
 ;;8133
 ;;21,"S98.321A ")
 ;;8134
 ;;21,"S98.322A ")
 ;;8135
 ;;21,"S98.329A ")
 ;;8136
 ;;21,"S98.911A ")
 ;;8137
 ;;21,"S98.912A ")
 ;;8138
 ;;21,"S98.919A ")
 ;;8139
 ;;21,"S98.921A ")
 ;;8140
 ;;21,"S98.922A ")
 ;;8141
 ;;21,"S98.929A ")
 ;;8142
 ;;21,"S99.811A ")
 ;;8143
 ;;21,"S99.812A ")
 ;;8144
 ;;21,"S99.819A ")
 ;;8145
 ;;21,"S99.821A ")
 ;;8146
 ;;21,"S99.822A ")
 ;;8147
 ;;21,"S99.829A ")
 ;;8148
 ;;21,"S99.911A ")
 ;;8149
 ;;21,"S99.912A ")
 ;;8150
 ;;21,"S99.919A ")
 ;;8151
 ;;21,"S99.921A ")
 ;;8152
 ;;21,"S99.922A ")
 ;;8153
 ;;21,"S99.929A ")
 ;;8154
 ;;21,"T07. ")
 ;;8155
 ;;21,"T14.8 ")
 ;;8156
 ;;21,"T14.90 ")
 ;;8157
 ;;21,"T14.91 ")
 ;;8158
 ;;21,"T15.00XA ")
 ;;8159
 ;;21,"T15.01XA ")
 ;;8160
 ;;21,"T15.02XA ")
 ;;8161
 ;;21,"T15.10XA ")
 ;;8162
 ;;21,"T15.11XA ")
 ;;8163
 ;;21,"T15.12XA ")
 ;;8164
 ;;21,"T15.80XA ")
 ;;8165
 ;;21,"T15.81XA ")
 ;;8166
 ;;21,"T15.82XA ")
 ;;8167
 ;;21,"T15.90XA ")
 ;;8168
 ;;21,"T15.91XA ")
 ;;8169
 ;;21,"T15.92XA ")
 ;;8170
 ;;21,"T16.1XXA ")
 ;;8171
 ;;21,"T16.2XXA ")
 ;;8172
 ;;21,"T16.9XXA ")
 ;;8173
 ;;21,"T17.0XXA ")
 ;;8174
 ;;21,"T17.1XXA ")
 ;;8175
 ;;21,"T17.200A ")
 ;;8176
 ;;21,"T17.208A ")
 ;;8177
 ;;21,"T17.210A ")
 ;;8178
 ;;21,"T17.218A ")
 ;;8179
 ;;21,"T17.220A ")
 ;;8180
 ;;21,"T17.228A ")
 ;;8181
 ;;21,"T17.290A ")
 ;;8182
 ;;21,"T17.298A ")
 ;;8183
 ;;21,"T17.300A ")
 ;;8184
 ;;21,"T17.308A ")
 ;;8185
 ;;21,"T17.310A ")
 ;;8186
 ;;21,"T17.318A ")
 ;;8187
 ;;21,"T17.320A ")
 ;;8188
 ;;21,"T17.328A ")
 ;;8189
 ;;21,"T17.390A ")
 ;;8190
 ;;21,"T17.398A ")
 ;;8191
 ;;21,"T17.400A ")
 ;;8192
 ;;21,"T17.408A ")
 ;;8193
 ;;21,"T17.410A ")
 ;;8194
 ;;21,"T17.418A ")
 ;;8195
 ;;21,"T17.420A ")
 ;;8196
 ;;21,"T17.428A ")
 ;;8197
 ;;21,"T17.490A ")
 ;;8198
 ;;21,"T17.498A ")
 ;;8199
 ;;21,"T17.500A ")
 ;;8200
 ;;21,"T17.508A ")
 ;;8201
 ;;21,"T17.510A ")
 ;;8202
 ;;21,"T17.518A ")
 ;;8203
 ;;21,"T17.520A ")
 ;;8204
 ;;21,"T17.528A ")
 ;;8205
 ;;21,"T17.590A ")
 ;;8206
 ;;21,"T17.598A ")
 ;;8207
 ;;21,"T17.800A ")
 ;;8208
 ;;21,"T17.808A ")
 ;;8209
 ;;21,"T17.810A ")
 ;;8210
 ;;21,"T17.818A ")
 ;;8211
 ;;21,"T17.820A ")
 ;;8212
 ;;21,"T17.828A ")
 ;;8213
 ;;21,"T17.890A ")
 ;;8214
 ;;21,"T17.898A ")
 ;;8215
 ;;21,"T17.900A ")
 ;;8216
 ;;21,"T17.908A ")
 ;;8217
 ;;21,"T17.910A ")
 ;;8218
 ;;21,"T17.918A ")
 ;;8219
 ;;21,"T17.920A ")
 ;;8220
 ;;21,"T17.928A ")
 ;;8221
 ;;21,"T17.990A ")
 ;;8222
 ;;21,"T17.998A ")
 ;;8223
 ;;21,"T18.0XXA ")
 ;;8224
 ;;21,"T18.100A ")
 ;;8225
 ;;21,"T18.108A ")
 ;;8226
 ;;21,"T18.110A ")
 ;;8227
 ;;21,"T18.118A ")
 ;;8228
 ;;21,"T18.120A ")
 ;;8229
 ;;21,"T18.128A ")
 ;;8230
 ;;21,"T18.190A ")
 ;;8231
 ;;21,"T18.198A ")
 ;;8232
 ;;21,"T18.2XXA ")
 ;;8233
 ;;21,"T18.3XXA ")
 ;;8234
 ;;21,"T18.4XXA ")
 ;;8235
 ;;21,"T18.5XXA ")
 ;;8236
 ;;21,"T18.8XXA ")
 ;;8237
 ;;21,"T18.9XXA ")
 ;;8238
 ;;21,"T19.0XXA ")
 ;;8239
 ;;21,"T19.1XXA ")
 ;;8240
 ;;21,"T19.2XXA ")
 ;;8241
 ;;21,"T19.3XXA ")
 ;;8242
 ;;21,"T19.4XXA ")
 ;;8243
 ;;21,"T19.8XXA ")
 ;;8244
 ;;21,"T19.9XXA ")
 ;;8245
 ;;21,"T20.00XA ")
 ;;8246
 ;;21,"T20.011A ")
 ;;8247
 ;;21,"T20.012A ")
 ;;8248
 ;;21,"T20.019A ")
 ;;8249
 ;;21,"T20.02XA ")
 ;;8250
 ;;21,"T20.03XA ")
 ;;8251
 ;;21,"T20.04XA ")
 ;;8252
 ;;21,"T20.05XA ")
 ;;8253
 ;;21,"T20.06XA ")
 ;;8254
 ;;21,"T20.07XA ")
 ;;8255
 ;;21,"T20.09XA ")
 ;;8256
 ;;21,"T20.10XA ")
 ;;8257
 ;;21,"T20.111A ")
 ;;8258
 ;;21,"T20.112A ")
 ;;8259
 ;;21,"T20.119A ")
 ;;8260
 ;;21,"T20.12XA ")
 ;;8261
 ;;21,"T20.13XA ")
 ;;8262
 ;;21,"T20.14XA ")
 ;;8263
 ;;21,"T20.15XA ")
 ;;8264
 ;;21,"T20.16XA ")
 ;;8265
 ;;21,"T20.17XA ")
 ;;8266
 ;;21,"T20.19XA ")
 ;;8267
 ;;21,"T20.20XA ")
 ;;8268
 ;;21,"T20.211A ")
 ;;8269
 ;;21,"T20.212A ")
 ;;8270
 ;;21,"T20.219A ")
 ;;8271
 ;;21,"T20.22XA ")
 ;;8272
 ;;21,"T20.23XA ")
 ;;8273
 ;;21,"T20.24XA ")
 ;;8274
 ;;21,"T20.25XA ")
 ;;8275
 ;;21,"T20.26XA ")
 ;;8276
 ;;21,"T20.27XA ")
 ;;8277
 ;;21,"T20.29XA ")
 ;;8278
 ;;21,"T20.30XA ")
 ;;8279
 ;;21,"T20.311A ")
 ;;8280
 ;;21,"T20.312A ")
 ;;8281
 ;;21,"T20.319A ")
 ;;8282
 ;;21,"T20.32XA ")
 ;;8283
 ;;21,"T20.33XA ")
 ;;8284
 ;;21,"T20.34XA ")
 ;;8285
 ;;21,"T20.35XA ")
 ;;8286
 ;;21,"T20.36XA ")
 ;;8287
 ;;21,"T20.37XA ")
 ;;8288
 ;;21,"T20.39XA ")
 ;;8289
 ;;21,"T20.40XA ")
 ;;8290
 ;;21,"T20.411A ")
 ;;8291
 ;;21,"T20.412A ")
 ;;8292
 ;;21,"T20.419A ")
 ;;8293
 ;;21,"T20.42XA ")
 ;;8294
 ;;21,"T20.43XA ")
 ;;8295
 ;;21,"T20.44XA ")
 ;;8296
 ;;21,"T20.45XA ")
 ;;8297
 ;;21,"T20.46XA ")
 ;;8298
 ;;21,"T20.47XA ")
 ;;8299
 ;;21,"T20.49XA ")
 ;;8300
 ;;21,"T20.50XA ")
 ;;8301
 ;;21,"T20.511A ")
 ;;8302
 ;;21,"T20.512A ")
 ;;8303
 ;;21,"T20.519A ")
 ;;8304
 ;;21,"T20.52XA ")
 ;;8305
 ;;21,"T20.53XA ")
 ;;8306
 ;;21,"T20.54XA ")
 ;;8307
 ;;21,"T20.55XA ")
 ;;8308
 ;;21,"T20.56XA ")
 ;;8309
 ;;21,"T20.57XA ")
 ;;8310
 ;;21,"T20.59XA ")
 ;;8311
 ;;21,"T20.60XA ")
 ;;8312
 ;;21,"T20.611A ")
 ;;8313
 ;;21,"T20.612A ")
 ;;8314
 ;;21,"T20.619A ")
 ;;8315
 ;;21,"T20.62XA ")
 ;;8316
 ;;21,"T20.63XA ")
 ;;8317
 ;;21,"T20.64XA ")
 ;;8318
 ;;21,"T20.65XA ")
 ;;8319
 ;;21,"T20.66XA ")
 ;;8320
 ;;21,"T20.67XA ")
 ;;8321
 ;;21,"T20.69XA ")
 ;;8322
 ;;21,"T20.70XA ")
 ;;8323
 ;;21,"T20.711A ")
 ;;8324
 ;;21,"T20.712A ")
 ;;8325
 ;;21,"T20.719A ")
 ;;8326
 ;;21,"T20.72XA ")
 ;;8327
 ;;21,"T20.73XA ")
 ;;8328
 ;;21,"T20.74XA ")
 ;;8329
 ;;21,"T20.75XA ")
 ;;8330
 ;;21,"T20.76XA ")
 ;;8331
 ;;21,"T20.77XA ")
 ;;8332
 ;;21,"T20.79XA ")
 ;;8333
 ;;21,"T21.00XA ")
 ;;8334
 ;;21,"T21.01XA ")
 ;;8335
 ;;21,"T21.02XA ")
 ;;8336
 ;;21,"T21.03XA ")
 ;;8337
 ;;21,"T21.04XA ")
 ;;8338
 ;;21,"T21.05XA ")
 ;;8339
 ;;21,"T21.06XA ")
 ;;8340
 ;;21,"T21.07XA ")
 ;;8341
 ;;21,"T21.09XA ")
 ;;8342
 ;;21,"T21.10XA ")
 ;;8343
 ;;21,"T21.11XA ")
 ;;8344
 ;;21,"T21.12XA ")
 ;;8345
 ;;21,"T21.13XA ")
 ;;8346
 ;;21,"T21.14XA ")
 ;;8347
 ;;21,"T21.15XA ")
 ;;8348
 ;;21,"T21.16XA ")
 ;;8349
 ;;21,"T21.17XA ")
 ;;8350
 ;;21,"T21.19XA ")
 ;;8351
 ;;21,"T21.20XA ")
 ;;8352
 ;;21,"T21.21XA ")
 ;;8353
 ;;21,"T21.22XA ")
 ;;8354
 ;;21,"T21.23XA ")
 ;;8355
 ;;21,"T21.24XA ")
 ;;8356
 ;;21,"T21.25XA ")
 ;;8357
 ;;21,"T21.26XA ")
 ;;8358
 ;;21,"T21.27XA ")
 ;;8359
 ;;21,"T21.29XA ")
 ;;8360
 ;;21,"T21.30XA ")
 ;;8361
 ;;21,"T21.31XA ")
 ;;8362
 ;;21,"T21.32XA ")
 ;;8363
 ;;21,"T21.33XA ")
 ;;8364
 ;;21,"T21.34XA ")
 ;;8365
 ;;21,"T21.35XA ")
 ;;8366
 ;;21,"T21.36XA ")
 ;;8367
 ;;21,"T21.37XA ")
 ;;8368
 ;;21,"T21.39XA ")
 ;;8369
 ;;21,"T21.40XA ")
 ;;8370
 ;;21,"T21.41XA ")
 ;;8371
 ;;21,"T21.42XA ")
 ;;8372
 ;;21,"T21.43XA ")
 ;;8373
 ;;21,"T21.44XA ")
 ;;8374
 ;;21,"T21.45XA ")
 ;;8375
 ;;21,"T21.46XA ")
 ;;8376
 ;;21,"T21.47XA ")
 ;;8377
 ;;21,"T21.49XA ")
 ;;8378
 ;;21,"T21.50XA ")
 ;;8379
 ;;21,"T21.51XA ")
 ;;8380
 ;;21,"T21.52XA ")
 ;;8381
 ;;21,"T21.53XA ")
 ;;8382
 ;;21,"T21.54XA ")
 ;;8383
 ;;21,"T21.55XA ")
 ;;8384
 ;;21,"T21.56XA ")
 ;;8385
 ;;21,"T21.57XA ")
 ;;8386
 ;;21,"T21.59XA ")
 ;;8387
 ;;21,"T21.60XA ")
 ;;8388
 ;;21,"T21.61XA ")
 ;;8389
 ;;21,"T21.62XA ")
 ;;8390
 ;;21,"T21.63XA ")
 ;;8391
 ;;21,"T21.64XA ")
 ;;8392
 ;;21,"T21.65XA ")
 ;;8393
 ;;21,"T21.66XA ")
 ;;8394
 ;;21,"T21.67XA ")
 ;;8395
 ;;21,"T21.69XA ")
 ;;8396
 ;;21,"T21.70XA ")
 ;;8397
 ;;21,"T21.71XA ")
 ;;8398
 ;;21,"T21.72XA ")
 ;;8399
 ;;21,"T21.73XA ")
 ;;8400
 ;;21,"T21.74XA ")
 ;;8401
 ;;21,"T21.75XA ")
 ;;8402
 ;;21,"T21.76XA ")
 ;;8403
 ;;21,"T21.77XA ")
 ;;8404
 ;;21,"T21.79XA ")
 ;;8405
 ;;21,"T22.00XA ")
 ;;8406
 ;;21,"T22.011A ")
 ;;8407
 ;;21,"T22.012A ")
 ;;8408
 ;;21,"T22.019A ")
 ;;8409
 ;;21,"T22.021A ")
 ;;8410
 ;;21,"T22.022A ")
 ;;8411
 ;;21,"T22.029A ")
 ;;8412
 ;;21,"T22.031A ")
 ;;8413
 ;;21,"T22.032A ")
 ;;8414
 ;;21,"T22.039A ")
 ;;8415
 ;;21,"T22.041A ")
 ;;8416
 ;;21,"T22.042A ")
 ;;8417
 ;;21,"T22.049A ")
 ;;8418
 ;;21,"T22.051A ")
 ;;8419
 ;;21,"T22.052A ")
 ;;8420
 ;;21,"T22.059A ")
 ;;8421
 ;;21,"T22.061A ")
 ;;8422
 ;;21,"T22.062A ")
 ;;8423
 ;;21,"T22.069A ")
 ;;8424
 ;;21,"T22.091A ")
 ;;8425
 ;;21,"T22.092A ")
 ;;8426
 ;;21,"T22.099A ")
 ;;8427
 ;;21,"T22.10XA ")
 ;;8428
 ;;21,"T22.111A ")
 ;;8429
 ;;21,"T22.112A ")
 ;;8430
 ;;21,"T22.119A ")
 ;;8431
 ;;21,"T22.121A ")
 ;;8432
 ;;21,"T22.122A ")
 ;;8433
 ;;21,"T22.129A ")
 ;;8434
 ;;21,"T22.131A ")
 ;;8435
 ;;21,"T22.132A ")
 ;;8436
 ;;21,"T22.139A ")
 ;;8437
 ;;21,"T22.141A ")
 ;;8438
 ;;21,"T22.142A ")
 ;;8439
 ;;21,"T22.149A ")
 ;;8440
 ;;21,"T22.151A ")
 ;;8441
 ;;21,"T22.152A ")
 ;;8442
 ;;21,"T22.159A ")
 ;;8443
 ;;21,"T22.161A ")
 ;;8444
 ;;21,"T22.162A ")
 ;;8445
 ;;21,"T22.169A ")
 ;;8446
 ;;21,"T22.191A ")
 ;;8447
 ;;21,"T22.192A ")
 ;;8448
 ;;21,"T22.199A ")
 ;;8449
 ;;21,"T22.20XA ")
 ;;8450
 ;;21,"T22.211A ")
 ;;8451
 ;;21,"T22.212A ")
 ;;8452
 ;;21,"T22.219A ")
 ;;8453
 ;;21,"T22.221A ")
 ;;8454
 ;;21,"T22.222A ")
 ;;8455
 ;;21,"T22.229A ")
 ;;8456
 ;;21,"T22.231A ")
 ;;8457
 ;;21,"T22.232A ")
 ;;8458
 ;;21,"T22.239A ")
 ;;8459
 ;;21,"T22.241A ")
 ;;8460
 ;;21,"T22.242A ")
 ;;8461
 ;;21,"T22.249A ")
 ;;8462
 ;;21,"T22.251A ")
 ;;8463
 ;;21,"T22.252A ")
 ;;8464
 ;;21,"T22.259A ")
 ;;8465
 ;;21,"T22.261A ")
 ;;8466
 ;;21,"T22.262A ")
 ;;8467
 ;;21,"T22.269A ")
 ;;8468
 ;;21,"T22.291A ")
 ;;8469
 ;;21,"T22.292A ")
 ;;8470
 ;;21,"T22.299A ")
 ;;8471
 ;;21,"T22.30XA ")
 ;;8472
 ;;21,"T22.311A ")
 ;;8473
 ;;21,"T22.312A ")
 ;;8474
 ;;21,"T22.319A ")
 ;;8475