var aMess = new Array();  //define the messages
  
  aMess["fr_mail"]					="Veuillez saisir votre adresse e-mail";
  aMess["fr_mail2"]					="Veuillez confirmer votre adresse e-mail";
  aMess["fr_new_mail"]				="Veuillez saisir votre nouvelle adresse e-mail";
  aMess["fr_new_mail2"]				="Veuillez confirmer votre nouvelle adresse e-mail";
  aMess["fr_mail_incorrect"]		="Votre adresse e-mail est incorrecte";
  aMess["fr_mail2_incorrect"]		="L'adresse e-mail de confirmation est incorrecte";
  aMess["fr_info_connexion"]		="Vous devez saisir\nvotre nouvelle adresse e-mail\nou votre nouveau mot de passe\nou les deux";
  aMess["fr_compare_mail"]			="Les adresses e-mail que vous avez saisies sont différentes";
  aMess["fr_passwd"]				="Veuillez saisir votre mot de passe";
  aMess["fr_passwd2"]				="Veuillez confirmer votre mot de passe";
  aMess["fr_new_passwd"]			="Veuillez saisir votre nouveau mot de passe";
  aMess["fr_new_passwd2"]			="Veuillez confirmer votre nouveau mot de passe";
  aMess["fr_compare_passwd"]		="Les mots de passe que vous avez saisis sont différents, SVP";
  
  aMess["fr_nom"]					="Veuillez saisir votre nom de famille";
  aMess["fr_prenom"]				="Veuillez saisir votre prénom";
  aMess["fr_tel"]					="Veuillez saisir votre N° de téléphone";
  aMess["fr_fax"]					="Veuillez saisir votre N° de fax";
  aMess["fr_mob"]					="Veuillez saisir votre N° de mobile";
  aMess["fr_nom_societe"]			="Veuillez indiquer le nom de votre société";
  aMess["fr_nic"]					="Le N° de TVA intracommunautaire est incorrect";
  aMess["fr_adresse_f"]				="Veuillez saisir votre adresse de facturation";
  aMess["fr_adresse"]				="Veuillez saisir votre adresse";
  aMess["fr_cp_f"]					="Vous n'avez pas indiqué votre code postal";
  aMess["fr_ville_f"]				="Vous n'avez pas indiqué votre ville";
  
  aMess['fr_type_livraison']		="Vous devez sélectionner le type de livraison";
  
  aMess["fr_societe_l"]				="Veuillez saisir le nom de la société où vous voulez être livré";
  aMess["fr_nom_l"]					="Veuillez saisir le nom de la personne qui réceptionnera le colis";
  aMess["fr_prenom_l"]				="Veuillez saisir le prénom de la personne qui réceptionnera le colis";
  aMess["fr_adresse_l"]				="Veuillez saisir votre adresse de livraison";
  aMess["fr_cp_l"]					="Vous n'avez pas indiqué votre code postal";
  aMess["fr_ville_l"]				="Vous n'avez pas indiqué votre ville";
  
  aMess["fr_serial"]				="Vous devez indiquer votre n° de série";
  aMess["fr_lieu_achat"]			="Vous devez indiquer le lieu où vous avez acheté le logiciel";
  
  aMess["fr_nic_invalide"] 			="La longueur de votre numéro de TVA intracommunautaire n'est pas correcte, veuillez réessayer...";
  aMess["fr_nic_longueur_pas_bon"] 	="Votre numéro de TVA intracommunautaire n'est pas correct, veuillez réessayer...";
  
  aMess["fr_fsecure_serial_incorrect"] = "Le numéro de série de Fsecure que vous avez renseigner n'est pas correct.\nVeuillez le vérifier."
  
