function get_price(e){

  switch (e.Crop.value)
  {
    case "Corn" :
	e.SpringPriceElection.value = "2.42";
	e.HarvestPriceElection.value = "2.26";
	break;
    case "Soybeans" :
	e.SpringPriceElection.value = "5.26";
	e.HarvestPriceElection.value = "7.32";
	break;
    case "Wheat" :
	e.SpringPriceElection.value = "0.00";
	e.HarvestPriceElection.value = "0.00";
	break;
    default :
	e.SpringPriceElection.value = "";
	e.HarvestPriceElection.value = "";
	break;
  }

  return true;
}

function get_grip_price(e){

  switch (e.Crop.value)
  {
    case "Corn" :
	e.SpringPriceElection.value = "2.42";
	e.HarvestPriceElection.value = "2.25";
	e.ExpCountyYield.value = "150";
	e.FinalCountyYield.value = "150";
	break;
    case "Soybeans" :
	e.SpringPriceElection.value = "5.26";
	e.HarvestPriceElection.value = "7.15";
	e.ExpCountyYield.value = "150";
	e.FinalCountyYield.value = "150";
	break;
    case "Wheat" :
	e.SpringPriceElection.value = "0.00";
	e.HarvestPriceElection.value = "0.00";
	e.ExpCountyYield.value = "0";
	e.FinalCountyYield.value = "0";
	break;
    default :
	e.SpringPriceElection.value = "";
	e.HarvestPriceElection.value = "";
	e.ExpCountyYield.value = "";
	e.FinalCountyYield.value = "";
	break;
  }

  return true;
}

function get_aph_price(e){

  switch (e.Crop.value)
  {
    case "Corn" :
	e.APHPrice.value = "2.20";
	break;
    case "Soybeans" :
	e.APHPrice.value = "5.30";
	break;
    case "Wheat" :
	e.APHPrice.value = "0.00";
	break;
    default :
	e.APHPrice.value = "";
	break;
  }

  return true;
}

function Trim(TRIM_VALUE){
if(TRIM_VALUE.length < 1){
return"";
}
TRIM_VALUE = RTrim(TRIM_VALUE);
TRIM_VALUE = LTrim(TRIM_VALUE);
if(TRIM_VALUE==""){
return "";
}
else{
return TRIM_VALUE;
}
} //End Function

function RTrim(VALUE){
var w_space = String.fromCharCode(32);
var v_length = VALUE.length;
var strTemp = "";
if(v_length < 0){
return"";
}
var iTemp = v_length -1;

while(iTemp > -1){
if(VALUE.charAt(iTemp) == w_space){
}
else{
strTemp = VALUE.substring(0,iTemp +1);
break;
}
iTemp = iTemp-1;

} //End While
return strTemp;

} //End Function

function LTrim(VALUE){
var w_space = String.fromCharCode(32);
if(v_length < 1){
return"";
}
var v_length = VALUE.length;
var strTemp = "";

var iTemp = 0;

while(iTemp < v_length){
if(VALUE.charAt(iTemp) == w_space){
}
else{
strTemp = VALUE.substring(iTemp,v_length);
break;
}
iTemp = iTemp + 1;
} //End While
return strTemp;
} //End Function


function formatCurrency(num)
{
num = num.toString().replace(/\$|\,/g,'');
if(isNaN(num))
num = "0";
sign = (num == (num = Math.abs(num)));
num = Math.floor(num*100+0.50000000001);
cents = num%100;
num = Math.floor(num/100).toString();
if(cents<10)
cents = "0" + cents;
for (var i = 0; i < Math.floor((num.length-(1+i))/3); i++)
num = num.substring(0,num.length-(4*i+3))+','+
num.substring(num.length-(4*i+3));
//return (((sign)?'':'-') + '$' + num + '.' + cents);
return (((sign)?'':'-') + num + '.' + cents);
}

