BGPM5AZS ;IHS/MSC/SAT-CREATED BY ^ATXSTX ON SEP 12, 2011;
+1 ;;11.1;IHS CLINICAL REPORTING SYSTEM;**1**;JUN 27, 2011;Build 106
+2 ;
START ;
+1 IF '$GET(ATXPGMC)
KILL ^TMP("ATX",$JOB)
+2 SET ATXPGMC=$GET(ATXPGMC)+1
+3 FOR ATXI=1:1
SET X=$PIECE($TEXT(TMP+ATXI),";;",2,99)
IF X=""
QUIT
SET X="^TMP(""ATX"",$J,"_X
SET ATXI=ATXI+1
SET Y=$PIECE($TEXT(TMP+ATXI),";;",2,99)
SET @X=Y
+4 QUIT
+5 ;
TMP ;;TAXONOMY (WITH BULLETIN)
+1 ;;21,"00228272150 ")
+2 ;;6963
+3 ;;21,"00228272203 ")
+4 ;;6964
+5 ;;21,"00228272209 ")
+6 ;;6965
+7 ;;21,"00228272290 ")
+8 ;;6966
+9 ;;21,"00228272303 ")
+10 ;;6967
+11 ;;21,"00228272309 ")
+12 ;;6968
+13 ;;21,"00228272396 ")
+14 ;;6969
+15 ;;21,"00228275511 ")
+16 ;;6970
+17 ;;21,"00228275550 ")
+18 ;;6971
+19 ;;21,"00228275596 ")
+20 ;;6972
+21 ;;21,"00228275611 ")
+22 ;;6973
+23 ;;21,"00228275650 ")
+24 ;;6974
+25 ;;21,"00228275696 ")
+26 ;;6975
+27 ;;21,"00228275711 ")
+28 ;;6976
+29 ;;21,"00228275750 ")
+30 ;;6977
+31 ;;21,"00228275796 ")
+32 ;;6978
+33 ;;21,"00247037030 ")
+34 ;;6979
+35 ;;21,"00247061510 ")
+36 ;;6980
+37 ;;21,"00247061550 ")
+38 ;;6981
+39 ;;21,"00247061552 ")
+40 ;;6982
+41 ;;21,"00247061610 ")
+42 ;;6983
+43 ;;21,"00247061615 ")
+44 ;;6984
+45 ;;21,"00247061630 ")
+46 ;;6985
+47 ;;21,"00247067300 ")
+48 ;;6986
+49 ;;21,"00247067307 ")
+50 ;;6987
+51 ;;21,"00247067310 ")
+52 ;;6988
+53 ;;21,"00247067314 ")
+54 ;;6989
+55 ;;21,"00247067330 ")
+56 ;;6990
+57 ;;21,"00247067360 ")
+58 ;;6991
+59 ;;21,"00247067390 ")
+60 ;;6992
+61 ;;21,"00247078907 ")
+62 ;;6993
+63 ;;21,"00247078914 ")
+64 ;;6994
+65 ;;21,"00247078930 ")
+66 ;;6995
+67 ;;21,"00247104103 ")
+68 ;;6996
+69 ;;21,"00247104107 ")
+70 ;;6997
+71 ;;21,"00247104130 ")
+72 ;;6998
+73 ;;21,"00247104230 ")
+74 ;;6999
+75 ;;21,"00247107510 ")
+76 ;;7000
+77 ;;21,"00247107530 ")
+78 ;;7001
+79 ;;21,"00247107560 ")
+80 ;;7002
+81 ;;21,"00247167910 ")
+82 ;;7003
+83 ;;21,"00247167960 ")
+84 ;;7004
+85 ;;21,"00247168010 ")
+86 ;;7005
+87 ;;21,"00247181304 ")
+88 ;;7006
+89 ;;21,"00247181308 ")
+90 ;;7007
+91 ;;21,"00247181330 ")
+92 ;;7008
+93 ;;21,"00247191503 ")
+94 ;;7009
+95 ;;21,"00247191507 ")
+96 ;;7010
+97 ;;21,"00247191530 ")
+98 ;;7011
+99 ;;21,"00247191590 ")
+100 ;;7012
+101 ;;21,"00247196430 ")
+102 ;;7013
+103 ;;21,"00247196490 ")
+104 ;;7014
+105 ;;21,"00247196500 ")
+106 ;;7015
+107 ;;21,"00247196503 ")
+108 ;;7016
+109 ;;21,"00247196514 ")
+110 ;;7017
+111 ;;21,"00247196530 ")
+112 ;;7018
+113 ;;21,"00247196560 ")
+114 ;;7019
+115 ;;21,"00247196590 ")
+116 ;;7020
+117 ;;21,"00247196599 ")
+118 ;;7021
+119 ;;21,"00247205200 ")
+120 ;;7022
+121 ;;21,"00247205207 ")
+122 ;;7023
+123 ;;21,"00247205230 ")
+124 ;;7024
+125 ;;21,"00247205290 ")
+126 ;;7025
+127 ;;21,"00247208330 ")
+128 ;;7026
+129 ;;21,"00247208360 ")
+130 ;;7027
+131 ;;21,"00247208390 ")
+132 ;;7028
+133 ;;21,"00247208430 ")
+134 ;;7029
+135 ;;21,"00247208460 ")
+136 ;;7030
+137 ;;21,"00247208530 ")
+138 ;;7031
+139 ;;21,"00247209430 ")
+140 ;;7032
+141 ;;21,"00247209490 ")
+142 ;;7033
+143 ;;21,"00247213200 ")
+144 ;;7034
+145 ;;21,"00247213207 ")
+146 ;;7035
+147 ;;21,"00247213230 ")
+148 ;;7036
+149 ;;21,"00247213260 ")
+150 ;;7037
+151 ;;21,"00247213290 ")
+152 ;;7038
+153 ;;21,"00247213300 ")
+154 ;;7039
+155 ;;21,"00247213307 ")
+156 ;;7040
+157 ;;21,"00247213330 ")
+158 ;;7041
+159 ;;21,"00247213360 ")
+160 ;;7042
+161 ;;21,"00247213390 ")
+162 ;;7043
+163 ;;21,"00247213400 ")
+164 ;;7044
+165 ;;21,"00247213407 ")
+166 ;;7045
+167 ;;21,"00247213430 ")
+168 ;;7046
+169 ;;21,"00247213460 ")
+170 ;;7047
+171 ;;21,"00247213490 ")
+172 ;;7048
+173 ;;21,"00247226530 ")
+174 ;;7049
+175 ;;21,"00247226560 ")
+176 ;;7050
+177 ;;21,"00247226590 ")
+178 ;;7051
+179 ;;21,"00247227130 ")
+180 ;;7052
+181 ;;21,"00247227200 ")
+182 ;;7053
+183 ;;21,"00247227230 ")
+184 ;;7054
+185 ;;21,"00247227260 ")
+186 ;;7055
+187 ;;21,"00247227290 ")
+188 ;;7056
+189 ;;21,"00247229900 ")
+190 ;;7057
+191 ;;21,"00247229990 ")
+192 ;;7058
+193 ;;21,"00254210119 ")
+194 ;;7059
+195 ;;21,"00254210121 ")
+196 ;;7060
+197 ;;21,"00254210125 ")
+198 ;;7061
+199 ;;21,"00254210126 ")
+200 ;;7062
+201 ;;21,"00254210128 ")
+202 ;;7063
+203 ;;21,"00254210132 ")
+204 ;;7064
+205 ;;21,"00254210135 ")
+206 ;;7065
+207 ;;21,"00254210138 ")
+208 ;;7066
+209 ;;21,"00254210219 ")
+210 ;;7067
+211 ;;21,"00254210225 ")
+212 ;;7068
+213 ;;21,"00254210226 ")
+214 ;;7069
+215 ;;21,"00254210228 ")
+216 ;;7070
+217 ;;21,"00254210232 ")
+218 ;;7071
+219 ;;21,"00254210235 ")
+220 ;;7072
+221 ;;21,"00254210238 ")
+222 ;;7073
+223 ;;21,"00254210302 ")
+224 ;;7074
+225 ;;21,"00254210316 ")
+226 ;;7075
+227 ;;21,"00254210320 ")
+228 ;;7076
+229 ;;21,"00254210321 ")
+230 ;;7077
+231 ;;21,"00254210328 ")
+232 ;;7078
+233 ;;21,"00254210332 ")
+234 ;;7079
+235 ;;21,"00254210335 ")
+236 ;;7080
+237 ;;21,"00254210338 ")
+238 ;;7081
+239 ;;21,"00254210419 ")
+240 ;;7082
+241 ;;21,"00254210421 ")
+242 ;;7083
+243 ;;21,"00254210425 ")
+244 ;;7084
+245 ;;21,"00254210426 ")
+246 ;;7085
+247 ;;21,"00254210428 ")
+248 ;;7086
+249 ;;21,"00254210435 ")
+250 ;;7087
+251 ;;21,"00254210438 ")
+252 ;;7088
+253 ;;21,"00254210519 ")
+254 ;;7089
+255 ;;21,"00254210521 ")
+256 ;;7090
+257 ;;21,"00254210525 ")
+258 ;;7091
+259 ;;21,"00254210526 ")
+260 ;;7092
+261 ;;21,"00254210528 ")
+262 ;;7093
+263 ;;21,"00254210535 ")
+264 ;;7094
+265 ;;21,"00254210538 ")
+266 ;;7095
+267 ;;21,"00254210619 ")
+268 ;;7096
+269 ;;21,"00254210621 ")
+270 ;;7097
+271 ;;21,"00254210625 ")
+272 ;;7098
+273 ;;21,"00254210626 ")
+274 ;;7099
+275 ;;21,"00254210628 ")
+276 ;;7100
+277 ;;21,"00254210635 ")
+278 ;;7101
+279 ;;21,"00254210638 ")
+280 ;;7102
+281 ;;21,"00258369501 ")
+282 ;;7103
+283 ;;21,"00258369505 ")
+284 ;;7104
+285 ;;21,"00258369601 ")
+286 ;;7105
+287 ;;21,"00258369701 ")
+288 ;;7106
+289 ;;21,"00339567811 ")
+290 ;;7107
+291 ;;21,"00339580411 ")
+292 ;;7108
+293 ;;21,"00339613711 ")
+294 ;;7109
+295 ;;21,"00339645211 ")
+296 ;;7110
+297 ;;21,"00339647530 ")
+298 ;;7111
+299 ;;21,"00339647630 ")
+300 ;;7112
+301 ;;21,"00378004201 ")
+302 ;;7113
+303 ;;21,"00378006001 ")
+304 ;;7114
+305 ;;21,"00378007301 ")
+306 ;;7115
+307 ;;21,"00378008701 ")
+308 ;;7116
+309 ;;21,"00378009201 ")
+310 ;;7117
+311 ;;21,"00378021101 ")
+312 ;;7118
+313 ;;21,"00378021105 ")
+314 ;;7119
+315 ;;21,"00378027701 ")
+316 ;;7120
+317 ;;21,"00378027705 ")
+318 ;;7121
+319 ;;21,"00378033001 ")
+320 ;;7122
+321 ;;21,"00378033005 ")
+322 ;;7123
+323 ;;21,"00378040701 ")
+324 ;;7124
+325 ;;21,"00378040705 ")
+326 ;;7125
+327 ;;21,"00378041201 ")
+328 ;;7126
+329 ;;21,"00378041205 ")
+330 ;;7127
+331 ;;21,"00378041401 ")
+332 ;;7128
+333 ;;21,"00378041405 ")
+334 ;;7129
+335 ;;21,"00378044201 ")
+336 ;;7130
+337 ;;21,"00378044205 ")
+338 ;;7131
+339 ;;21,"00378057401 ")
+340 ;;7132
+341 ;;21,"00378057405 ")
+342 ;;7133
+343 ;;21,"00378141001 ")
+344 ;;7134
+345 ;;21,"00378192101 ")
+346 ;;7135
+347 ;;21,"00378192105 ")
+348 ;;7136
+349 ;;21,"00378192201 ")
+350 ;;7137
+351 ;;21,"00378192205 ")
+352 ;;7138
+353 ;;21,"00378192401 ")
+354 ;;7139
+355 ;;21,"00378192405 ")
+356 ;;7140
+357 ;;21,"00378200301 ")
+358 ;;7141
+359 ;;21,"00378200305 ")
+360 ;;7142
+361 ;;21,"00378200393 ")
+362 ;;7143
+363 ;;21,"00378200401 ")
+364 ;;7144
+365 ;;21,"00378200405 ")
+366 ;;7145
+367 ;;21,"00378200493 ")
+368 ;;7146
+369 ;;21,"00378200501 ")
+370 ;;7147
+371 ;;21,"00378200505 ")
+372 ;;7148
+373 ;;21,"00378200593 ")
+374 ;;7149
+375 ;;21,"00378200693 ")
+376 ;;7150
+377 ;;21,"00378201191 ")
+378 ;;7151
+379 ;;21,"00378225291 ")
+380 ;;7152
+381 ;;21,"00378232501 ")
+382 ;;7153
+383 ;;21,"00378261001 ")
+384 ;;7154
+385 ;;21,"00378261010 ")
+386 ;;7155
+387 ;;21,"00378261093 ")
+388 ;;7156
+389 ;;21,"00378262501 ")
+390 ;;7157
+391 ;;21,"00378262510 ")
+392 ;;7158
+393 ;;21,"00378262593 ")
+394 ;;7159
+395 ;;21,"00378265001 ")
+396 ;;7160
+397 ;;21,"00378265010 ")
+398 ;;7161
+399 ;;21,"00378265093 ")
+400 ;;7162
+401 ;;21,"00378267501 ")
+402 ;;7163
+403 ;;21,"00378267593 ")
+404 ;;7164
+405 ;;21,"00378268501 ")
+406 ;;7165
+407 ;;21,"00378268593 ")
+408 ;;7166
+409 ;;21,"00378269501 ")
+410 ;;7167
+411 ;;21,"00378269593 ")
+412 ;;7168
+413 ;;21,"00378302501 ")
+414 ;;7169
+415 ;;21,"00378305001 ")
+416 ;;7170
+417 ;;21,"00378307501 ")
+418 ;;7171
+419 ;;21,"00378325001 ")
+420 ;;7172
+421 ;;21,"00378347101 ")
+422 ;;7173
+423 ;;21,"00378347110 ")
+424 ;;7174
+425 ;;21,"00378347201 ")
+426 ;;7175
+427 ;;21,"00378347210 ")
+428 ;;7176
+429 ;;21,"00378347301 ")
+430 ;;7177
+431 ;;21,"00378347310 ")
+432 ;;7178
+433 ;;21,"00378347401 ")
+434 ;;7179
+435 ;;21,"00378347405 ")
+436 ;;7180
+437 ;;21,"00378347410 ")
+438 ;;7181
+439 ;;21,"00378351501 ")
+440 ;;7182
+441 ;;21,"00378351510 ")
+442 ;;7183
+443 ;;21,"00378351593 ")
+444 ;;7184
+445 ;;21,"00378353001 ")
+446 ;;7185
+447 ;;21,"00378353005 ")
+448 ;;7186
+449 ;;21,"00378353093 ")
+450 ;;7187
+451 ;;21,"00378354501 ")
+452 ;;7188
+453 ;;21,"00378354505 ")
+454 ;;7189
+455 ;;21,"00378354593 ")
+456 ;;7190
+457 ;;21,"00378417501 ")
+458 ;;7191
+459 ;;21,"00378418601 ")
+460 ;;7192
+461 ;;21,"00378418605 ")
+462 ;;7193
+463 ;;21,"00378418693 ")
+464 ;;7194
+465 ;;21,"00378418701 ")
+466 ;;7195
+467 ;;21,"00378418705 ")
+468 ;;7196
+469 ;;21,"00378418793 ")
+470 ;;7197
+471 ;;21,"00378418801 ")
+472 ;;7198
+473 ;;21,"00378418805 ")
+474 ;;7199
+475 ;;21,"00378418893 ")
+476 ;;7200
+477 ;;21,"00378421001 ")
+478 ;;7201
+479 ;;21,"00378421005 ")
+480 ;;7202
+481 ;;21,"00378422001 ")
+482 ;;7203
+483 ;;21,"00378422005 ")
+484 ;;7204
+485 ;;21,"00378422093 ")
+486 ;;7205
+487 ;;21,"00378435001 ")
+488 ;;7206
+489 ;;21,"00378435005 ")
+490 ;;7207
+491 ;;21,"00378435093 ")
+492 ;;7208
+493 ;;21,"00378488101 ")
+494 ;;7209
+495 ;;21,"00378488105 ")
+496 ;;7210
+497 ;;21,"00378488201 ")
+498 ;;7211
+499 ;;21,"00378488205 ")
+500 ;;7212
+501 ;;21,"00378488301 ")
+502 ;;7213
+503 ;;21,"00378488305 ")
+504 ;;7214
+505 ;;21,"00378488401 ")
+506 ;;7215
+507 ;;21,"00378488405 ")
+508 ;;7216
+509 ;;21,"00378488501 ")
+510 ;;7217
+511 ;;21,"00378488505 ")
+512 ;;7218
+513 ;;21,"00378513105 ")
+514 ;;7219
+515 ;;21,"00378513177 ")
+516 ;;7220
+517 ;;21,"00378513205 ")
+518 ;;7221
+519 ;;21,"00378513277 ")
+520 ;;7222
+521 ;;21,"00378513305 ")
+522 ;;7223
+523 ;;21,"00378513377 ")
+524 ;;7224
+525 ;;21,"00378541028 ")
+526 ;;7225
+527 ;;21,"00378541084 ")
+528 ;;7226
+529 ;;21,"00378542028 ")
+530 ;;7227
+531 ;;21,"00378542084 ")
+532 ;;7228
+533 ;;21,"00378623101 ")
+534 ;;7229
+535 ;;21,"00378623105 ")
+536 ;;7230
+537 ;;21,"00378623201 ")
+538 ;;7231
+539 ;;21,"00378623205 ")
+540 ;;7232
+541 ;;21,"00378623301 ")
+542 ;;7233
+543 ;;21,"00378623305 ")
+544 ;;7234
+545 ;;21,"00378700101 ")
+546 ;;7235
+547 ;;21,"00378700110 ")
+548 ;;7236
+549 ;;21,"00378700193 ")
+550 ;;7237
+551 ;;21,"00378700201 ")
+552 ;;7238
+553 ;;21,"00378700210 ")
+554 ;;7239
+555 ;;21,"00378700293 ")
+556 ;;7240
+557 ;;21,"00378700301 ")
+558 ;;7241
+559 ;;21,"00378700310 ")
+560 ;;7242
+561 ;;21,"00378700393 ")
+562 ;;7243
+563 ;;21,"00378700401 ")
+564 ;;7244
+565 ;;21,"00378700410 ")
+566 ;;7245
+567 ;;21,"00378700493 ")
+568 ;;7246
+569 ;;21,"00378929010 ")
+570 ;;7247
+571 ;;21,"00378929091 ")
+572 ;;7248
+573 ;;21,"00406066101 ")
+574 ;;7249
+575 ;;21,"00406066105 ")
+576 ;;7250
+577 ;;21,"00406066110 ")
+578 ;;7251
+579 ;;21,"00406066162 ")
+580 ;;7252
+581 ;;21,"00406066163 ")
+582 ;;7253
+583 ;;21,"00406066191 ")
+584 ;;7254
+585 ;;21,"00406066301 ")
+586 ;;7255
+587 ;;21,"00406066303 ")
+588 ;;7256
+589 ;;21,"00406066305 ")
+590 ;;7257
+591 ;;21,"00406066310 ")
+592 ;;7258
+593 ;;21,"00406066312 ")
+594 ;;7259
+595 ;;21,"00406066360 ")
+596 ;;7260
+597 ;;21,"00406066362 ")
+598 ;;7261
+599 ;;21,"00406066363 ")
+600 ;;7262
+601 ;;21,"00406066390 ")
+602 ;;7263
+603 ;;21,"00406066391 ")
+604 ;;7264
+605 ;;21,"00406200103 ")
+606 ;;7265
+607 ;;21,"00406200105 ")
+608 ;;7266
+609 ;;21,"00406200109 ")
+610 ;;7267
+611 ;;21,"00406200190 ")
+612 ;;7268
+613 ;;21,"00406209703 ")
+614 ;;7269
+615 ;;21,"00406209705 ")
+616 ;;7270
+617 ;;21,"00406209790 ")
+618 ;;7271
+619 ;;21,"00406209801 ")
+620 ;;7272
+621 ;;21,"00406209803 ")
+622 ;;7273
+623 ;;21,"00406209805 ")
+624 ;;7274
+625 ;;21,"00406209809 ")
+626 ;;7275
+627 ;;21,"00406209890 ")
+628 ;;7276
+629 ;;21,"00406209903 ")
+630 ;;7277
+631 ;;21,"00406209905 ")
+632 ;;7278
+633 ;;21,"00406209990 ")
+634 ;;7279
+635 ;;21,"00406993103 ")
+636 ;;7280
+637 ;;21,"00406993203 ")
+638 ;;7281
+639 ;;21,"00406993303 ")
+640 ;;7282
+641 ;;21,"00406993403 ")
+642 ;;7283
+643 ;;21,"00440709030 ")
+644 ;;7284
+645 ;;21,"00440709130 ")
+646 ;;7285
+647 ;;21,"00440709160 ")
+648 ;;7286
+649 ;;21,"00440709190 ")
+650 ;;7287
+651 ;;21,"00440709191 ")
+652 ;;7288
+653 ;;21,"00440709194 ")
+654 ;;7289
+655 ;;21,"00440709230 ")
+656 ;;7290
+657 ;;21,"00440709260 ")
+658 ;;7291
+659 ;;21,"00440709290 ")
+660 ;;7292
+661 ;;21,"00440709291 ")
+662 ;;7293
+663 ;;21,"00440709294 ")
+664 ;;7294
+665 ;;21,"00440752130 ")
+666 ;;7295
+667 ;;21,"00440752190 ")
+668 ;;7296
+669 ;;21,"00440857520 ")
+670 ;;7297
+671 ;;21,"00440857530 ")
+672 ;;7298
+673 ;;21,"00440857560 ")
+674 ;;7299
+675 ;;21,"00440857590 ")
+676 ;;7300
+677 ;;21,"00440857630 ")
+678 ;;7301
+679 ;;21,"00440857660 ")
+680 ;;7302
+681 ;;21,"00480005601 ")
+682 ;;7303
+683 ;;21,"00480005701 ")
+684 ;;7304
+685 ;;21,"00480007201 ")
+686 ;;7305
+687 ;;21,"00480019901 ")
+688 ;;7306
+689 ;;21,"00480063701 ")
+690 ;;7307
+691 ;;21,"00480063710 ")
+692 ;;7308
+693 ;;21,"00480063801 ")
+694 ;;7309
+695 ;;21,"00480063810 ")
+696 ;;7310
+697 ;;21,"00480069501 ")
+698 ;;7311
+699 ;;21,"00480078806 ")
+700 ;;7312
+701 ;;21,"00480095601 ")
+702 ;;7313
+703 ;;21,"00480095801 ")
+704 ;;7314