/////////////////////////////
  aMess["es_mail"]					="Por favor escriba su dirección de correo electrónico";
  aMess["es_mail2"]					="Por favor confirme su dirección de correo electrónico";
  aMess["es_new_mail"]				="Por favor escriba su nueva dirección de correo electrónico";
  aMess["es_new_mail2"]				="Por favor confirme su nueva dirección de correo electrónico";
  aMess["es_mail_incorrect"]		="Su dirección de correo electrónico es incorrecta";
  aMess["es_mail2_incorrect"]		="La dirección de correo electrónico de confirmación es incorrecta ";
  aMess["es_info_connexion"]		="Debe escribir\nsu nueva dirección electrónica,\nnueva contraseña o\nambas";
  aMess["es_compare_mail"]			="Las direcciones de correo electrónico son distintas";
  aMess["es_passwd"]				="Por favor escriba su contraseña";
  aMess["es_passwd2"]				="Por favor confirme su contraseña";
  aMess["es_new_passwd"]			="Por favor escriba su nueva contraseña";
  aMess["es_new_passwd2"]			="Por favor confirme su nueva contraseña";
  aMess["es_compare_passwd"]		="Las contraseñas no coinciden";
  
  aMess["es_nom"]					="Por favor escriba sus apellidos";
  aMess["es_prenom"]				="Por favor escriba su nombre";
  aMess["es_tel"]					="Por favor escriba su n° de teléfono";
  aMess["es_fax"]					="Por favor escriba su n° de fax";
  aMess["es_mob"]					="Por favor escriba su n° de portátil";
  aMess["es_nom_societe"]			="Por favor indique el nombre se su sociedad";
  aMess["es_nic"]					="El n° de NIF no es el correcto";
  aMess["es_adresse_f"]				="Por favor escriba la dirección de facturación";
  aMess["es_cp_f"]					="No indicó su código postal";
  aMess["es_ville_f"]				="No indicó su ciudad";
  
  aMess["es_type_livraison"]		="Debe seleccionar el tipo de envío";
  
  aMess["es_societe_l"]				="Por favor escriba el nombre de la sociedad a dónde desea se le envíe el pedido";
  aMess["es_nom_l"]					="Por favor escriba los apellidos de la persona que recibirá el pedido";
  aMess["es_prenom_l"]				="Por favor escriba el nombre de la persona que recibirá el pedido";
  aMess["es_adresse_l"]				="Por favor escriba la dirección de envío";
  aMess["es_cp_l"]					="No indicó el código postal";
  aMess["es_ville_l"]				="No indicó la ciudad";
  
  aMess["es_serial"]				="No indicó su n° de serie";
  aMess["es_lieu_achat"]			="No indicó el sitio dónde compró el programa";
  
  aMess["es_nic_invalide"] 			="La longitud de su nº NIF no es la correcta, por favor vuelva a intentarlo...";
  aMess["es_nic_longueur_pas_bon"] 	="Su nº NIF no es correcto, por favor vuelva a intentarlo...";