function calculate_crc(e){

  if (e.Crop.value == "none")
  {
	alert ("Please select a Crop.");
	return false;
  }

  if (e.CoverageLevel.value == "none")
  {
	alert ("Please select a Coverage Level.");
	return false;
  }

  if ((isNaN(e.SpringPriceElection.value)) || (Trim(e.SpringPriceElection.value)=="") || (e.SpringPriceElection.value <= 0))
  {
	alert ("Please enter a valid numeric value for Spring Price.  Do not include the $ symbol.");
	e.SpringPriceElection.select();
	return false;	
  }

  if ((isNaN(e.HarvestPriceElection.value)) || (Trim(e.HarvestPriceElection.value)=="") || (e.HarvestPriceElection.value <= 0))
  {
	alert ("Please enter a valid numeric value for Harvest Price.  Do not include the $ symbol.");
	e.PriceElection.select();
	return false;	
  }

  if ((isNaN(e.Acres.value)) || (Trim(e.Acres.value)=="") || (e.Acres.value <= 0))
  {
	alert ("Please enter a valid numeric value for Acres.");
	e.Acres.select();
	return false;	
  }

  if ((isNaN(e.ApprYieldBu.value)) || (Trim(e.ApprYieldBu.value)=="") || (e.ApprYieldBu.value <= 0))
  {
	alert ("Please enter a valid numeric value for Appr. Yield.");
	e.ApprYieldBu.select();
	return false;	
  }

  if ((isNaN(e.ActualProdBu.value)) || (Trim(e.ActualProdBu.value)=="") || (e.ActualProdBu.value <= 0))
  {
	alert ("Please enter a valid numeric value for Actual Production.");
	e.ActualProdBu.select();
	return false;	
  }

  if ((isNaN(e.Share.value)) || (Trim(e.Share.value)=="") || (e.Share.value <= 0) || (e.Share.value > 100))
  {
	alert ("Please enter a valid percentage for Share.  Do not include the % symbol.");
	e.Share.select();
	return false;	
  }

  if (e.SpringPriceElection.value > e.HarvestPriceElection.value)
  {
	PriceElection = e.SpringPriceElection.value;
  }
  else
  {
	PriceElection = e.HarvestPriceElection.value;
  }

  e.GuarAcreBu.value = formatCurrency(e.ApprYieldBu.value * (e.CoverageLevel.value/100));
  e.ActualProdYieldBu.value = formatCurrency(e.ActualProdBu.value/e.Acres.value);
  e.ActualProdLossBu.value = formatCurrency((e.ApprYieldBu.value * (e.CoverageLevel.value/100)) - (e.ActualProdBu.value/e.Acres.value));
  e.MinGuarAcreDollars.value = formatCurrency((e.ApprYieldBu.value * (e.CoverageLevel.value/100)) * e.SpringPriceElection.value);
  e.FinalGuarAcreDollars.value = formatCurrency((e.ApprYieldBu.value * (e.CoverageLevel.value/100)) * PriceElection);
  e.CropValue.value = formatCurrency((e.ActualProdBu.value/e.Acres.value) * PriceElection);
  RevenueLoss = ((e.ApprYieldBu.value * (e.CoverageLevel.value/100)) * PriceElection) - ((e.ActualProdBu.value/e.Acres.value) * PriceElection);
  if (RevenueLoss < 0)
  {
	e.RevenueLoss.value = formatCurrency(0);
  } else {
	e.RevenueLoss.value = formatCurrency(RevenueLoss);
  }
  e.Claim.value = formatCurrency(e.RevenueLoss.value * e.Acres.value);

  // e.RevenueLoss.value = formatCurrency(((e.ApprYieldBu.value * (e.CoverageLevel.value/100)) * PriceElection) - ((e.ActualProdBu.value/e.Acres.value) * PriceElection));
  // e.Claim.value = formatCurrency(((((e.ApprYieldBu.value * (e.CoverageLevel.value/100)) * PriceElection) - ((e.ActualProdBu.value/e.Acres.value) * PriceElection)) * e.Acres.value) * (e.Share.value/100));

  document.location.href="crc_calc.html#Results"; 
  return true;
}

