Routine: BGP03B7

BGP03B7 ;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

TMP ;;TAXONOMY (WITH BULLETIN)

 ;;9002226.02101,"843,082.9 ",.02)

 ;;082.9

 ;;9002226.02101,"843,083.0 ",.01)

 ;;083.0

 ;;9002226.02101,"843,083.0 ",.02)

 ;;083.0

 ;;9002226.02101,"843,083.1 ",.01)

 ;;083.1

 ;;9002226.02101,"843,083.1 ",.02)

 ;;083.1

 ;;9002226.02101,"843,083.2 ",.01)

 ;;083.2

 ;;9002226.02101,"843,083.2 ",.02)

 ;;083.2

 ;;9002226.02101,"843,083.8 ",.01)

 ;;083.8

 ;;9002226.02101,"843,083.8 ",.02)

 ;;083.8

 ;;9002226.02101,"843,083.9 ",.01)

 ;;083.9

 ;;9002226.02101,"843,083.9 ",.02)

 ;;083.9

 ;;9002226.02101,"843,084.0 ",.01)

 ;;084.0

 ;;9002226.02101,"843,084.0 ",.02)

 ;;084.0

 ;;9002226.02101,"843,084.1 ",.01)

 ;;084.1

 ;;9002226.02101,"843,084.1 ",.02)

 ;;084.1

 ;;9002226.02101,"843,084.2 ",.01)

 ;;084.2

 ;;9002226.02101,"843,084.2 ",.02)

 ;;084.2

 ;;9002226.02101,"843,084.3 ",.01)

 ;;084.3

 ;;9002226.02101,"843,084.3 ",.02)

 ;;084.3

 ;;9002226.02101,"843,084.4 ",.01)

 ;;084.4

 ;;9002226.02101,"843,084.4 ",.02)

 ;;084.4

 ;;9002226.02101,"843,084.5 ",.01)

 ;;084.5

 ;;9002226.02101,"843,084.5 ",.02)

 ;;084.5

 ;;9002226.02101,"843,084.6 ",.01)

 ;;084.6

 ;;9002226.02101,"843,084.6 ",.02)

 ;;084.6

 ;;9002226.02101,"843,084.7 ",.01)

 ;;084.7

 ;;9002226.02101,"843,084.7 ",.02)

 ;;084.7

 ;;9002226.02101,"843,084.8 ",.01)

 ;;084.8

 ;;9002226.02101,"843,084.8 ",.02)

 ;;084.8

 ;;9002226.02101,"843,084.9 ",.01)

 ;;084.9

 ;;9002226.02101,"843,084.9 ",.02)

 ;;084.9

 ;;9002226.02101,"843,085.0 ",.01)

 ;;085.0

 ;;9002226.02101,"843,085.0 ",.02)

 ;;085.0

 ;;9002226.02101,"843,085.1 ",.01)

 ;;085.1

 ;;9002226.02101,"843,085.1 ",.02)

 ;;085.1

 ;;9002226.02101,"843,085.2 ",.01)

 ;;085.2

 ;;9002226.02101,"843,085.2 ",.02)

 ;;085.2

 ;;9002226.02101,"843,085.3 ",.01)

 ;;085.3

 ;;9002226.02101,"843,085.3 ",.02)

 ;;085.3

 ;;9002226.02101,"843,085.4 ",.01)

 ;;085.4

 ;;9002226.02101,"843,085.4 ",.02)

 ;;085.4

 ;;9002226.02101,"843,085.5 ",.01)

 ;;085.5

 ;;9002226.02101,"843,085.5 ",.02)

 ;;085.5

 ;;9002226.02101,"843,085.9 ",.01)

 ;;085.9

 ;;9002226.02101,"843,085.9 ",.02)

 ;;085.9

 ;;9002226.02101,"843,086.0 ",.01)

 ;;086.0

 ;;9002226.02101,"843,086.0 ",.02)

 ;;086.0

 ;;9002226.02101,"843,086.1 ",.01)

 ;;086.1

 ;;9002226.02101,"843,086.1 ",.02)

 ;;086.1

 ;;9002226.02101,"843,086.2 ",.01)

 ;;086.2

 ;;9002226.02101,"843,086.2 ",.02)

 ;;086.2

 ;;9002226.02101,"843,086.3 ",.01)

 ;;086.3

 ;;9002226.02101,"843,086.3 ",.02)

 ;;086.3

 ;;9002226.02101,"843,086.4 ",.01)

 ;;086.4

 ;;9002226.02101,"843,086.4 ",.02)

 ;;086.4

 ;;9002226.02101,"843,086.5 ",.01)

 ;;086.5

 ;;9002226.02101,"843,086.5 ",.02)

 ;;086.5

 ;;9002226.02101,"843,086.9 ",.01)

 ;;086.9

 ;;9002226.02101,"843,086.9 ",.02)

 ;;086.9

 ;;9002226.02101,"843,087.0 ",.01)

 ;;087.0

 ;;9002226.02101,"843,087.0 ",.02)

 ;;087.0

 ;;9002226.02101,"843,087.1 ",.01)

 ;;087.1

 ;;9002226.02101,"843,087.1 ",.02)

 ;;087.1

 ;;9002226.02101,"843,087.9 ",.01)

 ;;087.9

 ;;9002226.02101,"843,087.9 ",.02)

 ;;087.9

 ;;9002226.02101,"843,088.0 ",.01)

 ;;088.0

 ;;9002226.02101,"843,088.0 ",.02)

 ;;088.0

 ;;9002226.02101,"843,088.81 ",.01)

 ;;088.81

 ;;9002226.02101,"843,088.81 ",.02)

 ;;088.81

 ;;9002226.02101,"843,088.82 ",.01)

 ;;088.82

 ;;9002226.02101,"843,088.82 ",.02)

 ;;088.82

 ;;9002226.02101,"843,088.89 ",.01)

 ;;088.89

 ;;9002226.02101,"843,088.89 ",.02)

 ;;088.89

 ;;9002226.02101,"843,088.9 ",.01)

 ;;088.9

 ;;9002226.02101,"843,088.9 ",.02)

 ;;088.9

 ;;9002226.02101,"843,090.0 ",.01)

 ;;090.0

 ;;9002226.02101,"843,090.0 ",.02)

 ;;090.0

 ;;9002226.02101,"843,090.1 ",.01)

 ;;090.1

 ;;9002226.02101,"843,090.1 ",.02)

 ;;090.1

 ;;9002226.02101,"843,090.2 ",.01)

 ;;090.2

 ;;9002226.02101,"843,090.2 ",.02)

 ;;090.2

 ;;9002226.02101,"843,090.3 ",.01)

 ;;090.3

 ;;9002226.02101,"843,090.3 ",.02)

 ;;090.3

 ;;9002226.02101,"843,090.40 ",.01)

 ;;090.40

 ;;9002226.02101,"843,090.40 ",.02)

 ;;090.40

 ;;9002226.02101,"843,090.41 ",.01)

 ;;090.41

 ;;9002226.02101,"843,090.41 ",.02)

 ;;090.41

 ;;9002226.02101,"843,090.42 ",.01)

 ;;090.42

 ;;9002226.02101,"843,090.42 ",.02)

 ;;090.42

 ;;9002226.02101,"843,090.49 ",.01)

 ;;090.49

 ;;9002226.02101,"843,090.49 ",.02)

 ;;090.49

 ;;9002226.02101,"843,090.5 ",.01)

 ;;090.5

 ;;9002226.02101,"843,090.5 ",.02)

 ;;090.5

 ;;9002226.02101,"843,090.6 ",.01)

 ;;090.6

 ;;9002226.02101,"843,090.6 ",.02)

 ;;090.6

 ;;9002226.02101,"843,090.7 ",.01)

 ;;090.7

 ;;9002226.02101,"843,090.7 ",.02)

 ;;090.7

 ;;9002226.02101,"843,090.9 ",.01)

 ;;090.9

 ;;9002226.02101,"843,090.9 ",.02)

 ;;090.9

 ;;9002226.02101,"843,091.0 ",.01)

 ;;091.0

 ;;9002226.02101,"843,091.0 ",.02)

 ;;091.0

 ;;9002226.02101,"843,091.1 ",.01)

 ;;091.1

 ;;9002226.02101,"843,091.1 ",.02)

 ;;091.1

 ;;9002226.02101,"843,091.2 ",.01)

 ;;091.2

 ;;9002226.02101,"843,091.2 ",.02)

 ;;091.2

 ;;9002226.02101,"843,091.3 ",.01)

 ;;091.3

 ;;9002226.02101,"843,091.3 ",.02)

 ;;091.3

 ;;9002226.02101,"843,091.4 ",.01)

 ;;091.4

 ;;9002226.02101,"843,091.4 ",.02)

 ;;091.4

 ;;9002226.02101,"843,091.50 ",.01)

 ;;091.50

 ;;9002226.02101,"843,091.50 ",.02)

 ;;091.50

 ;;9002226.02101,"843,091.51 ",.01)

 ;;091.51

 ;;9002226.02101,"843,091.51 ",.02)

 ;;091.51

 ;;9002226.02101,"843,091.52 ",.01)

 ;;091.52

 ;;9002226.02101,"843,091.52 ",.02)

 ;;091.52

 ;;9002226.02101,"843,091.61 ",.01)

 ;;091.61

 ;;9002226.02101,"843,091.61 ",.02)

 ;;091.61

 ;;9002226.02101,"843,091.62 ",.01)

 ;;091.62

 ;;9002226.02101,"843,091.62 ",.02)

 ;;091.62

 ;;9002226.02101,"843,091.69 ",.01)

 ;;091.69

 ;;9002226.02101,"843,091.69 ",.02)

 ;;091.69

 ;;9002226.02101,"843,091.7 ",.01)

 ;;091.7

 ;;9002226.02101,"843,091.7 ",.02)

 ;;091.7

 ;;9002226.02101,"843,091.81 ",.01)

 ;;091.81

 ;;9002226.02101,"843,091.81 ",.02)

 ;;091.81

 ;;9002226.02101,"843,091.82 ",.01)

 ;;091.82

 ;;9002226.02101,"843,091.82 ",.02)

 ;;091.82

 ;;9002226.02101,"843,091.89 ",.01)

 ;;091.89

 ;;9002226.02101,"843,091.89 ",.02)

 ;;091.89

 ;;9002226.02101,"843,091.9 ",.01)

 ;;091.9

 ;;9002226.02101,"843,091.9 ",.02)

 ;;091.9

 ;;9002226.02101,"843,092.0 ",.01)

 ;;092.0

 ;;9002226.02101,"843,092.0 ",.02)

 ;;092.0

 ;;9002226.02101,"843,092.9 ",.01)

 ;;092.9

 ;;9002226.02101,"843,092.9 ",.02)

 ;;092.9

 ;;9002226.02101,"843,093.0 ",.01)

 ;;093.0

 ;;9002226.02101,"843,093.0 ",.02)

 ;;093.0

 ;;9002226.02101,"843,093.1 ",.01)

 ;;093.1

 ;;9002226.02101,"843,093.1 ",.02)

 ;;093.1

 ;;9002226.02101,"843,093.20 ",.01)

 ;;093.20

 ;;9002226.02101,"843,093.20 ",.02)

 ;;093.20

 ;;9002226.02101,"843,093.21 ",.01)

 ;;093.21

 ;;9002226.02101,"843,093.21 ",.02)

 ;;093.21

 ;;9002226.02101,"843,093.22 ",.01)

 ;;093.22

 ;;9002226.02101,"843,093.22 ",.02)

 ;;093.22

 ;;9002226.02101,"843,093.23 ",.01)

 ;;093.23

 ;;9002226.02101,"843,093.23 ",.02)

 ;;093.23

 ;;9002226.02101,"843,093.24 ",.01)

 ;;093.24

 ;;9002226.02101,"843,093.24 ",.02)

 ;;093.24

 ;;9002226.02101,"843,093.81 ",.01)

 ;;093.81

 ;;9002226.02101,"843,093.81 ",.02)

 ;;093.81

 ;;9002226.02101,"843,093.82 ",.01)

 ;;093.82

 ;;9002226.02101,"843,093.82 ",.02)

 ;;093.82

 ;;9002226.02101,"843,093.89 ",.01)

 ;;093.89

 ;;9002226.02101,"843,093.89 ",.02)

 ;;093.89

 ;;9002226.02101,"843,093.9 ",.01)

 ;;093.9

 ;;9002226.02101,"843,093.9 ",.02)

 ;;093.9

 ;;9002226.02101,"843,094.0 ",.01)

 ;;094.0

 ;;9002226.02101,"843,094.0 ",.02)

 ;;094.0

 ;;9002226.02101,"843,094.1 ",.01)

 ;;094.1

 ;;9002226.02101,"843,094.1 ",.02)

 ;;094.1

 ;;9002226.02101,"843,094.2 ",.01)

 ;;094.2

 ;;9002226.02101,"843,094.2 ",.02)

 ;;094.2

 ;;9002226.02101,"843,094.3 ",.01)

 ;;094.3

 ;;9002226.02101,"843,094.3 ",.02)

 ;;094.3

 ;;9002226.02101,"843,094.81 ",.01)

 ;;094.81

 ;;9002226.02101,"843,094.81 ",.02)

 ;;094.81

 ;;9002226.02101,"843,094.82 ",.01)

 ;;094.82

 ;;9002226.02101,"843,094.82 ",.02)

 ;;094.82

 ;;9002226.02101,"843,094.83 ",.01)

 ;;094.83

 ;;9002226.02101,"843,094.83 ",.02)

 ;;094.83

 ;;9002226.02101,"843,094.84 ",.01)

 ;;094.84

 ;;9002226.02101,"843,094.84 ",.02)

 ;;094.84

 ;;9002226.02101,"843,094.85 ",.01)

 ;;094.85

 ;;9002226.02101,"843,094.85 ",.02)

 ;;094.85

 ;;9002226.02101,"843,094.86 ",.01)

 ;;094.86

 ;;9002226.02101,"843,094.86 ",.02)

 ;;094.86

 ;;9002226.02101,"843,094.87 ",.01)

 ;;094.87

 ;;9002226.02101,"843,094.87 ",.02)

 ;;094.87

 ;;9002226.02101,"843,094.89 ",.01)

 ;;094.89

 ;;9002226.02101,"843,094.89 ",.02)

 ;;094.89

 ;;9002226.02101,"843,094.9 ",.01)

 ;;094.9

 ;;9002226.02101,"843,094.9 ",.02)

 ;;094.9

 ;;9002226.02101,"843,095.0 ",.01)

 ;;095.0

 ;;9002226.02101,"843,095.0 ",.02)

 ;;095.0

 ;;9002226.02101,"843,095.1 ",.01)

 ;;095.1

 ;;9002226.02101,"843,095.1 ",.02)

 ;;095.1

 ;;9002226.02101,"843,095.2 ",.01)

 ;;095.2

 ;;9002226.02101,"843,095.2 ",.02)

 ;;095.2

 ;;9002226.02101,"843,095.3 ",.01)

 ;;095.3

 ;;9002226.02101,"843,095.3 ",.02)

 ;;095.3

 ;;9002226.02101,"843,095.4 ",.01)

 ;;095.4

 ;;9002226.02101,"843,095.4 ",.02)

 ;;095.4

 ;;9002226.02101,"843,095.5 ",.01)

 ;;095.5

 ;;9002226.02101,"843,095.5 ",.02)

 ;;095.5

 ;;9002226.02101,"843,095.6 ",.01)

 ;;095.6

 ;;9002226.02101,"843,095.6 ",.02)

 ;;095.6

 ;;9002226.02101,"843,095.7 ",.01)

 ;;095.7

 ;;9002226.02101,"843,095.7 ",.02)

 ;;095.7

 ;;9002226.02101,"843,095.8 ",.01)

 ;;095.8

 ;;9002226.02101,"843,095.8 ",.02)

 ;;095.8

 ;;9002226.02101,"843,095.9 ",.01)

 ;;095.9

 ;;9002226.02101,"843,095.9 ",.02)

 ;;095.9

 ;;9002226.02101,"843,096 ",.01)

 ;;096

 ;;9002226.02101,"843,096 ",.02)

 ;;096

 ;;9002226.02101,"843,097.0 ",.01)

 ;;097.0

 ;;9002226.02101,"843,097.0 ",.02)

 ;;097.0

 ;;9002226.02101,"843,097.1 ",.01)

 ;;097.1

 ;;9002226.02101,"843,097.1 ",.02)

 ;;097.1

 ;;9002226.02101,"843,097.9 ",.01)

 ;;097.9

 ;;9002226.02101,"843,097.9 ",.02)

 ;;097.9

 ;;9002226.02101,"843,098.0 ",.01)

 ;;098.0

 ;;9002226.02101,"843,098.0 ",.02)

 ;;098.0

 ;;9002226.02101,"843,098.10 ",.01)

 ;;098.10

 ;;9002226.02101,"843,098.10 ",.02)

 ;;098.10

 ;;9002226.02101,"843,098.11 ",.01)

 ;;098.11

 ;;9002226.02101,"843,098.11 ",.02)

 ;;098.11

 ;;9002226.02101,"843,098.12 ",.01)

 ;;098.12

 ;;9002226.02101,"843,098.12 ",.02)

 ;;098.12

 ;;9002226.02101,"843,098.13 ",.01)

 ;;098.13

 ;;9002226.02101,"843,098.13 ",.02)

 ;;098.13

 ;;9002226.02101,"843,098.14 ",.01)

 ;;098.14

 ;;9002226.02101,"843,098.14 ",.02)

 ;;098.14

 ;;9002226.02101,"843,098.15 ",.01)

 ;;098.15

 ;;9002226.02101,"843,098.15 ",.02)

 ;;098.15

 ;;9002226.02101,"843,098.16 ",.01)

 ;;098.16

 ;;9002226.02101,"843,098.16 ",.02)

 ;;098.16

 ;;9002226.02101,"843,098.17 ",.01)

 ;;098.17

 ;;9002226.02101,"843,098.17 ",.02)

 ;;098.17

 ;;9002226.02101,"843,098.19 ",.01)

 ;;098.19

 ;;9002226.02101,"843,098.19 ",.02)

 ;;098.19

 ;;9002226.02101,"843,098.2 ",.01)

 ;;098.2

 ;;9002226.02101,"843,098.2 ",.02)

 ;;098.2

 ;;9002226.02101,"843,098.30 ",.01)

 ;;098.30

 ;;9002226.02101,"843,098.30 ",.02)

 ;;098.30

 ;;9002226.02101,"843,098.31 ",.01)

 ;;098.31

 ;;9002226.02101,"843,098.31 ",.02)

 ;;098.31

 ;;9002226.02101,"843,098.32 ",.01)

 ;;098.32

 ;;9002226.02101,"843,098.32 ",.02)

 ;;098.32

 ;;9002226.02101,"843,098.33 ",.01)

 ;;098.33

 ;;9002226.02101,"843,098.33 ",.02)

 ;;098.33

 ;;9002226.02101,"843,098.34 ",.01)

 ;;098.34

 ;;9002226.02101,"843,098.34 ",.02)

 ;;098.34

 ;;9002226.02101,"843,098.35 ",.01)

 ;;098.35

 ;;9002226.02101,"843,098.35 ",.02)

 ;;098.35

 ;;9002226.02101,"843,098.36 ",.01)

 ;;098.36

 ;;9002226.02101,"843,098.36 ",.02)

 ;;098.36

 ;;9002226.02101,"843,098.37 ",.01)

 ;;098.37

 ;;9002226.02101,"843,098.37 ",.02)

 ;;098.37

 ;;9002226.02101,"843,098.39 ",.01)

 ;;098.39

 ;;9002226.02101,"843,098.39 ",.02)

 ;;098.39

 ;;9002226.02101,"843,098.40 ",.01)

 ;;098.40

 ;;9002226.02101,"843,098.40 ",.02)

 ;;098.40

 ;;9002226.02101,"843,098.41 ",.01)

 ;;098.41

 ;;9002226.02101,"843,098.41 ",.02)

 ;;098.41

 ;;9002226.02101,"843,098.42 ",.01)

 ;;098.42

 ;;9002226.02101,"843,098.42 ",.02)

 ;;098.42

 ;;9002226.02101,"843,098.43 ",.01)

 ;;098.43

 ;;9002226.02101,"843,098.43 ",.02)

 ;;098.43

 ;;9002226.02101,"843,098.49 ",.01)

 ;;098.49

 ;;9002226.02101,"843,098.49 ",.02)

 ;;098.49

 ;;9002226.02101,"843,098.50 ",.01)

 ;;098.50

 ;;9002226.02101,"843,098.50 ",.02)

 ;;098.50

 ;;9002226.02101,"843,098.51 ",.01)

 ;;098.51

 ;;9002226.02101,"843,098.51 ",.02)

 ;;098.51

 ;;9002226.02101,"843,098.52 ",.01)

 ;;098.52

 ;;9002226.02101,"843,098.52 ",.02)

 ;;098.52

 ;;9002226.02101,"843,098.53 ",.01)

 ;;098.53

 ;;9002226.02101,"843,098.53 ",.02)

 ;;098.53

 ;;9002226.02101,"843,098.59 ",.01)

 ;;098.59

 ;;9002226.02101,"843,098.59 ",.02)

 ;;098.59

 ;;9002226.02101,"843,098.6 ",.01)

 ;;098.6

 ;;9002226.02101,"843,098.6 ",.02)

 ;;098.6

 ;;9002226.02101,"843,098.7 ",.01)

 ;;098.7

 ;;9002226.02101,"843,098.7 ",.02)

 ;;098.7

 ;;9002226.02101,"843,098.81 ",.01)

 ;;098.81

 ;;9002226.02101,"843,098.81 ",.02)

 ;;098.81

 ;;9002226.02101,"843,098.82 ",.01)

 ;;098.82

 ;;9002226.02101,"843,098.82 ",.02)

 ;;098.82

 ;;9002226.02101,"843,098.83 ",.01)

 ;;098.83

 ;;9002226.02101,"843,098.83 ",.02)

 ;;098.83

 ;;9002226.02101,"843,098.84 ",.01)

 ;;098.84

 ;;9002226.02101,"843,098.84 ",.02)

 ;;098.84