/////////////////////////////
  aMess["uk_mail"]					="Please key-in your email address";
  aMess["uk_mail2"]					="Please confirm your email address";
  aMess["uk_new_mail"]				="Please key-in your new email address";
  aMess["uk_new_mail2"]				="Please confirm your new email address";
  aMess["uk_mail_incorrect"]		="Your email address is incorrect";
  aMess["uk_mail2_incorrect"]		="The confirmation email address is incorrect";
  aMess["uk_info_connexion"]		="You must write\nyour new email address,\nnew password, or\nboth";
  aMess["uk_compare_mail"]			="The email addresses are not equal";
  aMess["uk_passwd"]				="Please key-in your password";
  aMess["uk_passwd2"]				="Please confirm your password";
  aMess["uk_new_passwd"]			="Please key-in your new password";
  aMess["uk_new_passwd2"]			="Please conform your new password";
  aMess["uk_compare_passwd"]		="The passwords do not coincide";
  
  aMess["uk_nom"]					="Please key-in your family name";
  aMess["uk_prenom"]				="Please key-in your name";
  aMess["uk_tel"]					="Please key-in your telephone #";
  aMess["uk_fax"]					="Please key-in your fax #";
  aMess["uk_mob"]					="Please key-in your mobile phone";
  aMess["uk_nom_societe"]			="Please key-in the company name";
  aMess["uk_nic"]					="The intra-community TVA # in not correct";
  aMess["uk_adresse_f"]				="Please key-in the delivery address";
  aMess["uk_cp_f"]					="You did not type your zip code ";
  aMess["uk_ville_f"]				="You did not type your city ";
  
  aMess["uk_type_livraison"]		="You must choose the type of delivery ";
  
  aMess["uk_societe_l"]				="Please type the name of the company where you want to receive your shipment";
  aMess["uk_nom_l"]					="Please type the forename of the person that will receive your shipment";
  aMess["uk_prenom_l"]				="Please type the name of the person that will receive your shipment";
  aMess["uk_adresse_l"]				="Please type the shipment address";
  aMess["uk_cp_l"]					="You did not indicate the zip code ";
  aMess["uk_ville_l"]				="You did not indicate the city";
  
  aMess["uk_serial"]				="You did not indicate your serial #";
  aMess["uk_lieu_achat"]			="You did not indicate where you bought the programme";
  
  aMess["uk_nic_invalide"] 			="The length of your TVA # is incorrect, please try again...";
  aMess["uk_nic_longueur_pas_bon"] 	="Your TVA # is incorrect, please try again...";
/////////////////////////////
  aMess["de_mail"]					="Bitte geben Sie Ihre EMailadresse ein";
  aMess["de_mail2"]					="Bitte bestätigen Sie Ihre EMailadresse";
  aMess["de_new_mail"]				="Bitte geben Sie Ihre neue EMailadresse ein";
  aMess["de_new_mail2"]				="Bitte bestätigen Sie Ihre neue EMailadresse";
  aMess["de_mail_incorrect"]		="Ihre Emailadresse ist vermutlich falsch. Bitte prüfen.";
  aMess["de_mail2_incorrect"]		="Die bestätigte EMailadresse stimmt nicht mit der Ersteingabe überein.";
  aMess["de_info_connexion"]		="Bitte geben Sie \nIhre neue Emailadresse,\nnIhr neues Passwort, oder\nbeides ein.";
  aMess["de_compare_mail"]			="Die Emailadressen stimmen nicht überein.";
  aMess["de_passwd"]				="Bitte geben Sie Ihr Passwort ein";
  aMess["de_passwd2"]				="Bitte bestätigen Sie Ihr Passwort";
  aMess["de_new_passwd"]			="Bitte geben Sie Ihr neues Passwort ein";
  aMess["de_new_passwd2"]			="Bitte bestätigen Sie Ihr neues Passwort";
  aMess["de_compare_passwd"]		="Die Passwörter stimmen nicht überein.";
  
  aMess["de_nom"]					="Bitte geben Sie Ihren Familiennamen ein";
  aMess["de_prenom"]				="Bitte geben Sie Ihren Vornamen ein";
  aMess["de_tel"]					="Bitte geben Sie Ihre Telefonnummer ein";
  aMess["de_fax"]					="Bitte geben Sie Ihre Telefaxnummer ein";
  aMess["de_mob"]					="Bitte geben Sie Ihre Mobiltelefonnummer ein";
  aMess["de_nom_societe"]			="Bitte geben Sie Ihren Firmennamen ein";
  aMess["de_nic"]					="Die Ust.-ID-Nummer ist nicht korrekt. Bitte prüfen.";
  aMess["de_adresse_f"]				="Bitte geben Sie Ihre Versandadresse ein";
  aMess["de_cp_f"]					="Sie haben Ihre PLZ nicht angegeben ";
  aMess["de_ville_f"]				="Sie haben den Ort nicht angegeben ";
  
  aMess["de_type_livraison"]		="Bitte geben Sie die Versandart an ";
  
  aMess["de_societe_l"]				="Bitte geben Sie den Firmennamen ein, wohin die Lieferung erfolgen soll";
  aMess["de_nom_l"]					="Bitte geben Sie den Vornamen der empfangsberechtigten Person ein";
  aMess["de_prenom_l"]				="Bitte geben Sie den Familiennamen der empfangsberechtigten Person ein";
  aMess["de_adresse_l"]				="Bitte geben Sie die Lieferadresse ein";
  aMess["de_cp_l"]					="Sie haben die PLZ nicht eingegeben ";
  aMess["de_ville_l"]				="Sie haben den Ort nicht eingegeben ";
  
  aMess["de_serial"]				="Sie haben di Seriennummer nicht eingegeben.";
  aMess["de_lieu_achat"]			="Bitte geben Sie an, wo Sie das Produkt erworben haben.";
  
  aMess["de_nic_invalide"] 			="Die Länge der Ust.-ID-Nummer ist nicht korrekt. Bitte prüfen!";
  aMess["de_nic_longueur_pas_bon"] 	="Ihre eingegebene Ust.-ID-Nummer ist nicht korrekt. Bitte prüfen!";