function calculate_ra(e){

  if (e.Crop.value == "none")
  {
	alert ("Please select a Crop.");
	return false;
  }

  if (e.CoverageLevel.value == "none")
  {
	alert ("Please select a Coverage Level.");
	return false;
  }

  if ((isNaN(e.SpringPriceElection.value)) || (Trim(e.SpringPriceElection.value)=="") || (e.SpringPriceElection.value <= 0))
  {
	alert ("Please enter a valid numeric value for Spring Price.  Do not include the $ symbol.");
	e.SpringPriceElection.select();
	return false;	
  }

  if ((isNaN(e.HarvestPriceElection.value)) || (Trim(e.HarvestPriceElection.value)=="") || (e.HarvestPriceElection.value <= 0))
  {
	alert ("Please enter a valid numeric value for Harvest Price.  Do not include the $ symbol.");
	e.PriceElection.select();
	return false;	
  }

  if ((isNaN(e.Acres.value)) || (Trim(e.Acres.value)=="") || (e.Acres.value <= 0))
  {
	alert ("Please enter a valid numeric value for Acres.");
	e.Acres.select();
	return false;	
  }

  if ((isNaN(e.ApprYieldBu.value)) || (Trim(e.ApprYieldBu.value)=="") || (e.ApprYieldBu.value <= 0))
  {
	alert ("Please enter a valid numeric value for Appr. Yield.");
	e.ApprYieldBu.select();
	return false;	
  }

  if ((isNaN(e.ActualProdBu.value)) || (Trim(e.ActualProdBu.value)=="") || (e.ActualProdBu.value <= 0))
  {
	alert ("Please enter a valid numeric value for Actual Production.");
	e.ActualProdBu.select();
	return false;	
  }

  if ((isNaN(e.Share.value)) || (Trim(e.Share.value)=="") || (e.Share.value <= 0) || (e.Share.value > 100))
  {
	alert ("Please enter a valid percentage for Share.  Do not include the % symbol.");
	e.Share.select();
	return false;	
  }

  if (e.SpringPriceElection.value > e.HarvestPriceElection.value)
  {
	PriceElection = e.SpringPriceElection.value;
  }
  else
  {
	PriceElection = e.HarvestPriceElection.value;
  }

  e.GuarAcreBu.value = formatCurrency(e.ApprYieldBu.value * (e.CoverageLevel.value/100));
  e.ActualProdYieldBu.value = formatCurrency(e.ActualProdBu.value/e.Acres.value);
  e.ActualProdLossBu.value = formatCurrency((e.ApprYieldBu.value * (e.CoverageLevel.value/100)) - (e.ActualProdBu.value/e.Acres.value));
  e.MinGuarAcreDollars.value = formatCurrency((e.ApprYieldBu.value * (e.CoverageLevel.value/100)) * e.SpringPriceElection.value);
  e.FinalGuarAcreDollars.value = formatCurrency((e.ApprYieldBu.value * (e.CoverageLevel.value/100)) * PriceElection);
  e.CropValue.value = formatCurrency((e.ActualProdBu.value/e.Acres.value) * PriceElection);
  RevenueLoss = ((e.ApprYieldBu.value * (e.CoverageLevel.value/100)) * PriceElection) - ((e.ActualProdBu.value/e.Acres.value) * PriceElection);
  if (RevenueLoss < 0)
  {
	e.RevenueLoss.value = formatCurrency(0);
  } else {
	e.RevenueLoss.value = formatCurrency(RevenueLoss);
  }
  e.Claim.value = formatCurrency(e.RevenueLoss.value * e.Acres.value);

  // e.RevenueLoss.value = formatCurrency(((e.ApprYieldBu.value * (e.CoverageLevel.value/100)) * PriceElection) - ((e.ActualProdBu.value/e.Acres.value) * PriceElection));
  // e.Claim.value = formatCurrency(((((e.ApprYieldBu.value * (e.CoverageLevel.value/100)) * PriceElection) - ((e.ActualProdBu.value/e.Acres.value) * PriceElection)) * e.Acres.value) * (e.Share.value/100));

  document.location.href="ra_calc.html#Results"; 
  return true;
}

