// Procédures globales du projet
function _RMP(c,o,r){var p=0;var t=c.indexOf(o);var s=new String();while(t!=-1){s+=c.substring(p,t);s+=r;p=t+o.length;t=c.indexOf(o,p);		}s+=c.substring(p,c.length);return s}
function _DRO(c,n){	return c.substring(c.length-n,c.length);}// VM_Asc
function _ASC(c){return(c.charCodeAt(0))}
function _MI3(c,n,l){return c.substring(n-1,n+l-1);}// Fonction générale de formatage
function EXE_NVC(bCadrageGauche,bSigne,bZero,nTaille,nPrec,bMillier,fVal,nBase){var szRes=Math.abs(Math.round(fVal)).toString(nBase);var nLgr=szRes.length;if(bSigne||(fVal<0))nLgr++;if(bMillier){var szRes2=""
for(var i=0;i<Math.ceil(szRes.length/3);i++){szRes2=szRes.substring(szRes.length-(3*(i+1)),szRes.length-(3*i))+" "+szRes2;nLgr++}szRes=szRes2.substring(0,szRes2.length-1);nLgr--}if(nLgr<eval(nTaille)){if(bCadrageGauche){while(nLgr<eval(nTaille)){
szRes+=" ";nLgr++}}else{if(bZero){while(nLgr<eval(nTaille)){if(bMillier&&(((nLgr)%4)==0))szRes=" "+szRes;else szRes="0"+szRes;nLgr++}}else{while(nLgr<eval(nTaille)){szRes=" "+szRes;nLgr++}}}}if(bSigne||(fVal<0)){var n=0
while((szRes.charAt(n)==" ")&&(n<nLgr))n++;var szSgn="+";if(fVal<0)szSgn="-";szRes=szRes.substring(0,n)+szSgn+szRes.substring(n,szRes.length)}return szRes}
function EXE_NVC_d(bCadrageGauche,bSigne,bZero,nTaille,nPrec,bMillier,fVal){return EXE_NVC(bCadrageGauche,bSigne,bZero,nTaille,nPrec,bMillier,fVal,10)}
function EXE_NVC_x(bCadrageGauche,bSigne,bZero,nTaille,nPrec,bMillier,fVal){return EXE_NVC(bCadrageGauche,bSigne,bZero,nTaille,nPrec,bMillier,fVal,16)}
function EXE_NVC_o(bCadrageGauche,bSigne,bZero,nTaille,nPrec,bMillier,fVal){return EXE_NVC(bCadrageGauche,bSigne,bZero,nTaille,nPrec,bMillier,fVal,8)}
function EXE_NVC_e(bCadrageGauche,bSigne,bZero,nTaille,nPrec,bMillier,fVal){var nExp=Math.round(Math.log(Math.abs(fVal))/Math.LN10);var fPuiss=Math.pow(10,nExp);var szRes=EXE_NVC_f(bCadrageGauche,bSigne,bZero,nTaille,nPrec,bMillier,(fVal/fPuiss))
while(szRes.charAt(szRes.length-1)==" ")szRes=szRes.substring(0,szRes.length-1);szRes+="e";if(nExp>=0)szRes+="+";else szRes+="-";if(nExp<10)szRes+="0";szRes+=Math.abs(nExp);while(szRes.length<nTaille)if(bCadrageGaucHe)szRes+=" ";else szRes=" "+szRes
return szRes}
function EXE_NVC_f(bCadrageGauche,bSigne,bZero,nTaille,nPrec,bMillier,fVal){var fEnt=Math.floor(fVal);if(fVal<0)fEnt+=1;var szDec=""+(Math.round((Math.abs(fVal)-Math.floor(Math.abs(fVal)))*Math.pow(10,nPrec))/Math.pow(10,nPrec))
szDec=szDec.substring(2,szDec.length);var szRes=EXE_NVC_d(bCadrageGauche,bSigne,bZero,nTaille-(nPrec+1),nPrec,bMillier,fEnt);if(bCadrageGauche)while(szRes.charAt(szRes.length-1)==" ")szRes=szRes.substring(0,szRes.length-1)
while(szRes.charAt(0)==" ")szRes=szRes.substr(1);if(nPrec>0){szRes+=".";while(szDec.length<nPrec)szDec+="0";szRes+=szDec.substring(0,nPrec)}while(szRes.length<nTaille)if(bCadrageGauche)szRes+=" ";else szRes=" "+szRes;return szRes}
function EXE_NVC_D(bCadrageGauche,bSigne,bZero,nTaille,nPreC,bMillier,fVal){return EXE_NVC_d(bcadrageGauche,bSigne,bZero,nTaille,nPrec,bMillier,fVal)}
function EXE_NVC_E(bCadrageGauche,bSigne,bZero,nTaille,nPrec,bMillier,fVal){return EXE_NVC_e(bCadrageGauche,bSigne,bZero,nTaille,nPrec,bMillier,fVal)}
function EXE_NVC_O(bCadrageGauche,bSigne,bZero,nTaille,nPrec,bMillier,fVal){return EXE_NVC_o(bCadrageGauche,bSigne,bZero,nTaille,nPrec,bMillier,fVal)}
function EXE_NVC_X(bCadrageGauche,bSigne,bZero,nTaille,nPrec,bMillier,fVal){var szRes = EXE_NVC_x(bCadrageGauche,bSigne,bZero,nTaille,nPrec,bMillier,fVal);return szRes.toUpperCase()}
function EXE_NVC_F(bCadrageGauche,bSigne,bZero,nTaille,nPrec,bMillier,fVal){return EXE_NVC_f(bCadrageGauche,bSigne,bZero,nTaille,nPrec,bMillier,fVal)}
function _NVC(fVal,szFormat){if(isNaN(fVal))return fVal;var bCadrageGauche=false;var bSigne=false;var bZero=false;var nTaille=0;var nPrec=0;var szType="f";var bMillier=false;if(szFormat.charAt(0)=="-"){bCadrageGauche=true
szFormat=szFormat.substring(1,szFormat.length)}if(szFormat.charAt(0)=="+"){bSigne=true;szFormat=szFormat.substring(1,szFormat.length)}if(szFormat.charAt(0)=="0"){bZero=true;szFormat=szFormat.substring(1,szFormat.length)}
if((szFormat.charAt(szFormat.length-1)=="s")||(szFormat.charAt(szFormat.length-1)=="S")){bMillier=true;szFormat=szFormat.substring(0,szFormat.length-1)}szType=szFormat.charAt(szFormat.length-1);szFormat=szFormat.substring(0,szFormat.length-1)
if((szType!="d")&&(szType!="e")&&(szType!="f")&&(szType!="o")&&(szType!="x")&&(szType!="D")&&(szType!="E")&&(szType!="F")&&(szType!="O")&&(szType!="X"))return"";nTaille=parseInt(szFormat)
if(szFormat.indexOf(".")!=-1)nPrec=parseInt(szFormat.substring(szFormat.indexOf(".")+1,szFormat.length));else{var szEnt=""+fVal;var szDec=""+fVal;var nPosPt=szDec.indexOf(".");if(nPosPt!=-1){szDec=szDec.substring(nPosPt+1)
szEnt=szEnt.substring(nPosPt-1);nPrec=nTaille-(szEnt.length+1)}}return eval("EXE_NVC_"+szType+"("+bCadrageGauche+","+bSigne+","+bZero+","+nTaille+","+nPrec+","+bMillier+","+fVal+")")}
function _VAL(v){var r=parseFloat(v);return isNaN(r)?0:r}
function _MI2(c,n){return c.substring(n-1,c.length);}// STD_HeureSys
function _HSY(){var d=new Date();var h=""+d.getHours();if(h.length==1)h="0"+h;var m=""+d.getMinutes();if(m.length==1)m="0"+m;var s=""+d.getSeconds();if(s.length==1)s="0"+s;var ms=""+d.getMilliseconds();if(ms.length==1)ms="0"+ms
if(ms.length>=2)ms=ms.substr(0,2);return h+m+s+ms}
function _EC(c,p,s,n){if (!(n == 1)){var d=-s.length;for(var i=0;i<p-1;i++){d=c.indexOf(s,d+s.length);if(d==-1)return(p==1?c:"\b")}var f=c.indexOf(s,d+s.length);if(f==-1)f=c.length;return c.substring(d+s.length,f)}else{var d = c.length
for(var i=0;i<p-1;i++){d = c.lastIndexOf(s, d - 1);if (d == -1)	return (p==1?c:"\b")}var f = c.lastIndexOf(s, d - 1);if (f == -1)return c.substr(0, d);return c.substr(f + 1, d - f - 1)}}
function PGSTOCKDOORS_OBJDISABLE(VSALIAS, VBDISABLE){{if (VBDISABLE==undefined) VBDISABLE=true;{var VSTMP="_PAGE_.";if((VSALIAS.substring(0,7)==VSTMP)){VSTMP=""}eval((VSTMP+VSALIAS)).disabled=VBDISABLE}}}
function PGSTOCKDOORS_NOBGFIXED(){{eval("document.body.style").cssText=""}}
function PGSTOCKDOORS_OBJHIDE(VSALIAS, VBHIDE){{if (VBHIDE==undefined) VBHIDE=true;{var VSTMP="";if(VBHIDE){VSTMP="hidden"}else {;VSTMP="visible"}eval(VSALIAS).style.visibility=VSTMP}}}
function PGSTOCKDOORS_NEXTCHP(VSNOMCHP, VNZRNUM, VNZROCC){{var VNKEY=eval("event").keyCode;if(((VNKEY==40)&&(VNZROCC>VNZRNUM))){PGSTOCKDOORS_SELCHP((PGSTOCKDOORS_ZRID((VNZRNUM+1))+VSNOMCHP))}if(((VNKEY==38)&&(VNZRNUM>1))){
PGSTOCKDOORS_SELCHP((PGSTOCKDOORS_ZRID((VNZRNUM-1))+VSNOMCHP))}}}
function PGSTOCKDOORS_PSABLIER(VBSTATE){{if (VBSTATE==undefined) VBSTATE=2;{switch(VBSTATE){case 0:{eval("document.body.style").cssText="cursor: main"}break;case 1:{eval("document.body.style").cssText="cursor: wait"}break;case 2:{
eval("document.body").className="sablier"}break}}}}
function PGSTOCKDOORS_AUTOCOMPLETE(VCHPNAME){{var VCHPVAL="";VCHPVAL=eval(("_PAGE_."+VCHPNAME)).value;if((VCHPVAL!="")){VCHPVAL=_RMP(VCHPVAL," ","*");if((VCHPVAL.substring(0,1)!="*")){VCHPVAL=("*"+VCHPVAL)}if((_DRO(VCHPVAL,1)!="*")){
VCHPVAL=(VCHPVAL+"*")}eval(("_PAGE_."+VCHPNAME)).value=VCHPVAL}}}
function PGSTOCKDOORS_ADRESSEHREF(){{var VADRESSE="";VADRESSE=(eval("document.location").href+"");if(((VADRESSE.indexOf("?")+1)!=0)){return((VADRESSE.substring(0,((VADRESSE.indexOf("?")+1)-1))+""))}else if(((VADRESSE.indexOf("#")+1)!=0)){
return((VADRESSE.substring(0,((VADRESSE.indexOf("#")+1)-1))+""))}else {;return((VADRESSE+""))}}}
function PGSTOCKDOORS_VALEURAFFICHEE(VALIASCOMBO){{if(isUndefined(pEval((("_PAGE_."+VALIASCOMBO)+".options")))){return("")}return(eval((((("_PAGE_."+VALIASCOMBO)+".options[_PAGE_.")+VALIASCOMBO)+".selectedIndex]")).text)}}
function PGSTOCKDOORS_PSTATUT(VSVAL){{if (VSVAL==undefined) VSVAL="";{eval("window").status=VSVAL}}}
function PGSTOCKDOORS_BLOCKVIR(){{if(((eval("event").keyCode==188)||(eval("event").keyCode==219))){PGSTOCKDOORS_RETURNVALUE()}}}
function PGSTOCKDOORS_CHANGEBACKGROUND(VVFILE){{eval("document.body").background=VVFILE}}
function PGSTOCKDOORS_CHECKENTER(){{if((eval("event").keyCode==13)){return(true)}else {;return(false)}}}
function PGSTOCKDOORS_DETECTF4(){{if(((eval("window.event").keyCode!=18)&&(eval("window.event").keyCode!=115))){eval("key").value=0}if((eval("window.event").keyCode==18)){eval("key").value=18}
if(((eval("window.event").keyCode==115)&&(eval("Mark2Close").value==18))){eval("Mark2Close").value=true}return(true)}}
function PGSTOCKDOORS_ISVALNUM(VCHAINENAVENVOYEE){{var VACHERCHER=0;var VI=0;for(VI=1;VI<=VCHAINENAVENVOYEE.length;VI++){VACHERCHER=_ASC(_MI3(VCHAINENAVENVOYEE,VI,1).substring(0,1));if((((VACHERCHER>57)||(VACHERCHER<48))&&(VACHERCHER!=46))){
return(false)}}return(true)}}
function PGSTOCKDOORS_MASKNUM(VCHAMP, VPSORTIE, VDEC){{if (VPSORTIE==undefined) VPSORTIE=false;if (VDEC==undefined) VDEC=2;{var VSCHPVAL=eval(("_PAGE_."+VCHAMP)).value;if((VPSORTIE==true)){
eval(("_PAGE_."+VCHAMP)).value=_NVC(_VAL(VSCHPVAL),(("."+VDEC)+"f"));return}var VDOTPOS=(VSCHPVAL.indexOf(".")+1);switch(true){case (VDOTPOS==1):{VSCHPVAL=("0"+VSCHPVAL);eval(("_PAGE_."+VCHAMP)).value=VSCHPVAL;PGSTOCKDOORS_RETURNVALUE()}break
case ((VDOTPOS>1)&&((eval("event").keyCode==110)||(eval("event").keyCode==190))):{PGSTOCKDOORS_RETURNVALUE()}break;case ((_MI2(VSCHPVAL,(VDOTPOS+1)).length>VDEC)&&(VDOTPOS>1)):{VSCHPVAL=VSCHPVAL.substring(0,(VDOTPOS+VDEC))
eval(("_PAGE_."+VCHAMP)).value=VSCHPVAL;PGSTOCKDOORS_RETURNVALUE();return}break;default:{}break}}}}
function PGSTOCKDOORS_RELOADPAGE(VCADRE, VVPAGE){{var VADRESSE="";VADRESSE=(eval((VCADRE+".location")).href+"");if(((VADRESSE.indexOf(".htm")+1)!=0)){
eval((VCADRE+".location")).replace(((VADRESSE.substring(0,((VADRESSE.indexOf(".htm")+1)+3))+"&")+_HSY()))}else {
eval((VCADRE+".location")).replace(((((((VADRESSE.substring(0,((VADRESSE.indexOf("?")+1)-1))+"?WD_ACTION_=REFRESH&")+VVPAGE)+"=")+VVPAGE)+".htm&")+_HSY()))}}}
function PGSTOCKDOORS_RETURNVALUE(VYESNO){{if (VYESNO==undefined) VYESNO=false;{eval("event").returnValue=VYESNO}}}
function PGSTOCKDOORS_SELCHP(VNOMCHP){{if((eval("document").ChpSelected!=VNOMCHP)){PGSTOCKDOORS_SELECTCHP(VNOMCHP);eval("document").ChpSelected=VNOMCHP}}}
function PGSTOCKDOORS_SELECTCHP(VNOMCHP){{eval(("_PAGE_."+VNOMCHP)).select()}}
function PGSTOCKDOORS_SELRAZ(){{eval("document").ChpSelected=""}}
function PGSTOCKDOORS_ZRID(VZRNO){{return((("_"+VZRNO)+"_"))}}
function PGSTOCKDOORS_CHECKESC(){{if((eval("event").keyCode==27)){return(true)}else {;return(false)}}}
function PGSTOCKDOORS_PINFOSERV(VCHPSTATMESS, VSTXT){{var VI=0;var VN=0;VN=VCHPSTATMESS;if((VN>0)){for(VI=1;VI<=VN;VI++){alert(_EC(VSTXT,VI,"<;;;>",0))}}}}
function ObjExiste(sAlias)
{
var Chp= eval("_PAGE_."+sAlias)
if (String(Chp).substring(0,7)=="[object"){return true;} else {return false;}
}
function LinksDisable()
{ my_tags = document.getElementsByTagName('a');
	my_tags_count = my_tags.length;
	sAdresse = PGSTOCKDOORS_ADRESSEHREF(); //AdresseHref();	
	var sText;
	for ( i = 0 ; i < my_tags_count; i++ )
	{
		sText = my_tags[i].innerText;
		my_tags[i].href = (sAdresse + "#");
		if (sText != ""){my_tags[i].innerText = sText};
		my_tags[i].onclick = "ReturnValue();";
	} 
	return false;
}
function LoadData(fichier, basync, typeq, sdata, funcallback)
{
	if (typeq != "POST") typeq = "GET";
	if (basync != true) basync = false;
	if (isUndefined(funcallback)) funcallback = "";
	if(window.XMLHttpRequest) // FIREFOX
		xhr_object = new XMLHttpRequest();
	else if(window.ActiveXObject) // IE
		xhr_object = new ActiveXObject("Microsoft.XMLHTTP");
	else
		return(false);
	xhr_object.open(typeq, fichier, basync);
	if (basync) xhr_object.onreadystatechange = function(){
		if ((xhr_object.readyState == 4)&&(funcallback != "")) eval(funcallback+"(" + xhr_object.responseText + ")")};		
	xhr_object.send(sdata);
	if (basync) return;
	if(xhr_object.readyState == 4) return(unescape(xhr_object.responseText));
	else return(false);
}
function ImgPreload(sUrl)
{
if((sUrl=="")){return;}
pic = new Image(0,0)
pic.src = sUrl
}
function BulleImg(sText, CapTitre, bStick)
{
	if((sText=="")){return;}
	if(bStick){
		overlib(sText, FIXX, 5, RELY, 0, CSSCLASS, FGCLASS, "fgClass", FOLLOWMOUSE, STICKY, CLOSECLICK, CAPTION, CapTitre) }
	else { overlib(sText, FIXX, 5, RELY, 0, DELAY, 500, CSSCLASS, FGCLASS, "fgClass", FOLLOWMOUSE, CAPTION, CapTitre) }
}
function PDFOpen(sTitle, sURL)
{
	FenID = window.open("", "_blank", "toolbar=0, location=0, directories=0, status=0, scrollbars=0, resizable=1, copyhistory=0, menuBar=0");
	FenID.document.write("<HTML><HEAD><TITLE>" + sTitle + "</TITLE></HEAD><BODY topmargin='0' leftmargin='0' rightmargin='0' bottommargin='0'><IFRAME SRC='" + sURL + "' WIDTH='100%' HEIGHT='100%' FRAMEBORDER=0></BODY></HTML>");	
	FenID.document.close()
	FenID.location.reload()
}
function isUndefined(a) {
	return typeof a == 'undefined';
}
function pEval(obj)
{
	return eval(obj)
}
function Bulle(sText, CapTitre)
{
	if((sText=="")){return;}
	overlib(sText, OFFSETX, 18, DELAY, 500, CSSCLASS, FGCLASS,"fgClass", VAUTO, HAUTO, PADX, 20, 20, FOLLOWMOUSE, CAPTION, CapTitre)	
}
function BulleRAZ()
{
	nd()	
}
function ListAjoute(Combo, Text, Value)
{
eval("_PAGE_."+Combo+".options[_PAGE_."+Combo+".length] = new Option('"+Text+"','"+Value+"')")
}
function NoFocus()
{window.focus();}
function BulleFrame(sText, CapTitre, nX, nY, nW, nH, BigTitle)
{if(sText==""){return;};
	if(BigTitle==true){overlib(sText, FIXX, nX, FIXY, nY, WIDTH, nW, HEIGHT, nH, CSSCLASS, FGCLASS, "fgClass", EXCLUSIVEOVERRIDE, EXCLUSIVE, STICKY, CLOSECLICK, CAPTION, CapTitre, CAPTIONSIZE, "13px", CLOSESIZE, "12px")}
	else{overlib(sText, FIXX, nX, FIXY, nY, WIDTH, nW, HEIGHT, nH, CSSCLASS, FGCLASS, "fgClass", EXCLUSIVEOVERRIDE, EXCLUSIVE, STICKY, CLOSECLICK, CAPTION, CapTitre)}}
function pAddCSS(item, setting)
{eval(item).style.cssText += (';' + setting);}