/////////////////////////////

var nTVA = "";

function CarCont(unCar, Chaine)
{
    Val = false;
    for (var i=1;i<=Chaine.length;i++)
    {
        if (Chaine.substring(i,i+1)==unCar)
        {
            Val=true;
            break;
        } 
    }
    return Val;
}

function mail_OK(Ctry,formname)
{
    var x = document.forms[formname].mail.value;
	var filter  = /^([a-zA-Z0-9_\.\-])+\@(([a-zA-Z0-9\-])+\.)+([a-zA-Z0-9]{2,4})+$/;
	
	if(x.length == 0)
    {
        alert(aMess[Ctry+"_mail"]);
		document.forms[formname].mail.focus();
        return false;
    }
    else
	{
		if (filter.test(x)) 
		{
     		return true;
	 	}
		else 
		{
	 	    alert(aMess[Ctry+"_mail_incorrect"]);
		    document.forms[formname].mail.focus();
     	    return false;
	 	}
	}
    return true;
}

function mail_home_OK(Ctry,formname)
{
    var x = document.forms[formname].mail.value;
	var filter  = /^([a-zA-Z0-9_\.\-])+\@(([a-zA-Z0-9\-])+\.)+([a-zA-Z0-9]{2,4})+$/;
	
	if(x.length == 0)
    {
        alert(aMess[Ctry+"_mail"]);
		document.forms[formname].mail.focus();
        return false;
    }
    else
	{
		if (filter.test(x)) 
		{
     		return true;
	 	}
		else 
		{
	 	    alert(aMess[Ctry+"_mail_incorrect"]);
		    document.forms[formname].mail.focus();
     	    return false;
	 	}
	}
    return true;
}


function mail2_OK(Ctry,formname)
{
    var x = document.forms[formname].mail2.value;
	var filter  = /^([a-zA-Z0-9_\.\-])+\@(([a-zA-Z0-9\-])+\.)+([a-zA-Z0-9]{2,4})+$/;
	
	if(x.length == 0)
    {
        alert(aMess[Ctry+"_mail2"]);
		document.forms[formname].mail2.focus();
        return false;
    }
    else
	{
		if (filter.test(x)) 
		{
     		return true;
	 	}
		else 
		{
	 	    alert(aMess[Ctry+"_mail2_incorrect"]);
		    document.forms[formname].mail2.focus();
     	    return false;
	 	}
	}
    return true;
}


function Compare_mail_OK(Ctry,formname)
{
    if(document.forms[formname].mail.value != document.forms[formname].mail2.value)
    {
        alert(aMess[Ctry+"_compare_mail"]);
        return false;
    }
    return true;
}

