BGPM5BEE ;IHS/MSC/SAT-CREATED BY ^ATXSTX ON SEP 12, 2011;
;;11.1;IHS CLINICAL REPORTING SYSTEM;**1**;JUN 27, 2011;Build 106
;
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)
;;9002226.02101,"1044,68788073506 ",.01)
;;68788073506
;;9002226.02101,"1044,68788073506 ",.02)
;;68788073506
;;9002226.02101,"1044,68788073509 ",.01)
;;68788073509
;;9002226.02101,"1044,68788073509 ",.02)
;;68788073509
;;9002226.02101,"1044,68788074603 ",.01)
;;68788074603
;;9002226.02101,"1044,68788074603 ",.02)
;;68788074603
;;9002226.02101,"1044,68788074606 ",.01)
;;68788074606
;;9002226.02101,"1044,68788074606 ",.02)
;;68788074606
;;9002226.02101,"1044,68788074609 ",.01)
;;68788074609
;;9002226.02101,"1044,68788074609 ",.02)
;;68788074609
;;9002226.02101,"1044,68788074803 ",.01)
;;68788074803
;;9002226.02101,"1044,68788074803 ",.02)
;;68788074803
;;9002226.02101,"1044,68788074806 ",.01)
;;68788074806
;;9002226.02101,"1044,68788074806 ",.02)
;;68788074806
;;9002226.02101,"1044,68788074809 ",.01)
;;68788074809
;;9002226.02101,"1044,68788074809 ",.02)
;;68788074809
;;9002226.02101,"1044,68788095603 ",.01)
;;68788095603
;;9002226.02101,"1044,68788095603 ",.02)
;;68788095603
;;9002226.02101,"1044,68788175900 ",.01)
;;68788175900
;;9002226.02101,"1044,68788175900 ",.02)
;;68788175900
;;9002226.02101,"1044,68788175903 ",.01)
;;68788175903
;;9002226.02101,"1044,68788175903 ",.02)
;;68788175903
;;9002226.02101,"1044,68788175906 ",.01)
;;68788175906
;;9002226.02101,"1044,68788175906 ",.02)
;;68788175906
;;9002226.02101,"1044,68788175909 ",.01)
;;68788175909
;;9002226.02101,"1044,68788175909 ",.02)
;;68788175909
;;9002226.02101,"1044,68788221202 ",.01)
;;68788221202
;;9002226.02101,"1044,68788221202 ",.02)
;;68788221202
;;9002226.02101,"1044,68788221203 ",.01)
;;68788221203
;;9002226.02101,"1044,68788221203 ",.02)
;;68788221203
;;9002226.02101,"1044,68788221206 ",.01)
;;68788221206
;;9002226.02101,"1044,68788221206 ",.02)
;;68788221206
;;9002226.02101,"1044,68788221209 ",.01)
;;68788221209
;;9002226.02101,"1044,68788221209 ",.02)
;;68788221209
;;9002226.02101,"1044,68788221303 ",.01)
;;68788221303
;;9002226.02101,"1044,68788221303 ",.02)
;;68788221303
;;9002226.02101,"1044,68788221306 ",.01)
;;68788221306
;;9002226.02101,"1044,68788221306 ",.02)
;;68788221306
;;9002226.02101,"1044,68788221309 ",.01)
;;68788221309
;;9002226.02101,"1044,68788221309 ",.02)
;;68788221309
;;9002226.02101,"1044,68788435603 ",.01)
;;68788435603
;;9002226.02101,"1044,68788435603 ",.02)
;;68788435603
;;9002226.02101,"1044,68788435606 ",.01)
;;68788435606
;;9002226.02101,"1044,68788435606 ",.02)
;;68788435606
;;9002226.02101,"1044,68788578601 ",.01)
;;68788578601
;;9002226.02101,"1044,68788578601 ",.02)
;;68788578601
;;9002226.02101,"1044,68788578603 ",.01)
;;68788578603
;;9002226.02101,"1044,68788578603 ",.02)
;;68788578603
;;9002226.02101,"1044,68788578606 ",.01)
;;68788578606
;;9002226.02101,"1044,68788578606 ",.02)
;;68788578606
;;9002226.02101,"1044,68788578701 ",.01)
;;68788578701
;;9002226.02101,"1044,68788578701 ",.02)
;;68788578701
;;9002226.02101,"1044,68788578703 ",.01)
;;68788578703
;;9002226.02101,"1044,68788578703 ",.02)
;;68788578703
;;9002226.02101,"1044,68788578706 ",.01)
;;68788578706
;;9002226.02101,"1044,68788578706 ",.02)
;;68788578706
;;9002226.02101,"1044,68788900903 ",.01)
;;68788900903
;;9002226.02101,"1044,68788900903 ",.02)
;;68788900903
;;9002226.02101,"1044,68788900906 ",.01)
;;68788900906
;;9002226.02101,"1044,68788900906 ",.02)
;;68788900906
;;9002226.02101,"1044,68788900909 ",.01)
;;68788900909
;;9002226.02101,"1044,68788900909 ",.02)
;;68788900909
;;9002226.02101,"1044,68788901303 ",.01)
;;68788901303
;;9002226.02101,"1044,68788901303 ",.02)
;;68788901303
;;9002226.02101,"1044,68788901306 ",.01)
;;68788901306
;;9002226.02101,"1044,68788901306 ",.02)
;;68788901306
;;9002226.02101,"1044,68788901309 ",.01)
;;68788901309
;;9002226.02101,"1044,68788901309 ",.02)
;;68788901309
;;9002226.02101,"1044,68788901403 ",.01)
;;68788901403
;;9002226.02101,"1044,68788901403 ",.02)
;;68788901403
;;9002226.02101,"1044,68788901406 ",.01)
;;68788901406
;;9002226.02101,"1044,68788901406 ",.02)
;;68788901406
;;9002226.02101,"1044,68788901409 ",.01)
;;68788901409
;;9002226.02101,"1044,68788901409 ",.02)
;;68788901409
;;9002226.02101,"1044,68788901503 ",.01)
;;68788901503
;;9002226.02101,"1044,68788901503 ",.02)
;;68788901503
;;9002226.02101,"1044,68788901506 ",.01)
;;68788901506
;;9002226.02101,"1044,68788901506 ",.02)
;;68788901506
;;9002226.02101,"1044,68788901509 ",.01)
;;68788901509
;;9002226.02101,"1044,68788901509 ",.02)
;;68788901509
;;9002226.02101,"1044,68788901603 ",.01)
;;68788901603
;;9002226.02101,"1044,68788901603 ",.02)
;;68788901603
;;9002226.02101,"1044,68788901606 ",.01)
;;68788901606
;;9002226.02101,"1044,68788901606 ",.02)
;;68788901606
;;9002226.02101,"1044,68788901609 ",.01)
;;68788901609
;;9002226.02101,"1044,68788901609 ",.02)
;;68788901609
;;9002226.02101,"1044,68788907401 ",.01)
;;68788907401
;;9002226.02101,"1044,68788907401 ",.02)
;;68788907401
;;9002226.02101,"1044,68788907403 ",.01)
;;68788907403
;;9002226.02101,"1044,68788907403 ",.02)
;;68788907403
;;9002226.02101,"1044,68788907406 ",.01)
;;68788907406
;;9002226.02101,"1044,68788907406 ",.02)
;;68788907406
;;9002226.02101,"1044,68788907408 ",.01)
;;68788907408
;;9002226.02101,"1044,68788907408 ",.02)
;;68788907408
;;9002226.02101,"1044,68788907409 ",.01)
;;68788907409
;;9002226.02101,"1044,68788907409 ",.02)
;;68788907409
;;9002226.02101,"1044,68788911803 ",.01)
;;68788911803
;;9002226.02101,"1044,68788911803 ",.02)
;;68788911803
;;9002226.02101,"1044,68788911806 ",.01)
;;68788911806
;;9002226.02101,"1044,68788911806 ",.02)
;;68788911806
;;9002226.02101,"1044,68788911809 ",.01)
;;68788911809
;;9002226.02101,"1044,68788911809 ",.02)
;;68788911809
;;9002226.02101,"1044,68884064797 ",.01)
;;68884064797
;;9002226.02101,"1044,68884064797 ",.02)
;;68884064797
;;9002226.02101,"1044,68884064897 ",.01)
;;68884064897
;;9002226.02101,"1044,68884064897 ",.02)
;;68884064897
;;9002226.02101,"1044,68966560001 ",.01)
;;68966560001
;;9002226.02101,"1044,68966560001 ",.02)
;;68966560001
BGPM5BEE ;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 ;;9002226.02101,"1044,68788073506 ",.01)
+2 ;;68788073506
+3 ;;9002226.02101,"1044,68788073506 ",.02)
+4 ;;68788073506
+5 ;;9002226.02101,"1044,68788073509 ",.01)
+6 ;;68788073509
+7 ;;9002226.02101,"1044,68788073509 ",.02)
+8 ;;68788073509
+9 ;;9002226.02101,"1044,68788074603 ",.01)
+10 ;;68788074603
+11 ;;9002226.02101,"1044,68788074603 ",.02)
+12 ;;68788074603
+13 ;;9002226.02101,"1044,68788074606 ",.01)
+14 ;;68788074606
+15 ;;9002226.02101,"1044,68788074606 ",.02)
+16 ;;68788074606
+17 ;;9002226.02101,"1044,68788074609 ",.01)
+18 ;;68788074609
+19 ;;9002226.02101,"1044,68788074609 ",.02)
+20 ;;68788074609
+21 ;;9002226.02101,"1044,68788074803 ",.01)
+22 ;;68788074803
+23 ;;9002226.02101,"1044,68788074803 ",.02)
+24 ;;68788074803
+25 ;;9002226.02101,"1044,68788074806 ",.01)
+26 ;;68788074806
+27 ;;9002226.02101,"1044,68788074806 ",.02)
+28 ;;68788074806
+29 ;;9002226.02101,"1044,68788074809 ",.01)
+30 ;;68788074809
+31 ;;9002226.02101,"1044,68788074809 ",.02)
+32 ;;68788074809
+33 ;;9002226.02101,"1044,68788095603 ",.01)
+34 ;;68788095603
+35 ;;9002226.02101,"1044,68788095603 ",.02)
+36 ;;68788095603
+37 ;;9002226.02101,"1044,68788175900 ",.01)
+38 ;;68788175900
+39 ;;9002226.02101,"1044,68788175900 ",.02)
+40 ;;68788175900
+41 ;;9002226.02101,"1044,68788175903 ",.01)
+42 ;;68788175903
+43 ;;9002226.02101,"1044,68788175903 ",.02)
+44 ;;68788175903
+45 ;;9002226.02101,"1044,68788175906 ",.01)
+46 ;;68788175906
+47 ;;9002226.02101,"1044,68788175906 ",.02)
+48 ;;68788175906
+49 ;;9002226.02101,"1044,68788175909 ",.01)
+50 ;;68788175909
+51 ;;9002226.02101,"1044,68788175909 ",.02)
+52 ;;68788175909
+53 ;;9002226.02101,"1044,68788221202 ",.01)
+54 ;;68788221202
+55 ;;9002226.02101,"1044,68788221202 ",.02)
+56 ;;68788221202
+57 ;;9002226.02101,"1044,68788221203 ",.01)
+58 ;;68788221203
+59 ;;9002226.02101,"1044,68788221203 ",.02)
+60 ;;68788221203
+61 ;;9002226.02101,"1044,68788221206 ",.01)
+62 ;;68788221206
+63 ;;9002226.02101,"1044,68788221206 ",.02)
+64 ;;68788221206
+65 ;;9002226.02101,"1044,68788221209 ",.01)
+66 ;;68788221209
+67 ;;9002226.02101,"1044,68788221209 ",.02)
+68 ;;68788221209
+69 ;;9002226.02101,"1044,68788221303 ",.01)
+70 ;;68788221303
+71 ;;9002226.02101,"1044,68788221303 ",.02)
+72 ;;68788221303
+73 ;;9002226.02101,"1044,68788221306 ",.01)
+74 ;;68788221306
+75 ;;9002226.02101,"1044,68788221306 ",.02)
+76 ;;68788221306
+77 ;;9002226.02101,"1044,68788221309 ",.01)
+78 ;;68788221309
+79 ;;9002226.02101,"1044,68788221309 ",.02)
+80 ;;68788221309
+81 ;;9002226.02101,"1044,68788435603 ",.01)
+82 ;;68788435603
+83 ;;9002226.02101,"1044,68788435603 ",.02)
+84 ;;68788435603
+85 ;;9002226.02101,"1044,68788435606 ",.01)
+86 ;;68788435606
+87 ;;9002226.02101,"1044,68788435606 ",.02)
+88 ;;68788435606
+89 ;;9002226.02101,"1044,68788578601 ",.01)
+90 ;;68788578601
+91 ;;9002226.02101,"1044,68788578601 ",.02)
+92 ;;68788578601
+93 ;;9002226.02101,"1044,68788578603 ",.01)
+94 ;;68788578603
+95 ;;9002226.02101,"1044,68788578603 ",.02)
+96 ;;68788578603
+97 ;;9002226.02101,"1044,68788578606 ",.01)
+98 ;;68788578606
+99 ;;9002226.02101,"1044,68788578606 ",.02)
+100 ;;68788578606
+101 ;;9002226.02101,"1044,68788578701 ",.01)
+102 ;;68788578701
+103 ;;9002226.02101,"1044,68788578701 ",.02)
+104 ;;68788578701
+105 ;;9002226.02101,"1044,68788578703 ",.01)
+106 ;;68788578703
+107 ;;9002226.02101,"1044,68788578703 ",.02)
+108 ;;68788578703
+109 ;;9002226.02101,"1044,68788578706 ",.01)
+110 ;;68788578706
+111 ;;9002226.02101,"1044,68788578706 ",.02)
+112 ;;68788578706
+113 ;;9002226.02101,"1044,68788900903 ",.01)
+114 ;;68788900903
+115 ;;9002226.02101,"1044,68788900903 ",.02)
+116 ;;68788900903
+117 ;;9002226.02101,"1044,68788900906 ",.01)
+118 ;;68788900906
+119 ;;9002226.02101,"1044,68788900906 ",.02)
+120 ;;68788900906
+121 ;;9002226.02101,"1044,68788900909 ",.01)
+122 ;;68788900909
+123 ;;9002226.02101,"1044,68788900909 ",.02)
+124 ;;68788900909
+125 ;;9002226.02101,"1044,68788901303 ",.01)
+126 ;;68788901303
+127 ;;9002226.02101,"1044,68788901303 ",.02)
+128 ;;68788901303
+129 ;;9002226.02101,"1044,68788901306 ",.01)
+130 ;;68788901306
+131 ;;9002226.02101,"1044,68788901306 ",.02)
+132 ;;68788901306
+133 ;;9002226.02101,"1044,68788901309 ",.01)
+134 ;;68788901309
+135 ;;9002226.02101,"1044,68788901309 ",.02)
+136 ;;68788901309
+137 ;;9002226.02101,"1044,68788901403 ",.01)
+138 ;;68788901403
+139 ;;9002226.02101,"1044,68788901403 ",.02)
+140 ;;68788901403
+141 ;;9002226.02101,"1044,68788901406 ",.01)
+142 ;;68788901406
+143 ;;9002226.02101,"1044,68788901406 ",.02)
+144 ;;68788901406
+145 ;;9002226.02101,"1044,68788901409 ",.01)
+146 ;;68788901409
+147 ;;9002226.02101,"1044,68788901409 ",.02)
+148 ;;68788901409
+149 ;;9002226.02101,"1044,68788901503 ",.01)
+150 ;;68788901503
+151 ;;9002226.02101,"1044,68788901503 ",.02)
+152 ;;68788901503
+153 ;;9002226.02101,"1044,68788901506 ",.01)
+154 ;;68788901506
+155 ;;9002226.02101,"1044,68788901506 ",.02)
+156 ;;68788901506
+157 ;;9002226.02101,"1044,68788901509 ",.01)
+158 ;;68788901509
+159 ;;9002226.02101,"1044,68788901509 ",.02)
+160 ;;68788901509
+161 ;;9002226.02101,"1044,68788901603 ",.01)
+162 ;;68788901603
+163 ;;9002226.02101,"1044,68788901603 ",.02)
+164 ;;68788901603
+165 ;;9002226.02101,"1044,68788901606 ",.01)
+166 ;;68788901606
+167 ;;9002226.02101,"1044,68788901606 ",.02)
+168 ;;68788901606
+169 ;;9002226.02101,"1044,68788901609 ",.01)
+170 ;;68788901609
+171 ;;9002226.02101,"1044,68788901609 ",.02)
+172 ;;68788901609
+173 ;;9002226.02101,"1044,68788907401 ",.01)
+174 ;;68788907401
+175 ;;9002226.02101,"1044,68788907401 ",.02)
+176 ;;68788907401
+177 ;;9002226.02101,"1044,68788907403 ",.01)
+178 ;;68788907403
+179 ;;9002226.02101,"1044,68788907403 ",.02)
+180 ;;68788907403
+181 ;;9002226.02101,"1044,68788907406 ",.01)
+182 ;;68788907406
+183 ;;9002226.02101,"1044,68788907406 ",.02)
+184 ;;68788907406
+185 ;;9002226.02101,"1044,68788907408 ",.01)
+186 ;;68788907408
+187 ;;9002226.02101,"1044,68788907408 ",.02)
+188 ;;68788907408
+189 ;;9002226.02101,"1044,68788907409 ",.01)
+190 ;;68788907409
+191 ;;9002226.02101,"1044,68788907409 ",.02)
+192 ;;68788907409
+193 ;;9002226.02101,"1044,68788911803 ",.01)
+194 ;;68788911803
+195 ;;9002226.02101,"1044,68788911803 ",.02)
+196 ;;68788911803
+197 ;;9002226.02101,"1044,68788911806 ",.01)
+198 ;;68788911806
+199 ;;9002226.02101,"1044,68788911806 ",.02)
+200 ;;68788911806
+201 ;;9002226.02101,"1044,68788911809 ",.01)
+202 ;;68788911809
+203 ;;9002226.02101,"1044,68788911809 ",.02)
+204 ;;68788911809
+205 ;;9002226.02101,"1044,68884064797 ",.01)
+206 ;;68884064797
+207 ;;9002226.02101,"1044,68884064797 ",.02)
+208 ;;68884064797
+209 ;;9002226.02101,"1044,68884064897 ",.01)
+210 ;;68884064897
+211 ;;9002226.02101,"1044,68884064897 ",.02)
+212 ;;68884064897
+213 ;;9002226.02101,"1044,68966560001 ",.01)
+214 ;;68966560001
+215 ;;9002226.02101,"1044,68966560001 ",.02)
+216 ;;68966560001