function get_county_yield(e){

  switch (e.County.value)
  {
    case "Adams" :
	e.PolicyProtectionMax.value = "100.00";
	break;
    case "Allen" :
	e.PolicyProtectionMax.value = "110.00";
	break;
    case "Bartholomew" :
	e.PolicyProtectionMax.value = "120.00";
	break;
    case "Benton" :
	e.PolicyProtectionMax.value = "130.00";
	break;
    case "Blackford" :
	e.PolicyProtectionMax.value = "140.00";
	break;
    case "Boone" :
	e.PolicyProtectionMax.value = "150.00";
	break;
    case "Brown" :
	e.PolicyProtectionMax.value = "160.00";
	break;
    case "Carroll" :
	e.PolicyProtectionMax.value = "170.00";
	break;
    case "Cass" :
	e.PolicyProtectionMax.value = "180.00";
	break;
    case "Clark" :
	e.PolicyProtectionMax.value = "190.00";
	break;
    case "Clay" :
	e.PolicyProtectionMax.value = "200.00";
	break;
    case "Clinton" :
	e.PolicyProtectionMax.value = "210.00";
	break;
    case "Crawford" :
	e.PolicyProtectionMax.value = "220.00";
	break;
    case "Daviess" :
	e.PolicyProtectionMax.value = "230.00";
	break;
    case "Dearborn" :
	e.PolicyProtectionMax.value = "240.00";
	break;
    case "Decatur" :
	e.PolicyProtectionMax.value = "250.00";
	break;
    case "Dekalb" :
	e.PolicyProtectionMax.value = "260.00";
	break;
    case "Delaware" :
	e.PolicyProtectionMax.value = "270.00";
	break;
    case "Dubois" :
	e.PolicyProtectionMax.value = "280.00";
	break;
    case "Elkhart" :
	e.PolicyProtectionMax.value = "290.00";
	break;
    case "Fayette" :
	e.PolicyProtectionMax.value = "300.00";
	break;
    case "Floyd" :
	e.PolicyProtectionMax.value = "310.00";
	break;
    case "Fountain" :
	e.PolicyProtectionMax.value = "320.00";
	break;
    case "Franklin" :
	e.PolicyProtectionMax.value = "330.00";
	break;
    case "Fulton" :
	e.PolicyProtectionMax.value = "340.00";
	break;
    case "Gibson" :
	e.PolicyProtectionMax.value = "350.00";
	break;
    case "Grant" :
	e.PolicyProtectionMax.value = "360.00";
	break;
    case "Greene" :
	e.PolicyProtectionMax.value = "370.00";
	break;
    case "Hamilton" :
	e.PolicyProtectionMax.value = "380.00";
	break;
    case "Hancock" :
	e.PolicyProtectionMax.value = "390.00";
	break;
    case "Harrison" :
	e.PolicyProtectionMax.value = "400.00";
	break;
    case "Hendricks" :
	e.PolicyProtectionMax.value = "410.00";
	break;
    case "Henry" :
	e.PolicyProtectionMax.value = "420.00";
	break;
    case "Howard" :
	e.PolicyProtectionMax.value = "430.00";
	break;
    case "Huntington" :
	e.PolicyProtectionMax.value = "440.00";
	break;
    case "Jackson" :
	e.PolicyProtectionMax.value = "450.00";
	break;
    case "Jasper" :
	e.PolicyProtectionMax.value = "460.00";
	break;
    case "Jay" :
	e.PolicyProtectionMax.value = "470.00";
	break;
    case "Jefferson" :
	e.PolicyProtectionMax.value = "480.00";
	break;
    case "Jennings" :
	e.PolicyProtectionMax.value = "490.00";
	break;
    case "Johnson" :
	e.PolicyProtectionMax.value = "500.00";
	break;
    case "Knox" :
	e.PolicyProtectionMax.value = "510.00";
	break;
    case "Kosciusko" :
	e.PolicyProtectionMax.value = "520.00";
	break;
    case "LaGrange" :
	e.PolicyProtectionMax.value = "530.00";
	break;
    case "Lake" :
	e.PolicyProtectionMax.value = "540.00";
	break;
    case "LaPorte" :
	e.PolicyProtectionMax.value = "550.00";
	break;
    case "Lawrence" :
	e.PolicyProtectionMax.value = "560.00";
	break;
    case "Madison" :
	e.PolicyProtectionMax.value = "570.00";
	break;
    case "Marion" :
	e.PolicyProtectionMax.value = "580.00";
	break;
    case "Marshall" :
	e.PolicyProtectionMax.value = "590.00";
	break;
    case "Martin" :
	e.PolicyProtectionMax.value = "600.00";
	break;
    case "Miami" :
	e.PolicyProtectionMax.value = "610.00";
	break;
    case "Monroe" :
	e.PolicyProtectionMax.value = "620.00";
	break;
    case "Montgomery" :
	e.PolicyProtectionMax.value = "630.00";
	break;
    case "Morgan" :
	e.PolicyProtectionMax.value = "640.00";
	break;
    case "Newton" :
	e.PolicyProtectionMax.value = "650.00";
	break;
    case "Noble" :
	e.PolicyProtectionMax.value = "660.00";
	break;
    case "Ohio" :
	e.PolicyProtectionMax.value = "670.00";
	break;
    case "Orange" :
	e.PolicyProtectionMax.value = "680.00";
	break;
    case "Owen" :
	e.PolicyProtectionMax.value = "690.00";
	break;
    case "Parke" :
	e.PolicyProtectionMax.value = "700.00";
	break;
    case "Perry" :
	e.PolicyProtectionMax.value = "710.00";
	break;
    case "Pike" :
	e.PolicyProtectionMax.value = "720.00";
	break;
    case "Porter" :
	e.PolicyProtectionMax.value = "730.00";
	break;
    case "Posey" :
	e.PolicyProtectionMax.value = "740.00";
	break;
    case "Pulaski" :
	e.PolicyProtectionMax.value = "750.00";
	break;
    case "Putnam" :
	e.PolicyProtectionMax.value = "760.00";
	break;
    case "Randolph" :
	e.PolicyProtectionMax.value = "770.00";
	break;
    case "Ripley" :
	e.PolicyProtectionMax.value = "780.00";
	break;
    case "Rush" :
	e.PolicyProtectionMax.value = "790.00";
	break;
    case "StJoseph" :
	e.PolicyProtectionMax.value = "800.00";
	break;
    case "Scott" :
	e.PolicyProtectionMax.value = "810.00";
	break;
    case "Shelby" :
	e.PolicyProtectionMax.value = "820.00";
	break;
    case "Spencer" :
	e.PolicyProtectionMax.value = "830.00";
	break;
    case "Starke" :
	e.PolicyProtectionMax.value = "840.00";
	break;
    case "Steuben" :
	e.PolicyProtectionMax.value = "850.00";
	break;
    case "Sullivan" :
	e.PolicyProtectionMax.value = "860.00";
	break;
    case "Switzerland" :
	e.PolicyProtectionMax.value = "870.00";
	break;
    case "Tippecanoe" :
	e.PolicyProtectionMax.value = "880.00";
	break;
    case "Tipton" :
	e.PolicyProtectionMax.value = "517.00";
	break;
    case "Union" :
	e.PolicyProtectionMax.value = "890.00";
	break;
    case "Vanderburgh" :
	e.PolicyProtectionMax.value = "900.00";
	break;
    case "Vermillon" :
	e.PolicyProtectionMax.value = "910.00";
	break;
    case "Vigo" :
	e.PolicyProtectionMax.value = "920.00";
	break;
    case "Wabash" :
	e.PolicyProtectionMax.value = "930.00";
	break;
    case "Warren" :
	e.PolicyProtectionMax.value = "940.00";
	break;
    case "Warrick" :
	e.PolicyProtectionMax.value = "950.00";
	break;
    case "Washington" :
	e.PolicyProtectionMax.value = "960.00";
	break;
    case "Wayne" :
	e.PolicyProtectionMax.value = "970.00";
	break;
    case "Wells" :
	e.PolicyProtectionMax.value = "980.00";
	break;
    case "White" :
	e.PolicyProtectionMax.value = "990.00";
	break;
    case "Whitley" :
	e.PolicyProtectionMax.value = "1000.00";
	break;
    default :
	e.PolicyProtectionMax.value = "0.00";
	break;
  }

  return true;
}