function Compare_passwd_OK(Ctry,formname)
{
    if(document.forms[formname].passwd.value != document.forms[formname].passwd2.value)
    {
        alert(aMess[Ctry+"_compare_passwd"]);
        return false;
    }
    return true;
}


function newmail_OK(Ctry,formname)
{
    var x = document.forms[formname].mail.value;
	var filter  = /^([a-zA-Z0-9_\.\-])+\@(([a-zA-Z0-9\-])+\.)+([a-zA-Z0-9]{2,4})+$/;
	
	if(x.length == 0)
    {
        alert(aMess[Ctry+"_new_mail"]);
		document.forms[formname].mail.focus();
        return false;
    }
    else
	{
		if (filter.test(x)) 
		{
     		return true;
	 	}
		else 
		{
	 	    alert(aMess[Ctry+"_mail_incorrect"]);
		    document.forms[formname].mail.focus();
     	    return false;
	 	}
	}
    return true;
}

function newmail2_OK(Ctry,formname)
{
    var x = document.forms[formname].mail2.value;
	var filter  = /^([a-zA-Z0-9_\.\-])+\@(([a-zA-Z0-9\-])+\.)+([a-zA-Z0-9]{2,4})+$/;
	
	if(x.length == 0)
    {
        alert(aMess[Ctry+"_new_mail2"]);
		document.forms[formname].mail2.focus();
        return false;
    }
    else
	{
		if (filter.test(x)) 
		{
     		return true;
	 	}
		else 
		{
	 	    alert(aMess[Ctry+"_mail2_incorrect"]);
		    document.forms[formname].mail2.focus();
     	    return false;
	 	}
	}
    return true;
}

function passwd_OK(Ctry,formname)
{
    if(document.forms[formname].passwd.value.length == 0)
    {
        alert(aMess[Ctry+"_passwd"]);
		document.forms[formname].passwd.focus();
        return false;
    }
    return true;
}

////////////////////////////////////////////////////////////////////////////////////////////

function info_perso_OK(Ctry,formname)
{
      if(document.forms[formname].nom.value.length == 0)
       {
        alert(aMess[Ctry+'_nom']);
		document.forms[formname].nom.focus();
        return false;
       }
      if( document.forms[formname].prenom.value.length == 0)
       {
        alert(aMess[Ctry+"_prenom"]);
		document.forms[formname].prenom.focus();
        return false;
       }
	   if( document.forms[formname].tel.value.length == 0)
       {
        alert(aMess[Ctry+"_tel"]);
		document.forms[formname].tel.focus();
        return false;
       }
    return true;
}

function info_societe_OK(Ctry,formname)
{
    if( document.forms[formname].nom_soc.value.length == 0 )
    {
        alert(aMess[Ctry+"_nom_societe"]);
		document.forms[formname].nom_soc.focus();
        return false;
    }
    /*if( document.forms[formname].nic.value.length != 0 )
    {
	    if(!check_nic(Ctry,formname))
		{
			alert(aMess[Ctry+"_nic"]);
			document.forms[formname].nic.focus();
        	return false;
		}
    }*/
    return true;
}

function adresse_facturation_OK(Ctry,formname)
{
      if(document.forms[formname].adressef.value.length == 0)
       {
        alert(aMess[Ctry+'_adresse_f']);
		document.forms[formname].adressef.focus();
        return false;
       }
      if( document.forms[formname].codepostalf.value.length == 0)
       {
        alert(aMess[Ctry+"_cp_f"]);
		document.forms[formname].codepostalf.focus();
        return false;
       }
	   if( document.forms[formname].villef.value.length == 0)
       {
        alert(aMess[Ctry+"_ville_f"]);
		document.forms[formname].villef.focus();
        return false;
       }
    return true;
}

