<?xml version="1.0" encoding="UTF-8"?>
<!-- Created by Charles Hoffman, CPA, UBmatrix: 2009-10-13 -->
<link:linkbase
	xmlns:xlink="http://www.w3.org/1999/xlink"
	xmlns:link="http://www.xbrl.org/2003/linkbase"
	xmlns:generic="http://xbrl.org/2008/generic"
	xmlns:formula="http://xbrl.org/2008/formula"
	xmlns:validation="http://xbrl.org/2008/validation"
	xmlns:ca="http://xbrl.org/2008/assertion/consistency"
   xmlns:va="http://xbrl.org/2008/assertion/value"
	xmlns:variable="http://xbrl.org/2008/variable"
	xmlns:pf="http://xbrl.org/2008/filter/period"
	xmlns:cf="http://xbrl.org/2008/filter/concept"
	xmlns:df="http://xbrl.org/2008/filter/dimension"
	xmlns:gf="http://xbrl.org/2008/filter/general"
	xmlns:label="http://xbrl.org/2008/label"
	xmlns:xfi="http://www.xbrl.org/2008/function/instance" 
	xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"
	xmlns:xs="http://www.w3.org/2001/XMLSchema"
	xmlns:v="http://xbrl.org/2008/formula/conformance/variable"
   xmlns:pattern="http://xbrls.org/2008/xbrls/metapattern/schedule"  
	xsi:schemaLocation="
		http://www.xbrl.org/2003/linkbase http://www.xbrl.org/2003/xbrl-linkbase-2003-12-31.xsd
		http://xbrl.org/2008/generic http://www.xbrl.org/2008/generic-link.xsd
		http://xbrl.org/2008/formula http://www.xbrl.org/2008/formula.xsd
		http://xbrl.org/2008/assertion/consistency http://xbrl.org/2008/consistency-assertion.xsd
      http://xbrl.org/2008/assertion/value http://www.xbrl.org/2008/value-assertion.xsd
		http://xbrl.org/2008/variable http://xbrl.org/2008/variable.xsd
		http://xbrl.org/2008/filter/period http://www.xbrl.org/2008/period-filter.xsd
		http://xbrl.org/2008/filter/concept http://www.xbrl.org/2008/concept-filter.xsd
		http://xbrl.org/2008/filter/period http://www.xbrl.org/2008/period-filter.xsd
		http://xbrl.org/2008/filter/dimension http://www.xbrl.org/2008/dimension-filter.xsd
		http://xbrl.org/2008/filter/general http://www.xbrl.org/2008/general-filter.xsd
		http://xbrl.org/2008/label http://www.xbrl.org/2008/generic-label.xsd
		http://xbrl.org/2008/validation http://xbrl.org/2008/validation.xsd
  ">
  
		<!-- ArcroleRef declarations.  All these are declared by XBRL Formulas. -->
		<link:arcroleRef arcroleURI="http://xbrl.org/arcrole/2008/element-label" xlink:href="http://www.xbrl.org/2008/generic-label.xsd#element-label" xlink:type="simple"/>
		<link:arcroleRef arcroleURI="http://xbrl.org/arcrole/2008/variable-set" xlink:href="http://www.xbrl.org/2008/variable.xsd#variable-set" xlink:type="simple"/>
		<link:arcroleRef arcroleURI="http://xbrl.org/arcrole/2008/variable-filter" xlink:href="http://www.xbrl.org/2008/variable.xsd#variable-filter" xlink:type="simple"/>
		<link:arcroleRef arcroleURI="http://xbrl.org/arcrole/2008/variable-set-precondition" xlink:href="http://www.xbrl.org/2008/variable.xsd#variable-set-precondition" xlink:type="simple"/>
		<link:arcroleRef arcroleURI="http://xbrl.org/arcrole/2008/consistency-assertion-formula" xlink:href="http://www.xbrl.org/2008/consistency-assertion.xsd#consistency-assertion-formula" xlink:type="simple"/>
		<link:roleRef roleURI="http://www.xbrl.org/2008/role/link" xlink:href="http://www.xbrl.org/2008/generic-link.xsd#standard-link-role" xlink:type="simple"/>
		<link:roleRef roleURI="http://www.xbrl.org/2008/role/label" xlink:href="http://www.xbrl.org/2008/generic-label.xsd#standard-label" xlink:type="simple"/>

     <link:roleRef xlink:type="simple" xlink:href="Schedule.xsd#SalesAnalysis" roleURI="http://xbrls.org/2008/xbrls/metapattern/schedule/SalesAnalysis" />
	  <generic:link xlink:type="extended" xlink:role="http://xbrls.org/2008/xbrls/metapattern/schedule/SalesAnalysis">

	    <!-- RESOURCE: (A) ASSERTION-Consistency -->
       <va:valueAssertion xlink:type="resource" xlink:label="ASSERTION_SalesAddsUp_BySegment"
         id="ASSERTION_SalesAddsUp_BySegment"
         aspectModel="dimensional" 
         implicitFiltering="true" 
         test="$v:VARIABLE_TotalBySegment_Sales = sum($v:VARIABLE_EachBySegment_Sales)" />

       <va:valueAssertion xlink:type="resource" xlink:label="ASSERTION_SalesAddsUp_ByRegion"
         id="ASSERTION_SalesAddsUp_ByRegion"
         aspectModel="dimensional" 
         implicitFiltering="true" 
         test="$v:VARIABLE_TotalByRegion_Sales = sum($v:VARIABLE_EachByRegion_Sales)" />

	
	
	    <!-- ARC: (B) to (C)(Assertion to Variable) -->
	    <variable:variableArc xlink:type="arc" xlink:arcrole="http://xbrl.org/arcrole/2008/variable-set" 
	      name="v:VARIABLE_TotalBySegment_Sales" 
	      xlink:from="ASSERTION_SalesAddsUp_BySegment" 
	      xlink:to="VARIABLE_TotalBySegment_Sales" 
	      order="3.0"
	      />
	    <variable:variableArc xlink:type="arc" xlink:arcrole="http://xbrl.org/arcrole/2008/variable-set" 
	      name="v:VARIABLE_EachBySegment_Sales" 
	      xlink:from="ASSERTION_SalesAddsUp_BySegment" 
	      xlink:to="VARIABLE_EachBySegment_Sales" 
	      order="4.0" 
	      />

	    <!--  RESOURCE: (C) VARIABLES-Fact -->
	    <variable:factVariable xlink:type="resource" xlink:label="VARIABLE_TotalBySegment_Sales" 
	      bindAsSequence="false"
	      />
	    <variable:factVariable xlink:type="resource" xlink:label="VARIABLE_TotalByRegion_Sales"
	      bindAsSequence="false"
	      />
	
	    <variable:factVariable xlink:type="resource" xlink:label="VARIABLE_EachBySegment_Sales" 
	      bindAsSequence="true"
	      />
	    <variable:factVariable xlink:type="resource" xlink:label="VARIABLE_EachByRegion_Sales" 
	      bindAsSequence="true"
	      />
	

	    <!--  ARC: (C) to (D)(Variables to Filters) -->
	    <!--  By Segment -->
	    <variable:variableFilterArc xlink:type="arc" xlink:arcrole="http://xbrl.org/arcrole/2008/variable-filter" 
	      complement="false" 
	      cover="true"
	      xlink:from="VARIABLE_TotalBySegment_Sales" 
	      xlink:to="FILTER_CONCEPT_Sales" 
	      order="2.0"
	      />
	    <variable:variableFilterArc xlink:type="arc" xlink:arcrole="http://xbrl.org/arcrole/2008/variable-filter" 
	      complement="false" 
	      cover="true"
	      xlink:from="VARIABLE_EachBySegment_Sales" 
	      xlink:to="FILTER_CONCEPT_Sales" 
	      order="3.0"
	      />
	    <variable:variableFilterArc xlink:type="arc" xlink:arcrole="http://xbrl.org/arcrole/2008/variable-filter" 
	      complement="false" 
	      cover="true"
	      xlink:from="VARIABLE_EachBySegment_Sales" 
	      xlink:to="FILTER_DIMENSION_BusinessSegmentAxis" 
	      order="3.0"
	      />

	    <!--  By Region -->
	    <variable:variableFilterArc xlink:type="arc" xlink:arcrole="http://xbrl.org/arcrole/2008/variable-filter" 
	      complement="false" 
	      cover="true"
	      xlink:from="VARIABLE_TotalByRegion_Sales" 
	      xlink:to="FILTER_CONCEPT_Sales" 
	      order="2.0"
	      />
	    <variable:variableFilterArc xlink:type="arc" xlink:arcrole="http://xbrl.org/arcrole/2008/variable-filter" 
	      complement="false" 
	      cover="true"
	      xlink:from="VARIABLE_EachByRegion_Sales" 
	      xlink:to="FILTER_CONCEPT_Sales" 
	      order="3.0"
	      />
	    <variable:variableFilterArc xlink:type="arc" xlink:arcrole="http://xbrl.org/arcrole/2008/variable-filter" 
	      complement="false" 
	      cover="true"
	      xlink:from="VARIABLE_EachByRegion_Sales" 
	      xlink:to="FILTER_DIMENSION_RegionAxis" 
	      order="3.0"
	      />

	    <!--  Arc from the formula to the variables it depends on -->
	    <variable:variableArc xlink:type="arc" xlink:arcrole="http://xbrl.org/arcrole/2008/variable-set" 
	      name="v:VARIABLE_TotalByRegion_Sales" 
	      xlink:from="ASSERTION_SalesAddsUp_ByRegion" 
	      xlink:to="VARIABLE_TotalByRegion_Sales" 
	      order="3.0"
	      />
	    <variable:variableArc xlink:type="arc" xlink:arcrole="http://xbrl.org/arcrole/2008/variable-set" 
	      name="v:VARIABLE_EachByRegion_Sales" 
	      xlink:from="ASSERTION_SalesAddsUp_ByRegion" 
	      xlink:to="VARIABLE_EachByRegion_Sales" 
	      order="4.0" 
	      />

	    <!-- RESOURCE: (D) FILTER-Concept (similar to WHERE statement) -->
	    <cf:conceptName xlink:type="resource" xlink:label="FILTER_CONCEPT_Sales">
	      <cf:concept>
	        <cf:qname>pattern:Sales</cf:qname>
	      </cf:concept>
	    </cf:conceptName>
	

	    <!-- RESOURCE: (D) FILTER-Dimension (similar to WHERE statement) -->
	    <!--  By Segment -->
	    <df:explicitDimension xlink:type="resource" xlink:label="FILTER_DIMENSION_BusinessSegmentAxis">
	      <df:dimension>
	        <df:qname>pattern:BusinessSegmentAxis</df:qname>
	      </df:dimension>
	      <df:member>
	        <df:qnameExpression>
	           xfi:fact-explicit-segment-dimension-value(
	               $v:VARIABLE_TotalBySegment_Sales,
	               QName('http://xbrls.org/2008/xbrls/metapattern/schedule','pattern:BusinessSegmentAxis')
	               )
	        </df:qnameExpression>
           <df:linkrole>http://xbrls.org/2008/xbrls/metapattern/schedule/SalesAnalysis</df:linkrole>
           <df:arcrole>http://xbrl.org/int/dim/arcrole/domain-member</df:arcrole>
           <df:axis>child</df:axis>
	      </df:member>
	    </df:explicitDimension>
	
	    <!--  By Region -->
	    <df:explicitDimension xlink:type="resource" xlink:label="FILTER_DIMENSION_RegionAxis">
	      <df:dimension>
	        <df:qname>pattern:RegionAxis</df:qname>
	      </df:dimension>
	      <df:member>
	        <df:qnameExpression>
	           xfi:fact-explicit-segment-dimension-value(
	               $v:VARIABLE_TotalByRegion_Sales,
	               QName('http://xbrls.org/2008/xbrls/metapattern/schedule','pattern:RegionAxis')
	               )
	        </df:qnameExpression>
	        <df:linkrole>http://xbrls.org/2008/xbrls/metapattern/schedule/SalesAnalysis</df:linkrole>
           <df:arcrole>http://xbrl.org/int/dim/arcrole/domain-member</df:arcrole>
           <df:axis>child</df:axis>
	      </df:member>
	    </df:explicitDimension>


	    <!-- RESOURCE: (E) LABELS and related arcs (which are optional) -->	
	    <label:label xlink:type="resource" xlink:label="ASSERTION_Label" 
	      xlink:role="http://www.xbrl.org/2008/role/label" 
	      xml:lang="en"
	      >Tests aggregate of sales is within 1.00 of contributor sales items.</label:label>
	    <label:label xlink:type="resource" xlink:label="variable_sales_label" 
	      xlink:role="http://www.xbrl.org/2008/role/label" 
	      xml:lang="en"
	      >Binds to any sales fact</label:label>
	    <label:label xlink:type="resource" xlink:label="variable_salesBreakdown_label" 
	      xlink:role="http://www.xbrl.org/2008/role/label" 
	      xml:lang="en"
	      >Sequence of contributors which are dimensional children of product, implicit matching of period etc to sales</label:label>    
	
	    <!-- Arcs from labels to the formula and variables being labelled -->
	    <generic:arc xlink:type="arc" xlink:arcrole="http://xbrl.org/arcrole/2008/element-label"
	      xlink:from="ASSERTION_SalesAddsUp_BySegment" 
	      xlink:to="ASSERTION_Label" 
	      order="1.0"
	      />
	    <generic:arc xlink:type="arc" xlink:arcrole="http://xbrl.org/arcrole/2008/element-label"
	      xlink:from="VARIABLE_TotalBySegment_Sales" 
	      xlink:to="variable_sales_label" 
	      order="1.0"
	      />
	    <generic:arc xlink:type="arc" xlink:arcrole="http://xbrl.org/arcrole/2008/element-label"
	      xlink:from="VARIABLE_EachBySegment_Sales" 
	      xlink:to="variable_salesBreakdown_label" 
	      order="1.0"
	      />

	    <!-- Arcs from labels to the formula and variables being labelled -->
	    <generic:arc xlink:type="arc" xlink:arcrole="http://xbrl.org/arcrole/2008/element-label"
	      xlink:from="VARIABLE_TotalByRegion_Sales" 
	      xlink:to="variable_sales_label" 
	      order="1.0"
	      />
	    <generic:arc xlink:type="arc" xlink:arcrole="http://xbrl.org/arcrole/2008/element-label"
	      xlink:from="VARIABLE_EachByRegion_Sales" 
	      xlink:to="variable_salesBreakdown_label" 
	      order="1.0"
	      />

	  </generic:link>
</link:linkbase>