BGPM5ATK ;IHS/MSC/MMT-CREATED BY ^ATXSTX ON AUG 29, 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,"00172407310 ")
+2 ;;6783
+3 ;;21,"00172407343 ")
+4 ;;6784
+5 ;;21,"00172407347 ")
+6 ;;6785
+7 ;;21,"00172407360 ")
+8 ;;6786
+9 ;;21,"00172407370 ")
+10 ;;6787
+11 ;;21,"00172417025 ")
+12 ;;6788
+13 ;;21,"00172419460 ")
+14 ;;6789
+15 ;;21,"00172462660 ")
+16 ;;6790
+17 ;;21,"00172462670 ")
+18 ;;6791
+19 ;;21,"00172477060 ")
+20 ;;6792
+21 ;;21,"00172477222 ")
+22 ;;6793
+23 ;;21,"00172477223 ")
+24 ;;6794
+25 ;;21,"00172477320 ")
+26 ;;6795
+27 ;;21,"00172477321 ")
+28 ;;6796
+29 ;;21,"00172477422 ")
+30 ;;6797
+31 ;;21,"00172477423 ")
+32 ;;6798
+33 ;;21,"00172477520 ")
+34 ;;6799
+35 ;;21,"00172477521 ")
+36 ;;6800
+37 ;;21,"00172531100 ")
+38 ;;6801
+39 ;;21,"00172531110 ")
+40 ;;6802
+41 ;;21,"00172531160 ")
+42 ;;6803
+43 ;;21,"00172531200 ")
+44 ;;6804
+45 ;;21,"00172531210 ")
+46 ;;6805
+47 ;;21,"00172531242 ")
+48 ;;6806
+49 ;;21,"00172531260 ")
+50 ;;6807
+51 ;;21,"00172531270 ")
+52 ;;6808
+53 ;;21,"00172531300 ")
+54 ;;6809
+55 ;;21,"00172531310 ")
+56 ;;6810
+57 ;;21,"00172531360 ")
+58 ;;6811
+59 ;;21,"00172544549 ")
+60 ;;6812
+61 ;;21,"00172544570 ")
+62 ;;6813
+63 ;;21,"00172544649 ")
+64 ;;6814
+65 ;;21,"00172544670 ")
+66 ;;6815
+67 ;;21,"00179002188 ")
+68 ;;6816
+69 ;;21,"00179002388 ")
+70 ;;6817
+71 ;;21,"00179002488 ")
+72 ;;6818
+73 ;;21,"00179005414 ")
+74 ;;6819
+75 ;;21,"00179005420 ")
+76 ;;6820
+77 ;;21,"00179007688 ")
+78 ;;6821
+79 ;;21,"00179008188 ")
+80 ;;6822
+81 ;;21,"00179037170 ")
+82 ;;6823
+83 ;;21,"00179037171 ")
+84 ;;6824
+85 ;;21,"00179037172 ")
+86 ;;6825
+87 ;;21,"00179037188 ")
+88 ;;6826
+89 ;;21,"00179037201 ")
+90 ;;6827
+91 ;;21,"00179037210 ")
+92 ;;6828
+93 ;;21,"00179037214 ")
+94 ;;6829
+95 ;;21,"00179037220 ")
+96 ;;6830
+97 ;;21,"00179037228 ")
+98 ;;6831
+99 ;;21,"00179037230 ")
+100 ;;6832
+101 ;;21,"00179037288 ")
+102 ;;6833
+103 ;;21,"00179101430 ")
+104 ;;6834
+105 ;;21,"00179101440 ")
+106 ;;6835
+107 ;;21,"00179101470 ")
+108 ;;6836
+109 ;;21,"00179101471 ")
+110 ;;6837
+111 ;;21,"00179101472 ")
+112 ;;6838
+113 ;;21,"00179102020 ")
+114 ;;6839
+115 ;;21,"00179102030 ")
+116 ;;6840
+117 ;;21,"00179102040 ")
+118 ;;6841
+119 ;;21,"00179102088 ")
+120 ;;6842
+121 ;;21,"00179102128 ")
+122 ;;6843
+123 ;;21,"00179102156 ")
+124 ;;6844
+125 ;;21,"00179104888 ")
+126 ;;6845
+127 ;;21,"00179105620 ")
+128 ;;6846
+129 ;;21,"00179105630 ")
+130 ;;6847
+131 ;;21,"00179105640 ")
+132 ;;6848
+133 ;;21,"00179117014 ")
+134 ;;6849
+135 ;;21,"00179117020 ")
+136 ;;6850
+137 ;;21,"00179117088 ")
+138 ;;6851
+139 ;;21,"00179144012 ")
+140 ;;6852
+141 ;;21,"00179144014 ")
+142 ;;6853
+143 ;;21,"00179144020 ")
+144 ;;6854
+145 ;;21,"00179151014 ")
+146 ;;6855
+147 ;;21,"00179151020 ")
+148 ;;6856
+149 ;;21,"00179157070 ")
+150 ;;6857
+151 ;;21,"00179157071 ")
+152 ;;6858
+153 ;;21,"00179157072 ")
+154 ;;6859
+155 ;;21,"00179169170 ")
+156 ;;6860
+157 ;;21,"00179169171 ")
+158 ;;6861
+159 ;;21,"00179169172 ")
+160 ;;6862
+161 ;;21,"00179174970 ")
+162 ;;6863
+163 ;;21,"00179174971 ")
+164 ;;6864
+165 ;;21,"00179174972 ")
+166 ;;6865
+167 ;;21,"00179176470 ")
+168 ;;6866
+169 ;;21,"00179176471 ")
+170 ;;6867
+171 ;;21,"00179176472 ")
+172 ;;6868
+173 ;;21,"00179183870 ")
+174 ;;6869
+175 ;;21,"00179183871 ")
+176 ;;6870
+177 ;;21,"00179183872 ")
+178 ;;6871
+179 ;;21,"00179195806 ")
+180 ;;6872
+181 ;;21,"00179195810 ")
+182 ;;6873
+183 ;;21,"00179195814 ")
+184 ;;6874
+185 ;;21,"00179195820 ")
+186 ;;6875
+187 ;;21,"00179195828 ")
+188 ;;6876
+189 ;;21,"00179195914 ")
+190 ;;6877
+191 ;;21,"00179195920 ")
+192 ;;6878
+193 ;;21,"00179195970 ")
+194 ;;6879
+195 ;;21,"00179198201 ")
+196 ;;6880
+197 ;;21,"00179198214 ")
+198 ;;6881
+199 ;;21,"00179198220 ")
+200 ;;6882
+201 ;;21,"00179198270 ")
+202 ;;6883
+203 ;;21,"00182011289 ")
+204 ;;6884
+205 ;;21,"00182067989 ")
+206 ;;6885
+207 ;;21,"00182103505 ")
+208 ;;6886
+209 ;;21,"00182103519 ")
+210 ;;6887
+211 ;;21,"00182103589 ")
+212 ;;6888
+213 ;;21,"00182153505 ")
+214 ;;6889
+215 ;;21,"00182153589 ")
+216 ;;6890
+217 ;;21,"00182263101 ")
+218 ;;6891
+219 ;;21,"00182272136 ")
+220 ;;6892
+221 ;;21,"00182602866 ")
+222 ;;6893
+223 ;;21,"00185003601 ")
+224 ;;6894
+225 ;;21,"00185003605 ")
+226 ;;6895
+227 ;;21,"00185010601 ")
+228 ;;6896
+229 ;;21,"00185010605 ")
+230 ;;6897
+231 ;;21,"00185011201 ")
+232 ;;6898
+233 ;;21,"00185011205 ")
+234 ;;6899
+235 ;;21,"00185021605 ")
+236 ;;6900
+237 ;;21,"00185021652 ")
+238 ;;6901
+239 ;;21,"00185021653 ")
+240 ;;6902
+241 ;;21,"00185027501 ")
+242 ;;6903
+243 ;;21,"00185027510 ")
+244 ;;6904
+245 ;;21,"00185027556 ")
+246 ;;6905
+247 ;;21,"00185027560 ")
+248 ;;6906
+249 ;;21,"00185044201 ")
+250 ;;6907
+251 ;;21,"00185045101 ")
+252 ;;6908
+253 ;;21,"00185047053 ")
+254 ;;6909
+255 ;;21,"00185080501 ")
+256 ;;6910
+257 ;;21,"00185080505 ")
+258 ;;6911
+259 ;;21,"00185081001 ")
+260 ;;6912
+261 ;;21,"00185081052 ")
+262 ;;6913
+263 ;;21,"00185081053 ")
+264 ;;6914
+265 ;;21,"00185081401 ")
+266 ;;6915
+267 ;;21,"00185081460 ")
+268 ;;6916
+269 ;;21,"00185081501 ")
+270 ;;6917
+271 ;;21,"00185081550 ")
+272 ;;6918
+273 ;;21,"00185081553 ")
+274 ;;6919
+275 ;;21,"00185720370 ")
+276 ;;6920
+277 ;;21,"00185720670 ")
+278 ;;6921
+279 ;;21,"00185720969 ")
+280 ;;6922
+281 ;;21,"00185721268 ")
+282 ;;6923
+283 ;;21,"00247000133 ")
+284 ;;6924
+285 ;;21,"00247000156 ")
+286 ;;6925
+287 ;;21,"00247000169 ")
+288 ;;6926
+289 ;;21,"00247000212 ")
+290 ;;6927
+291 ;;21,"00247000216 ")
+292 ;;6928
+293 ;;21,"00247000222 ")
+294 ;;6929
+295 ;;21,"00247000225 ")
+296 ;;6930
+297 ;;21,"00247000232 ")
+298 ;;6931
+299 ;;21,"00247000233 ")
+300 ;;6932
+301 ;;21,"00247000250 ")
+302 ;;6933
+303 ;;21,"00247000269 ")
+304 ;;6934
+305 ;;21,"00247000280 ")
+306 ;;6935
+307 ;;21,"00247000303 ")
+308 ;;6936
+309 ;;21,"00247000309 ")
+310 ;;6937
+311 ;;21,"00247000332 ")
+312 ;;6938
+313 ;;21,"00247000503 ")
+314 ;;6939
+315 ;;21,"00247000524 ")
+316 ;;6940
+317 ;;21,"00247000556 ")
+318 ;;6941
+319 ;;21,"00247000617 ")
+320 ;;6942
+321 ;;21,"00247000621 ")
+322 ;;6943
+323 ;;21,"00247000660 ")
+324 ;;6944
+325 ;;21,"00247000900 ")
+326 ;;6945
+327 ;;21,"00247000978 ")
+328 ;;6946
+329 ;;21,"00247000979 ")
+330 ;;6947
+331 ;;21,"00247001400 ")
+332 ;;6948
+333 ;;21,"00247001479 ")
+334 ;;6949
+335 ;;21,"00247002205 ")
+336 ;;6950
+337 ;;21,"00247002210 ")
+338 ;;6951
+339 ;;21,"00247002302 ")
+340 ;;6952
+341 ;;21,"00247002304 ")
+342 ;;6953
+343 ;;21,"00247002306 ")
+344 ;;6954
+345 ;;21,"00247002308 ")
+346 ;;6955
+347 ;;21,"00247002801 ")
+348 ;;6956
+349 ;;21,"00247002803 ")
+350 ;;6957
+351 ;;21,"00247002806 ")
+352 ;;6958
+353 ;;21,"00247002975 ")
+354 ;;6959
+355 ;;21,"00247002978 ")
+356 ;;6960
+357 ;;21,"00247002980 ")
+358 ;;6961
+359 ;;21,"00247005475 ")
+360 ;;6962
+361 ;;21,"00247005478 ")
+362 ;;6963
+363 ;;21,"00247005500 ")
+364 ;;6964
+365 ;;21,"00247005550 ")
+366 ;;6965
+367 ;;21,"00247006300 ")
+368 ;;6966
+369 ;;21,"00247006301 ")
+370 ;;6967
+371 ;;21,"00247006302 ")
+372 ;;6968
+373 ;;21,"00247006303 ")
+374 ;;6969
+375 ;;21,"00247006304 ")
+376 ;;6970
+377 ;;21,"00247006306 ")
+378 ;;6971
+379 ;;21,"00247006307 ")
+380 ;;6972
+381 ;;21,"00247006308 ")
+382 ;;6973
+383 ;;21,"00247006310 ")
+384 ;;6974
+385 ;;21,"00247006312 ")
+386 ;;6975
+387 ;;21,"00247006314 ")
+388 ;;6976
+389 ;;21,"00247006315 ")
+390 ;;6977
+391 ;;21,"00247006316 ")
+392 ;;6978
+393 ;;21,"00247006319 ")
+394 ;;6979
+395 ;;21,"00247006320 ")
+396 ;;6980
+397 ;;21,"00247006328 ")
+398 ;;6981
+399 ;;21,"00247006330 ")
+400 ;;6982
+401 ;;21,"00247006340 ")
+402 ;;6983
+403 ;;21,"00247006342 ")
+404 ;;6984
+405 ;;21,"00247006356 ")
+406 ;;6985
+407 ;;21,"00247006360 ")
+408 ;;6986
+409 ;;21,"00247006398 ")
+410 ;;6987
+411 ;;21,"00247006600 ")
+412 ;;6988
+413 ;;21,"00247006604 ")
+414 ;;6989
+415 ;;21,"00247006605 ")
+416 ;;6990
+417 ;;21,"00247006610 ")
+418 ;;6991
+419 ;;21,"00247006612 ")
+420 ;;6992
+421 ;;21,"00247006620 ")
+422 ;;6993
+423 ;;21,"00247006621 ")
+424 ;;6994
+425 ;;21,"00247006628 ")
+426 ;;6995
+427 ;;21,"00247006630 ")
+428 ;;6996
+429 ;;21,"00247006640 ")
+430 ;;6997
+431 ;;21,"00247006660 ")
+432 ;;6998
+433 ;;21,"00247006699 ")
+434 ;;6999
+435 ;;21,"00247006700 ")
+436 ;;7000
+437 ;;21,"00247006704 ")
+438 ;;7001
+439 ;;21,"00247006708 ")
+440 ;;7002
+441 ;;21,"00247006710 ")
+442 ;;7003
+443 ;;21,"00247006712 ")
+444 ;;7004
+445 ;;21,"00247006715 ")
+446 ;;7005
+447 ;;21,"00247006716 ")
+448 ;;7006
+449 ;;21,"00247006720 ")
+450 ;;7007
+451 ;;21,"00247006721 ")
+452 ;;7008
+453 ;;21,"00247006728 ")
+454 ;;7009
+455 ;;21,"00247006730 ")
+456 ;;7010
+457 ;;21,"00247006740 ")
+458 ;;7011
+459 ;;21,"00247006752 ")
+460 ;;7012
+461 ;;21,"00247006756 ")
+462 ;;7013
+463 ;;21,"00247006760 ")
+464 ;;7014
+465 ;;21,"00247006790 ")
+466 ;;7015
+467 ;;21,"00247006799 ")
+468 ;;7016
+469 ;;21,"00247006801 ")
+470 ;;7017
+471 ;;21,"00247006802 ")
+472 ;;7018
+473 ;;21,"00247006803 ")
+474 ;;7019
+475 ;;21,"00247006804 ")
+476 ;;7020
+477 ;;21,"00247006806 ")
+478 ;;7021
+479 ;;21,"00247006808 ")
+480 ;;7022
+481 ;;21,"00247006810 ")
+482 ;;7023
+483 ;;21,"00247006812 ")
+484 ;;7024
+485 ;;21,"00247006814 ")
+486 ;;7025
+487 ;;21,"00247006815 ")
+488 ;;7026
+489 ;;21,"00247006816 ")
+490 ;;7027
+491 ;;21,"00247006818 ")
+492 ;;7028
+493 ;;21,"00247006820 ")
+494 ;;7029
+495 ;;21,"00247006821 ")
+496 ;;7030
+497 ;;21,"00247006824 ")
+498 ;;7031
+499 ;;21,"00247006825 ")
+500 ;;7032
+501 ;;21,"00247006828 ")
+502 ;;7033
+503 ;;21,"00247006830 ")
+504 ;;7034
+505 ;;21,"00247006832 ")
+506 ;;7035
+507 ;;21,"00247006840 ")
+508 ;;7036
+509 ;;21,"00247006898 ")
+510 ;;7037
+511 ;;21,"00247006902 ")
+512 ;;7038
+513 ;;21,"00247009600 ")
+514 ;;7039
+515 ;;21,"00247009605 ")
+516 ;;7040
+517 ;;21,"00247009620 ")
+518 ;;7041
+519 ;;21,"00247009623 ")
+520 ;;7042
+521 ;;21,"00247009630 ")
+522 ;;7043
+523 ;;21,"00247009633 ")
+524 ;;7044
+525 ;;21,"00247009638 ")
+526 ;;7045
+527 ;;21,"00247009649 ")
+528 ;;7046
+529 ;;21,"00247009650 ")
+530 ;;7047
+531 ;;21,"00247009652 ")
+532 ;;7048
+533 ;;21,"00247009659 ")
+534 ;;7049
+535 ;;21,"00247009660 ")
+536 ;;7050
+537 ;;21,"00247009677 ")
+538 ;;7051
+539 ;;21,"00247009678 ")
+540 ;;7052
+541 ;;21,"00247009679 ")
+542 ;;7053
+543 ;;21,"00247009690 ")
+544 ;;7054
+545 ;;21,"00247009695 ")
+546 ;;7055
+547 ;;21,"00247010404 ")
+548 ;;7056
+549 ;;21,"00247010600 ")
+550 ;;7057
+551 ;;21,"00247010679 ")
+552 ;;7058
+553 ;;21,"00247011602 ")
+554 ;;7059
+555 ;;21,"00247011603 ")
+556 ;;7060
+557 ;;21,"00247011604 ")
+558 ;;7061
+559 ;;21,"00247011605 ")
+560 ;;7062
+561 ;;21,"00247011606 ")
+562 ;;7063
+563 ;;21,"00247011609 ")
+564 ;;7064
+565 ;;21,"00247011615 ")
+566 ;;7065
+567 ;;21,"00247011620 ")
+568 ;;7066
+569 ;;21,"00247011621 ")
+570 ;;7067
+571 ;;21,"00247011628 ")
+572 ;;7068
+573 ;;21,"00247011630 ")
+574 ;;7069
+575 ;;21,"00247011640 ")
+576 ;;7070
+577 ;;21,"00247011642 ")
+578 ;;7071
+579 ;;21,"00247012903 ")
+580 ;;7072
+581 ;;21,"00247012904 ")
+582 ;;7073
+583 ;;21,"00247012908 ")
+584 ;;7074
+585 ;;21,"00247012912 ")
+586 ;;7075
+587 ;;21,"00247015603 ")
+588 ;;7076
+589 ;;21,"00247015604 ")
+590 ;;7077
+591 ;;21,"00247015612 ")
+592 ;;7078
+593 ;;21,"00247015615 ")
+594 ;;7079
+595 ;;21,"00247015630 ")
+596 ;;7080
+597 ;;21,"00247015703 ")
+598 ;;7081
+599 ;;21,"00247015704 ")
+600 ;;7082
+601 ;;21,"00247015708 ")
+602 ;;7083
+603 ;;21,"00247015718 ")
+604 ;;7084
+605 ;;21,"00247016707 ")
+606 ;;7085
+607 ;;21,"00247016779 ")
+608 ;;7086
+609 ;;21,"00247017206 ")
+610 ;;7087
+611 ;;21,"00247017220 ")
+612 ;;7088
+613 ;;21,"00247019603 ")
+614 ;;7089
+615 ;;21,"00247019604 ")
+616 ;;7090
+617 ;;21,"00247019707 ")
+618 ;;7091
+619 ;;21,"00247039300 ")
+620 ;;7092
+621 ;;21,"00247039379 ")
+622 ;;7093
+623 ;;21,"00247039500 ")
+624 ;;7094
+625 ;;21,"00247039560 ")
+626 ;;7095
+627 ;;21,"00247039577 ")
+628 ;;7096
+629 ;;21,"00247039579 ")
+630 ;;7097
+631 ;;21,"00247039590 ")
+632 ;;7098
+633 ;;21,"00247039600 ")
+634 ;;7099
+635 ;;21,"00247039605 ")
+636 ;;7100
+637 ;;21,"00247039610 ")
+638 ;;7101
+639 ;;21,"00247039625 ")
+640 ;;7102
+641 ;;21,"00247039660 ")
+642 ;;7103
+643 ;;21,"00247039677 ")
+644 ;;7104
+645 ;;21,"00247039679 ")
+646 ;;7105
+647 ;;21,"00247039690 ")
+648 ;;7106
+649 ;;21,"00247039695 ")
+650 ;;7107
+651 ;;21,"00247045802 ")
+652 ;;7108
+653 ;;21,"00247045804 ")
+654 ;;7109
+655 ;;21,"00247045814 ")
+656 ;;7110
+657 ;;21,"00247056320 ")
+658 ;;7111
+659 ;;21,"00247062630 ")
+660 ;;7112
+661 ;;21,"00247062660 ")
+662 ;;7113
+663 ;;21,"00247062720 ")
+664 ;;7114
+665 ;;21,"00247062730 ")
+666 ;;7115
+667 ;;21,"00247062750 ")
+668 ;;7116
+669 ;;21,"00247062760 ")
+670 ;;7117
+671 ;;21,"00247062800 ")
+672 ;;7118
+673 ;;21,"00247062850 ")
+674 ;;7119
+675 ;;21,"00247062875 ")
+676 ;;7120
+677 ;;21,"00247062900 ")
+678 ;;7121
+679 ;;21,"00247062950 ")
+680 ;;7122
+681 ;;21,"00247063900 ")
+682 ;;7123
+683 ;;21,"00247063902 ")
+684 ;;7124
+685 ;;21,"00247063903 ")
+686 ;;7125
+687 ;;21,"00247063904 ")
+688 ;;7126
+689 ;;21,"00247063906 ")
+690 ;;7127
+691 ;;21,"00247063908 ")
+692 ;;7128
+693 ;;21,"00247063912 ")
+694 ;;7129
+695 ;;21,"00247063916 ")
+696 ;;7130
+697 ;;21,"00247063921 ")
+698 ;;7131
+699 ;;21,"00247063924 ")
+700 ;;7132
+701 ;;21,"00247063928 ")
+702 ;;7133
+703 ;;21,"00247063942 ")
+704 ;;7134