function alerte(champ,message){if(message.length){alert(message);champ.focus();} return false;}
function replace(chaine,sc1,sc2,param){if(chaine!=null){place=chaine.indexOf(sc1);if(place!=-1){if(param) chaine=chaine.substring(0,place)+sc2+replace(chaine.substring(place+1),sc1,sc2,param);else chaine=chaine.substring(0,place)+sc2+chaine.substring(place+1);}return chaine;}}
function saisie(champ,message){if(!champ.value.length) return(alerte(champ,message));return true;}
function saisiemin(champ,mini,message){if(champ.value.length<mini) return(alerte(champ,message));return true;}
function doublesaisie(champ1,champ2,message){if(champ1.value!=champ2.value) return(alerte(champ1,message));return true;}
function entier(champ,message){if(message.length){if(isNaN(champ.value)||(champ.value.indexOf('.')!=-1)) return(alerte(champ,message))}else if(isNaN(champ)||(champ.indexOf('.')!=-1)) return false;return true;}
function selecte(champ,message,optionvalue){if(champ.options[champ.options.selectedIndex].value==optionvalue) return(alerte(champ,message));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 dateen(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 mois=champ.value.substring(0,2);var jour=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 Ouverture(adresse,nom,lon,lar,bar){if(navigator.userAgent.toLowerCase().indexOf('msie')==-1) longueur=lon-15;else longueur=lon;str="width="+longueur+",height="+lar+",scrollbars="+bar+"resizable=yes,menubar=no,toolbar=no";return open(adresse,nom,str);}
function ChangeSelect(Valeur,MenuDest,TabValeur,DefautValue){var ind=0;var j=0;var newdefaut=new Array();var k=0;var TabDefautValue=DefautValue.split(',');VideMenu(MenuDest);while(ind<TabValeur.length){if(Valeur==TabValeur[ind][2]){for(k=0;k<TabDefautValue.length;k++){if(TabValeur[ind][0]==TabDefautValue[k]) newdefaut[newdefaut.length]=j+1;}MenuDest.options[++j]=new Option(TabValeur[ind][1],TabValeur[ind][0]);}ind++;}for(k=0;k<newdefaut.length;k++) MenuDest.options[newdefaut[k]].selected=true;}
function VideMenu(Menu){var ind=Menu.options.length;while(ind>=1) Menu.options[ind--]=null;}
function AddTab(Tab,Value0,Value1,Value2,ind){Tab[ind]=new Array(ind);Tab[ind][0]=Value0;Tab[ind][1]=Value1;Tab[ind][2]=Value2;}
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;}
function VerifExt(champ,message,ext){if(!saisie(champ,'')) return true;var temoin=0;var fichier=champ.value.split('.');var extension=ext.split(',');for(ind=0;ind<extension.length;ind++) if(replace(extension[ind],' ','',1)==fichier[1]) temoin=1;if(temoin==1) return true;return alerte(champ,message);}
function AlerteSession(sessiontimeout){window.setTimeout("window.focus();alert('Attention.Votre session expire dans 5 minutes.')",sessiontimeout*60000);}
function CheckFamille(formul,nom,valeur,listefils,debform){liste=listefils.split(',');for(var i=0;i<liste.length;i++){for(var ind=debform;ind<document.forme.length;ind++) if(formul.elements[ind].name==nom) if(formul.elements[ind].value==liste[i]) formul.elements[ind].checked=valeur;}}
function multipleselecte(champ,message){if(champ.options.selectedIndex==-1) return(alerte(champ,message));return true;}
function mail(champ,message){if(saisie(champ,'')){if(champ.value.indexOf('@')>1) var domaine=champ.value.substring(champ.value.indexOf('@'));else return alerte(champ,message);if(domaine.indexOf('.')>1 && domaine.indexOf('.')<=domaine.length-3) return true;else 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 validcodeNAF(code,message){if(code.value.length!=4) return alerte(code,message);if(!entier(code.value.substring(0,3),'')) return alerte(code,message);if((!(code.value.substring(3)>='a' && code.value.substring(3)<='z')) && (!(code.value.substring(3)>='A' && code.value.substring(3)<='Z'))) return alerte(code,message);return true;}
function validSIRET(champ,message){if(champ.value.length!=14 || !entier(champ,message)) return alerte(champ,message);return true;}
function verif_email(email,message)
{
if (email.value.length>0)
 {
 var filter = /^([a-zA-Z0-9_\.\-])+\@(([a-zA-Z0-9\-])+\.)+([a-zA-Z0-9]{2,4})+$/;
 if (!filter.test(email.value)) { return(alerte(email,message)); } 	
 }	
return true; 	   
}