var ns4 = document.layers;
var ie = document.all;
var ns6 = document.getElementById && !document.all;
var alertboxmessage = "";
var frm;

function Country(abbr,queue,region)
{
	this.abbr=abbr;
	this.queue=queue;
	this.region=region;
}

var countryqueue = new Array();
countryqueue[0]=new Country('AFGHANISTAN','DIMC Level 1 AP India','Asia Pacific');
countryqueue[1]=new Country('ÅLAND ISLANDS','DIMC Level 1 NA US','EMEA');
countryqueue[2]=new Country('ALBANIA','DIMC Level 1 ECEMEA Bg/Mk/Al','EMEA');
countryqueue[3]=new Country('ALGERIA','DIMC Level 1 EMEA ECEMEA','EMEA');
countryqueue[4]=new Country('AMERICAN SAMOA','DIMC Level 1 AP ANZ','Asia Pacific');
countryqueue[5]=new Country('ANDORRA','DIMC Level 1 EMEA WE','EMEA');
countryqueue[6]=new Country('ANGOLA','DIMC Level 1 EMEA ECEMEA','EMEA');
countryqueue[7]=new Country('ANGUILLA','DIMC Level 1 LA MEX','Latin America');
countryqueue[8]=new Country('ANTARCTICA','DIMC Level 1 LA ARG','Latin America');
countryqueue[9]=new Country('ANTIGUA AND BARBUDA','DIMC Level 1 LA MEX','Latin America');
countryqueue[10]=new Country('ARGENTINA','DIMC Level 1 LA ARG','Latin America');
countryqueue[11]=new Country('ARMENIA','DIMC Level 1 EMEA ECEMEA','EMEA');
countryqueue[12]=new Country('ARUBA','DIMC Level 1 LA MEX','Latin America');
countryqueue[13]=new Country('AUSTRALIA','DIMC Level 1 AP ANZ','Asia Pacific');
countryqueue[14]=new Country('AUSTRIA','DIMC Level 1 EMEA WE','EMEA');
countryqueue[15]=new Country('AZERBAIJAN','DIMC Level 1 EMEA ECEMEA','EMEA');
countryqueue[16]=new Country('BAHAMAS','DIMC Level 1 LA MEX','Latin America');
countryqueue[17]=new Country('BAHRAIN','DIMC Level 1 EMEA ECEMEA','EMEA');
countryqueue[18]=new Country('BANGLADESH','DIMC Level 1 AP India','Asia Pacific');
countryqueue[19]=new Country('BARBADOS','DIMC Level 1 LA MEX','Latin America');
countryqueue[20]=new Country('BELARUS','DIMC Level 1 EMEA ECEMEA','EMEA');
countryqueue[21]=new Country('BELGIUM','DIMC Level 1 EMEA WE','EMEA');
countryqueue[22]=new Country('BELIZE','DIMC Level 1 LA MEX','Latin America');
countryqueue[23]=new Country('BENIN','DIMC Level 1 EMEA ECEMEA','EMEA');
countryqueue[24]=new Country('BERMUDA','DIMC Level 1 NA US','North America');
countryqueue[25]=new Country('BHUTAN','DIMC Level 1 AP India','Asia Pacific');
countryqueue[26]=new Country('BOLIVIA','DIMC Level 1 LA ARG','Latin America');
countryqueue[27]=new Country('BOSNIA AND HERZEGOVINA','DIMC Level 1 ECEMEA Sk/Hr/Ba','EMEA');
countryqueue[28]=new Country('BOTSWANA','DIMC Level 1 EMEA ECEMEA','EMEA');
countryqueue[29]=new Country('BOUVET ISLAND','DIMC Level 1 NA US','EMEA');
countryqueue[30]=new Country('BRAZIL','DIMC Level 1 LA BRAZ','Latin America');
countryqueue[31]=new Country('BRITISH INDIAN OCEAN TERRITORY','DIMC Level 1 LA MEX','Latin America');
countryqueue[32]=new Country('BRUNEI DARUSSALAM','DIMC Level 1 AP ASEAN','Asia Pacific');
countryqueue[33]=new Country('BULGARIA','DIMC Level 1 ECEMEA Bg/Mk/Al','EMEA');
countryqueue[34]=new Country('BURKINA FASO','DIMC Level 1 EMEA ECEMEA','EMEA');
countryqueue[35]=new Country('BURUNDI','DIMC Level 1 EMEA ECEMEA','EMEA');
countryqueue[36]=new Country('CAMBODIA','DIMC Level 1 AP ASEAN','Asia Pacific');
countryqueue[37]=new Country('CAMEROON','DIMC Level 1 EMEA ECEMEA','EMEA');
countryqueue[38]=new Country('CANADA','DIMC Level 1 NA Canada','North America');
countryqueue[39]=new Country('CAPE VERDE','DIMC Level 1 NA US','EMEA');
countryqueue[40]=new Country('CAYMAN ISLANDS','DIMC Level 1 LA MEX','Latin America');
countryqueue[41]=new Country('CENTRAL AFRICAN REPUBLIC','DIMC Level 1 EMEA ECEMEA','EMEA');
countryqueue[42]=new Country('CHAD','DIMC Level 1 EMEA ECEMEA','EMEA');
countryqueue[43]=new Country('CHILE','DIMC Level 1 LA ARG','Latin America');
countryqueue[44]=new Country('CHINA','DIMC Level 1 AP Greater China','Asia Pacific');
countryqueue[45]=new Country('CHRISTMAS ISLAND','DIMC Level 1 AP ANZ','Asia Pacific');
countryqueue[46]=new Country('COCOS (KEELING) ISLANDS','DIMC Level 1 AP ANZ','Asia Pacific');
countryqueue[47]=new Country('COLOMBIA','DIMC Level 1 LA ARG','Latin America');
countryqueue[48]=new Country('COMOROS','DIMC Level 1 EMEA ECEMEA','EMEA');
countryqueue[49]=new Country('CONGO','DIMC Level 1 EMEA ECEMEA','EMEA');
countryqueue[50]=new Country('CONGO, THE DEMOCRATIC REPUBLIC OF THE','DIMC Level 1 EMEA ECEMEA','EMEA');
countryqueue[51]=new Country('COOK ISLANDS','DIMC Level 1 AP ANZ','Asia Pacific');
countryqueue[52]=new Country('COSTA RICA','DIMC Level 1 LA MEX','Latin America');
countryqueue[53]=new Country('CÔTE D\'IVOIRE','DIMC Level 1 EMEA ECEMEA','EMEA');
countryqueue[54]=new Country('CROATIA','DIMC Level 1 ECEMEA Sk/Hr/Ba','EMEA');
countryqueue[55]=new Country('CUBA','DIMC Level 1 LA MEX','Latin America');
countryqueue[56]=new Country('CYPRUS','DIMC level 1 ECEMEA GREECE','EMEA');
countryqueue[57]=new Country('CZECH REPUBLIC','DIMC Level 1 ECEMEA Cz/Sk','EMEA');
countryqueue[58]=new Country('DENMARK','DIMC Level 1 EMEA WE','EMEA');
countryqueue[59]=new Country('DJIBOUTI','DIMC Level 1 EMEA ECEMEA','EMEA');
countryqueue[60]=new Country('DOMINICA','DIMC Level 1 LA MEX','Latin America');
countryqueue[61]=new Country('DOMINICAN REPUBLIC','DIMC Level 1 LA MEX','Latin America');
countryqueue[62]=new Country('ECUADOR','DIMC Level 1 LA ARG','Latin America');
countryqueue[63]=new Country('EGYPT','DIMC Level 1 EMEA ECEMEA','EMEA');
countryqueue[64]=new Country('EL SALVADOR','DIMC Level 1 LA MEX','Latin America');
countryqueue[65]=new Country('EQUATORIAL GUINEA','DIMC Level 1 EMEA ECEMEA','EMEA');
countryqueue[66]=new Country('ERITREA','DIMC Level 1 EMEA ECEMEA','EMEA');
countryqueue[67]=new Country('ESTONIA','DIMC Level 1 ECEMEA Ee/Lv/Lt','EMEA');
countryqueue[68]=new Country('ETHIOPIA','DIMC Level 1 EMEA ECEMEA','EMEA');
countryqueue[69]=new Country('FALKLAND ISLANDS (MALVINAS)','DIMC Level 1 LA ARG','Latin America');
countryqueue[70]=new Country('FAROE ISLANDS','DIMC Level 1 NA US','EMEA');
countryqueue[71]=new Country('FIJI','DIMC Level 1 AP ANZ','Asia Pacific');
countryqueue[72]=new Country('FINLAND','DIMC Level 1 EMEA WE','EMEA');
countryqueue[73]=new Country('FRANCE','DIMC Level 1 EMEA WE','EMEA');
countryqueue[74]=new Country('FRENCH GUIANA','DIMC Level 1 LA ARG','Latin America');
countryqueue[75]=new Country('FRENCH POLYNESIA','DIMC Level 1 AP ANZ','Asia Pacific');
countryqueue[76]=new Country('FRENCH SOUTHERN TERRITORIES','DIMC Level 1 NA US','EMEA');
countryqueue[77]=new Country('GABON','DIMC Level 1 EMEA ECEMEA','EMEA');
countryqueue[78]=new Country('GAMBIA','DIMC Level 1 EMEA ECEMEA','EMEA');
countryqueue[79]=new Country('GEORGIA','DIMC Level 1 EMEA ECEMEA','EMEA');
countryqueue[80]=new Country('GERMANY','DIMC Level 1 EMEA WE','EMEA');
countryqueue[81]=new Country('GHANA','DIMC Level 1 EMEA ECEMEA','EMEA');
countryqueue[82]=new Country('GIBRALTAR','DIMC Level 1 EMEA WE','EMEA');
countryqueue[83]=new Country('GREECE','DIMC level 1 ECEMEA GREECE','EMEA');
countryqueue[84]=new Country('GREENLAND','DIMC Level 1 NA US','EMEA');
countryqueue[85]=new Country('GRENADA','DIMC Level 1 LA MEX','Latin America');
countryqueue[86]=new Country('GUADELOUPE','DIMC Level 1 LA MEX','Latin America');
countryqueue[87]=new Country('GUAM','DIMC Level 1 AP ANZ','Asia Pacific');
countryqueue[88]=new Country('GUATEMALA','DIMC Level 1 LA MEX','Latin America');
countryqueue[89]=new Country('GUINEA','DIMC Level 1 EMEA ECEMEA','EMEA');
countryqueue[90]=new Country('GUINEA-BISSAU','DIMC Level 1 EMEA ECEMEA','EMEA');
countryqueue[91]=new Country('GUYANA','DIMC Level 1 LA ARG','Latin America');
countryqueue[92]=new Country('HAITI','DIMC Level 1 LA MEX','Latin America');
countryqueue[93]=new Country('HEARD ISLAND AND MCDONALD ISLANDS','DIMC Level 1 NA US','EMEA');
countryqueue[94]=new Country('HOLY SEE (VATICAN CITY STATE)','DIMC Level 1 EMEA WE','EMEA');
countryqueue[95]=new Country('HONDURAS','DIMC Level 1 LA MEX','Latin America');
countryqueue[96]=new Country('HONG KONG','DIMC Level 1 AP Greater China','Asia Pacific');
countryqueue[97]=new Country('HUNGARY','DIMC Level 1 ECEMEA Hungary','EMEA');
countryqueue[98]=new Country('ICELAND','DIMC Level 1 EMEA WE','EMEA');
countryqueue[99]=new Country('INDIA','DIMC Level 1 AP India','Asia Pacific');
countryqueue[100]=new Country('INDONESIA','DIMC Level 1 AP ASEAN','Asia Pacific');
countryqueue[101]=new Country('IRAN, ISLAMIC REPUBLIC OF','DIMC Level 1 EMEA ECEMEA','EMEA');
countryqueue[102]=new Country('IRAQ','DIMC Level 1 EMEA ECEMEA','EMEA');
countryqueue[103]=new Country('IRELAND','DIMC Level 1 EMEA WE','EMEA');
countryqueue[104]=new Country('ISRAEL','DIMC Level 1 EMEA ECEMEA','EMEA');
countryqueue[105]=new Country('ITALY','DIMC Level 1 EMEA Italy','EMEA');
countryqueue[106]=new Country('JAMAICA','DIMC Level 1 LA MEX','Latin America');
countryqueue[107]=new Country('JAPAN','DIMC Level 1 AP Japan','Asia Pacific');
countryqueue[108]=new Country('JORDAN','DIMC Level 1 EMEA ECEMEA','EMEA');
countryqueue[109]=new Country('KAZAKHSTAN','DIMC Level 1 EMEA ECEMEA','EMEA');
countryqueue[110]=new Country('KENYA','DIMC Level 1 EMEA ECEMEA','EMEA');
countryqueue[111]=new Country('KIRIBATI','DIMC Level 1 AP ANZ','Asia Pacific');
countryqueue[112]=new Country('KOREA, DEMOCRATIC PEOPLE\'S REPUBLIC OF','DIMC Level 1 AP Korea','Asia Pacific');
countryqueue[113]=new Country('KOREA, REPUBLIC OF','DIMC Level 1 AP Korea','Asia Pacific');
countryqueue[114]=new Country('KUWAIT','DIMC Level 1 EMEA ECEMEA','EMEA');
countryqueue[115]=new Country('KYRGYZSTAN','DIMC Level 1 NA US','Asia Pacific');
countryqueue[116]=new Country('LAO PEOPLE\'S DEMOCRATIC REPUBLIC','DIMC Level 1 AP ASEAN','Asia Pacific');
countryqueue[117]=new Country('LATVIA','DIMC Level 1 ECEMEA Ee/Lv/Lt','EMEA');
countryqueue[118]=new Country('LEBANON','DIMC Level 1 EMEA ECEMEA','EMEA');
countryqueue[119]=new Country('LESOTHO','DIMC Level 1 EMEA ECEMEA','EMEA');
countryqueue[120]=new Country('LIBERIA','DIMC Level 1 EMEA ECEMEA','EMEA');
countryqueue[121]=new Country('LIBYAN ARAB JAMAHIRIYA','DIMC Level 1 EMEA ECEMEA','EMEA');
countryqueue[122]=new Country('LIECHTENSTEIN','DIMC Level 1 EMEA WE','EMEA');
countryqueue[123]=new Country('LITHUANIA','DIMC Level 1 ECEMEA Ee/Lv/Lt','EMEA');
countryqueue[124]=new Country('LUXEMBOURG','DIMC Level 1 EMEA WE','EMEA');
countryqueue[125]=new Country('MACAO','DIMC Level 1 AP Greater China','Asia Pacific');
countryqueue[126]=new Country('MACEDONIA, THE FORMER YUGOSLAV REPUBLIC OF','DIMC Level 1 ECEMEA Bg/Mk/Al','EMEA');
countryqueue[127]=new Country('MADAGASCAR','DIMC Level 1 EMEA ECEMEA','EMEA');
countryqueue[128]=new Country('MALAWI','DIMC Level 1 EMEA ECEMEA','EMEA');
countryqueue[129]=new Country('MALAYSIA','DIMC Level 1 AP ASEAN','Asia Pacific');
countryqueue[130]=new Country('MALDIVES','DIMC Level 1 AP ANZ','Asia Pacific');
countryqueue[131]=new Country('MALI','DIMC Level 1 NA US','EMEA');
countryqueue[132]=new Country('MALTA','DIMC Level 1 EMEA ECEMEA','EMEA');
countryqueue[133]=new Country('MARSHALL ISLANDS','DIMC Level 1 AP ANZ','Asia Pacific');
countryqueue[134]=new Country('MARTINIQUE','DIMC Level 1 LA MEX','Latin America');
countryqueue[135]=new Country('MAURITANIA','DIMC Level 1 EMEA ECEMEA','EMEA');
countryqueue[136]=new Country('MAURITIUS','DIMC Level 1 EMEA ECEMEA','EMEA');
countryqueue[137]=new Country('MAYOTTE','DIMC Level 1 EMEA ECEMEA','EMEA');
countryqueue[138]=new Country('MEXICO','DIMC Level 1 LA MEX','Latin America');
countryqueue[139]=new Country('MICRONESIA, FEDERATED STATES OF','DIMC Level 1 AP ANZ','Asia Pacific');
countryqueue[140]=new Country('MOLDOVA, REPUBLIC OF','DIMC Level 1 EMEA ECEMEA','EMEA');
countryqueue[141]=new Country('MONACO','DIMC Level 1 EMEA WE','EMEA');
countryqueue[142]=new Country('MONGOLIA','DIMC Level 1 AP Greater China','Asia Pacific');
countryqueue[143]=new Country('MONTENEGRO','DIMC Level 1 ECEMEA Rs/Me','EMEA');
countryqueue[144]=new Country('MONTSERRAT','DIMC Level 1 LA MEX','Latin America');
countryqueue[145]=new Country('MOROCCO','DIMC Level 1 EMEA ECEMEA','EMEA');
countryqueue[146]=new Country('MOZAMBIQUE','DIMC Level 1 EMEA ECEMEA','EMEA');
countryqueue[147]=new Country('MYANMAR','DIMC Level 1 AP ASEAN','Asia Pacific');
countryqueue[148]=new Country('NAMIBIA','DIMC Level 1 EMEA ECEMEA','EMEA');
countryqueue[149]=new Country('NAURU','DIMC Level 1 AP ANZ','Asia Pacific');
countryqueue[150]=new Country('NEPAL','DIMC Level 1 AP India','Asia Pacific');
countryqueue[151]=new Country('NETHERLANDS','DIMC Level 1 EMEA WE','EMEA');
countryqueue[152]=new Country('NETHERLANDS ANTILLES','DIMC Level 1 LA MEX','Latin America');
countryqueue[153]=new Country('NEW CALEDONIA','DIMC Level 1 AP ANZ','Asia Pacific');
countryqueue[154]=new Country('NEW ZEALAND','DIMC Level 1 AP ANZ','Asia Pacific');
countryqueue[155]=new Country('NICARAGUA','DIMC Level 1 LA MEX','Latin America');
countryqueue[156]=new Country('NIGER','DIMC Level 1 EMEA ECEMEA','EMEA');
countryqueue[157]=new Country('NIGERIA','DIMC Level 1 EMEA ECEMEA','EMEA');
countryqueue[158]=new Country('NIUE','DIMC Level 1 NA US','Asia Pacific');
countryqueue[159]=new Country('NORFOLK ISLAND','DIMC Level 1 AP ANZ','Asia Pacific');
countryqueue[160]=new Country('NORTHERN MARIANA ISLANDS','DIMC Level 1 AP ANZ','Asia Pacific');
countryqueue[161]=new Country('NORWAY','DIMC Level 1 EMEA WE','EMEA');
countryqueue[162]=new Country('OMAN','DIMC Level 1 EMEA ECEMEA','EMEA');
countryqueue[163]=new Country('PAKISTAN','DIMC Level 1 EMEA ECEMEA','EMEA');
countryqueue[164]=new Country('PALAU','DIMC Level 1 AP ANZ','Asia Pacific');
countryqueue[165]=new Country('PALESTINIAN TERRITORY, OCCUPIED','DIMC Level 1 EMEA ECEMEA','EMEA');
countryqueue[166]=new Country('PANAMA','DIMC Level 1 LA MEX','Latin America');
countryqueue[167]=new Country('PAPUA NEW GUINEA','DIMC Level 1 AP ANZ','Asia Pacific');
countryqueue[168]=new Country('PARAGUAY','DIMC Level 1 LA ARG','Latin America');
countryqueue[169]=new Country('PERU','DIMC Level 1 LA ARG','Latin America');
countryqueue[170]=new Country('PHILIPPINES','DIMC Level 1 AP ASEAN','Asia Pacific');
countryqueue[171]=new Country('PITCAIRN','DIMC Level 1 AP ANZ','Asia Pacific');
countryqueue[172]=new Country('POLAND','DIMC Level 1 ECEMEA Poland','EMEA');
countryqueue[173]=new Country('PORTUGAL','DIMC Level 1 EMEA WE','EMEA');
countryqueue[174]=new Country('PUERTO RICO','DIMC Level 1 LA MEX','Latin America');
countryqueue[175]=new Country('QATAR','DIMC Level 1 EMEA ECEMEA','EMEA');
countryqueue[176]=new Country('RÉUNION','DIMC Level 1 EMEA ECEMEA','EMEA');
countryqueue[177]=new Country('ROMANIA','DIMC Level 1 ECEMEA Romania','EMEA');
countryqueue[178]=new Country('RUSSIAN FEDERATION','DIMC Level 1 EMEA ECEMEA','EMEA');
countryqueue[179]=new Country('RWANDA','DIMC Level 1 EMEA ECEMEA','EMEA');
countryqueue[180]=new Country('SAINT HELENA','DIMC Level 1 NA US','EMEA');
countryqueue[181]=new Country('SAINT KITTS AND NEVIS','DIMC Level 1 LA MEX','Latin America');
countryqueue[182]=new Country('SAINT LUCIA','DIMC Level 1 LA MEX','Latin America');
countryqueue[183]=new Country('SAINT PIERRE AND MIQUELON','DIMC Level 1 NA US','North America');
countryqueue[184]=new Country('SAINT VINCENT AND THE GRENADINES','DIMC Level 1 LA MEX','Latin America');
countryqueue[185]=new Country('SAMOA','DIMC Level 1 AP ANZ','Asia Pacific');
countryqueue[186]=new Country('SAN MARINO','DIMC Level 1 EMEA WE','EMEA');
countryqueue[187]=new Country('SAO TOME AND PRINCIPE','DIMC Level 1 NA US','EMEA');
countryqueue[188]=new Country('SAUDI ARABIA','DIMC Level 1 EMEA ECEMEA','EMEA');
countryqueue[189]=new Country('SENEGAL','DIMC Level 1 EMEA ECEMEA','EMEA');
countryqueue[190]=new Country('SERBIA','DIMC Level 1 ECEMEA Rs/Me','EMEA');
countryqueue[191]=new Country('SEYCHELLES','DIMC Level 1 EMEA ECEMEA','EMEA');
countryqueue[192]=new Country('SIERRA LEONE','DIMC Level 1 EMEA ECEMEA','EMEA');
countryqueue[193]=new Country('SINGAPORE','DIMC Level 1 AP ASEAN','Asia Pacific');
countryqueue[194]=new Country('SLOVAKIA','DIMC Level 1 ECEMEA Cz/Sk','EMEA');
countryqueue[195]=new Country('SLOVENIA','DIMC Level 1 ECEMEA Sk/Hr/Ba','EMEA');
countryqueue[196]=new Country('SOLOMON ISLANDS','DIMC Level 1 AP ANZ','Asia Pacific');
countryqueue[197]=new Country('SOMALIA','DIMC Level 1 EMEA ECEMEA','EMEA');
countryqueue[198]=new Country('SOUTH AFRICA','DIMC Level 1 EMEA ECEMEA','EMEA');
countryqueue[199]=new Country('SOUTH GEORGIA AND THE SOUTH SANDWICH ISLANDS','DIMC Level 1 AP ANZ','Asia Pacific');
countryqueue[200]=new Country('SPAIN','DIMC Level 1 EMEA WE','EMEA');
countryqueue[201]=new Country('SRI LANKA','DIMC Level 1 AP India','Asia Pacific');
countryqueue[202]=new Country('SUDAN','DIMC Level 1 EMEA ECEMEA','EMEA');
countryqueue[203]=new Country('SURINAME','DIMC Level 1 LA ARG','Latin America');
countryqueue[204]=new Country('SVALBARD AND JAN MAYEN','DIMC Level 1 NA US','EMEA');
countryqueue[205]=new Country('SWAZILAND','DIMC Level 1 EMEA ECEMEA','EMEA');
countryqueue[206]=new Country('SWEDEN','DIMC Level 1 EMEA WE','EMEA');
countryqueue[207]=new Country('SWITZERLAND','DIMC Level 1 EMEA WE','EMEA');
countryqueue[208]=new Country('SYRIAN ARAB REPUBLIC','DIMC Level 1 EMEA ECEMEA','EMEA');
countryqueue[209]=new Country('TAIWAN','DIMC Level 1 AP Taiwan','Asia Pacific');
countryqueue[210]=new Country('TAJIKISTAN','DIMC Level 1 NA US','Asia Pacific');
countryqueue[211]=new Country('TANZANIA, UNITED REPUBLIC OF','DIMC Level 1 EMEA ECEMEA','EMEA');
countryqueue[212]=new Country('THAILAND','DIMC Level 1 AP ASEAN','Asia Pacific');
countryqueue[213]=new Country('TIMOR-LESTE','DIMC Level 1 NA US','Asia Pacific');
countryqueue[214]=new Country('TOGO','DIMC Level 1 EMEA ECEMEA','EMEA');
countryqueue[215]=new Country('TOKELAU','DIMC Level 1 AP ANZ','Asia Pacific');
countryqueue[216]=new Country('TONGA','DIMC Level 1 AP ANZ','Asia Pacific');
countryqueue[217]=new Country('TRINIDAD AND TOBAGO','DIMC Level 1 LA MEX','Latin America');
countryqueue[218]=new Country('TUNISIA','DIMC Level 1 EMEA ECEMEA','EMEA');
countryqueue[219]=new Country('TURKEY','DIMC level 1 ECEMEA TURKEY','EMEA');
countryqueue[220]=new Country('TURKMENISTAN','DIMC Level 1 NA US','Asia Pacific');
countryqueue[221]=new Country('TURKS AND CAICOS ISLANDS','DIMC Level 1 LA MEX','Latin America');
countryqueue[222]=new Country('TUVALU','DIMC Level 1 AP ANZ','Asia Pacific');
countryqueue[223]=new Country('UGANDA','DIMC Level 1 EMEA ECEMEA','EMEA');
countryqueue[224]=new Country('UKRAINE','DIMC Level 1 EMEA ECEMEA','EMEA');
countryqueue[225]=new Country('UNITED ARAB EMIRATES','DIMC Level 1 EMEA ECEMEA','EMEA');
countryqueue[226]=new Country('UNITED KINGDOM','DIMC Level 1 EMEA WE','EMEA');
countryqueue[227]=new Country('UNITED STATES','DIMC Level 1 NA US','North America');
countryqueue[228]=new Country('UNITED STATES MINOR OUTLYING ISLANDS','DIMC Level 1 NA US','North America');
countryqueue[229]=new Country('URUGUAY','DIMC Level 1 LA ARG','Latin America');
countryqueue[230]=new Country('UZBEKISTAN','DIMC Level 1 NA US','Asia Pacific');
countryqueue[231]=new Country('VANUATU','DIMC Level 1 AP ANZ','Asia Pacific');
countryqueue[232]=new Country('VENEZUELA','DIMC Level 1 LA ARG','Latin America');
countryqueue[233]=new Country('VIET NAM','DIMC Level 1 AP ASEAN','Asia Pacific');
countryqueue[234]=new Country('VIRGIN ISLANDS, BRITISH','DIMC Level 1 NA US','Latin America');
countryqueue[235]=new Country('VIRGIN ISLANDS, U.S.','DIMC Level 1 NA US','Latin America');
countryqueue[236]=new Country('WALLIS AND FUTUNA','DIMC Level 1 AP ANZ','Asia Pacific');
countryqueue[237]=new Country('WESTERN SAHARA','DIMC Level 1 EMEA ECEMEA','EMEA');
countryqueue[238]=new Country('YEMEN','DIMC Level 1 EMEA ECEMEA','EMEA');
countryqueue[239]=new Country('ZAMBIA','DIMC Level 1 EMEA ECEMEA','EMEA');
countryqueue[240]=new Country('ZIMBABWE','DIMC Level 1 EMEA ECEMEA','EMEA');