function get_grip_policy_amount(e){

  e.PolicyProtectionDollars.value = formatCurrency(e.PolicyProtectionMax.value * (e.PolicyProtectionPercent.value/100));
  return true;
}

function calculate_grip(e){

  if (e.Crop.value == "none")
  {
	alert ("Please select a Crop.");
	return false;
  }

  if ((isNaN(e.SpringPriceElection.value)) || (Trim(e.SpringPriceElection.value)=="") || (e.SpringPriceElection.value <= 0))
  {
	alert ("Please enter a valid numeric value for Expected Price.  Do not include the $ symbol.");
	e.SpringPriceElection.select();
	return false;	
  }

  if ((isNaN(e.HarvestPriceElection.value)) || (Trim(e.HarvestPriceElection.value)=="") || (e.HarvestPriceElection.value <= 0))
  {
	alert ("Please enter a valid numeric value for Harvest Price.  Do not include the $ symbol.");
	e.PriceElection.select();
	return false;	
  }

  if ((isNaN(e.Acres.value)) || (Trim(e.Acres.value)=="") || (e.Acres.value <= 0))
  {
	alert ("Please enter a valid numeric value for Acres.");
	e.Acres.select();
	return false;	
  }

  if (e.County.value == "none")
  {
	alert ("Please select a County.");
	return false;
  }

  if (e.CoverageLevel.value == "none")
  {
	alert ("Please select a Coverage Level.");
	return false;
  }

  if (e.PolicyProtectionPercent.value == "none")
  {
	alert ("Please select a Policy Protection Percentage.");
	return false;
  }

  if ((isNaN(e.PolicyProtectionDollars.value)) || (Trim(e.PolicyProtectionDollars.value)=="") || (e.PolicyProtectionDollars.value <= 0))
  {
	alert ("Please enter a valid numeric value for Policy Protection.  Do not include the $ symbol.");
	e.PolicyProtectionDollars.select();
	return false;	
  }

  if ((isNaN(e.ExpCountyYield.value)) || (Trim(e.ExpCountyYield.value)=="") || (e.ExpCountyYield.value <= 0))
  {
	alert ("Please enter a valid numeric value for Expected County Yield.");
	e.ExpCountyYield.select();
	return false;	
  }

  if ((isNaN(e.FinalCountyYield.value)) || (Trim(e.FinalCountyYield.value)=="") || (e.FinalCountyYield.value <= 0))
  {
	alert ("Please enter a valid numeric value for Final County Yield.");
	e.FinalCountyYield.select();
	return false;	
  }

  e.ExpCountyRev.value = formatCurrency(e.ExpCountyYield.value * e.SpringPriceElection.value);
  e.TriggerRev.value = formatCurrency(e.ExpCountyRev.value * (e.CoverageLevel.value/100));
  e.CountyRev.value = formatCurrency(e.HarvestPriceElection.value * e.FinalCountyYield.value);
  if (e.TriggerRev.value < e.CountyRev.value)
  {
	e.RevenueLoss.value = formatCurrency(0);
  } else {
	e.RevenueLoss.value = formatCurrency(((e.TriggerRev.value - e.CountyRev.value)/e.TriggerRev.value) * e.PolicyProtectionDollars.value);
  }
  e.Payment.value = formatCurrency(e.RevenueLoss.value * e.Acres.value);

  document.location.href="grip_calc.html#Results"; 
  return true;
}

