BGPM5ANY ;IHS/MSC/MMT-CREATED BY ^ATXSTX ON AUG 17, 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)
;;21,"232.4 ")
;;857
;;21,"232.5 ")
;;858
;;21,"232.6 ")
;;859
;;21,"232.7 ")
;;860
;;21,"232.8 ")
;;861
;;21,"232.9 ")
;;862
;;21,"233 ")
;;863
;;21,"233.0 ")
;;864
;;21,"233.1 ")
;;865
;;21,"233.2 ")
;;866
;;21,"233.3 ")
;;867
;;21,"233.30 ")
;;868
;;21,"233.31 ")
;;869
;;21,"233.32 ")
;;870
;;21,"233.39 ")
;;871
;;21,"233.4 ")
;;872
;;21,"233.5 ")
;;873
;;21,"233.6 ")
;;874
;;21,"233.7 ")
;;875
;;21,"233.9 ")
;;876
;;21,"234 ")
;;877
;;21,"234.0 ")
;;878
;;21,"234.8 ")
;;879
;;21,"234.9 ")
;;880
;;21,"235 ")
;;881
;;21,"235.0 ")
;;882
;;21,"235.1 ")
;;883
;;21,"235.2 ")
;;884
;;21,"235.3 ")
;;885
;;21,"235.4 ")
;;886
;;21,"235.5 ")
;;887
;;21,"235.6 ")
;;888
;;21,"235.7 ")
;;889
;;21,"235.8 ")
;;890
;;21,"235.9 ")
;;891
;;21,"236 ")
;;892
;;21,"236.0 ")
;;893
;;21,"236.1 ")
;;894
;;21,"236.2 ")
;;895
;;21,"236.3 ")
;;896
;;21,"236.4 ")
;;897
;;21,"236.5 ")
;;898
;;21,"236.6 ")
;;899
;;21,"236.7 ")
;;900
;;21,"236.9 ")
;;901
;;21,"236.90 ")
;;902
;;21,"236.91 ")
;;903
;;21,"236.99 ")
;;904
;;21,"237 ")
;;905
;;21,"237.0 ")
;;906
;;21,"237.1 ")
;;907
;;21,"237.2 ")
;;908
;;21,"237.3 ")
;;909
;;21,"237.4 ")
;;910
;;21,"237.5 ")
;;911
;;21,"237.6 ")
;;912
;;21,"237.7 ")
;;913
;;21,"237.70 ")
;;914
;;21,"237.71 ")
;;915
;;21,"237.72 ")
;;916
;;21,"237.9 ")
;;917
;;21,"238 ")
;;918
;;21,"238.0 ")
;;919
;;21,"238.1 ")
;;920
;;21,"238.2 ")
;;921
;;21,"238.3 ")
;;922
;;21,"238.4 ")
;;923
;;21,"238.5 ")
;;924
;;21,"238.6 ")
;;925
;;21,"238.7 ")
;;926
;;21,"238.71 ")
;;927
;;21,"238.72 ")
;;928
;;21,"238.73 ")
;;929
;;21,"238.74 ")
;;930
;;21,"238.75 ")
;;931
;;21,"238.76 ")
;;932
;;21,"238.77 ")
;;933
;;21,"238.79 ")
;;934
;;21,"238.8 ")
;;935
;;21,"238.9 ")
;;936
;;21,"239 ")
;;937
;;21,"239.0 ")
;;938
;;21,"239.1 ")
;;939
;;21,"239.2 ")
;;940
;;21,"239.3 ")
;;941
;;21,"239.4 ")
;;942
;;21,"239.5 ")
;;943
;;21,"239.6 ")
;;944
;;21,"239.7 ")
;;945
;;21,"239.8 ")
;;946
;;21,"239.9 ")
;;947
;;21,"V10 ")
;;948
;;21,"V10.0 ")
;;949
;;21,"V10.00 ")
;;950
;;21,"V10.01 ")
;;951
;;21,"V10.02 ")
;;952
;;21,"V10.03 ")
;;953
;;21,"V10.04 ")
;;954
;;21,"V10.05 ")
;;955
;;21,"V10.06 ")
;;956
;;21,"V10.07 ")
;;957
;;21,"V10.09 ")
;;958
;;21,"V10.1 ")
;;959
;;21,"V10.11 ")
;;960
;;21,"V10.12 ")
;;961
;;21,"V10.2 ")
;;962
;;21,"V10.20 ")
;;963
;;21,"V10.21 ")
;;964
;;21,"V10.22 ")
;;965
;;21,"V10.29 ")
;;966
;;21,"V10.3 ")
;;967
;;21,"V10.4 ")
;;968
;;21,"V10.40 ")
;;969
;;21,"V10.41 ")
;;970
;;21,"V10.42 ")
;;971
;;21,"V10.43 ")
;;972
;;21,"V10.44 ")
;;973
;;21,"V10.45 ")
;;974
;;21,"V10.46 ")
;;975
;;21,"V10.47 ")
;;976
;;21,"V10.48 ")
;;977
;;21,"V10.49 ")
;;978
;;21,"V10.5 ")
;;979
;;21,"V10.50 ")
;;980
;;21,"V10.51 ")
;;981
;;21,"V10.52 ")
;;982
;;21,"V10.53 ")
;;983
;;21,"V10.59 ")
;;984
;;21,"V10.6 ")
;;985
;;21,"V10.60 ")
;;986
;;21,"V10.61 ")
;;987
;;21,"V10.62 ")
;;988
;;21,"V10.63 ")
;;989
;;21,"V10.69 ")
;;990
;;21,"V10.7 ")
;;991
;;21,"V10.71 ")
;;992
;;21,"V10.72 ")
;;993
;;21,"V10.79 ")
;;994
;;21,"V10.8 ")
;;995
;;21,"V10.81 ")
;;996
;;21,"V10.82 ")
;;997
;;21,"V10.83 ")
;;998
;;21,"V10.84 ")
;;999
;;21,"V10.85 ")
;;1000
;;21,"V10.86 ")
;;1001
;;21,"V10.87 ")
;;1002
;;21,"V10.88 ")
;;1003
;;21,"V10.89 ")
;;1004
;;21,"V10.9 ")
;;1005
;;9002226,992,.01)
;;BGPMU CANCER DX
;;9002226,992,.02)
;;Cancer Diagnosis codes
;;9002226,992,.04)
;;@
;;9002226,992,.06)
;;@
;;9002226,992,.08)
;;@
;;9002226,992,.09)
;;@
;;9002226,992,.11)
;;@
;;9002226,992,.12)
;;@
;;9002226,992,.13)
;;@
;;9002226,992,.14)
;;@
;;9002226,992,.15)
;;80
;;9002226,992,.16)
;;@
;;9002226,992,.17)
;;@
;;9002226,992,3101)
;;@
;;9002226.02101,"992,140.0 ",.01)
;;140.0
;;9002226.02101,"992,140.0 ",.02)
;;140.0
;;9002226.02101,"992,140.1 ",.01)
;;140.1
;;9002226.02101,"992,140.1 ",.02)
;;140.1
;;9002226.02101,"992,140.3 ",.01)
;;140.3
;;9002226.02101,"992,140.3 ",.02)
;;140.3
;;9002226.02101,"992,140.4 ",.01)
;;140.4
;;9002226.02101,"992,140.4 ",.02)
;;140.4
;;9002226.02101,"992,140.5 ",.01)
;;140.5
;;9002226.02101,"992,140.5 ",.02)
;;140.5
;;9002226.02101,"992,140.6 ",.01)
;;140.6
;;9002226.02101,"992,140.6 ",.02)
;;140.6
;;9002226.02101,"992,140.8 ",.01)
;;140.8
;;9002226.02101,"992,140.8 ",.02)
;;140.8
;;9002226.02101,"992,140.9 ",.01)
;;140.9
;;9002226.02101,"992,140.9 ",.02)
;;140.9
;;9002226.02101,"992,141 ",.01)
;;141
;;9002226.02101,"992,141 ",.02)
;;141
;;9002226.02101,"992,141.0 ",.01)
;;141.0
;;9002226.02101,"992,141.0 ",.02)
;;141.0
;;9002226.02101,"992,141.1 ",.01)
;;141.1
;;9002226.02101,"992,141.1 ",.02)
;;141.1
;;9002226.02101,"992,141.2 ",.01)
;;141.2
;;9002226.02101,"992,141.2 ",.02)
;;141.2
;;9002226.02101,"992,141.3 ",.01)
;;141.3
;;9002226.02101,"992,141.3 ",.02)
;;141.3
;;9002226.02101,"992,141.4 ",.01)
;;141.4
;;9002226.02101,"992,141.4 ",.02)
;;141.4
;;9002226.02101,"992,141.5 ",.01)
;;141.5
;;9002226.02101,"992,141.5 ",.02)
;;141.5
;;9002226.02101,"992,141.6 ",.01)
;;141.6
;;9002226.02101,"992,141.6 ",.02)
;;141.6
;;9002226.02101,"992,141.8 ",.01)
;;141.8
;;9002226.02101,"992,141.8 ",.02)
;;141.8
;;9002226.02101,"992,141.9 ",.01)
;;141.9
;;9002226.02101,"992,141.9 ",.02)
;;141.9
;;9002226.02101,"992,142 ",.01)
;;142
;;9002226.02101,"992,142 ",.02)
;;142
;;9002226.02101,"992,142.0 ",.01)
;;142.0
;;9002226.02101,"992,142.0 ",.02)
;;142.0
;;9002226.02101,"992,142.1 ",.01)
;;142.1
;;9002226.02101,"992,142.1 ",.02)
;;142.1
;;9002226.02101,"992,142.2 ",.01)
;;142.2
;;9002226.02101,"992,142.2 ",.02)
;;142.2
;;9002226.02101,"992,142.8 ",.01)
;;142.8
;;9002226.02101,"992,142.8 ",.02)
;;142.8
;;9002226.02101,"992,142.9 ",.01)
;;142.9
;;9002226.02101,"992,142.9 ",.02)
;;142.9
;;9002226.02101,"992,143 ",.01)
;;143
;;9002226.02101,"992,143 ",.02)
;;143
;;9002226.02101,"992,143.0 ",.01)
;;143.0
;;9002226.02101,"992,143.0 ",.02)
;;143.0
;;9002226.02101,"992,143.1 ",.01)
;;143.1
;;9002226.02101,"992,143.1 ",.02)
;;143.1
;;9002226.02101,"992,143.8 ",.01)
;;143.8
;;9002226.02101,"992,143.8 ",.02)
;;143.8
;;9002226.02101,"992,143.9 ",.01)
;;143.9
;;9002226.02101,"992,143.9 ",.02)
;;143.9
;;9002226.02101,"992,144 ",.01)
;;144
;;9002226.02101,"992,144 ",.02)
;;144
;;9002226.02101,"992,144.0 ",.01)
;;144.0
;;9002226.02101,"992,144.0 ",.02)
;;144.0
;;9002226.02101,"992,144.1 ",.01)
;;144.1
;;9002226.02101,"992,144.1 ",.02)
;;144.1
;;9002226.02101,"992,144.8 ",.01)
;;144.8
;;9002226.02101,"992,144.8 ",.02)
;;144.8
;;9002226.02101,"992,144.9 ",.01)
;;144.9
;;9002226.02101,"992,144.9 ",.02)
;;144.9
;;9002226.02101,"992,145 ",.01)
;;145
;;9002226.02101,"992,145 ",.02)
;;145
;;9002226.02101,"992,145.0 ",.01)
;;145.0
;;9002226.02101,"992,145.0 ",.02)
;;145.0
;;9002226.02101,"992,145.1 ",.01)
;;145.1
;;9002226.02101,"992,145.1 ",.02)
;;145.1
;;9002226.02101,"992,145.2 ",.01)
;;145.2
;;9002226.02101,"992,145.2 ",.02)
;;145.2
;;9002226.02101,"992,145.3 ",.01)
;;145.3
;;9002226.02101,"992,145.3 ",.02)
;;145.3
;;9002226.02101,"992,145.4 ",.01)
;;145.4
;;9002226.02101,"992,145.4 ",.02)
;;145.4
;;9002226.02101,"992,145.5 ",.01)
;;145.5
;;9002226.02101,"992,145.5 ",.02)
;;145.5
;;9002226.02101,"992,145.6 ",.01)
;;145.6
;;9002226.02101,"992,145.6 ",.02)
;;145.6
;;9002226.02101,"992,145.8 ",.01)
;;145.8
;;9002226.02101,"992,145.8 ",.02)
;;145.8
;;9002226.02101,"992,145.9 ",.01)
;;145.9
;;9002226.02101,"992,145.9 ",.02)
;;145.9
;;9002226.02101,"992,146 ",.01)
;;146
;;9002226.02101,"992,146 ",.02)
;;146
;;9002226.02101,"992,146.0 ",.01)
;;146.0
;;9002226.02101,"992,146.0 ",.02)
;;146.0
;;9002226.02101,"992,146.1 ",.01)
;;146.1
;;9002226.02101,"992,146.1 ",.02)
;;146.1
;;9002226.02101,"992,146.2 ",.01)
;;146.2
;;9002226.02101,"992,146.2 ",.02)
;;146.2
;;9002226.02101,"992,146.3 ",.01)
;;146.3
;;9002226.02101,"992,146.3 ",.02)
;;146.3
;;9002226.02101,"992,146.4 ",.01)
;;146.4
;;9002226.02101,"992,146.4 ",.02)
;;146.4
;;9002226.02101,"992,146.5 ",.01)
;;146.5
;;9002226.02101,"992,146.5 ",.02)
;;146.5
;;9002226.02101,"992,146.6 ",.01)
;;146.6
;;9002226.02101,"992,146.6 ",.02)
;;146.6
;;9002226.02101,"992,146.7 ",.01)
;;146.7
;;9002226.02101,"992,146.7 ",.02)
;;146.7
;;9002226.02101,"992,146.8 ",.01)
;;146.8
;;9002226.02101,"992,146.8 ",.02)
;;146.8
;;9002226.02101,"992,146.9 ",.01)
;;146.9
;;9002226.02101,"992,146.9 ",.02)
;;146.9
;;9002226.02101,"992,147 ",.01)
;;147
;;9002226.02101,"992,147 ",.02)
;;147
;;9002226.02101,"992,147.0 ",.01)
;;147.0
;;9002226.02101,"992,147.0 ",.02)
;;147.0
;;9002226.02101,"992,147.1 ",.01)
;;147.1
;;9002226.02101,"992,147.1 ",.02)
;;147.1
;;9002226.02101,"992,147.2 ",.01)
;;147.2
;;9002226.02101,"992,147.2 ",.02)
;;147.2
;;9002226.02101,"992,147.3 ",.01)
;;147.3
;;9002226.02101,"992,147.3 ",.02)
;;147.3
;;9002226.02101,"992,147.8 ",.01)
;;147.8
;;9002226.02101,"992,147.8 ",.02)
;;147.8
;;9002226.02101,"992,147.9 ",.01)
;;147.9
;;9002226.02101,"992,147.9 ",.02)
;;147.9
;;9002226.02101,"992,148 ",.01)
;;148
;;9002226.02101,"992,148 ",.02)
;;148
;;9002226.02101,"992,148.0 ",.01)
;;148.0
;;9002226.02101,"992,148.0 ",.02)
;;148.0
;;9002226.02101,"992,148.1 ",.01)
;;148.1
;;9002226.02101,"992,148.1 ",.02)
;;148.1
;;9002226.02101,"992,148.2 ",.01)
;;148.2
;;9002226.02101,"992,148.2 ",.02)
;;148.2
;;9002226.02101,"992,148.3 ",.01)
;;148.3
;;9002226.02101,"992,148.3 ",.02)
;;148.3
;;9002226.02101,"992,148.8 ",.01)
;;148.8
;;9002226.02101,"992,148.8 ",.02)
;;148.8
;;9002226.02101,"992,148.9 ",.01)
;;148.9
;;9002226.02101,"992,148.9 ",.02)
;;148.9
;;9002226.02101,"992,149 ",.01)
;;149
;;9002226.02101,"992,149 ",.02)
;;149
;;9002226.02101,"992,149.0 ",.01)
;;149.0
;;9002226.02101,"992,149.0 ",.02)
;;149.0
;;9002226.02101,"992,149.1 ",.01)
;;149.1
;;9002226.02101,"992,149.1 ",.02)
;;149.1
;;9002226.02101,"992,149.8 ",.01)
;;149.8
;;9002226.02101,"992,149.8 ",.02)
;;149.8
;;9002226.02101,"992,149.9 ",.01)
;;149.9
;;9002226.02101,"992,149.9 ",.02)
;;149.9
;;9002226.02101,"992,150 ",.01)
;;150
;;9002226.02101,"992,150 ",.02)
;;150
;;9002226.02101,"992,150.0 ",.01)
;;150.0
;;9002226.02101,"992,150.0 ",.02)
;;150.0
;;9002226.02101,"992,150.1 ",.01)
;;150.1
;;9002226.02101,"992,150.1 ",.02)
;;150.1
;;9002226.02101,"992,150.2 ",.01)
;;150.2
;;9002226.02101,"992,150.2 ",.02)
;;150.2
;;9002226.02101,"992,150.3 ",.01)
;;150.3
;;9002226.02101,"992,150.3 ",.02)
;;150.3
BGPM5ANY ;IHS/MSC/MMT-CREATED BY ^ATXSTX ON AUG 17, 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,"232.4 ")
+2 ;;857
+3 ;;21,"232.5 ")
+4 ;;858
+5 ;;21,"232.6 ")
+6 ;;859
+7 ;;21,"232.7 ")
+8 ;;860
+9 ;;21,"232.8 ")
+10 ;;861
+11 ;;21,"232.9 ")
+12 ;;862
+13 ;;21,"233 ")
+14 ;;863
+15 ;;21,"233.0 ")
+16 ;;864
+17 ;;21,"233.1 ")
+18 ;;865
+19 ;;21,"233.2 ")
+20 ;;866
+21 ;;21,"233.3 ")
+22 ;;867
+23 ;;21,"233.30 ")
+24 ;;868
+25 ;;21,"233.31 ")
+26 ;;869
+27 ;;21,"233.32 ")
+28 ;;870
+29 ;;21,"233.39 ")
+30 ;;871
+31 ;;21,"233.4 ")
+32 ;;872
+33 ;;21,"233.5 ")
+34 ;;873
+35 ;;21,"233.6 ")
+36 ;;874
+37 ;;21,"233.7 ")
+38 ;;875
+39 ;;21,"233.9 ")
+40 ;;876
+41 ;;21,"234 ")
+42 ;;877
+43 ;;21,"234.0 ")
+44 ;;878
+45 ;;21,"234.8 ")
+46 ;;879
+47 ;;21,"234.9 ")
+48 ;;880
+49 ;;21,"235 ")
+50 ;;881
+51 ;;21,"235.0 ")
+52 ;;882
+53 ;;21,"235.1 ")
+54 ;;883
+55 ;;21,"235.2 ")
+56 ;;884
+57 ;;21,"235.3 ")
+58 ;;885
+59 ;;21,"235.4 ")
+60 ;;886
+61 ;;21,"235.5 ")
+62 ;;887
+63 ;;21,"235.6 ")
+64 ;;888
+65 ;;21,"235.7 ")
+66 ;;889
+67 ;;21,"235.8 ")
+68 ;;890
+69 ;;21,"235.9 ")
+70 ;;891
+71 ;;21,"236 ")
+72 ;;892
+73 ;;21,"236.0 ")
+74 ;;893
+75 ;;21,"236.1 ")
+76 ;;894
+77 ;;21,"236.2 ")
+78 ;;895
+79 ;;21,"236.3 ")
+80 ;;896
+81 ;;21,"236.4 ")
+82 ;;897
+83 ;;21,"236.5 ")
+84 ;;898
+85 ;;21,"236.6 ")
+86 ;;899
+87 ;;21,"236.7 ")
+88 ;;900
+89 ;;21,"236.9 ")
+90 ;;901
+91 ;;21,"236.90 ")
+92 ;;902
+93 ;;21,"236.91 ")
+94 ;;903
+95 ;;21,"236.99 ")
+96 ;;904
+97 ;;21,"237 ")
+98 ;;905
+99 ;;21,"237.0 ")
+100 ;;906
+101 ;;21,"237.1 ")
+102 ;;907
+103 ;;21,"237.2 ")
+104 ;;908
+105 ;;21,"237.3 ")
+106 ;;909
+107 ;;21,"237.4 ")
+108 ;;910
+109 ;;21,"237.5 ")
+110 ;;911
+111 ;;21,"237.6 ")
+112 ;;912
+113 ;;21,"237.7 ")
+114 ;;913
+115 ;;21,"237.70 ")
+116 ;;914
+117 ;;21,"237.71 ")
+118 ;;915
+119 ;;21,"237.72 ")
+120 ;;916
+121 ;;21,"237.9 ")
+122 ;;917
+123 ;;21,"238 ")
+124 ;;918
+125 ;;21,"238.0 ")
+126 ;;919
+127 ;;21,"238.1 ")
+128 ;;920
+129 ;;21,"238.2 ")
+130 ;;921
+131 ;;21,"238.3 ")
+132 ;;922
+133 ;;21,"238.4 ")
+134 ;;923
+135 ;;21,"238.5 ")
+136 ;;924
+137 ;;21,"238.6 ")
+138 ;;925
+139 ;;21,"238.7 ")
+140 ;;926
+141 ;;21,"238.71 ")
+142 ;;927
+143 ;;21,"238.72 ")
+144 ;;928
+145 ;;21,"238.73 ")
+146 ;;929
+147 ;;21,"238.74 ")
+148 ;;930
+149 ;;21,"238.75 ")
+150 ;;931
+151 ;;21,"238.76 ")
+152 ;;932
+153 ;;21,"238.77 ")
+154 ;;933
+155 ;;21,"238.79 ")
+156 ;;934
+157 ;;21,"238.8 ")
+158 ;;935
+159 ;;21,"238.9 ")
+160 ;;936
+161 ;;21,"239 ")
+162 ;;937
+163 ;;21,"239.0 ")
+164 ;;938
+165 ;;21,"239.1 ")
+166 ;;939
+167 ;;21,"239.2 ")
+168 ;;940
+169 ;;21,"239.3 ")
+170 ;;941
+171 ;;21,"239.4 ")
+172 ;;942
+173 ;;21,"239.5 ")
+174 ;;943
+175 ;;21,"239.6 ")
+176 ;;944
+177 ;;21,"239.7 ")
+178 ;;945
+179 ;;21,"239.8 ")
+180 ;;946
+181 ;;21,"239.9 ")
+182 ;;947
+183 ;;21,"V10 ")
+184 ;;948
+185 ;;21,"V10.0 ")
+186 ;;949
+187 ;;21,"V10.00 ")
+188 ;;950
+189 ;;21,"V10.01 ")
+190 ;;951
+191 ;;21,"V10.02 ")
+192 ;;952
+193 ;;21,"V10.03 ")
+194 ;;953
+195 ;;21,"V10.04 ")
+196 ;;954
+197 ;;21,"V10.05 ")
+198 ;;955
+199 ;;21,"V10.06 ")
+200 ;;956
+201 ;;21,"V10.07 ")
+202 ;;957
+203 ;;21,"V10.09 ")
+204 ;;958
+205 ;;21,"V10.1 ")
+206 ;;959
+207 ;;21,"V10.11 ")
+208 ;;960
+209 ;;21,"V10.12 ")
+210 ;;961
+211 ;;21,"V10.2 ")
+212 ;;962
+213 ;;21,"V10.20 ")
+214 ;;963
+215 ;;21,"V10.21 ")
+216 ;;964
+217 ;;21,"V10.22 ")
+218 ;;965
+219 ;;21,"V10.29 ")
+220 ;;966
+221 ;;21,"V10.3 ")
+222 ;;967
+223 ;;21,"V10.4 ")
+224 ;;968
+225 ;;21,"V10.40 ")
+226 ;;969
+227 ;;21,"V10.41 ")
+228 ;;970
+229 ;;21,"V10.42 ")
+230 ;;971
+231 ;;21,"V10.43 ")
+232 ;;972
+233 ;;21,"V10.44 ")
+234 ;;973
+235 ;;21,"V10.45 ")
+236 ;;974
+237 ;;21,"V10.46 ")
+238 ;;975
+239 ;;21,"V10.47 ")
+240 ;;976
+241 ;;21,"V10.48 ")
+242 ;;977
+243 ;;21,"V10.49 ")
+244 ;;978
+245 ;;21,"V10.5 ")
+246 ;;979
+247 ;;21,"V10.50 ")
+248 ;;980
+249 ;;21,"V10.51 ")
+250 ;;981
+251 ;;21,"V10.52 ")
+252 ;;982
+253 ;;21,"V10.53 ")
+254 ;;983
+255 ;;21,"V10.59 ")
+256 ;;984
+257 ;;21,"V10.6 ")
+258 ;;985
+259 ;;21,"V10.60 ")
+260 ;;986
+261 ;;21,"V10.61 ")
+262 ;;987
+263 ;;21,"V10.62 ")
+264 ;;988
+265 ;;21,"V10.63 ")
+266 ;;989
+267 ;;21,"V10.69 ")
+268 ;;990
+269 ;;21,"V10.7 ")
+270 ;;991
+271 ;;21,"V10.71 ")
+272 ;;992
+273 ;;21,"V10.72 ")
+274 ;;993
+275 ;;21,"V10.79 ")
+276 ;;994
+277 ;;21,"V10.8 ")
+278 ;;995
+279 ;;21,"V10.81 ")
+280 ;;996
+281 ;;21,"V10.82 ")
+282 ;;997
+283 ;;21,"V10.83 ")
+284 ;;998
+285 ;;21,"V10.84 ")
+286 ;;999
+287 ;;21,"V10.85 ")
+288 ;;1000
+289 ;;21,"V10.86 ")
+290 ;;1001
+291 ;;21,"V10.87 ")
+292 ;;1002
+293 ;;21,"V10.88 ")
+294 ;;1003
+295 ;;21,"V10.89 ")
+296 ;;1004
+297 ;;21,"V10.9 ")
+298 ;;1005
+299 ;;9002226,992,.01)
+300 ;;BGPMU CANCER DX
+301 ;;9002226,992,.02)
+302 ;;Cancer Diagnosis codes
+303 ;;9002226,992,.04)
+304 ;;@
+305 ;;9002226,992,.06)
+306 ;;@
+307 ;;9002226,992,.08)
+308 ;;@
+309 ;;9002226,992,.09)
+310 ;;@
+311 ;;9002226,992,.11)
+312 ;;@
+313 ;;9002226,992,.12)
+314 ;;@
+315 ;;9002226,992,.13)
+316 ;;@
+317 ;;9002226,992,.14)
+318 ;;@
+319 ;;9002226,992,.15)
+320 ;;80
+321 ;;9002226,992,.16)
+322 ;;@
+323 ;;9002226,992,.17)
+324 ;;@
+325 ;;9002226,992,3101)
+326 ;;@
+327 ;;9002226.02101,"992,140.0 ",.01)
+328 ;;140.0
+329 ;;9002226.02101,"992,140.0 ",.02)
+330 ;;140.0
+331 ;;9002226.02101,"992,140.1 ",.01)
+332 ;;140.1
+333 ;;9002226.02101,"992,140.1 ",.02)
+334 ;;140.1
+335 ;;9002226.02101,"992,140.3 ",.01)
+336 ;;140.3
+337 ;;9002226.02101,"992,140.3 ",.02)
+338 ;;140.3
+339 ;;9002226.02101,"992,140.4 ",.01)
+340 ;;140.4
+341 ;;9002226.02101,"992,140.4 ",.02)
+342 ;;140.4
+343 ;;9002226.02101,"992,140.5 ",.01)
+344 ;;140.5
+345 ;;9002226.02101,"992,140.5 ",.02)
+346 ;;140.5
+347 ;;9002226.02101,"992,140.6 ",.01)
+348 ;;140.6
+349 ;;9002226.02101,"992,140.6 ",.02)
+350 ;;140.6
+351 ;;9002226.02101,"992,140.8 ",.01)
+352 ;;140.8
+353 ;;9002226.02101,"992,140.8 ",.02)
+354 ;;140.8
+355 ;;9002226.02101,"992,140.9 ",.01)
+356 ;;140.9
+357 ;;9002226.02101,"992,140.9 ",.02)
+358 ;;140.9
+359 ;;9002226.02101,"992,141 ",.01)
+360 ;;141
+361 ;;9002226.02101,"992,141 ",.02)
+362 ;;141
+363 ;;9002226.02101,"992,141.0 ",.01)
+364 ;;141.0
+365 ;;9002226.02101,"992,141.0 ",.02)
+366 ;;141.0
+367 ;;9002226.02101,"992,141.1 ",.01)
+368 ;;141.1
+369 ;;9002226.02101,"992,141.1 ",.02)
+370 ;;141.1
+371 ;;9002226.02101,"992,141.2 ",.01)
+372 ;;141.2
+373 ;;9002226.02101,"992,141.2 ",.02)
+374 ;;141.2
+375 ;;9002226.02101,"992,141.3 ",.01)
+376 ;;141.3
+377 ;;9002226.02101,"992,141.3 ",.02)
+378 ;;141.3
+379 ;;9002226.02101,"992,141.4 ",.01)
+380 ;;141.4
+381 ;;9002226.02101,"992,141.4 ",.02)
+382 ;;141.4
+383 ;;9002226.02101,"992,141.5 ",.01)
+384 ;;141.5
+385 ;;9002226.02101,"992,141.5 ",.02)
+386 ;;141.5
+387 ;;9002226.02101,"992,141.6 ",.01)
+388 ;;141.6
+389 ;;9002226.02101,"992,141.6 ",.02)
+390 ;;141.6
+391 ;;9002226.02101,"992,141.8 ",.01)
+392 ;;141.8
+393 ;;9002226.02101,"992,141.8 ",.02)
+394 ;;141.8
+395 ;;9002226.02101,"992,141.9 ",.01)
+396 ;;141.9
+397 ;;9002226.02101,"992,141.9 ",.02)
+398 ;;141.9
+399 ;;9002226.02101,"992,142 ",.01)
+400 ;;142
+401 ;;9002226.02101,"992,142 ",.02)
+402 ;;142
+403 ;;9002226.02101,"992,142.0 ",.01)
+404 ;;142.0
+405 ;;9002226.02101,"992,142.0 ",.02)
+406 ;;142.0
+407 ;;9002226.02101,"992,142.1 ",.01)
+408 ;;142.1
+409 ;;9002226.02101,"992,142.1 ",.02)
+410 ;;142.1
+411 ;;9002226.02101,"992,142.2 ",.01)
+412 ;;142.2
+413 ;;9002226.02101,"992,142.2 ",.02)
+414 ;;142.2
+415 ;;9002226.02101,"992,142.8 ",.01)
+416 ;;142.8
+417 ;;9002226.02101,"992,142.8 ",.02)
+418 ;;142.8
+419 ;;9002226.02101,"992,142.9 ",.01)
+420 ;;142.9
+421 ;;9002226.02101,"992,142.9 ",.02)
+422 ;;142.9
+423 ;;9002226.02101,"992,143 ",.01)
+424 ;;143
+425 ;;9002226.02101,"992,143 ",.02)
+426 ;;143
+427 ;;9002226.02101,"992,143.0 ",.01)
+428 ;;143.0
+429 ;;9002226.02101,"992,143.0 ",.02)
+430 ;;143.0
+431 ;;9002226.02101,"992,143.1 ",.01)
+432 ;;143.1
+433 ;;9002226.02101,"992,143.1 ",.02)
+434 ;;143.1
+435 ;;9002226.02101,"992,143.8 ",.01)
+436 ;;143.8
+437 ;;9002226.02101,"992,143.8 ",.02)
+438 ;;143.8
+439 ;;9002226.02101,"992,143.9 ",.01)
+440 ;;143.9
+441 ;;9002226.02101,"992,143.9 ",.02)
+442 ;;143.9
+443 ;;9002226.02101,"992,144 ",.01)
+444 ;;144
+445 ;;9002226.02101,"992,144 ",.02)
+446 ;;144
+447 ;;9002226.02101,"992,144.0 ",.01)
+448 ;;144.0
+449 ;;9002226.02101,"992,144.0 ",.02)
+450 ;;144.0
+451 ;;9002226.02101,"992,144.1 ",.01)
+452 ;;144.1
+453 ;;9002226.02101,"992,144.1 ",.02)
+454 ;;144.1
+455 ;;9002226.02101,"992,144.8 ",.01)
+456 ;;144.8
+457 ;;9002226.02101,"992,144.8 ",.02)
+458 ;;144.8
+459 ;;9002226.02101,"992,144.9 ",.01)
+460 ;;144.9
+461 ;;9002226.02101,"992,144.9 ",.02)
+462 ;;144.9
+463 ;;9002226.02101,"992,145 ",.01)
+464 ;;145
+465 ;;9002226.02101,"992,145 ",.02)
+466 ;;145
+467 ;;9002226.02101,"992,145.0 ",.01)
+468 ;;145.0
+469 ;;9002226.02101,"992,145.0 ",.02)
+470 ;;145.0
+471 ;;9002226.02101,"992,145.1 ",.01)
+472 ;;145.1
+473 ;;9002226.02101,"992,145.1 ",.02)
+474 ;;145.1
+475 ;;9002226.02101,"992,145.2 ",.01)
+476 ;;145.2
+477 ;;9002226.02101,"992,145.2 ",.02)
+478 ;;145.2
+479 ;;9002226.02101,"992,145.3 ",.01)
+480 ;;145.3
+481 ;;9002226.02101,"992,145.3 ",.02)
+482 ;;145.3
+483 ;;9002226.02101,"992,145.4 ",.01)
+484 ;;145.4
+485 ;;9002226.02101,"992,145.4 ",.02)
+486 ;;145.4
+487 ;;9002226.02101,"992,145.5 ",.01)
+488 ;;145.5
+489 ;;9002226.02101,"992,145.5 ",.02)
+490 ;;145.5
+491 ;;9002226.02101,"992,145.6 ",.01)
+492 ;;145.6
+493 ;;9002226.02101,"992,145.6 ",.02)
+494 ;;145.6
+495 ;;9002226.02101,"992,145.8 ",.01)
+496 ;;145.8
+497 ;;9002226.02101,"992,145.8 ",.02)
+498 ;;145.8
+499 ;;9002226.02101,"992,145.9 ",.01)
+500 ;;145.9
+501 ;;9002226.02101,"992,145.9 ",.02)
+502 ;;145.9
+503 ;;9002226.02101,"992,146 ",.01)
+504 ;;146
+505 ;;9002226.02101,"992,146 ",.02)
+506 ;;146
+507 ;;9002226.02101,"992,146.0 ",.01)
+508 ;;146.0
+509 ;;9002226.02101,"992,146.0 ",.02)
+510 ;;146.0
+511 ;;9002226.02101,"992,146.1 ",.01)
+512 ;;146.1
+513 ;;9002226.02101,"992,146.1 ",.02)
+514 ;;146.1
+515 ;;9002226.02101,"992,146.2 ",.01)
+516 ;;146.2
+517 ;;9002226.02101,"992,146.2 ",.02)
+518 ;;146.2
+519 ;;9002226.02101,"992,146.3 ",.01)
+520 ;;146.3
+521 ;;9002226.02101,"992,146.3 ",.02)
+522 ;;146.3
+523 ;;9002226.02101,"992,146.4 ",.01)
+524 ;;146.4
+525 ;;9002226.02101,"992,146.4 ",.02)
+526 ;;146.4
+527 ;;9002226.02101,"992,146.5 ",.01)
+528 ;;146.5
+529 ;;9002226.02101,"992,146.5 ",.02)
+530 ;;146.5
+531 ;;9002226.02101,"992,146.6 ",.01)
+532 ;;146.6
+533 ;;9002226.02101,"992,146.6 ",.02)
+534 ;;146.6
+535 ;;9002226.02101,"992,146.7 ",.01)
+536 ;;146.7
+537 ;;9002226.02101,"992,146.7 ",.02)
+538 ;;146.7
+539 ;;9002226.02101,"992,146.8 ",.01)
+540 ;;146.8
+541 ;;9002226.02101,"992,146.8 ",.02)
+542 ;;146.8
+543 ;;9002226.02101,"992,146.9 ",.01)
+544 ;;146.9
+545 ;;9002226.02101,"992,146.9 ",.02)
+546 ;;146.9
+547 ;;9002226.02101,"992,147 ",.01)
+548 ;;147
+549 ;;9002226.02101,"992,147 ",.02)
+550 ;;147
+551 ;;9002226.02101,"992,147.0 ",.01)
+552 ;;147.0
+553 ;;9002226.02101,"992,147.0 ",.02)
+554 ;;147.0
+555 ;;9002226.02101,"992,147.1 ",.01)
+556 ;;147.1
+557 ;;9002226.02101,"992,147.1 ",.02)
+558 ;;147.1
+559 ;;9002226.02101,"992,147.2 ",.01)
+560 ;;147.2
+561 ;;9002226.02101,"992,147.2 ",.02)
+562 ;;147.2
+563 ;;9002226.02101,"992,147.3 ",.01)
+564 ;;147.3
+565 ;;9002226.02101,"992,147.3 ",.02)
+566 ;;147.3
+567 ;;9002226.02101,"992,147.8 ",.01)
+568 ;;147.8
+569 ;;9002226.02101,"992,147.8 ",.02)
+570 ;;147.8
+571 ;;9002226.02101,"992,147.9 ",.01)
+572 ;;147.9
+573 ;;9002226.02101,"992,147.9 ",.02)
+574 ;;147.9
+575 ;;9002226.02101,"992,148 ",.01)
+576 ;;148
+577 ;;9002226.02101,"992,148 ",.02)
+578 ;;148
+579 ;;9002226.02101,"992,148.0 ",.01)
+580 ;;148.0
+581 ;;9002226.02101,"992,148.0 ",.02)
+582 ;;148.0
+583 ;;9002226.02101,"992,148.1 ",.01)
+584 ;;148.1
+585 ;;9002226.02101,"992,148.1 ",.02)
+586 ;;148.1
+587 ;;9002226.02101,"992,148.2 ",.01)
+588 ;;148.2
+589 ;;9002226.02101,"992,148.2 ",.02)
+590 ;;148.2
+591 ;;9002226.02101,"992,148.3 ",.01)
+592 ;;148.3
+593 ;;9002226.02101,"992,148.3 ",.02)
+594 ;;148.3
+595 ;;9002226.02101,"992,148.8 ",.01)
+596 ;;148.8
+597 ;;9002226.02101,"992,148.8 ",.02)
+598 ;;148.8
+599 ;;9002226.02101,"992,148.9 ",.01)
+600 ;;148.9
+601 ;;9002226.02101,"992,148.9 ",.02)
+602 ;;148.9
+603 ;;9002226.02101,"992,149 ",.01)
+604 ;;149
+605 ;;9002226.02101,"992,149 ",.02)
+606 ;;149
+607 ;;9002226.02101,"992,149.0 ",.01)
+608 ;;149.0
+609 ;;9002226.02101,"992,149.0 ",.02)
+610 ;;149.0
+611 ;;9002226.02101,"992,149.1 ",.01)
+612 ;;149.1
+613 ;;9002226.02101,"992,149.1 ",.02)
+614 ;;149.1
+615 ;;9002226.02101,"992,149.8 ",.01)
+616 ;;149.8
+617 ;;9002226.02101,"992,149.8 ",.02)
+618 ;;149.8
+619 ;;9002226.02101,"992,149.9 ",.01)
+620 ;;149.9
+621 ;;9002226.02101,"992,149.9 ",.02)
+622 ;;149.9
+623 ;;9002226.02101,"992,150 ",.01)
+624 ;;150
+625 ;;9002226.02101,"992,150 ",.02)
+626 ;;150
+627 ;;9002226.02101,"992,150.0 ",.01)
+628 ;;150.0
+629 ;;9002226.02101,"992,150.0 ",.02)
+630 ;;150.0
+631 ;;9002226.02101,"992,150.1 ",.01)
+632 ;;150.1
+633 ;;9002226.02101,"992,150.1 ",.02)
+634 ;;150.1
+635 ;;9002226.02101,"992,150.2 ",.01)
+636 ;;150.2
+637 ;;9002226.02101,"992,150.2 ",.02)
+638 ;;150.2
+639 ;;9002226.02101,"992,150.3 ",.01)
+640 ;;150.3
+641 ;;9002226.02101,"992,150.3 ",.02)
+642 ;;150.3