function Question(type,name,divid,pattern,message)
{
	this.type=type;
	this.name=name;
	this.divid=divid;
	this.pattern=pattern;
	this.message=message;
}

function getElement(id)
{
	if (ie)
	{
		obj = document.all[id];
	}
		else if (ns6)
	{
		obj = document.getElementById(id);
	}

	if (!obj) 
	{
		return null;
	}
	else
	{
		return obj;
	}
}

function getValue(q)
{
	//check if form element is valid

	if (q.type=="text")
	{
		return frm.elements[q.name].value;
	}

	if (q.type=="select")
	{
		var pickedindex=frm.elements[q.name].selectedIndex;
		return frm.elements[q.name].options[pickedindex].value;
	}
}

function processForm()
{
	//populate product field
	var selectedproducts="";
	for (var z=0;z<frm.elements['products'].length;++z)
	{
		if (frm.elements['products'][z].checked)
		{
			if (selectedproducts=="")
			{selectedproducts=frm.elements['products'][z].value;}
			else
			{selectedproducts=selectedproducts + ';' + frm.elements['products'][z].value;}
		}
	}

	if (frm.elements['other_product'].value.length>0)
	{
		if (selectedproducts=="")
		{selectedproducts="Other: " + frm.elements["other_product"].value;}
		else
		{selectedproducts=selectedproducts + ';' + "Other: " + frm.elements["other_product"].value;}
	}

	frm.elements['00N30000001b4XC'].value=selectedproducts;

	//change country queue if required
	var selectedcountry=frm.elements["00N30000001UlfP"].selectedIndex;
	var selectedcountryvalue=frm.elements["00N30000001UlfP"].options[selectedcountry].value;

	for (var x=0;x<countryqueue.length;++x)
	{
		if (selectedcountryvalue==countryqueue[x].abbr)
		{
			frm.elements['00N30000001H5sV'].value=countryqueue[x].queue;
			frm.elements['00N30000001V1vY'].value=countryqueue[x].region;
			if (countryqueue[x].region=='Latin America')
			{
				frm.elements['recordType'].value='012300000000x8r';
			}
		}
	}
	
	//
	frm.elements['00N30000001Yh27'].value=document.referrer;
	
  //populate campaign
  if(s.c_r('campaignname')){
  var campaignname=s.c_r('campaignname');
  
  frm.elements['00N30000002RIVW'].value=campaignname;
  }

}