function calculate_aph(e){

  if (e.Crop.value == "none")
  {
	alert ("Please select a Crop.");
	return false;
  }

  if (e.CoverageLevel.value == "none")
  {
	alert ("Please select a Coverage Level.");
	return false;
  }

  if ((isNaN(e.APHPrice.value)) || (Trim(e.APHPrice.value)=="") || (e.APHPrice.value <= 0))
  {
	alert ("Please enter a valid numeric value for APH Price.  Do not include the $ symbol.");
	e.APHPrice.select();
	return false;	
  }

  if ((isNaN(e.Acres.value)) || (Trim(e.Acres.value)=="") || (e.Acres.value <= 0))
  {
	alert ("Please enter a valid numeric value for Acres.");
	e.Acres.select();
	return false;	
  }

  if ((isNaN(e.ApprYieldBu.value)) || (Trim(e.ApprYieldBu.value)=="") || (e.ApprYieldBu.value <= 0))
  {
	alert ("Please enter a valid numeric value for Appr. Yield.");
	e.ApprYieldBu.select();
	return false;	
  }

  if ((isNaN(e.ActualProdBu.value)) || (Trim(e.ActualProdBu.value)=="") || (e.ActualProdBu.value <= 0))
  {
	alert ("Please enter a valid numeric value for Actual Production.");
	e.ActualProdBu.select();
	return false;	
  }

  if ((isNaN(e.Share.value)) || (Trim(e.Share.value)=="") || (e.Share.value <= 0) || (e.Share.value > 100))
  {
	alert ("Please enter a valid percentage for Share.  Do not include the % symbol.");
	e.Share.select();
	return false;	
  }

  e.GuarAcreBu.value = formatCurrency(e.ApprYieldBu.value * (e.CoverageLevel.value/100));
  e.ActualProdYieldBu.value = formatCurrency(e.ActualProdBu.value/e.Acres.value);
  e.ActualProdLossBu.value = formatCurrency((e.ApprYieldBu.value * (e.CoverageLevel.value/100)) - (e.ActualProdBu.value/e.Acres.value));
  Loss = ((e.ApprYieldBu.value * (e.CoverageLevel.value/100)) - (e.ActualProdBu.value/e.Acres.value)) * e.APHPrice.value;
  if (Loss < 0)
  {
	e.Loss.value = formatCurrency(0);
  } else {
	e.Loss.value = formatCurrency(Loss);
  }
  // e.Loss.value = formatCurrency(((e.ApprYieldBu.value * (e.CoverageLevel.value/100)) - (e.ActualProdBu.value/e.Acres.value)) * e.APHPrice.value);

  e.Claim.value = formatCurrency(e.Loss.value * e.Acres.value);
  // e.Claim.value = formatCurrency((((e.ApprYieldBu.value * (e.CoverageLevel.value/100)) - (e.ActualProdBu.value/e.Acres.value)) * e.APHPrice.value) * e.Acres.value);

  document.location.href="aph_calc.html#Results"; 
  return true;
}

function aph_gototop(e){
  document.location.href="aph_calc.html#Inputs";
  return true;
}

function crc_gototop(e){
  document.location.href="crc_calc.html#Inputs";
  return true;
}

function grip_gototop(e){
  document.location.href="grip_calc.html#Inputs";
  return true;
}

function ra_gototop(e){
  document.location.href="ra_calc.html#Inputs";
  return true;
}