function adresse_livraison_OK(Ctry,formname)
{
   if((document.forms[formname].livraison[0].checked)||(document.forms[formname].livraison[1].checked))
   {
   	if(document.forms[formname].livraison[0].checked)
	  {
	  	if(document.forms[formname].societel.value.length == 0)
        {
        	alert(aMess[Ctry+'_societe_l']);
			document.forms[formname].societel.focus();
        	return false;
       	}
	  }
	  else
	  {
	  	if(document.forms[formname].noml.value.length == 0)
        {
        	alert(aMess[Ctry+'_nom_l']);
			document.forms[formname].noml.focus();
        	return false;
       	}
		if(document.forms[formname].prenoml.value.length == 0)
        {
        	alert(aMess[Ctry+'_prenom_l']);
			document.forms[formname].prenoml.focus();
        	return false;
       	}
	  }
   }
   else
   {
   	 alert(aMess[Ctry+'_type_livraison']);
	 return false; 
   }
   
   if(document.forms[formname].adressel.value.length == 0)
   {
        alert(aMess[Ctry+'_adresse_l']);
		document.forms[formname].adressel.focus();
        return false;
   }
   if(document.forms[formname].codepostall.value.length == 0)
   {
        alert(aMess[Ctry+'_cp_l']);
		document.forms[formname].codepostall.focus();
        return false;
   }
   if(document.forms[formname].villel.value.length == 0)
   {
        alert(aMess[Ctry+'_ville_l']);
		document.forms[formname].villel.focus();
        return false;
   }
   return true;
}


function info_logiciel_OK(Ctry,formname)
{
      if(document.forms[formname].serial.value.length == 0)
       {
        alert(aMess[Ctry+'_serial']);
		document.forms[formname].serial.focus();
        return false;
       }
      if( document.forms[formname].lieu.value.length == 0)
       {
        alert(aMess[Ctry+"_lieu_achat"]);
		document.forms[formname].lieu.focus();
        return false;
       }

    return true;
}

function check_nic(Ctry,formname)
{	
	var alphabeth;
	var digits;

	alphabeth = "ABCDEFGHIJKLMNOPQRSTUVWXYZ*+";
	digits = "0123456789";
  if(document.forms[formname].nicnb.value!="0")
  {
	
	for (i = 0; i < document.forms[formname].nic.value.length; i++)
	{
		if (digits.indexOf(document.forms[formname].nic.value.substr(i,1)) == -1 && 
			(alphabeth.indexOf(document.forms[formname].nic.value.substr(i,1).toUpperCase()) == -1))
		{ 
			alert(aMess[Ctry+"_nic_longueur_pas_bon"]);
			document.forms[formname].nic.focus();
			return false;
		}
	}
	
	if (document.forms[formname].nic.value.length != document.forms[formname].nicnb.value)  //VAT structure not valid 
	{ 
		  
		  alert(aMess[Ctry+"_nic_invalide"]);
          document.forms[formname].nic.focus();
	      return false;
        }
  }
  document.forms[formname].nic.value = document.forms[formname].nic.value.toUpperCase();
  return true;
}

function checkTVA(index)
{
    nTVA = document.forms[formname].ntva[index].value;
}


function DecocheLivraisonIdentique(formname)
{
	document.forms[formname].cochelivraison.checked = false;
}

