function MM_findObj(n, d) { //v4.0
  var p,i,x;  if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
    d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
  if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
  for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
  if(!x && document.getElementById) x=document.getElementById(n); return x;
}


function setTextValue(name,value)
{	obj=MM_findObj(name);	
	obj.value=value;}
	
function getTextValue(name)
{	return MM_findObj(name).value;	}
	
function setListValue(name,value)
{	liste=MM_findObj(name);
	for (i=0;i<liste.length;i++)
	if (liste.options[i].value==value)
		{ liste.options[i].selected=true; return; }
}
	
function getListValue(name)
{	
	var lst=MM_findObj(name);
	return lst.options[lst.selectedIndex].value;
}
	
function setRadioValue(name,value)
{	varRad=MM_findObj(name);
	for (i=0;i<varRad.length;i++)
	if (varRad[i].value==value)
		varRad[i].checked=true;	}
	
function getRadioValue(name)
{	varRad=MM_findObj(name);
	for (i=0;i<varRad.length;i++)
	if (varRad[i].checked)
		return( varRad[i].value);
}
			

function VerifForm()
{	
	// si le pays est andorre, le Code postal est facultatif
	var obligCodePostal=true;	
	var ret;

	if (!checkCountry(MM_findObj('Country')))
	{
		return false;
	}
	ret=VerifContenu();
	if (!ret) return false;
	return (true);
}

function VerifContenu()
{	
	obligCodePostal=false;
	// Verification du contenu de chaque champ et de son caractère obligatoire
	if (!checkFieldValue(MM_findObj('SocietyName'),true,'de votre société','NAME','')) return false;
	if (!checkFieldValue(MM_findObj('SocietyID'),false,'de votre numéro SIREN','ALPHA','')) return false;
	if (getListValue('Country').toLowerCase()!='andorre')
		{ obligCodePostal=true; }
	if (!checkFieldValue(MM_findObj('ZipCode'),obligCodePostal,'de votre code postal','ZIPCODE','')) return false;
	if (!checkFieldValue(MM_findObj('City'),true,'de votre ville','NAME','')) return false;
	if (!checkFieldValue(MM_findObj('Phone'),true,'de votre téléphone','PHONE',getListValue('Country'))) return false;
	if (!checkFieldValue(MM_findObj('Fax'),false,'de votre fax','PHONE',getListValue('Country'))) return false;
	if (!checkFieldValue(MM_findObj('email'),false,'de votre e-mail','EMAIL','')) return false;
	if (!checkFieldValue(MM_findObj('UserName'),true,'de votre nom','NAME','')) return false;
	if (!checkFieldValue(MM_findObj('UserJob'),false,'de votre fonction','ALPHA')) return false;
	if (!checkFieldValue(MM_findObj('NbCars'),true,'du nombre de véhicules','NUMBER','')) return false;
	return true;
}