function ouvrir(page,nom,x,y,scroll)
{ wo=window.open(page,nom,"width="+x+",height="+y+",scrollbars="+scroll); wo.focus(); }


function verif_longueur_text(champ,mini,libelle)
{
if (champ.value.length < mini)
 {
 if (champ.value.length==0)
  window.alert("Le champ " + libelle + " doit \352tre renseign\351 !")
 else window.alert("Le champ " + libelle + " doit avoir une longueur de " + mini + " caract\350res.");
 champ.focus(); return false;
 }  
return true;
}


function verif_autorise_text(champ,autorise,libelle)
{
for (i=0; i<champ.value.length ;i++)
 {
 carac = champ.value.charAt(i);
 if (autorise.indexOf(carac)==-1)
   {alert('le champ '+libelle+' contient des caract\350res non autoris\351s !');
   champ.focus(); return false;}
 }
return true;
}


function verif_jourdumois(j,m,a)
{
if (m.value == 2)
  {
  if (a.value%4) jourmax = 28
  else
    {
    if (!(a.value%100) && (a.value%400)) jourmax = 28
    else jourmax = 29;
    }
  }
else 
  {
  if (m.value==4 || m.value==6 || m.value==9 || m.value==11) jourmax = 30
  else jourmax = 31;
  }
if ((j.value<1) || (j.value>jourmax))
  {alert("Le JOUR doit \352tre compris entre 1 et "+jourmax);
  j.focus(); return false;}
return true;  
}


function verif_date(j,m,a,obligatoire,libelle)
{
if (obligatoire)
  {
  if (!verif_longueur_text(j,1,'JOUR ('+libelle+')')) return false;
  if (!verif_longueur_text(m,1,'MOIS ('+libelle+')')) return false;
  if (!verif_longueur_text(a,4,'ANNEE ('+libelle+')')) return false;
  }
else
  {
  j_vide = (j.value.length == 0);
  m_vide = (m.value.length == 0);
  a_vide = (a.value.length < 4);
  if (!(j_vide && m_vide && a_vide) && (j_vide || m_vide || a_vide))
    {alert('La date est incompl\350te, compl\351tez ou effacez-la');
    j.focus(); return false;}
  else if (j_vide && m_vide && a_vide) return true;
  }

if (!verif_autorise_text(j,'0123456789','JOUR')) return false;
if (!verif_autorise_text(m,'0123456789','MOIS')) return false;
if (!verif_autorise_text(a,'0123456789','ANNEE')) return false;
if ((m.value < 1) || (m.value > 12)) 
  {alert('Le chiffre du MOIS doit \352tre compris entre 1 et 12 !');
  m.focus(); return false;}
if (!verif_jourdumois(j,m,a)) return false;
return true;
}


function verif_email(email)
{
if (email.value.length>0)
 {
 pos1=email.value.indexOf('@'); pos2=email.value.lastIndexOf('@'); pos3=email.value.lastIndexOf('.');
 if ((pos1<=0) || (pos1==email.value.length-1) || (pos1!=pos2) || (pos3<=0) || (pos3==email.value.length-1))
  { 	   
  alert("L'adresse E-MAIL n'est pas valide"); email.focus(); return false;
  }	
}	
return true; 	   
}


function verif_entier(champ,libelle)
{
if (champ.value.length)
 if (isNaN(champ.value) || (champ.value.indexOf('.')!=-1))
  {alert('Le champ '+libelle+' doit \352tre un nombre entier !');
   champ.focus(); return false;}
return true;
}


function verif_entier_limites(champ,mini,maxi,libelle)
{
if (verif_entier(champ,libelle))
 {
 if ((champ.value<mini) || (champ.value>maxi))
  {alert('Le champ '+libelle+' doit \352tre un compris entre '+mini+' et '+maxi+'.');
   champ.focus(); return false;}
 }
else return false;
return true;
}

function confirmer(msg){return confirm("Veuillez confirmer " + msg);}
function selecte(champ,message,optionvalue){if(champ.options[champ.options.selectedIndex].value==optionvalue) return(alerte(champ,message));return true;}
function alerte(champ,message){if(message.length){alert(message);champ.focus();} return false;}
function entier(champ,message){if(message.length){if(isNaN(champ.value)||(champ.value.indexOf('.')!=-1)) return(alerte(champ,message))}else if(isNaN(champ.value)||(champ.value.indexOf('.')!=-1)) return false;return true;}
function date(champ,message){if(champ.value.length!=10) return(alerte(champ,message));if(champ.value.substring(2,3)!="/"||champ.value.substring(5,6)!="/") return(alerte(champ,message));var jour=champ.value.substring(0,2);var mois=champ.value.substring(3,5);var annee=champ.value.substring(6,10);if(!entier(jour,'')||!entier(mois,'')||!entier(annee,'')) return(alerte(champ,message));if(mois==1||mois==3||mois==5||mois==7||mois==8||mois==10||mois==12) if(jour<1||jour>31) return(alerte(champ,message));if(mois==4||mois==6||mois==9||mois==11) if(jour<1||jour>30) return(alerte(champ,message));if(mois==2){if((annee%4)||(!(annee%100)&&(annee%400))) if(jour<1||jour >28) return(alerte(champ,message));else if(jour<1||jour>29) return(alerte(champ,message));}if(mois<1||mois>12) return(alerte(champ,message));return true;}
function comparedate(date1,date2){var temp1=date1.split('/');var temp2=date2.split('/');if(temp1[2]>temp2[2]) return(1);else if(temp1[2]==temp2[2]){if(temp1[1]>temp2[1]) return(1);else if(temp1[1]==temp2[1]){if(temp1[0]>temp2[0]) return(1);else if(temp1[0]==temp2[0]) return(0);else return(2);}else return(2);}else return(2);}
function ValidChecked(champ,message){for(i=0;i<champ.length;i++) if(champ[i].checked) break;if(i>=champ.length) return(alerte(champ[0],message));return ++i;}