////////////////////////////////////////////////////////////////////////////////////////////////////////
function checkForm(Ctry,formtype,formname)
{
	
	if(formtype==1)
	{
		if(Compare_mail_OK(Ctry,formname)==false)return false;
		if(Compare_passwd_OK(Ctry,formname)==false)return false;
		if(mail_OK(Ctry,formname)==false)return false;
		if(mail2_OK(Ctry,formname)==false)return false;
	}
	else if(formtype==2)
	{
		if(mail_OK(Ctry,formname)==false)return false;
		if(passwd_OK(Ctry,formname)==false)return false;
	}
	else if(formtype==3)
	{
		if(info_perso_OK(Ctry,formname)==false)return false;
		if(document.forms[formname].statut[1].checked)
		{
			if(!info_societe_OK(Ctry,formname))return false;
			if(document.forms[formname].nic.value.length != 0)
			{
					
				if(!check_nic(Ctry,formname))return false;
			}
			
			
		}
		if(!document.forms[formname].cochelivraison.checked)
		{
			if(adresse_livraison_OK(Ctry,formname) == false )return false;
		}
		if(adresse_facturation_OK(Ctry,formname) == false )return false;
	}
	else if(formtype==4)
	{
		if(	(document.forms[formname].mail.value.length != 0)&&(document.forms[formname].mail2.value.length != 0)&&(document.forms[formname].passwd.value.length != 0)&&(document.forms[formname].passwd2.value.length != 0) )
		{
			if(Compare_passwd_OK(Ctry,formname)==false)return false;
			if(Compare_mail_OK(Ctry,formname)==false)return false;
			if(newmail_OK(Ctry,formname)==false)return false;
			if(newmail2_OK(Ctry,formname)==false)return false;
		}
		if(	(document.forms[formname].mail.value.length == 0)&&(document.forms[formname].mail2.value.length == 0)&&(document.forms[formname].passwd.value.length == 0)&&(document.forms[formname].passwd2.value.length == 0) )
		{
			alert(aMess[Ctry+'_info_connexion']);
			return false;
		}
		else
		{
			if((document.forms[formname].mail.value.length == 0)&&(document.forms[formname].mail2.value.length == 0))
			{
				if(Compare_passwd_OK(Ctry,formname)==false)return false;
			}
			else 
			if((document.forms[formname].passwd.value.length == 0)&&(document.forms[formname].passwd2.value.length == 0))
			{
				if(Compare_mail_OK(Ctry,formname)==false)return false;
				if(newmail_OK(Ctry,formname)==false)return false;
				if(newmail2_OK(Ctry,formname)==false)return false;
			}
		}
		
	}
	else if(formtype==5)
	{
		if(info_perso_OK(Ctry,formname)==false)return false;
		if(adresse_facturation_OK(Ctry,formname) == false )return false;
		if(info_logiciel_OK(Ctry,formname)==false)return false;
		
	}
	else if(formtype==6)
	{
		if(!mail_home_OK(Ctry,"form_home_infonews")) return false;
	}
	else if(formtype==7)
	{
		if(!VerifFSecureSerial(Ctry,"form_fsecure_renewal")) return false;
	}
	return true;
}



function VerifFSecureSerial(Ctry,formname)
{
	var i = 1;
	var pasbon = false;
	
	for(var j=1;j<=5;j++){document.forms[formname].elements['SERIAL'+j].value = document.forms[formname].elements['SERIAL'+j].value.toUpperCase();}
	
	while((!pasbon)&&(i<=5))
	{
		var x = document.forms[formname].elements['SERIAL'+i].value;
		var filter  = /^([\dA-Z]){4}$/;
		
		if (!filter.test(x)) 
		{
	 	    alert(aMess[Ctry+"_fsecure_serial_incorrect"]);
		    document.forms[formname].elements['SERIAL'+i].focus();
     	    pasbon = true;
	 	}
		i++;
	}
	return !pasbon;
	
}

function VerifFormHs452(formname)
{
	var pasbon = false;
	var Ctry = 'fr';
	if(document.forms[formname].nom.value.length == 0)
    {
        alert(aMess[Ctry+'_nom']);
		document.forms[formname].nom.focus();
        pasbon = true;
    }
    else if( document.forms[formname].prenom.value.length == 0)
    {
        alert(aMess[Ctry+"_prenom"]);
		document.forms[formname].prenom.focus();
        pasbon = true;
    }
	else if(!mail_OK(Ctry,formname)) pasbon = true;
	else if(!mail2_OK(Ctry,formname)) pasbon = true;
	else if(!Compare_mail_OK(Ctry,formname))pasbon = true;
	
	if(!pasbon)document.forms[formname].submit();
}