<!--
var errorsG="";
var argsG= new Array();

function defform()
{nidformV=defform.arguments[0];
argsG[nidformV]=new Array();
for (nidarg=1;nidarg<defform.arguments.length;nidarg++)
 {argsG[nidformV][nidarg-1]=defform.arguments[nidarg];
 };
}

function req(nameV,valueV)
{
 if (valueV.length==0) 
  {errorsG+='- '+nameV+' est obligatoire.\n';return false;}
 else
  {return true;};
}

function alp(nameV,valueV,carV)
{
 balret=true;
 if (carV=="") {smesscar=" (sans accent)";} else {smesscar=' (y compris '+carV+')';};
 slower=valueV.toLowerCase();
 for (nidalp=0;(nidalp<valueV.length);nidalp++) 
  {
  sCar=slower.charAt(nidalp);
  if ((sCar>='a'&&sCar<='z')||(carV.indexOf(sCar,0)!=-1)) 
   {}
  else
   {balret=false;};
  };
 if (!balret) {errorsG+='- '+nameV+' doit être alpha'+smesscar+'.\n';};
 return balret;
}

function aln(nameV,valueV,carV)
{
 baln=true;
 if (carV=="") {smesscar=" (sans accent)";} else {smesscar=' (y compris '+carV+')';};
 slower=valueV.toLowerCase();
 for (nidaln=0;(nidaln<valueV.length);nidaln++) 
  {
  sCar=slower.charAt(nidaln);
  if ((sCar>='a'&&sCar<='z')||(sCar>='0'&&sCar<='9')||(carV.indexOf(sCar,0)!=-1)) 
   {}
  else
   {baln=false;};
  };
 if (!baln) {errorsG+='- '+nameV+' doit être alphanumérique'+smesscar+'.\n';};
 return baln;
}

function ema(nameV,valueV)
{
 if (valueV.length==0) 
  {return true;}
 else
  {p=valueV.indexOf('@'); 
  if (p<1||p==(valueV.length-1)) 
   {errorsG+='- '+nameV+' doit contenir un email.\n';return false;}
  else
   {return true;};
  };
}

function num(nameV,valueV)
{
 if (valueV.length==0) 
  {return true;}
 else
  {if (isNaN(valueV))
   {errorsG+='- '+nameV+' doit être numérique.\n';return false;}
  else
   {return true;};
  };
}

function dat(nameV,valueV)
{
 bdat=true;
 if (valueV.length!=8) 
  {errorsG+='- '+nameV+' format date jj/mm/aa.\n';return false;}
 else
  {sCar=valueV.charAt(0);
  if (isNaN(sCar)) {bdat=false;};
  sCar=valueV.charAt(1);
  if (isNaN(sCar)) {bdat=false;};
  sCar=valueV.charAt(2);
  if (sCar!='/') {bdat=false;};

  sCar=valueV.charAt(3);
  if (isNaN(sCar)) {bdat=false;};
  sCar=valueV.charAt(4);
  if (isNaN(sCar)) {bdat=false;};
  sCar=valueV.charAt(5);
  if (sCar!='/') {bdat=false;};

  sCar=valueV.charAt(6);
  if (isNaN(sCar)) {bdat=false;};
  sCar=valueV.charAt(7);
  if (isNaN(sCar)) {bdat=false;};

  if (!bdat)
   {errorsG+='- '+nameV+' format date jj/mm/aa.\n';return false;}
  else
   {return true;};
  };
}

function txt(nameV,valueV)
{
 if (valueV.length==0) 
  {return true;}
 else
  {return true;
  };
}

function formchek(nformidV)
{
 var ntypfld="textareapassword";
 nformid=nformidV;
 bout=true;
 for (nidfc=0;((nidfc<document.forms[nformid].elements.length)&&(bout==true));nidfc++) 
  {
  if (ntypfld.indexOf(document.forms[nformid].elements[nidfc].type.toLowerCase(),0)>=0)
   {sid=document.forms[nformid].elements[nidfc].name;
   svalue=document.forms[nformid].elements[nidfc].value;
   scheck=sid.substring(0,3);
   sname=sid.substring(3,sid.length);
   errorsG="";
   if (scheck!="NO") 
    {
    //alert(nidfc+":"+scheck+":"+sname+":"+svalue);
    if (scheck.charAt(2)=='U') {document.forms[nformid].elements[nidfc].value=document.forms[nformid].elements[nidfc].value.toUpperCase();};
    if (scheck.charAt(2)=='L') {document.forms[nformid].elements[nidfc].value=document.forms[nformid].elements[nidfc].value.toLowerCase();};
    if (scheck.charAt(0)=='R') {if (!req(sname,svalue)) {bout=false;};};
    if (scheck.charAt(1)=='A') {if (!alp(sname,svalue,argsG[nformid][nidfc])) {bout=false;};};
    if (scheck.charAt(1)=='B') {if (!aln(sname,svalue,argsG[nformid][nidfc])) {bout=false;};};
    if (scheck.charAt(1)=='E') {if (!ema(sname,svalue)) {bout=false;};};
    if (scheck.charAt(1)=='N') {if (!num(sname,svalue)) {bout=false;};};
    if (scheck.charAt(1)=='D') {if (!dat(sname,svalue)) {bout=false;};};
    if (scheck.charAt(1)=='C') {if (!txt(sname,svalue)) {bout=false;};};
    };
   };
   if (!bout) {alert(errorsG);document.forms[nformid].elements[nidfc].focus();document.forms[nformid].elements[nidfc].select()};
  };
 return bout;
}

function checkandsub(nformV,noffV)
{if (formchek(nformV)) {document.forms[nformV].offset.value=noffV;document.forms[nformV].submit();};
}
//-->