// Procedures globales du projet
function _ECR(c,p,s){var h = (c + "").substring(0, 50);var n = 0;switch (p){case -2147483645:;n = 1;case -2147483648:;if (!window.tabExtraitChaine){tabExtraitChaine = new Array()}tabExtraitChaine[h] = 1;return _EC(c,tabExtraitChaine[h],s,n)
case -2147483646:;n = 1;case -2147483647:;if (!window.tabExtraitChaine || !(tabExtraitChaine[h])){return "\b"}(tabExtraitChaine[h])++;var sRes = _EC(c,tabExtraitChaine[h],s,n);if ("\b" == sRes){delete tabExtraitChaine[h]}return sRes}}
function _EC(c,p,s,n){if ((p >= -2147483648) && (p <= -2147483645)){return _ECR(c,p,s)}var t=new Array();if(typeof(s)!=typeof(t))t[0]=s;else t=s;if (!(n == 1)){var d=0;for(var i=0;i<p-1;i++){var m=-1;var l=0;for(var j=0;j<t.length;j++){s=t[j]
var k=c.indexOf(s,d);if((k>-1)&&((m<0)||(k<m))){m=k;l=s.length}}d=m+l;if(d==-1)return(p==1?c:"\b")}var f=-1;for(var j=0;j<t.length;j++){var k=c.indexOf(t[j],d);if((k>-1)&&((f<0)||(k<f)))f=k}if(f==-1)f=c.length;return c.substring(d,f)}else{
var d = c.length;for(var i=0;i<p-1;i++){var m=-1;for(var j=0;j<t.length;j++){var k=c.lastIndexOf(t[j],d-1);if(k>m)m=k}d=m;if (d == -1)	return (p==1?c:"\b")}var f=-1;var l=0;for(var j=0;j<t.length;j++){s=t[j];var k=c.lastIndexOf(s,d-1);if(k>f){f=k
l=s.length}}f+=l;if (f == -1)return c.substr(0, d);return c.substr(f, d - f)}}
function PROCEDURESGLOBALESDESECURIPLUSNAVIGATEUR_BVERIFIEFORMATEMAIL(VSEMAIL){{var VNLONGARO=0;var VNLONGLASTPOINT=0;var VSUTILISATEUR="";var VSSERVEUR="";var VSPAYS="";VNLONGARO=Position(VSEMAIL,"@",null);if((!VNLONGARO)){return 0}
if((Position((VSEMAIL + "").substring((VNLONGARO+1)-1, VSEMAIL.length),"@",null)!=0)){return 0}var VI=1;while((_EC((VSEMAIL + "").substring((VNLONGARO+1)-1, VSEMAIL.length),VI,".",0)!=clWDEncode.sEncodeCharset(unescape("\b")))){
VSPAYS=_EC((VSEMAIL + "").substring((VNLONGARO+1)-1, VSEMAIL.length),VI,".",0);VI=VI+1}if((VI==1)){return 0}VNLONGLASTPOINT=(VSEMAIL.length-VSPAYS.length);VSUTILISATEUR=(VSEMAIL + "").substring(1-1, (VNLONGARO-1))
VSSERVEUR=(VSEMAIL + "").substring((VNLONGARO+1)-1, (VNLONGLASTPOINT-1));if(((VSUTILISATEUR.length==0)||(VSSERVEUR.length==0))){return 0}if(((VSPAYS.length<2)||(VSPAYS.length>3))){return 0}return 1}}