<?xml version="1.0" encoding="utf-8"?>
<mx:Application xmlns:mx="http://www.adobe.com/2006/mxml" creationComplete="init()" layout="horizontal" width="100%" height="100%">

  <mx:Script>
  <![CDATA[
  
  import mx.charts.HitData;
  import mx.collections.ArrayCollection;
  import mx.rpc.events.ResultEvent;
  
  [Bindable] public var territoryRevenue:ArrayCollection;
  [Bindable] public var productlineRevenue:Object;
  [Bindable] public var salesTrendsRevenue:Object;
  
  private var selectedTerritoryData:String = "*";
  private var selectedProductLineData:String = "*";
  
  private function init():void
  {
    productlineRevenue = new Object();
    salesTrendsRevenue = new Object();
    
    trService.send();
    
    updateProductLineRevenue();
    updateSalesTrendsRevenue();
  }
  public function set selectedTerritory(territory:String):void
  {
    selectedTerritoryData = territory;
    
    updateProductLineRevenue();
    updateSalesTrendsRevenue();
  }
  
  [Bindable] public function get selectedTerritory():String
  {
    return selectedTerritoryData;
  }
  
  public function set selectedProductLine(productLine:String):void
  {
    selectedProductLineData = productLine;
    
    updateSalesTrendsRevenue();
  }
  
 [Bindable] public function get selectedProductLine():String
 {
   return selectedProductLineData;
 }
  private function updateProductLineRevenue():void
  {
    if (productlineRevenue[selectedTerritoryData] == undefined)
    {
      productlineRevenue[selectedTerritoryData] = new ArrayCollection();
      
      var params:Object = new Object();

      if (selectedTerritoryData != "*")
      {
        params.TERRITORY = selectedTerritoryData;
        plService.send(params);
      }
      else
      {
      	plServiceall.send(params);
      }
    }
    else
    {
      pline.dataProvider = productlineRevenue[selectedTerritoryData];
    }
  }
  private function updateSalesTrendsRevenue():void
  {
    if (salesTrendsRevenue[selectedTerritoryData + '_' + selectedProductLineData] == undefined)
    {
      salesTrendsRevenue[selectedTerritoryData + '_' + selectedProductLineData] = new ArrayCollection();
      
      var params:Object = new Object();
      
      if (selectedTerritoryData != "*")
      {
        params.TERRITORY = selectedTerritoryData;
      }
      
      if (selectedProductLineData != "*")
      {
        params.PRODUCTLINE = selectedProductLineData;
      }
      
      sotService.send(params);
    }
    else
    {
      strends.dataProvider = salesTrendsRevenue[selectedTerritoryData + '_' + selectedProductLineData];
    }
  }
	private function handleTRResult(event:ResultEvent):void
  	{
	    territoryRevenue = new ArrayCollection();
	    territory.dataProvider = territoryRevenue;
	    
	    var hdrST:ArrayCollection = event.result.Envelope.Body.ExecuteActivityResponse.swresult['COLUMN-HDR-ROW']['COLUMN-HDR-ITEM'];
	    
	    for each (var pl:Object in event.result.Envelope.Body.ExecuteActivityResponse.swresult['DATA-ROW'])
	    {
	      var spl:Object = new Object();
	      spl[hdrST[0]] = pl['DATA-ITEM'][0];
	      spl[hdrST[1]] = pl['DATA-ITEM'][1];
	      territoryRevenue.addItem(spl);
	    }
  	}
  
  private function handleSPLResult(event:ResultEvent):void
  {
    var hdrSPL:ArrayCollection = event.result.Envelope.Body.ExecuteActivityResponse.swresult['COLUMN-HDR-ROW']['COLUMN-HDR-ITEM'];
    for each (var pl:Object in event.result.Envelope.Body.ExecuteActivityResponse.swresult['DATA-ROW'])
    {
      var spl:Object = new Object();
      spl[hdrSPL[0]] = pl['DATA-ITEM'][0];
      spl[hdrSPL[1]] = pl['DATA-ITEM'][1];
      productlineRevenue[selectedTerritoryData].addItem(spl);
    }
      pline.dataProvider = productlineRevenue[selectedTerritoryData];
  }
  
  private function handleSOTResult(event:ResultEvent):void
  {
    var hdrST:ArrayCollection = event.result.Envelope.Body.ExecuteActivityResponse.swresult['COLUMN-HDR-ROW']['COLUMN-HDR-ITEM'];
    
    for each (var pl:Object in event.result.Envelope.Body.ExecuteActivityResponse.swresult['DATA-ROW'])
    {
      var spl:Object = new Object();
      spl[hdrST[0]] = pl['DATA-ITEM'][0];
      spl[hdrST[1]] = pl['DATA-ITEM'][1];
      salesTrendsRevenue[selectedTerritoryData + '_' + selectedProductLineData].addItemAt(spl,0)
    }
	  strends.dataProvider = salesTrendsRevenue[selectedTerritoryData+ '_' + selectedProductLineData];
  }
  
  ]]>  
  </mx:Script>

   <mx:HTTPService id="trService" url="http://localhost:8080/pentaho/ServiceAction?solution=samples&amp;path=steel-wheels/dashboards&amp;action=Sales_by_Territory.xaction&amp;userid=joe&amp;password=password" result="handleTRResult(event)"/>

   <mx:HTTPService id="plService" url="http://localhost:8080/pentaho/ServiceAction?solution=samples&amp;path=steel-wheels/dashboards&amp;action=Sales_by_Productline.xaction&amp;userid=joe&amp;password=password" result="handleSPLResult(event)"/>
  
   <mx:HTTPService id="plServiceall" url="http://localhost:8080/pentaho/ServiceAction?solution=samples&amp;path=steel-wheels/dashboards&amp;action=Sales_by_Productline_all.xaction&amp;userid=joe&amp;password=password" result="handleSPLResult(event)"/>
  
   <mx:HTTPService id="sotService" url="http://localhost:8080/pentaho/ServiceAction?solution=samples&amp;path=steel-wheels/dashboards&amp;action=sales_overtime.xaction&amp;userid=joe&amp;password=password" result="handleSOTResult(event)"/>
  
   <mx:HTTPService id="sotServiceall" url="http://localhost:8080/pentaho/ServiceAction?solution=samples&amp;path=steel-wheels/dashboards&amp;action=sales_overtime_all.xaction&amp;userid=joe&amp;password=password" result="handleSOTResult(event)"/>

   <mx:SeriesSlide id="plSlide" direction="right"/>
	
   <mx:SeriesInterpolate id="plEffect"/>
   <mx:VDividedBox height="100%" width="100%">
		<mx:HBox width="100%" height="100%">
			<mx:Panel width="40%" height="100%" layout="absolute" title="Territory (Click on a territory to drill down)">
				<mx:PieChart id="territory" width="100%" height="100%" showDataTips="true">
				   <mx:itemClick>
			        selectedTerritory = event.hitData.item.TERRITORY;
			        var explodeData:Array = [];
			        explodeData[territoryRevenue.getItemIndex(event.hitData.item)] = 0.15;
			        territory.series[0].perWedgeExplodeRadius = explodeData;
			        </mx:itemClick>
					<mx:series>
						<mx:PieSeries nameField="TERRITORY" field="SOLD_PRICE" labelPosition="callout" showDataEffect="{plEffect}" labelField="TERRITORY"/>
					</mx:series>
				</mx:PieChart>
			</mx:Panel>
			<mx:Panel width="100%" height="100%" layout="absolute" title="Product Line (Click on a Product Line to drill down)">
				<mx:BarChart x="0" y="2" id="pline" width="100%" height="100%" showDataTips="true">
					<mx:itemClick>
				        selectedProductLine = event.hitData.item.PRODUCTLINE;
				    </mx:itemClick>
					<mx:series>
						<mx:BarSeries xField="REVENUE" yField="PRODUCTLINE" showDataEffect="{plSlide}"/>
					</mx:series>
					<mx:verticalAxis>
				        <mx:CategoryAxis categoryField="PRODUCTLINE"/>
				    </mx:verticalAxis>
				</mx:BarChart>
			</mx:Panel>
		</mx:HBox>
		<mx:HBox width="100%" height="100%" verticalAlign="middle" horizontalAlign="center">
			<mx:Panel width="100%" height="100%" layout="absolute" horizontalAlign="center" title="Sales Trends">
				<mx:LineChart x="0" y="0" id="strends" width="100%" height="100%" showDataTips="true">
					<mx:series>
						<mx:LineSeries xField="TIME" yField="SOLD_PRICE" form="curve"/>
					</mx:series>
					<mx:horizontalAxis>
					   	 <mx:CategoryAxis categoryField="TIME"/>
				    </mx:horizontalAxis>
				</mx:LineChart>
			</mx:Panel>
		</mx:HBox>
	</mx:VDividedBox>
</mx:Application>