BGP03B7   ;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       ;;9002226.02101,"843,082.9 ",.02)

 +2       ;;082.9

 +3       ;;9002226.02101,"843,083.0 ",.01)

 +4       ;;083.0

 +5       ;;9002226.02101,"843,083.0 ",.02)

 +6       ;;083.0

 +7       ;;9002226.02101,"843,083.1 ",.01)

 +8       ;;083.1

 +9       ;;9002226.02101,"843,083.1 ",.02)

 +10      ;;083.1

 +11      ;;9002226.02101,"843,083.2 ",.01)

 +12      ;;083.2

 +13      ;;9002226.02101,"843,083.2 ",.02)

 +14      ;;083.2

 +15      ;;9002226.02101,"843,083.8 ",.01)

 +16      ;;083.8

 +17      ;;9002226.02101,"843,083.8 ",.02)

 +18      ;;083.8

 +19      ;;9002226.02101,"843,083.9 ",.01)

 +20      ;;083.9

 +21      ;;9002226.02101,"843,083.9 ",.02)

 +22      ;;083.9

 +23      ;;9002226.02101,"843,084.0 ",.01)

 +24      ;;084.0

 +25      ;;9002226.02101,"843,084.0 ",.02)

 +26      ;;084.0

 +27      ;;9002226.02101,"843,084.1 ",.01)

 +28      ;;084.1

 +29      ;;9002226.02101,"843,084.1 ",.02)

 +30      ;;084.1

 +31      ;;9002226.02101,"843,084.2 ",.01)

 +32      ;;084.2

 +33      ;;9002226.02101,"843,084.2 ",.02)

 +34      ;;084.2

 +35      ;;9002226.02101,"843,084.3 ",.01)

 +36      ;;084.3

 +37      ;;9002226.02101,"843,084.3 ",.02)

 +38      ;;084.3

 +39      ;;9002226.02101,"843,084.4 ",.01)

 +40      ;;084.4

 +41      ;;9002226.02101,"843,084.4 ",.02)

 +42      ;;084.4

 +43      ;;9002226.02101,"843,084.5 ",.01)

 +44      ;;084.5

 +45      ;;9002226.02101,"843,084.5 ",.02)

 +46      ;;084.5

 +47      ;;9002226.02101,"843,084.6 ",.01)

 +48      ;;084.6

 +49      ;;9002226.02101,"843,084.6 ",.02)

 +50      ;;084.6

 +51      ;;9002226.02101,"843,084.7 ",.01)

 +52      ;;084.7

 +53      ;;9002226.02101,"843,084.7 ",.02)

 +54      ;;084.7

 +55      ;;9002226.02101,"843,084.8 ",.01)

 +56      ;;084.8

 +57      ;;9002226.02101,"843,084.8 ",.02)

 +58      ;;084.8

 +59      ;;9002226.02101,"843,084.9 ",.01)

 +60      ;;084.9

 +61      ;;9002226.02101,"843,084.9 ",.02)

 +62      ;;084.9

 +63      ;;9002226.02101,"843,085.0 ",.01)

 +64      ;;085.0

 +65      ;;9002226.02101,"843,085.0 ",.02)

 +66      ;;085.0

 +67      ;;9002226.02101,"843,085.1 ",.01)

 +68      ;;085.1

 +69      ;;9002226.02101,"843,085.1 ",.02)

 +70      ;;085.1

 +71      ;;9002226.02101,"843,085.2 ",.01)

 +72      ;;085.2

 +73      ;;9002226.02101,"843,085.2 ",.02)

 +74      ;;085.2

 +75      ;;9002226.02101,"843,085.3 ",.01)

 +76      ;;085.3

 +77      ;;9002226.02101,"843,085.3 ",.02)

 +78      ;;085.3

 +79      ;;9002226.02101,"843,085.4 ",.01)

 +80      ;;085.4

 +81      ;;9002226.02101,"843,085.4 ",.02)

 +82      ;;085.4

 +83      ;;9002226.02101,"843,085.5 ",.01)

 +84      ;;085.5

 +85      ;;9002226.02101,"843,085.5 ",.02)

 +86      ;;085.5

 +87      ;;9002226.02101,"843,085.9 ",.01)

 +88      ;;085.9

 +89      ;;9002226.02101,"843,085.9 ",.02)

 +90      ;;085.9

 +91      ;;9002226.02101,"843,086.0 ",.01)

 +92      ;;086.0

 +93      ;;9002226.02101,"843,086.0 ",.02)

 +94      ;;086.0

 +95      ;;9002226.02101,"843,086.1 ",.01)

 +96      ;;086.1

 +97      ;;9002226.02101,"843,086.1 ",.02)

 +98      ;;086.1

 +99      ;;9002226.02101,"843,086.2 ",.01)

 +100     ;;086.2

 +101     ;;9002226.02101,"843,086.2 ",.02)

 +102     ;;086.2

 +103     ;;9002226.02101,"843,086.3 ",.01)

 +104     ;;086.3

 +105     ;;9002226.02101,"843,086.3 ",.02)

 +106     ;;086.3

 +107     ;;9002226.02101,"843,086.4 ",.01)

 +108     ;;086.4

 +109     ;;9002226.02101,"843,086.4 ",.02)

 +110     ;;086.4

 +111     ;;9002226.02101,"843,086.5 ",.01)

 +112     ;;086.5

 +113     ;;9002226.02101,"843,086.5 ",.02)

 +114     ;;086.5

 +115     ;;9002226.02101,"843,086.9 ",.01)

 +116     ;;086.9

 +117     ;;9002226.02101,"843,086.9 ",.02)

 +118     ;;086.9

 +119     ;;9002226.02101,"843,087.0 ",.01)

 +120     ;;087.0

 +121     ;;9002226.02101,"843,087.0 ",.02)

 +122     ;;087.0

 +123     ;;9002226.02101,"843,087.1 ",.01)

 +124     ;;087.1

 +125     ;;9002226.02101,"843,087.1 ",.02)

 +126     ;;087.1

 +127     ;;9002226.02101,"843,087.9 ",.01)

 +128     ;;087.9

 +129     ;;9002226.02101,"843,087.9 ",.02)

 +130     ;;087.9

 +131     ;;9002226.02101,"843,088.0 ",.01)

 +132     ;;088.0

 +133     ;;9002226.02101,"843,088.0 ",.02)

 +134     ;;088.0

 +135     ;;9002226.02101,"843,088.81 ",.01)

 +136     ;;088.81

 +137     ;;9002226.02101,"843,088.81 ",.02)

 +138     ;;088.81

 +139     ;;9002226.02101,"843,088.82 ",.01)

 +140     ;;088.82

 +141     ;;9002226.02101,"843,088.82 ",.02)

 +142     ;;088.82

 +143     ;;9002226.02101,"843,088.89 ",.01)

 +144     ;;088.89

 +145     ;;9002226.02101,"843,088.89 ",.02)

 +146     ;;088.89

 +147     ;;9002226.02101,"843,088.9 ",.01)

 +148     ;;088.9

 +149     ;;9002226.02101,"843,088.9 ",.02)

 +150     ;;088.9

 +151     ;;9002226.02101,"843,090.0 ",.01)

 +152     ;;090.0

 +153     ;;9002226.02101,"843,090.0 ",.02)

 +154     ;;090.0

 +155     ;;9002226.02101,"843,090.1 ",.01)

 +156     ;;090.1

 +157     ;;9002226.02101,"843,090.1 ",.02)

 +158     ;;090.1

 +159     ;;9002226.02101,"843,090.2 ",.01)

 +160     ;;090.2

 +161     ;;9002226.02101,"843,090.2 ",.02)

 +162     ;;090.2

 +163     ;;9002226.02101,"843,090.3 ",.01)

 +164     ;;090.3

 +165     ;;9002226.02101,"843,090.3 ",.02)

 +166     ;;090.3

 +167     ;;9002226.02101,"843,090.40 ",.01)

 +168     ;;090.40

 +169     ;;9002226.02101,"843,090.40 ",.02)

 +170     ;;090.40

 +171     ;;9002226.02101,"843,090.41 ",.01)

 +172     ;;090.41

 +173     ;;9002226.02101,"843,090.41 ",.02)

 +174     ;;090.41

 +175     ;;9002226.02101,"843,090.42 ",.01)

 +176     ;;090.42

 +177     ;;9002226.02101,"843,090.42 ",.02)

 +178     ;;090.42

 +179     ;;9002226.02101,"843,090.49 ",.01)

 +180     ;;090.49

 +181     ;;9002226.02101,"843,090.49 ",.02)

 +182     ;;090.49

 +183     ;;9002226.02101,"843,090.5 ",.01)

 +184     ;;090.5

 +185     ;;9002226.02101,"843,090.5 ",.02)

 +186     ;;090.5

 +187     ;;9002226.02101,"843,090.6 ",.01)

 +188     ;;090.6

 +189     ;;9002226.02101,"843,090.6 ",.02)

 +190     ;;090.6

 +191     ;;9002226.02101,"843,090.7 ",.01)

 +192     ;;090.7

 +193     ;;9002226.02101,"843,090.7 ",.02)

 +194     ;;090.7

 +195     ;;9002226.02101,"843,090.9 ",.01)

 +196     ;;090.9

 +197     ;;9002226.02101,"843,090.9 ",.02)

 +198     ;;090.9

 +199     ;;9002226.02101,"843,091.0 ",.01)

 +200     ;;091.0

 +201     ;;9002226.02101,"843,091.0 ",.02)

 +202     ;;091.0

 +203     ;;9002226.02101,"843,091.1 ",.01)

 +204     ;;091.1

 +205     ;;9002226.02101,"843,091.1 ",.02)

 +206     ;;091.1

 +207     ;;9002226.02101,"843,091.2 ",.01)

 +208     ;;091.2

 +209     ;;9002226.02101,"843,091.2 ",.02)

 +210     ;;091.2

 +211     ;;9002226.02101,"843,091.3 ",.01)

 +212     ;;091.3

 +213     ;;9002226.02101,"843,091.3 ",.02)

 +214     ;;091.3

 +215     ;;9002226.02101,"843,091.4 ",.01)

 +216     ;;091.4

 +217     ;;9002226.02101,"843,091.4 ",.02)

 +218     ;;091.4

 +219     ;;9002226.02101,"843,091.50 ",.01)

 +220     ;;091.50

 +221     ;;9002226.02101,"843,091.50 ",.02)

 +222     ;;091.50

 +223     ;;9002226.02101,"843,091.51 ",.01)

 +224     ;;091.51

 +225     ;;9002226.02101,"843,091.51 ",.02)

 +226     ;;091.51

 +227     ;;9002226.02101,"843,091.52 ",.01)

 +228     ;;091.52

 +229     ;;9002226.02101,"843,091.52 ",.02)

 +230     ;;091.52

 +231     ;;9002226.02101,"843,091.61 ",.01)

 +232     ;;091.61

 +233     ;;9002226.02101,"843,091.61 ",.02)

 +234     ;;091.61

 +235     ;;9002226.02101,"843,091.62 ",.01)

 +236     ;;091.62

 +237     ;;9002226.02101,"843,091.62 ",.02)

 +238     ;;091.62

 +239     ;;9002226.02101,"843,091.69 ",.01)

 +240     ;;091.69

 +241     ;;9002226.02101,"843,091.69 ",.02)

 +242     ;;091.69

 +243     ;;9002226.02101,"843,091.7 ",.01)

 +244     ;;091.7

 +245     ;;9002226.02101,"843,091.7 ",.02)

 +246     ;;091.7

 +247     ;;9002226.02101,"843,091.81 ",.01)

 +248     ;;091.81

 +249     ;;9002226.02101,"843,091.81 ",.02)

 +250     ;;091.81

 +251     ;;9002226.02101,"843,091.82 ",.01)

 +252     ;;091.82

 +253     ;;9002226.02101,"843,091.82 ",.02)

 +254     ;;091.82

 +255     ;;9002226.02101,"843,091.89 ",.01)

 +256     ;;091.89

 +257     ;;9002226.02101,"843,091.89 ",.02)

 +258     ;;091.89

 +259     ;;9002226.02101,"843,091.9 ",.01)

 +260     ;;091.9

 +261     ;;9002226.02101,"843,091.9 ",.02)

 +262     ;;091.9

 +263     ;;9002226.02101,"843,092.0 ",.01)

 +264     ;;092.0

 +265     ;;9002226.02101,"843,092.0 ",.02)

 +266     ;;092.0

 +267     ;;9002226.02101,"843,092.9 ",.01)

 +268     ;;092.9

 +269     ;;9002226.02101,"843,092.9 ",.02)

 +270     ;;092.9

 +271     ;;9002226.02101,"843,093.0 ",.01)

 +272     ;;093.0

 +273     ;;9002226.02101,"843,093.0 ",.02)

 +274     ;;093.0

 +275     ;;9002226.02101,"843,093.1 ",.01)

 +276     ;;093.1

 +277     ;;9002226.02101,"843,093.1 ",.02)

 +278     ;;093.1

 +279     ;;9002226.02101,"843,093.20 ",.01)

 +280     ;;093.20

 +281     ;;9002226.02101,"843,093.20 ",.02)

 +282     ;;093.20

 +283     ;;9002226.02101,"843,093.21 ",.01)

 +284     ;;093.21

 +285     ;;9002226.02101,"843,093.21 ",.02)

 +286     ;;093.21

 +287     ;;9002226.02101,"843,093.22 ",.01)

 +288     ;;093.22

 +289     ;;9002226.02101,"843,093.22 ",.02)

 +290     ;;093.22

 +291     ;;9002226.02101,"843,093.23 ",.01)

 +292     ;;093.23

 +293     ;;9002226.02101,"843,093.23 ",.02)

 +294     ;;093.23

 +295     ;;9002226.02101,"843,093.24 ",.01)

 +296     ;;093.24

 +297     ;;9002226.02101,"843,093.24 ",.02)

 +298     ;;093.24

 +299     ;;9002226.02101,"843,093.81 ",.01)

 +300     ;;093.81

 +301     ;;9002226.02101,"843,093.81 ",.02)

 +302     ;;093.81

 +303     ;;9002226.02101,"843,093.82 ",.01)

 +304     ;;093.82

 +305     ;;9002226.02101,"843,093.82 ",.02)

 +306     ;;093.82

 +307     ;;9002226.02101,"843,093.89 ",.01)

 +308     ;;093.89

 +309     ;;9002226.02101,"843,093.89 ",.02)

 +310     ;;093.89

 +311     ;;9002226.02101,"843,093.9 ",.01)

 +312     ;;093.9

 +313     ;;9002226.02101,"843,093.9 ",.02)

 +314     ;;093.9

 +315     ;;9002226.02101,"843,094.0 ",.01)

 +316     ;;094.0

 +317     ;;9002226.02101,"843,094.0 ",.02)

 +318     ;;094.0

 +319     ;;9002226.02101,"843,094.1 ",.01)

 +320     ;;094.1

 +321     ;;9002226.02101,"843,094.1 ",.02)

 +322     ;;094.1

 +323     ;;9002226.02101,"843,094.2 ",.01)

 +324     ;;094.2

 +325     ;;9002226.02101,"843,094.2 ",.02)

 +326     ;;094.2

 +327     ;;9002226.02101,"843,094.3 ",.01)

 +328     ;;094.3

 +329     ;;9002226.02101,"843,094.3 ",.02)

 +330     ;;094.3

 +331     ;;9002226.02101,"843,094.81 ",.01)

 +332     ;;094.81

 +333     ;;9002226.02101,"843,094.81 ",.02)

 +334     ;;094.81

 +335     ;;9002226.02101,"843,094.82 ",.01)

 +336     ;;094.82

 +337     ;;9002226.02101,"843,094.82 ",.02)

 +338     ;;094.82

 +339     ;;9002226.02101,"843,094.83 ",.01)

 +340     ;;094.83

 +341     ;;9002226.02101,"843,094.83 ",.02)

 +342     ;;094.83

 +343     ;;9002226.02101,"843,094.84 ",.01)

 +344     ;;094.84

 +345     ;;9002226.02101,"843,094.84 ",.02)

 +346     ;;094.84

 +347     ;;9002226.02101,"843,094.85 ",.01)

 +348     ;;094.85

 +349     ;;9002226.02101,"843,094.85 ",.02)

 +350     ;;094.85

 +351     ;;9002226.02101,"843,094.86 ",.01)

 +352     ;;094.86

 +353     ;;9002226.02101,"843,094.86 ",.02)

 +354     ;;094.86

 +355     ;;9002226.02101,"843,094.87 ",.01)

 +356     ;;094.87

 +357     ;;9002226.02101,"843,094.87 ",.02)

 +358     ;;094.87

 +359     ;;9002226.02101,"843,094.89 ",.01)

 +360     ;;094.89

 +361     ;;9002226.02101,"843,094.89 ",.02)

 +362     ;;094.89

 +363     ;;9002226.02101,"843,094.9 ",.01)

 +364     ;;094.9

 +365     ;;9002226.02101,"843,094.9 ",.02)

 +366     ;;094.9

 +367     ;;9002226.02101,"843,095.0 ",.01)

 +368     ;;095.0

 +369     ;;9002226.02101,"843,095.0 ",.02)

 +370     ;;095.0

 +371     ;;9002226.02101,"843,095.1 ",.01)

 +372     ;;095.1

 +373     ;;9002226.02101,"843,095.1 ",.02)

 +374     ;;095.1

 +375     ;;9002226.02101,"843,095.2 ",.01)

 +376     ;;095.2

 +377     ;;9002226.02101,"843,095.2 ",.02)

 +378     ;;095.2

 +379     ;;9002226.02101,"843,095.3 ",.01)

 +380     ;;095.3

 +381     ;;9002226.02101,"843,095.3 ",.02)

 +382     ;;095.3

 +383     ;;9002226.02101,"843,095.4 ",.01)

 +384     ;;095.4

 +385     ;;9002226.02101,"843,095.4 ",.02)

 +386     ;;095.4

 +387     ;;9002226.02101,"843,095.5 ",.01)

 +388     ;;095.5

 +389     ;;9002226.02101,"843,095.5 ",.02)

 +390     ;;095.5

 +391     ;;9002226.02101,"843,095.6 ",.01)

 +392     ;;095.6

 +393     ;;9002226.02101,"843,095.6 ",.02)

 +394     ;;095.6

 +395     ;;9002226.02101,"843,095.7 ",.01)

 +396     ;;095.7

 +397     ;;9002226.02101,"843,095.7 ",.02)

 +398     ;;095.7

 +399     ;;9002226.02101,"843,095.8 ",.01)

 +400     ;;095.8

 +401     ;;9002226.02101,"843,095.8 ",.02)

 +402     ;;095.8

 +403     ;;9002226.02101,"843,095.9 ",.01)

 +404     ;;095.9

 +405     ;;9002226.02101,"843,095.9 ",.02)

 +406     ;;095.9

 +407     ;;9002226.02101,"843,096 ",.01)

 +408     ;;096

 +409     ;;9002226.02101,"843,096 ",.02)

 +410     ;;096

 +411     ;;9002226.02101,"843,097.0 ",.01)

 +412     ;;097.0

 +413     ;;9002226.02101,"843,097.0 ",.02)

 +414     ;;097.0

 +415     ;;9002226.02101,"843,097.1 ",.01)

 +416     ;;097.1

 +417     ;;9002226.02101,"843,097.1 ",.02)

 +418     ;;097.1

 +419     ;;9002226.02101,"843,097.9 ",.01)

 +420     ;;097.9

 +421     ;;9002226.02101,"843,097.9 ",.02)

 +422     ;;097.9

 +423     ;;9002226.02101,"843,098.0 ",.01)

 +424     ;;098.0

 +425     ;;9002226.02101,"843,098.0 ",.02)

 +426     ;;098.0

 +427     ;;9002226.02101,"843,098.10 ",.01)

 +428     ;;098.10

 +429     ;;9002226.02101,"843,098.10 ",.02)

 +430     ;;098.10

 +431     ;;9002226.02101,"843,098.11 ",.01)

 +432     ;;098.11

 +433     ;;9002226.02101,"843,098.11 ",.02)

 +434     ;;098.11

 +435     ;;9002226.02101,"843,098.12 ",.01)

 +436     ;;098.12

 +437     ;;9002226.02101,"843,098.12 ",.02)

 +438     ;;098.12

 +439     ;;9002226.02101,"843,098.13 ",.01)

 +440     ;;098.13

 +441     ;;9002226.02101,"843,098.13 ",.02)

 +442     ;;098.13

 +443     ;;9002226.02101,"843,098.14 ",.01)

 +444     ;;098.14

 +445     ;;9002226.02101,"843,098.14 ",.02)

 +446     ;;098.14

 +447     ;;9002226.02101,"843,098.15 ",.01)

 +448     ;;098.15

 +449     ;;9002226.02101,"843,098.15 ",.02)

 +450     ;;098.15

 +451     ;;9002226.02101,"843,098.16 ",.01)

 +452     ;;098.16

 +453     ;;9002226.02101,"843,098.16 ",.02)

 +454     ;;098.16

 +455     ;;9002226.02101,"843,098.17 ",.01)

 +456     ;;098.17

 +457     ;;9002226.02101,"843,098.17 ",.02)

 +458     ;;098.17

 +459     ;;9002226.02101,"843,098.19 ",.01)

 +460     ;;098.19

 +461     ;;9002226.02101,"843,098.19 ",.02)

 +462     ;;098.19

 +463     ;;9002226.02101,"843,098.2 ",.01)

 +464     ;;098.2

 +465     ;;9002226.02101,"843,098.2 ",.02)

 +466     ;;098.2

 +467     ;;9002226.02101,"843,098.30 ",.01)

 +468     ;;098.30

 +469     ;;9002226.02101,"843,098.30 ",.02)

 +470     ;;098.30

 +471     ;;9002226.02101,"843,098.31 ",.01)

 +472     ;;098.31

 +473     ;;9002226.02101,"843,098.31 ",.02)

 +474     ;;098.31

 +475     ;;9002226.02101,"843,098.32 ",.01)

 +476     ;;098.32

 +477     ;;9002226.02101,"843,098.32 ",.02)

 +478     ;;098.32

 +479     ;;9002226.02101,"843,098.33 ",.01)

 +480     ;;098.33

 +481     ;;9002226.02101,"843,098.33 ",.02)

 +482     ;;098.33

 +483     ;;9002226.02101,"843,098.34 ",.01)

 +484     ;;098.34

 +485     ;;9002226.02101,"843,098.34 ",.02)

 +486     ;;098.34

 +487     ;;9002226.02101,"843,098.35 ",.01)

 +488     ;;098.35

 +489     ;;9002226.02101,"843,098.35 ",.02)

 +490     ;;098.35

 +491     ;;9002226.02101,"843,098.36 ",.01)

 +492     ;;098.36

 +493     ;;9002226.02101,"843,098.36 ",.02)

 +494     ;;098.36

 +495     ;;9002226.02101,"843,098.37 ",.01)

 +496     ;;098.37

 +497     ;;9002226.02101,"843,098.37 ",.02)

 +498     ;;098.37

 +499     ;;9002226.02101,"843,098.39 ",.01)

 +500     ;;098.39

 +501     ;;9002226.02101,"843,098.39 ",.02)

 +502     ;;098.39

 +503     ;;9002226.02101,"843,098.40 ",.01)

 +504     ;;098.40

 +505     ;;9002226.02101,"843,098.40 ",.02)

 +506     ;;098.40

 +507     ;;9002226.02101,"843,098.41 ",.01)

 +508     ;;098.41

 +509     ;;9002226.02101,"843,098.41 ",.02)

 +510     ;;098.41

 +511     ;;9002226.02101,"843,098.42 ",.01)

 +512     ;;098.42

 +513     ;;9002226.02101,"843,098.42 ",.02)

 +514     ;;098.42

 +515     ;;9002226.02101,"843,098.43 ",.01)

 +516     ;;098.43

 +517     ;;9002226.02101,"843,098.43 ",.02)

 +518     ;;098.43

 +519     ;;9002226.02101,"843,098.49 ",.01)

 +520     ;;098.49

 +521     ;;9002226.02101,"843,098.49 ",.02)

 +522     ;;098.49

 +523     ;;9002226.02101,"843,098.50 ",.01)

 +524     ;;098.50

 +525     ;;9002226.02101,"843,098.50 ",.02)

 +526     ;;098.50

 +527     ;;9002226.02101,"843,098.51 ",.01)

 +528     ;;098.51

 +529     ;;9002226.02101,"843,098.51 ",.02)

 +530     ;;098.51

 +531     ;;9002226.02101,"843,098.52 ",.01)

 +532     ;;098.52

 +533     ;;9002226.02101,"843,098.52 ",.02)

 +534     ;;098.52

 +535     ;;9002226.02101,"843,098.53 ",.01)

 +536     ;;098.53

 +537     ;;9002226.02101,"843,098.53 ",.02)

 +538     ;;098.53

 +539     ;;9002226.02101,"843,098.59 ",.01)

 +540     ;;098.59

 +541     ;;9002226.02101,"843,098.59 ",.02)

 +542     ;;098.59

 +543     ;;9002226.02101,"843,098.6 ",.01)

 +544     ;;098.6

 +545     ;;9002226.02101,"843,098.6 ",.02)

 +546     ;;098.6

 +547     ;;9002226.02101,"843,098.7 ",.01)

 +548     ;;098.7

 +549     ;;9002226.02101,"843,098.7 ",.02)

 +550     ;;098.7

 +551     ;;9002226.02101,"843,098.81 ",.01)

 +552     ;;098.81

 +553     ;;9002226.02101,"843,098.81 ",.02)

 +554     ;;098.81

 +555     ;;9002226.02101,"843,098.82 ",.01)

 +556     ;;098.82

 +557     ;;9002226.02101,"843,098.82 ",.02)

 +558     ;;098.82

 +559     ;;9002226.02101,"843,098.83 ",.01)

 +560     ;;098.83

 +561     ;;9002226.02101,"843,098.83 ",.02)

 +562     ;;098.83

 +563     ;;9002226.02101,"843,098.84 ",.01)

 +564     ;;098.84

 +565     ;;9002226.02101,"843,098.84 ",.02)

 +566     ;;098.84

BGP03B7.m