var S1_List = 0;
var S2_List = 0;
var locationMethods = new Array();

//Whenever user change ship location or method, the select attribute OnChange calls following fuctions.

function onShippingChange()
{
  check_shipping();
  document.CALFORM.submit();
}

function onSelectLocation()
{
  check_shipping();
  document.CALFORM.submit();
}
//--------------------------------------------------------------------------------------------------
function onSelectMethod()
{
  check_shipping();
  document.CALFORM.submit();
}
//-----------------------------------------------------------------------------------------------------

function check_shipping(){

 // Check if any physical products have had their quantity updated

  var updatedPhysCount = 0;

  for (var j=0;j<document.CALFORM.length;j++) {

    if (typeof document.CALFORM.elements[j].type == 'string') {

      if ((document.CALFORM.elements[j].type == 'hidden') && (document.CALFORM.elements[j].name == 'p_name') && (document.CALFORM.elements[j].value == 'quantity_shipping_mode_status')) {

        ItemShippingModeStatus = document.CALFORM.elements[j+1].value;

        if ((ItemShippingModeStatus != "") && (ItemShippingModeStatus.indexOf("thenet.gif") == -1) && (ItemShippingModeStatus.indexOf("downloadImg.gif") == -1) && (ItemShippingModeStatus.indexOf("preorder") == -1)) {

          updatedPhysCount += parseInt(document.CALFORM.elements[j+3].value);

        }

      }

    }

  }

  if (updatedPhysCount > physCount) physCount = updatedPhysCount;	

	var passThrough = 0;
	var pname = "";
	check_options(S1_List, S2_List);

	// Begining of Shipping Table Info
	var locList = new Array();
	var methList = new Array();
locList[0] = "Africa"; methList[0] = "Priority International Courier";
locList[1] = "Alaska and Hawaii"; methList[1] = "Priority International Courier";
locList[2] = "Albania"; methList[2] = "Priority International Courier";
locList[3] = "Australia and New Zealand"; methList[3] = "Priority International Courier";
locList[4] = "Austria"; methList[4] = "Standard International Shipping,Priority International Courier";
locList[5] = "Belgium"; methList[5] = "Standard International Shipping,Priority International Courier";
locList[6] = "Bulgaria"; methList[6] = "Standard International Shipping,Priority International Courier";
locList[7] = "Canada"; methList[7] = "Priority International Courier";
locList[8] = "Cyprus"; methList[8] = "Standard International Shipping,Priority International Courier";
locList[9] = "Czech Republic"; methList[9] = "Standard International Shipping,Priority International Courier";
locList[10] = "Denmark"; methList[10] = "Standard International Shipping,Priority International Courier";
locList[11] = "Estonia"; methList[11] = "Standard International Shipping,Priority International Courier";
locList[12] = "Finland"; methList[12] = "Standard International Shipping,Priority International Courier";
locList[13] = "France"; methList[13] = "Standard International Shipping,Priority International Courier";
locList[14] = "Germany"; methList[14] = "Standard International Shipping,Priority International Courier";
locList[15] = "Greece"; methList[15] = "Standard International Shipping,Priority International Courier";
locList[16] = "Hungary"; methList[16] = "Standard International Shipping,Priority International Courier";
locList[17] = "Ireland"; methList[17] = "Standard International Shipping,Priority International Courier";
locList[18] = "Italy"; methList[18] = "Standard International Shipping,Priority International Courier";
locList[19] = "Japan & Asia"; methList[19] = "Priority International Courier";
locList[20] = "Latvia"; methList[20] = "Standard International Shipping,Priority International Courier";
locList[21] = "Lithuania"; methList[21] = "Standard International Shipping,Priority International Courier";
locList[22] = "Luxembourg"; methList[22] = "Standard International Shipping,Priority International Courier";
locList[23] = "Malta"; methList[23] = "Standard International Shipping,Priority International Courier";
locList[24] = "Mexico and Caribbean"; methList[24] = "Priority International Courier";
locList[25] = "Middle East"; methList[25] = "Priority International Courier";
locList[26] = "Netherlands"; methList[26] = "Standard International Shipping,Priority International Courier";
locList[27] = "Norway"; methList[27] = "Priority International Courier";
locList[28] = "Poland"; methList[28] = "Standard International Shipping,Priority International Courier";
locList[29] = "Portugal"; methList[29] = "Standard International Shipping,Priority International Courier";
locList[30] = "Romania"; methList[30] = "Standard International Shipping,Priority International Courier";
locList[31] = "Russia"; methList[31] = "Priority International Courier";
locList[32] = "Slovakia"; methList[32] = "Standard International Shipping,Priority International Courier";
locList[33] = "Slovenia"; methList[33] = "Standard International Shipping,Priority International Courier";
locList[34] = "South America"; methList[34] = "Priority International Courier";
locList[35] = "Spain"; methList[35] = "Standard International Shipping,Priority International Courier";
locList[36] = "Sweden"; methList[36] = "Standard International Shipping,Priority International Courier";
locList[37] = "Switzerland"; methList[37] = "Standard International Shipping,Priority International Courier";
locList[38] = "UK"; methList[38] = "Standard International Shipping,Priority International Courier";
locList[39] = "US Lower 48 States"; methList[39] = "Priority International Courier";
locList[40] = "Yugoslavia"; methList[40] = "Priority International Courier";
	// End of Shipping Table Info
  for(i=0; i<document.CALFORM.elements.length; i++){
    if(document.CALFORM.elements[i].name == "p_name"){
			pname = document.CALFORM.elements[i].value;
      if(pname == "S1"){
        if(S1_List == 1){
          for(j=0; j<document.CALFORM.elements[i+1].options.length; j++){
            if(document.CALFORM.elements[i+1].options[j].selected){
							for(z=0; z < locList.length; z++){
								if (locList[z] == document.CALFORM.elements[i+1].options[j].text){
									get_locationMethods(methList[z]);
									passThrough = 1;
								}
							}
						}
					}
				}
			}
			else{
			 if(pname == "S2"){
			   if(S2_List == 1){
			     if (passThrough > 0){
  			     for(j=0; j<document.CALFORM.elements[i+1].options.length; j++){
	             if(document.CALFORM.elements[i+1].options[j].selected){
			         var selectedMethod = document.CALFORM.elements[i+1].options[j].text;
               var exists = 0;
							 for(w=0; w <locationMethods.length; w++){
                  if(selectedMethod == locationMethods[w]){
                    exists = 1;
									}
							 }
							 if(exists == 0){
                  var errMessage = "We're sorry.\n\nWe do not use ";
									errMessage += selectedMethod;
									errMessage += " to ship to your location."
									if (locationMethods.length > 1){
									   errMessage += "\n\nThe option/s available for this location are:\n";
									   for(m = 0; m < locationMethods.length - 1; m++){
												errMessage +=locationMethods[m] + ", ";
									   }
									   errMessage += "and " + locationMethods[locationMethods.length-1];
									 }
									 errMessage += "\n\nFor now, we will calculate your charge using ";
									 errMessage += locationMethods[0];
									 for(v=0; v<document.CALFORM.elements[i+1].options.length; v++){
                      if(document.CALFORM.elements[i+1].options[v].text == locationMethods[0]){
  											locIndex = v;
										  }
									 }
									 alert(errMessage);
									 document.CALFORM.elements[i+1].selectedIndex = locIndex;
   								 return;
								  }
								  // If Worldmailer is selected and more than 1 physical product is in the cart, display an error message and select another option
								  else if ((selectedMethod == 'Worldmailer') && (physCount > 1)) {
                             var errMessage = "We're sorry.\n\nWe cannot offer World Mailer for your order.";
                             var filteredLocationMethods = new Array();
                             // Remove Worldmailer from the list of possible location methods
                             for (var k=0;k<locationMethods.length;k++) {
                                if (locationMethods[k] != 'Worldmailer') filteredLocationMethods[filteredLocationMethods.length] = locationMethods[k];
                             }
                             if (filteredLocationMethods.length > 1) {
                                errMessage += "\n\nThe option/s available for this location are:\n";
                                for (var t=0;t<filteredLocationMethods.length;t++) {
                                   if ((t > 0) && (filteredLocationMethods.length > 2)) errMessage += ", ";
                                   if (t == filteredLocationMethods.length-1) errMessage += " and ";
                                   errMessage += filteredLocationMethods[t];
                                }
                             }
                             errMessage += "\n\nFor now, we will calculate your charge using " + filteredLocationMethods[0];
                             var ShippingMethodList = document.CALFORM.elements[i+1];
                             for (var x=0;x<ShippingMethodList.length;x++) {
                                if (ShippingMethodList.options[x].text == filteredLocationMethods[0]) {
                                   ShippingMethodList.options[x].selected = true;
                                   break; // We've found the new shipping method; stop looping
                                }
                             }
                             alert(errMessage);
								  }
							 }
	           }
					 }
				  }
			   }
		  }
	 }
  }
}
//-----------------------------------------------------------------------------------------------------
function get_locationMethods(methString)
{
	locationMethods.length = 1;
	var methIndex = 0;
	var currLoc = "";
	for(y=0; y <= methString.length; y++)
	{
		if(methString.charAt(y) != "," && y != methString.length)
		{
			currLoc += methString.charAt(y);

		}
		else
		{
			for(x=0; x < currLoc.length; x++)
			{
				if(currLoc.charAt(x) != " ")
				{
					currLoc = currLoc.substr(x)
					x=currLoc.length;
				}
			}
			for(x=currLoc.length; x > 0; x--)
			{
				if(currLoc.charAt(x-1) != " ")
				{
					currLoc = currLoc.substr(0,x);
					x = 0;
				}
			}
			locationMethods[methIndex]=currLoc;
			methIndex++;
			currLoc = "";
		}
	}
}
//-----------------------------------------------------------------------------------------------------

function check_options()
{
  var List_string;
  var S1_flag = 0;
  var S2_flag = 0;
  var S1_key = "onSelectLocation";
  var S2_key = "onSelectMethod";

  for(i=0; i<document.CALFORM.elements.length; ++i)
	{
    if(document.CALFORM.elements[i].name == "p_val")
		{
      if(document.CALFORM.elements[i].type == "select-one")
			{
        List_string += document.CALFORM.elements[i].onchange;
        S1_flag = (List_string.indexOf(S1_key));
        S2_flag = (List_string.indexOf(S2_key));
        if(S1_flag != -1)
				{
          S1_List = 1;
        }
        if(S2_flag != -1)
				{
          S2_List = 1;
        }
      }
    }
  }
}