BGP03B3 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON MAY 23, 2010;
;;10.0;IHS CLINICAL REPORTING;;JUN 18, 2010
;
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,"510.9 ")
;;991
;;21,"511.0 ")
;;992
;;21,"511.1 ")
;;993
;;21,"511.8 ")
;;994
;;21,"511.9 ")
;;995
;;21,"513.0 ")
;;996
;;21,"513.1 ")
;;997
;;21,"540.0 ")
;;998
;;21,"540.1 ")
;;999
;;21,"540.9 ")
;;1000
;;21,"541 ")
;;1001
;;21,"542 ")
;;1002
;;21,"562.01 ")
;;1003
;;21,"562.11 ")
;;1004
;;21,"562.13 ")
;;1005
;;21,"566 ")
;;1006
;;21,"567.21 ")
;;1007
;;21,"567.22 ")
;;1008
;;21,"567.23 ")
;;1009
;;21,"567.29 ")
;;1010
;;21,"567.31 ")
;;1011
;;21,"567.38 ")
;;1012
;;21,"567.39 ")
;;1013
;;21,"567.81 ")
;;1014
;;21,"567.82 ")
;;1015
;;21,"567.89 ")
;;1016
;;21,"567.9 ")
;;1017
;;21,"569.5 ")
;;1018
;;21,"569.61 ")
;;1019
;;21,"575.0 ")
;;1020
;;21,"590.00 ")
;;1021
;;21,"590.01 ")
;;1022
;;21,"590.10 ")
;;1023
;;21,"590.11 ")
;;1024
;;21,"590.2 ")
;;1025
;;21,"590.3 ")
;;1026
;;21,"590.80 ")
;;1027
;;21,"590.81 ")
;;1028
;;21,"590.9 ")
;;1029
;;21,"595.0 ")
;;1030
;;21,"599.0 ")
;;1031
;;21,"601.0 ")
;;1032
;;21,"601.1 ")
;;1033
;;21,"601.2 ")
;;1034
;;21,"601.3 ")
;;1035
;;21,"601.4 ")
;;1036
;;21,"601.8 ")
;;1037
;;21,"601.9 ")
;;1038
;;21,"608.83 ")
;;1039
;;21,"614.0 ")
;;1040
;;21,"616.0 ")
;;1041
;;21,"616.10 ")
;;1042
;;21,"616.11 ")
;;1043
;;21,"616.2 ")
;;1044
;;21,"616.3 ")
;;1045
;;21,"616.4 ")
;;1046
;;21,"639.0 ")
;;1047
;;21,"646.60 ")
;;1048
;;21,"646.61 ")
;;1049
;;21,"646.62 ")
;;1050
;;21,"646.63 ")
;;1051
;;21,"646.64 ")
;;1052
;;21,"670.00 ")
;;1053
;;21,"670.02 ")
;;1054
;;21,"670.04 ")
;;1055
;;21,"674.30 ")
;;1056
;;21,"674.32 ")
;;1057
;;21,"674.34 ")
;;1058
;;21,"680.0 ")
;;1059
;;21,"681.00 ")
;;1060
;;21,"682.0 ")
;;1061
;;21,"683 ")
;;1062
;;21,"684 ")
;;1063
;;21,"685.0 ")
;;1064
;;21,"685.1 ")
;;1065
;;21,"686.0 ")
;;1066
;;21,"711.90 ")
;;1067
;;21,"730.00 ")
;;1068
;;21,"785.52 ")
;;1069
;;21,"785.59 ")
;;1070
;;21,"790.7 ")
;;1071
;;21,"996.6 ")
;;1072
;;21,"998.51 ")
;;1073
;;21,"998.59 ")
;;1074
;;9002226,843,.01)
;;BGP CMS INFECTIOUS DXS
;;9002226,843,.02)
;;@
;;9002226,843,.04)
;;n
;;9002226,843,.06)
;;@
;;9002226,843,.08)
;;0
;;9002226,843,.09)
;;3090325
;;9002226,843,.11)
;;@
;;9002226,843,.12)
;;31
;;9002226,843,.13)
;;1
;;9002226,843,.14)
;;@
;;9002226,843,.15)
;;80
;;9002226,843,.16)
;;@
;;9002226,843,.17)
;;@
;;9002226,843,3101)
;;@
;;9002226.02101,"843,001.0 ",.01)
;;001.0
;;9002226.02101,"843,001.0 ",.02)
;;002.9
;;9002226.02101,"843,003.0 ",.01)
;;003.0
;;9002226.02101,"843,003.0 ",.02)
;;006.9
;;9002226.02101,"843,007.0 ",.01)
;;007.0
;;9002226.02101,"843,007.0 ",.02)
;;007.0
;;9002226.02101,"843,007.1 ",.01)
;;007.1
;;9002226.02101,"843,007.1 ",.02)
;;007.1
;;9002226.02101,"843,007.2 ",.01)
;;007.2
;;9002226.02101,"843,007.2 ",.02)
;;007.2
;;9002226.02101,"843,007.3 ",.01)
;;007.3
;;9002226.02101,"843,007.3 ",.02)
;;007.3
;;9002226.02101,"843,007.4 ",.01)
;;007.4
;;9002226.02101,"843,007.4 ",.02)
;;007.4
;;9002226.02101,"843,007.5 ",.01)
;;007.5
;;9002226.02101,"843,007.5 ",.02)
;;007.5
;;9002226.02101,"843,007.8 ",.01)
;;007.8
;;9002226.02101,"843,007.8 ",.02)
;;007.8
;;9002226.02101,"843,007.9 ",.01)
;;007.9
;;9002226.02101,"843,007.9 ",.02)
;;007.9
;;9002226.02101,"843,008.00 ",.01)
;;008.00
;;9002226.02101,"843,008.00 ",.02)
;;008.00
;;9002226.02101,"843,008.01 ",.01)
;;008.01
;;9002226.02101,"843,008.01 ",.02)
;;008.01
;;9002226.02101,"843,008.02 ",.01)
;;008.02
;;9002226.02101,"843,008.02 ",.02)
;;008.02
;;9002226.02101,"843,008.03 ",.01)
;;008.03
;;9002226.02101,"843,008.03 ",.02)
;;008.03
;;9002226.02101,"843,008.04 ",.01)
;;008.04
;;9002226.02101,"843,008.04 ",.02)
;;008.04
;;9002226.02101,"843,008.09 ",.01)
;;008.09
;;9002226.02101,"843,008.09 ",.02)
;;008.09
;;9002226.02101,"843,008.1 ",.01)
;;008.1
;;9002226.02101,"843,008.1 ",.02)
;;008.1
;;9002226.02101,"843,008.2 ",.01)
;;008.2
;;9002226.02101,"843,008.2 ",.02)
;;008.2
;;9002226.02101,"843,008.3 ",.01)
;;008.3
;;9002226.02101,"843,008.3 ",.02)
;;008.3
;;9002226.02101,"843,008.41 ",.01)
;;008.41
;;9002226.02101,"843,008.41 ",.02)
;;008.41
;;9002226.02101,"843,008.42 ",.01)
;;008.42
;;9002226.02101,"843,008.42 ",.02)
;;008.42
;;9002226.02101,"843,008.43 ",.01)
;;008.43
;;9002226.02101,"843,008.43 ",.02)
;;008.43
;;9002226.02101,"843,008.44 ",.01)
;;008.44
;;9002226.02101,"843,008.44 ",.02)
;;008.44
;;9002226.02101,"843,008.45 ",.01)
;;008.45
;;9002226.02101,"843,008.45 ",.02)
;;008.45
;;9002226.02101,"843,008.46 ",.01)
;;008.46
;;9002226.02101,"843,008.46 ",.02)
;;008.46
;;9002226.02101,"843,008.47 ",.01)
;;008.47
;;9002226.02101,"843,008.47 ",.02)
;;008.47
;;9002226.02101,"843,008.49 ",.01)
;;008.49
;;9002226.02101,"843,008.49 ",.02)
;;008.49
;;9002226.02101,"843,008.5 ",.01)
;;008.5
;;9002226.02101,"843,008.5 ",.02)
;;008.5
;;9002226.02101,"843,008.8 ",.01)
;;008.8
;;9002226.02101,"843,008.8 ",.02)
;;008.8
;;9002226.02101,"843,009.0 ",.01)
;;009.0
;;9002226.02101,"843,009.0 ",.02)
;;009.0
;;9002226.02101,"843,009.1 ",.01)
;;009.1
;;9002226.02101,"843,009.1 ",.02)
;;009.1
;;9002226.02101,"843,009.2 ",.01)
;;009.2
;;9002226.02101,"843,009.2 ",.02)
;;009.2
;;9002226.02101,"843,009.3 ",.01)
;;009.3
;;9002226.02101,"843,009.3 ",.02)
;;009.3
;;9002226.02101,"843,010.00 ",.01)
;;010.00
;;9002226.02101,"843,010.00 ",.02)
;;010.00
;;9002226.02101,"843,010.01 ",.01)
;;010.01
;;9002226.02101,"843,010.01 ",.02)
;;010.01
;;9002226.02101,"843,010.02 ",.01)
;;010.02
;;9002226.02101,"843,010.02 ",.02)
;;010.02
;;9002226.02101,"843,010.03 ",.01)
;;010.03
;;9002226.02101,"843,010.03 ",.02)
;;010.03
;;9002226.02101,"843,010.04 ",.01)
;;010.04
;;9002226.02101,"843,010.04 ",.02)
;;010.04
;;9002226.02101,"843,010.05 ",.01)
;;010.05
;;9002226.02101,"843,010.05 ",.02)
;;010.05
;;9002226.02101,"843,010.06 ",.01)
;;010.06
;;9002226.02101,"843,010.06 ",.02)
;;010.06
;;9002226.02101,"843,010.10 ",.01)
;;010.10
;;9002226.02101,"843,010.10 ",.02)
;;010.10
;;9002226.02101,"843,010.11 ",.01)
;;010.11
;;9002226.02101,"843,010.11 ",.02)
;;010.11
;;9002226.02101,"843,010.12 ",.01)
;;010.12
;;9002226.02101,"843,010.12 ",.02)
;;010.12
;;9002226.02101,"843,010.13 ",.01)
;;010.13
;;9002226.02101,"843,010.13 ",.02)
;;010.13
;;9002226.02101,"843,010.14 ",.01)
;;010.14
;;9002226.02101,"843,010.14 ",.02)
;;010.14
;;9002226.02101,"843,010.15 ",.01)
;;010.15
;;9002226.02101,"843,010.15 ",.02)
;;010.15
;;9002226.02101,"843,010.16 ",.01)
;;010.16
;;9002226.02101,"843,010.16 ",.02)
;;010.16
;;9002226.02101,"843,010.80 ",.01)
;;010.80
;;9002226.02101,"843,010.80 ",.02)
;;010.80
;;9002226.02101,"843,010.81 ",.01)
;;010.81
;;9002226.02101,"843,010.81 ",.02)
;;010.81
;;9002226.02101,"843,010.82 ",.01)
;;010.82
;;9002226.02101,"843,010.82 ",.02)
;;010.82
;;9002226.02101,"843,010.83 ",.01)
;;010.83
;;9002226.02101,"843,010.83 ",.02)
;;010.83
;;9002226.02101,"843,010.84 ",.01)
;;010.84
;;9002226.02101,"843,010.84 ",.02)
;;010.84
;;9002226.02101,"843,010.85 ",.01)
;;010.85
;;9002226.02101,"843,010.85 ",.02)
;;010.85
;;9002226.02101,"843,010.86 ",.01)
;;010.86
;;9002226.02101,"843,010.86 ",.02)
;;010.86
;;9002226.02101,"843,010.90 ",.01)
;;010.90
;;9002226.02101,"843,010.90 ",.02)
;;010.90
;;9002226.02101,"843,010.91 ",.01)
;;010.91
;;9002226.02101,"843,010.91 ",.02)
;;010.91
;;9002226.02101,"843,010.92 ",.01)
;;010.92
;;9002226.02101,"843,010.92 ",.02)
;;010.92
;;9002226.02101,"843,010.93 ",.01)
;;010.93
;;9002226.02101,"843,010.93 ",.02)
;;010.93
;;9002226.02101,"843,010.94 ",.01)
;;010.94
;;9002226.02101,"843,010.94 ",.02)
;;010.94
;;9002226.02101,"843,010.95 ",.01)
;;010.95
;;9002226.02101,"843,010.95 ",.02)
;;010.95
;;9002226.02101,"843,010.96 ",.01)
;;010.96
;;9002226.02101,"843,010.96 ",.02)
;;010.96
;;9002226.02101,"843,011.00 ",.01)
;;011.00
;;9002226.02101,"843,011.00 ",.02)
;;011.00
;;9002226.02101,"843,011.01 ",.01)
;;011.01
;;9002226.02101,"843,011.01 ",.02)
;;011.01
;;9002226.02101,"843,011.02 ",.01)
;;011.02
;;9002226.02101,"843,011.02 ",.02)
;;011.02
;;9002226.02101,"843,011.03 ",.01)
;;011.03
;;9002226.02101,"843,011.03 ",.02)
;;011.03
;;9002226.02101,"843,011.04 ",.01)
;;011.04
;;9002226.02101,"843,011.04 ",.02)
;;011.04
;;9002226.02101,"843,011.05 ",.01)
;;011.05
;;9002226.02101,"843,011.05 ",.02)
;;011.05
;;9002226.02101,"843,011.06 ",.01)
;;011.06
;;9002226.02101,"843,011.06 ",.02)
;;011.06
;;9002226.02101,"843,011.10 ",.01)
;;011.10
;;9002226.02101,"843,011.10 ",.02)
;;011.10
;;9002226.02101,"843,011.11 ",.01)
;;011.11
;;9002226.02101,"843,011.11 ",.02)
;;011.11
;;9002226.02101,"843,011.12 ",.01)
;;011.12
;;9002226.02101,"843,011.12 ",.02)
;;011.12
;;9002226.02101,"843,011.13 ",.01)
;;011.13
;;9002226.02101,"843,011.13 ",.02)
;;011.13
;;9002226.02101,"843,011.14 ",.01)
;;011.14
;;9002226.02101,"843,011.14 ",.02)
;;011.14
;;9002226.02101,"843,011.15 ",.01)
;;011.15
;;9002226.02101,"843,011.15 ",.02)
;;011.15
;;9002226.02101,"843,011.16 ",.01)
;;011.16
;;9002226.02101,"843,011.16 ",.02)
;;011.16
;;9002226.02101,"843,011.20 ",.01)
;;011.20
;;9002226.02101,"843,011.20 ",.02)
;;011.20
;;9002226.02101,"843,011.21 ",.01)
;;011.21
;;9002226.02101,"843,011.21 ",.02)
;;011.21
;;9002226.02101,"843,011.22 ",.01)
;;011.22
;;9002226.02101,"843,011.22 ",.02)
;;011.22
;;9002226.02101,"843,011.23 ",.01)
;;011.23
;;9002226.02101,"843,011.23 ",.02)
;;011.23
;;9002226.02101,"843,011.24 ",.01)
;;011.24
;;9002226.02101,"843,011.24 ",.02)
;;011.24
;;9002226.02101,"843,011.25 ",.01)
;;011.25
;;9002226.02101,"843,011.25 ",.02)
;;011.25
;;9002226.02101,"843,011.26 ",.01)
;;011.26
;;9002226.02101,"843,011.26 ",.02)
;;011.26
;;9002226.02101,"843,011.30 ",.01)
;;011.30
;;9002226.02101,"843,011.30 ",.02)
;;011.30
;;9002226.02101,"843,011.31 ",.01)
;;011.31
;;9002226.02101,"843,011.31 ",.02)
;;011.31
;;9002226.02101,"843,011.32 ",.01)
;;011.32
;;9002226.02101,"843,011.32 ",.02)
;;011.32
;;9002226.02101,"843,011.33 ",.01)
;;011.33
;;9002226.02101,"843,011.33 ",.02)
;;011.33
;;9002226.02101,"843,011.34 ",.01)
;;011.34
;;9002226.02101,"843,011.34 ",.02)
;;011.34
;;9002226.02101,"843,011.35 ",.01)
;;011.35
;;9002226.02101,"843,011.35 ",.02)
;;011.35
;;9002226.02101,"843,011.36 ",.01)
;;011.36
;;9002226.02101,"843,011.36 ",.02)
;;011.36
;;9002226.02101,"843,011.40 ",.01)
;;011.40
;;9002226.02101,"843,011.40 ",.02)
;;011.40
;;9002226.02101,"843,011.41 ",.01)
;;011.41
;;9002226.02101,"843,011.41 ",.02)
;;011.41
;;9002226.02101,"843,011.42 ",.01)
;;011.42
;;9002226.02101,"843,011.42 ",.02)
;;011.42
;;9002226.02101,"843,011.43 ",.01)
;;011.43
;;9002226.02101,"843,011.43 ",.02)
;;011.43
;;9002226.02101,"843,011.44 ",.01)
;;011.44
;;9002226.02101,"843,011.44 ",.02)
;;011.44
;;9002226.02101,"843,011.45 ",.01)
;;011.45
;;9002226.02101,"843,011.45 ",.02)
;;011.45
;;9002226.02101,"843,011.46 ",.01)
;;011.46
;;9002226.02101,"843,011.46 ",.02)
;;011.46
;;9002226.02101,"843,011.50 ",.01)
;;011.50
;;9002226.02101,"843,011.50 ",.02)
;;011.50
;;9002226.02101,"843,011.51 ",.01)
;;011.51
;;9002226.02101,"843,011.51 ",.02)
;;011.51
;;9002226.02101,"843,011.52 ",.01)
;;011.52
;;9002226.02101,"843,011.52 ",.02)
;;011.52
;;9002226.02101,"843,011.53 ",.01)
;;011.53
;;9002226.02101,"843,011.53 ",.02)
;;011.53
;;9002226.02101,"843,011.54 ",.01)
;;011.54
;;9002226.02101,"843,011.54 ",.02)
;;011.54
;;9002226.02101,"843,011.55 ",.01)
;;011.55
;;9002226.02101,"843,011.55 ",.02)
;;011.55
;;9002226.02101,"843,011.56 ",.01)
;;011.56
;;9002226.02101,"843,011.56 ",.02)
;;011.56
;;9002226.02101,"843,011.60 ",.01)
;;011.60
;;9002226.02101,"843,011.60 ",.02)
;;011.60
;;9002226.02101,"843,011.61 ",.01)
;;011.61
;;9002226.02101,"843,011.61 ",.02)
;;011.61
;;9002226.02101,"843,011.62 ",.01)
;;011.62
;;9002226.02101,"843,011.62 ",.02)
;;011.62
;;9002226.02101,"843,011.63 ",.01)
;;011.63
;;9002226.02101,"843,011.63 ",.02)
;;011.63
;;9002226.02101,"843,011.64 ",.01)
;;011.64
;;9002226.02101,"843,011.64 ",.02)
;;011.64
;;9002226.02101,"843,011.65 ",.01)
;;011.65
;;9002226.02101,"843,011.65 ",.02)
;;011.65
;;9002226.02101,"843,011.66 ",.01)
;;011.66
;;9002226.02101,"843,011.66 ",.02)
;;011.66
;;9002226.02101,"843,011.70 ",.01)
;;011.70
BGP03B3 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON MAY 23, 2010;
+1 ;;10.0;IHS CLINICAL REPORTING;;JUN 18, 2010
+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,"510.9 ")
+2 ;;991
+3 ;;21,"511.0 ")
+4 ;;992
+5 ;;21,"511.1 ")
+6 ;;993
+7 ;;21,"511.8 ")
+8 ;;994
+9 ;;21,"511.9 ")
+10 ;;995
+11 ;;21,"513.0 ")
+12 ;;996
+13 ;;21,"513.1 ")
+14 ;;997
+15 ;;21,"540.0 ")
+16 ;;998
+17 ;;21,"540.1 ")
+18 ;;999
+19 ;;21,"540.9 ")
+20 ;;1000
+21 ;;21,"541 ")
+22 ;;1001
+23 ;;21,"542 ")
+24 ;;1002
+25 ;;21,"562.01 ")
+26 ;;1003
+27 ;;21,"562.11 ")
+28 ;;1004
+29 ;;21,"562.13 ")
+30 ;;1005
+31 ;;21,"566 ")
+32 ;;1006
+33 ;;21,"567.21 ")
+34 ;;1007
+35 ;;21,"567.22 ")
+36 ;;1008
+37 ;;21,"567.23 ")
+38 ;;1009
+39 ;;21,"567.29 ")
+40 ;;1010
+41 ;;21,"567.31 ")
+42 ;;1011
+43 ;;21,"567.38 ")
+44 ;;1012
+45 ;;21,"567.39 ")
+46 ;;1013
+47 ;;21,"567.81 ")
+48 ;;1014
+49 ;;21,"567.82 ")
+50 ;;1015
+51 ;;21,"567.89 ")
+52 ;;1016
+53 ;;21,"567.9 ")
+54 ;;1017
+55 ;;21,"569.5 ")
+56 ;;1018
+57 ;;21,"569.61 ")
+58 ;;1019
+59 ;;21,"575.0 ")
+60 ;;1020
+61 ;;21,"590.00 ")
+62 ;;1021
+63 ;;21,"590.01 ")
+64 ;;1022
+65 ;;21,"590.10 ")
+66 ;;1023
+67 ;;21,"590.11 ")
+68 ;;1024
+69 ;;21,"590.2 ")
+70 ;;1025
+71 ;;21,"590.3 ")
+72 ;;1026
+73 ;;21,"590.80 ")
+74 ;;1027
+75 ;;21,"590.81 ")
+76 ;;1028
+77 ;;21,"590.9 ")
+78 ;;1029
+79 ;;21,"595.0 ")
+80 ;;1030
+81 ;;21,"599.0 ")
+82 ;;1031
+83 ;;21,"601.0 ")
+84 ;;1032
+85 ;;21,"601.1 ")
+86 ;;1033
+87 ;;21,"601.2 ")
+88 ;;1034
+89 ;;21,"601.3 ")
+90 ;;1035
+91 ;;21,"601.4 ")
+92 ;;1036
+93 ;;21,"601.8 ")
+94 ;;1037
+95 ;;21,"601.9 ")
+96 ;;1038
+97 ;;21,"608.83 ")
+98 ;;1039
+99 ;;21,"614.0 ")
+100 ;;1040
+101 ;;21,"616.0 ")
+102 ;;1041
+103 ;;21,"616.10 ")
+104 ;;1042
+105 ;;21,"616.11 ")
+106 ;;1043
+107 ;;21,"616.2 ")
+108 ;;1044
+109 ;;21,"616.3 ")
+110 ;;1045
+111 ;;21,"616.4 ")
+112 ;;1046
+113 ;;21,"639.0 ")
+114 ;;1047
+115 ;;21,"646.60 ")
+116 ;;1048
+117 ;;21,"646.61 ")
+118 ;;1049
+119 ;;21,"646.62 ")
+120 ;;1050
+121 ;;21,"646.63 ")
+122 ;;1051
+123 ;;21,"646.64 ")
+124 ;;1052
+125 ;;21,"670.00 ")
+126 ;;1053
+127 ;;21,"670.02 ")
+128 ;;1054
+129 ;;21,"670.04 ")
+130 ;;1055
+131 ;;21,"674.30 ")
+132 ;;1056
+133 ;;21,"674.32 ")
+134 ;;1057
+135 ;;21,"674.34 ")
+136 ;;1058
+137 ;;21,"680.0 ")
+138 ;;1059
+139 ;;21,"681.00 ")
+140 ;;1060
+141 ;;21,"682.0 ")
+142 ;;1061
+143 ;;21,"683 ")
+144 ;;1062
+145 ;;21,"684 ")
+146 ;;1063
+147 ;;21,"685.0 ")
+148 ;;1064
+149 ;;21,"685.1 ")
+150 ;;1065
+151 ;;21,"686.0 ")
+152 ;;1066
+153 ;;21,"711.90 ")
+154 ;;1067
+155 ;;21,"730.00 ")
+156 ;;1068
+157 ;;21,"785.52 ")
+158 ;;1069
+159 ;;21,"785.59 ")
+160 ;;1070
+161 ;;21,"790.7 ")
+162 ;;1071
+163 ;;21,"996.6 ")
+164 ;;1072
+165 ;;21,"998.51 ")
+166 ;;1073
+167 ;;21,"998.59 ")
+168 ;;1074
+169 ;;9002226,843,.01)
+170 ;;BGP CMS INFECTIOUS DXS
+171 ;;9002226,843,.02)
+172 ;;@
+173 ;;9002226,843,.04)
+174 ;;n
+175 ;;9002226,843,.06)
+176 ;;@
+177 ;;9002226,843,.08)
+178 ;;0
+179 ;;9002226,843,.09)
+180 ;;3090325
+181 ;;9002226,843,.11)
+182 ;;@
+183 ;;9002226,843,.12)
+184 ;;31
+185 ;;9002226,843,.13)
+186 ;;1
+187 ;;9002226,843,.14)
+188 ;;@
+189 ;;9002226,843,.15)
+190 ;;80
+191 ;;9002226,843,.16)
+192 ;;@
+193 ;;9002226,843,.17)
+194 ;;@
+195 ;;9002226,843,3101)
+196 ;;@
+197 ;;9002226.02101,"843,001.0 ",.01)
+198 ;;001.0
+199 ;;9002226.02101,"843,001.0 ",.02)
+200 ;;002.9
+201 ;;9002226.02101,"843,003.0 ",.01)
+202 ;;003.0
+203 ;;9002226.02101,"843,003.0 ",.02)
+204 ;;006.9
+205 ;;9002226.02101,"843,007.0 ",.01)
+206 ;;007.0
+207 ;;9002226.02101,"843,007.0 ",.02)
+208 ;;007.0
+209 ;;9002226.02101,"843,007.1 ",.01)
+210 ;;007.1
+211 ;;9002226.02101,"843,007.1 ",.02)
+212 ;;007.1
+213 ;;9002226.02101,"843,007.2 ",.01)
+214 ;;007.2
+215 ;;9002226.02101,"843,007.2 ",.02)
+216 ;;007.2
+217 ;;9002226.02101,"843,007.3 ",.01)
+218 ;;007.3
+219 ;;9002226.02101,"843,007.3 ",.02)
+220 ;;007.3
+221 ;;9002226.02101,"843,007.4 ",.01)
+222 ;;007.4
+223 ;;9002226.02101,"843,007.4 ",.02)
+224 ;;007.4
+225 ;;9002226.02101,"843,007.5 ",.01)
+226 ;;007.5
+227 ;;9002226.02101,"843,007.5 ",.02)
+228 ;;007.5
+229 ;;9002226.02101,"843,007.8 ",.01)
+230 ;;007.8
+231 ;;9002226.02101,"843,007.8 ",.02)
+232 ;;007.8
+233 ;;9002226.02101,"843,007.9 ",.01)
+234 ;;007.9
+235 ;;9002226.02101,"843,007.9 ",.02)
+236 ;;007.9
+237 ;;9002226.02101,"843,008.00 ",.01)
+238 ;;008.00
+239 ;;9002226.02101,"843,008.00 ",.02)
+240 ;;008.00
+241 ;;9002226.02101,"843,008.01 ",.01)
+242 ;;008.01
+243 ;;9002226.02101,"843,008.01 ",.02)
+244 ;;008.01
+245 ;;9002226.02101,"843,008.02 ",.01)
+246 ;;008.02
+247 ;;9002226.02101,"843,008.02 ",.02)
+248 ;;008.02
+249 ;;9002226.02101,"843,008.03 ",.01)
+250 ;;008.03
+251 ;;9002226.02101,"843,008.03 ",.02)
+252 ;;008.03
+253 ;;9002226.02101,"843,008.04 ",.01)
+254 ;;008.04
+255 ;;9002226.02101,"843,008.04 ",.02)
+256 ;;008.04
+257 ;;9002226.02101,"843,008.09 ",.01)
+258 ;;008.09
+259 ;;9002226.02101,"843,008.09 ",.02)
+260 ;;008.09
+261 ;;9002226.02101,"843,008.1 ",.01)
+262 ;;008.1
+263 ;;9002226.02101,"843,008.1 ",.02)
+264 ;;008.1
+265 ;;9002226.02101,"843,008.2 ",.01)
+266 ;;008.2
+267 ;;9002226.02101,"843,008.2 ",.02)
+268 ;;008.2
+269 ;;9002226.02101,"843,008.3 ",.01)
+270 ;;008.3
+271 ;;9002226.02101,"843,008.3 ",.02)
+272 ;;008.3
+273 ;;9002226.02101,"843,008.41 ",.01)
+274 ;;008.41
+275 ;;9002226.02101,"843,008.41 ",.02)
+276 ;;008.41
+277 ;;9002226.02101,"843,008.42 ",.01)
+278 ;;008.42
+279 ;;9002226.02101,"843,008.42 ",.02)
+280 ;;008.42
+281 ;;9002226.02101,"843,008.43 ",.01)
+282 ;;008.43
+283 ;;9002226.02101,"843,008.43 ",.02)
+284 ;;008.43
+285 ;;9002226.02101,"843,008.44 ",.01)
+286 ;;008.44
+287 ;;9002226.02101,"843,008.44 ",.02)
+288 ;;008.44
+289 ;;9002226.02101,"843,008.45 ",.01)
+290 ;;008.45
+291 ;;9002226.02101,"843,008.45 ",.02)
+292 ;;008.45
+293 ;;9002226.02101,"843,008.46 ",.01)
+294 ;;008.46
+295 ;;9002226.02101,"843,008.46 ",.02)
+296 ;;008.46
+297 ;;9002226.02101,"843,008.47 ",.01)
+298 ;;008.47
+299 ;;9002226.02101,"843,008.47 ",.02)
+300 ;;008.47
+301 ;;9002226.02101,"843,008.49 ",.01)
+302 ;;008.49
+303 ;;9002226.02101,"843,008.49 ",.02)
+304 ;;008.49
+305 ;;9002226.02101,"843,008.5 ",.01)
+306 ;;008.5
+307 ;;9002226.02101,"843,008.5 ",.02)
+308 ;;008.5
+309 ;;9002226.02101,"843,008.8 ",.01)
+310 ;;008.8
+311 ;;9002226.02101,"843,008.8 ",.02)
+312 ;;008.8
+313 ;;9002226.02101,"843,009.0 ",.01)
+314 ;;009.0
+315 ;;9002226.02101,"843,009.0 ",.02)
+316 ;;009.0
+317 ;;9002226.02101,"843,009.1 ",.01)
+318 ;;009.1
+319 ;;9002226.02101,"843,009.1 ",.02)
+320 ;;009.1
+321 ;;9002226.02101,"843,009.2 ",.01)
+322 ;;009.2
+323 ;;9002226.02101,"843,009.2 ",.02)
+324 ;;009.2
+325 ;;9002226.02101,"843,009.3 ",.01)
+326 ;;009.3
+327 ;;9002226.02101,"843,009.3 ",.02)
+328 ;;009.3
+329 ;;9002226.02101,"843,010.00 ",.01)
+330 ;;010.00
+331 ;;9002226.02101,"843,010.00 ",.02)
+332 ;;010.00
+333 ;;9002226.02101,"843,010.01 ",.01)
+334 ;;010.01
+335 ;;9002226.02101,"843,010.01 ",.02)
+336 ;;010.01
+337 ;;9002226.02101,"843,010.02 ",.01)
+338 ;;010.02
+339 ;;9002226.02101,"843,010.02 ",.02)
+340 ;;010.02
+341 ;;9002226.02101,"843,010.03 ",.01)
+342 ;;010.03
+343 ;;9002226.02101,"843,010.03 ",.02)
+344 ;;010.03
+345 ;;9002226.02101,"843,010.04 ",.01)
+346 ;;010.04
+347 ;;9002226.02101,"843,010.04 ",.02)
+348 ;;010.04
+349 ;;9002226.02101,"843,010.05 ",.01)
+350 ;;010.05
+351 ;;9002226.02101,"843,010.05 ",.02)
+352 ;;010.05
+353 ;;9002226.02101,"843,010.06 ",.01)
+354 ;;010.06
+355 ;;9002226.02101,"843,010.06 ",.02)
+356 ;;010.06
+357 ;;9002226.02101,"843,010.10 ",.01)
+358 ;;010.10
+359 ;;9002226.02101,"843,010.10 ",.02)
+360 ;;010.10
+361 ;;9002226.02101,"843,010.11 ",.01)
+362 ;;010.11
+363 ;;9002226.02101,"843,010.11 ",.02)
+364 ;;010.11
+365 ;;9002226.02101,"843,010.12 ",.01)
+366 ;;010.12
+367 ;;9002226.02101,"843,010.12 ",.02)
+368 ;;010.12
+369 ;;9002226.02101,"843,010.13 ",.01)
+370 ;;010.13
+371 ;;9002226.02101,"843,010.13 ",.02)
+372 ;;010.13
+373 ;;9002226.02101,"843,010.14 ",.01)
+374 ;;010.14
+375 ;;9002226.02101,"843,010.14 ",.02)
+376 ;;010.14
+377 ;;9002226.02101,"843,010.15 ",.01)
+378 ;;010.15
+379 ;;9002226.02101,"843,010.15 ",.02)
+380 ;;010.15
+381 ;;9002226.02101,"843,010.16 ",.01)
+382 ;;010.16
+383 ;;9002226.02101,"843,010.16 ",.02)
+384 ;;010.16
+385 ;;9002226.02101,"843,010.80 ",.01)
+386 ;;010.80
+387 ;;9002226.02101,"843,010.80 ",.02)
+388 ;;010.80
+389 ;;9002226.02101,"843,010.81 ",.01)
+390 ;;010.81
+391 ;;9002226.02101,"843,010.81 ",.02)
+392 ;;010.81
+393 ;;9002226.02101,"843,010.82 ",.01)
+394 ;;010.82
+395 ;;9002226.02101,"843,010.82 ",.02)
+396 ;;010.82
+397 ;;9002226.02101,"843,010.83 ",.01)
+398 ;;010.83
+399 ;;9002226.02101,"843,010.83 ",.02)
+400 ;;010.83
+401 ;;9002226.02101,"843,010.84 ",.01)
+402 ;;010.84
+403 ;;9002226.02101,"843,010.84 ",.02)
+404 ;;010.84
+405 ;;9002226.02101,"843,010.85 ",.01)
+406 ;;010.85
+407 ;;9002226.02101,"843,010.85 ",.02)
+408 ;;010.85
+409 ;;9002226.02101,"843,010.86 ",.01)
+410 ;;010.86
+411 ;;9002226.02101,"843,010.86 ",.02)
+412 ;;010.86
+413 ;;9002226.02101,"843,010.90 ",.01)
+414 ;;010.90
+415 ;;9002226.02101,"843,010.90 ",.02)
+416 ;;010.90
+417 ;;9002226.02101,"843,010.91 ",.01)
+418 ;;010.91
+419 ;;9002226.02101,"843,010.91 ",.02)
+420 ;;010.91
+421 ;;9002226.02101,"843,010.92 ",.01)
+422 ;;010.92
+423 ;;9002226.02101,"843,010.92 ",.02)
+424 ;;010.92
+425 ;;9002226.02101,"843,010.93 ",.01)
+426 ;;010.93
+427 ;;9002226.02101,"843,010.93 ",.02)
+428 ;;010.93
+429 ;;9002226.02101,"843,010.94 ",.01)
+430 ;;010.94
+431 ;;9002226.02101,"843,010.94 ",.02)
+432 ;;010.94
+433 ;;9002226.02101,"843,010.95 ",.01)
+434 ;;010.95
+435 ;;9002226.02101,"843,010.95 ",.02)
+436 ;;010.95
+437 ;;9002226.02101,"843,010.96 ",.01)
+438 ;;010.96
+439 ;;9002226.02101,"843,010.96 ",.02)
+440 ;;010.96
+441 ;;9002226.02101,"843,011.00 ",.01)
+442 ;;011.00
+443 ;;9002226.02101,"843,011.00 ",.02)
+444 ;;011.00
+445 ;;9002226.02101,"843,011.01 ",.01)
+446 ;;011.01
+447 ;;9002226.02101,"843,011.01 ",.02)
+448 ;;011.01
+449 ;;9002226.02101,"843,011.02 ",.01)
+450 ;;011.02
+451 ;;9002226.02101,"843,011.02 ",.02)
+452 ;;011.02
+453 ;;9002226.02101,"843,011.03 ",.01)
+454 ;;011.03
+455 ;;9002226.02101,"843,011.03 ",.02)
+456 ;;011.03
+457 ;;9002226.02101,"843,011.04 ",.01)
+458 ;;011.04
+459 ;;9002226.02101,"843,011.04 ",.02)
+460 ;;011.04
+461 ;;9002226.02101,"843,011.05 ",.01)
+462 ;;011.05
+463 ;;9002226.02101,"843,011.05 ",.02)
+464 ;;011.05
+465 ;;9002226.02101,"843,011.06 ",.01)
+466 ;;011.06
+467 ;;9002226.02101,"843,011.06 ",.02)
+468 ;;011.06
+469 ;;9002226.02101,"843,011.10 ",.01)
+470 ;;011.10
+471 ;;9002226.02101,"843,011.10 ",.02)
+472 ;;011.10
+473 ;;9002226.02101,"843,011.11 ",.01)
+474 ;;011.11
+475 ;;9002226.02101,"843,011.11 ",.02)
+476 ;;011.11
+477 ;;9002226.02101,"843,011.12 ",.01)
+478 ;;011.12
+479 ;;9002226.02101,"843,011.12 ",.02)
+480 ;;011.12
+481 ;;9002226.02101,"843,011.13 ",.01)
+482 ;;011.13
+483 ;;9002226.02101,"843,011.13 ",.02)
+484 ;;011.13
+485 ;;9002226.02101,"843,011.14 ",.01)
+486 ;;011.14
+487 ;;9002226.02101,"843,011.14 ",.02)
+488 ;;011.14
+489 ;;9002226.02101,"843,011.15 ",.01)
+490 ;;011.15
+491 ;;9002226.02101,"843,011.15 ",.02)
+492 ;;011.15
+493 ;;9002226.02101,"843,011.16 ",.01)
+494 ;;011.16
+495 ;;9002226.02101,"843,011.16 ",.02)
+496 ;;011.16
+497 ;;9002226.02101,"843,011.20 ",.01)
+498 ;;011.20
+499 ;;9002226.02101,"843,011.20 ",.02)
+500 ;;011.20
+501 ;;9002226.02101,"843,011.21 ",.01)
+502 ;;011.21
+503 ;;9002226.02101,"843,011.21 ",.02)
+504 ;;011.21
+505 ;;9002226.02101,"843,011.22 ",.01)
+506 ;;011.22
+507 ;;9002226.02101,"843,011.22 ",.02)
+508 ;;011.22
+509 ;;9002226.02101,"843,011.23 ",.01)
+510 ;;011.23
+511 ;;9002226.02101,"843,011.23 ",.02)
+512 ;;011.23
+513 ;;9002226.02101,"843,011.24 ",.01)
+514 ;;011.24
+515 ;;9002226.02101,"843,011.24 ",.02)
+516 ;;011.24
+517 ;;9002226.02101,"843,011.25 ",.01)
+518 ;;011.25
+519 ;;9002226.02101,"843,011.25 ",.02)
+520 ;;011.25
+521 ;;9002226.02101,"843,011.26 ",.01)
+522 ;;011.26
+523 ;;9002226.02101,"843,011.26 ",.02)
+524 ;;011.26
+525 ;;9002226.02101,"843,011.30 ",.01)
+526 ;;011.30
+527 ;;9002226.02101,"843,011.30 ",.02)
+528 ;;011.30
+529 ;;9002226.02101,"843,011.31 ",.01)
+530 ;;011.31
+531 ;;9002226.02101,"843,011.31 ",.02)
+532 ;;011.31
+533 ;;9002226.02101,"843,011.32 ",.01)
+534 ;;011.32
+535 ;;9002226.02101,"843,011.32 ",.02)
+536 ;;011.32
+537 ;;9002226.02101,"843,011.33 ",.01)
+538 ;;011.33
+539 ;;9002226.02101,"843,011.33 ",.02)
+540 ;;011.33
+541 ;;9002226.02101,"843,011.34 ",.01)
+542 ;;011.34
+543 ;;9002226.02101,"843,011.34 ",.02)
+544 ;;011.34
+545 ;;9002226.02101,"843,011.35 ",.01)
+546 ;;011.35
+547 ;;9002226.02101,"843,011.35 ",.02)
+548 ;;011.35
+549 ;;9002226.02101,"843,011.36 ",.01)
+550 ;;011.36
+551 ;;9002226.02101,"843,011.36 ",.02)
+552 ;;011.36
+553 ;;9002226.02101,"843,011.40 ",.01)
+554 ;;011.40
+555 ;;9002226.02101,"843,011.40 ",.02)
+556 ;;011.40
+557 ;;9002226.02101,"843,011.41 ",.01)
+558 ;;011.41
+559 ;;9002226.02101,"843,011.41 ",.02)
+560 ;;011.41
+561 ;;9002226.02101,"843,011.42 ",.01)
+562 ;;011.42
+563 ;;9002226.02101,"843,011.42 ",.02)
+564 ;;011.42
+565 ;;9002226.02101,"843,011.43 ",.01)
+566 ;;011.43
+567 ;;9002226.02101,"843,011.43 ",.02)
+568 ;;011.43
+569 ;;9002226.02101,"843,011.44 ",.01)
+570 ;;011.44
+571 ;;9002226.02101,"843,011.44 ",.02)
+572 ;;011.44
+573 ;;9002226.02101,"843,011.45 ",.01)
+574 ;;011.45
+575 ;;9002226.02101,"843,011.45 ",.02)
+576 ;;011.45
+577 ;;9002226.02101,"843,011.46 ",.01)
+578 ;;011.46
+579 ;;9002226.02101,"843,011.46 ",.02)
+580 ;;011.46
+581 ;;9002226.02101,"843,011.50 ",.01)
+582 ;;011.50
+583 ;;9002226.02101,"843,011.50 ",.02)
+584 ;;011.50
+585 ;;9002226.02101,"843,011.51 ",.01)
+586 ;;011.51
+587 ;;9002226.02101,"843,011.51 ",.02)
+588 ;;011.51
+589 ;;9002226.02101,"843,011.52 ",.01)
+590 ;;011.52
+591 ;;9002226.02101,"843,011.52 ",.02)
+592 ;;011.52
+593 ;;9002226.02101,"843,011.53 ",.01)
+594 ;;011.53
+595 ;;9002226.02101,"843,011.53 ",.02)
+596 ;;011.53
+597 ;;9002226.02101,"843,011.54 ",.01)
+598 ;;011.54
+599 ;;9002226.02101,"843,011.54 ",.02)
+600 ;;011.54
+601 ;;9002226.02101,"843,011.55 ",.01)
+602 ;;011.55
+603 ;;9002226.02101,"843,011.55 ",.02)
+604 ;;011.55
+605 ;;9002226.02101,"843,011.56 ",.01)
+606 ;;011.56
+607 ;;9002226.02101,"843,011.56 ",.02)
+608 ;;011.56
+609 ;;9002226.02101,"843,011.60 ",.01)
+610 ;;011.60
+611 ;;9002226.02101,"843,011.60 ",.02)
+612 ;;011.60
+613 ;;9002226.02101,"843,011.61 ",.01)
+614 ;;011.61
+615 ;;9002226.02101,"843,011.61 ",.02)
+616 ;;011.61
+617 ;;9002226.02101,"843,011.62 ",.01)
+618 ;;011.62
+619 ;;9002226.02101,"843,011.62 ",.02)
+620 ;;011.62
+621 ;;9002226.02101,"843,011.63 ",.01)
+622 ;;011.63
+623 ;;9002226.02101,"843,011.63 ",.02)
+624 ;;011.63
+625 ;;9002226.02101,"843,011.64 ",.01)
+626 ;;011.64
+627 ;;9002226.02101,"843,011.64 ",.02)
+628 ;;011.64
+629 ;;9002226.02101,"843,011.65 ",.01)
+630 ;;011.65
+631 ;;9002226.02101,"843,011.65 ",.02)
+632 ;;011.65
+633 ;;9002226.02101,"843,011.66 ",.01)
+634 ;;011.66
+635 ;;9002226.02101,"843,011.66 ",.02)
+636 ;;011.66
+637 ;;9002226.02101,"843,011.70 ",.01)
+638 ;;011.70