function validateForm(FormName)
{
var validform=true;
frm=document.forms[FormName];

//define question parameters
//question type, field name, field error div id, regular expression, alertbox message

var questions = new Array();
questions[0]=new Question('text','first_name','first_name_error','[\\S]+','Please enter your first name.');
questions[1]=new Question('text','last_name','last_name_error','[\\S]+','Please enter your last name.');
questions[2]=new Question('text','description','question_error','[\\S]+','Please enter your question or need.');
questions[3]=new Question('select','00N30000001Goqh','subject_error','[\\S]+','Please select the subject of your question.');
questions[4]=new Question('select','00N30000001UlfP','country_error','[\\S]+','Please select your country.');
questions[5]=new Question('text','phone','phone_error','\\d.*\\d.*\\d.*\\d.*\\d.*\\d.*\\d.*\\d','Please enter your phone number.');
questions[6]=new Question('text','email','email_error','^\\w+([\\.-]?\\w+)*@\\w+([\\.-]?\\w+)*\\.(\\w{2}|(com|net|org|edu|int|mil|gov|arpa|biz|aero|name|coop|info|pro|museum))$','Please enter a valid e-mail address.');


//hide previous warnings
alertboxmessage="";
for (var x=0;x<questions.length;++x)
{
	hideWarning(questions[x].divid);
}

//loop through question array
for (var x=0;x<questions.length;++x)
{
	if (checkValue(questions[x])==false)
	{
		validform=false;
	}
}


if (validform==true)
{
	processForm();
	return validform;
}
else if (ns4)
{
	alert(alertboxmessage);
	return validform;
}
else
{
	showError("submit_error","");
	self.scroll(0,200);
	return validform;
}

}

function checkValue(qst)
{
	var RegEx = new RegExp(qst.pattern);

	if (RegEx.test(getValue(qst)))
	{
		return true;
	}
	else
	{
		showError(qst.divid,qst.message);
		return false;
	}
	return true;
}


function showError(id,message)
{
	alertboxmessage=alertboxmessage +"\n" + message;
	obj=getElement(id);
	if (!obj) 
	{
		return false;
	}
	else
	{
		obj.style.display = "inline";
		return true;
	}
}


function hideWarning(id)
{
	obj=getElement(id);
	if (!obj)
	{
		return false;
	}
	else
	{
		obj.style.display = "none";
		return true;
	}
}