var b_villeDim='';var timerVille=0;var SelVilleProx="";function UpdateComboVilles(){ls_getObj('VilleProx').style.display="none";ls_getObj('VilleProx').style.visibility="hidden";ls_getObj('b_VilleProx').options.length=0;ls_getObj('MyVille').style.display="none";ls_getObj('MyVille').style.visibility="hidden";ls_getObj('MyDep').style.display="none";ls_getObj('MyDep').style.visibility="hidden";ls_getObj('MyReg').style.display="none";ls_getObj('MyReg').style.visibility="hidden";ls_getObj('MyDep').innerHTML="...";ls_getObj('MyReg').innerHTML="...";ls_getObj('b_ville').length=0;var objCb=ls_getObj('b_cp').value;if(objCb.length==5){ls_getObj('Patien').style.display="block";ls_getObj('Patien').style.visibility="visible";InitSelect(objCb);}}
function RAZvarGEO(){callServer('RAZvariablesGEOFlash.asp','&raz=1',0);}
function UpdateDepReg(){ls_getObj('b_departement').value="";ls_getObj('b_region').value="";ls_getObj('b_Longitude').value="";ls_getObj('b_Latitude').value="";ls_getObj('MyDep').style.display="block";ls_getObj('MyDep').style.visibility="visible";ls_getObj('MyReg').style.display="block";ls_getObj('MyReg').style.visibility="visible";ls_getObj('MyDep').innerHTML="Patientez SVP ...";ls_getObj('MyReg').innerHTML="Patientez SVP ...";var ValobjVille=ls_getObj('b_ville').value
callServer('DepRegServer.asp','&ville='+ValobjVille,0);}
function UpdateProxiVille(){RAZtimerVille();ls_getObj('VilleProx').style.display="block";ls_getObj('VilleProx').style.visibility="visible";ls_getObj('b_VilleProx').options.length=0;addOption("b_VilleProx","Patientez SVP ...","");var xb_Longitude=ls_getObj('b_Longitude').value;var xb_Latitude=ls_getObj('b_Latitude').value;callServer('VillesProxiServer.asp','&Latitude='+xb_Latitude+'&Longitude='+xb_Longitude,0)}
function UpdateVillesProx(ValDepart){RAZtimerVille();ls_getObj('x_villeProx').options.length=0;callServer('VillesProxiServerRecherche.asp','&dep='+ValDepart,0)}
function RAZtimerVille(){if(timerVille){clearTimeout(timerVille);timerVille=0;}}
function InitSelect(cp){callServer('VillesServer.asp','&cp='+cp,0);}
function ls_URLencode(sStr){sStr2=escape(sStr).replace(/\+/g,'%2C').replace(/\"/g,'%22').replace(/\'/g,'%27');return sStr2}
function callServer(NameServer,Vars2Post){if(String(Vars2Post).length<1){return;}
Char2=String.fromCharCode(2)
var NbrAlea=Math.random();NbrAlea=replace(String(NbrAlea),".","")
var head=document.getElementsByTagName('head').item(0);var old=ls_getObj('ReponseScri');if(old){head.removeChild(old);}
try{var fr=document.createElement('script');fr.src=NameServer+'?r='+NbrAlea+Vars2Post;fr.type='text/javascript';fr.defer=true;fr.id='ReponseScri';void(head.appendChild(fr));}catch(e){var fr=window.frames["ServerMask"];if(!fr){alert("Cadre de communication non trouvé - Communication frame not found");return;}
fr.document.open()
fr.document.write("<s"+"cript src=\""+NameServer+"?fra=iframe&r="+NbrAlea+Vars2Post+"\" id=\"ReponseScri\" defer=\"true\" language=\"JavaScript1.2\" type=\"text/javascript\"></s"+"cript>");fr.document.write("<s"+"cript id=\"ReponseScri\" defer=\"true\" language=\"JavaScript1.2\" type=\"text/javascript\"></s"+"cript>");fr.document.close();}}
function UpdateVariable(StringHTML,varname){NORefreshIP=0;StringHTML=replace(StringHTML,String.fromCharCode(1),"'");if(varname=='REMPLI'){ls_getObj('MyVille').style.display="block";ls_getObj('MyVille').style.visibility="visible";ls_getObj('Patien').style.display="none";ls_getObj('Patien').style.visibility="hidden";for(ivil=0;ivil<ls_getObj('b_ville').options.length;ivil++){if(ls_getObj('b_ville').options[ivil].value==b_villeDim){ls_getObj('b_ville').selectedIndex=ivil;}}
UpdateDepReg();return;}
if(varname=='parent.REMPLI'){parent.ls_getObj('MyVille').style.display="block";parent.ls_getObj('MyVille').style.visibility="visible";parent.ls_getObj('Patien').style.display="none";parent.ls_getObj('Patien').style.visibility="hidden";for(ivil=0;ivil<parent.ls_getObj('b_ville').options.length;ivil++){if(parent.ls_getObj('b_ville').options[ivil].value==b_villeDim){parent.ls_getObj('b_ville').selectedIndex=ivil;}}
parent.UpdateDepReg();return;}
if(varname=='REMPLIDEPnREG'){ls_getObj('MyDep').style.display="block";ls_getObj('MyDep').style.visibility="visible";ls_getObj('MyReg').style.display="block";ls_getObj('MyReg').style.visibility="visible";ls_getObj('VilleProx').style.display="block";ls_getObj('VilleProx').style.visibility="visible";UpdateProxiVille();return;}
if(varname=='parent.REMPLIDEPnREG'){parent.ls_getObj('MyDep').style.display="block";parent.ls_getObj('MyDep').style.visibility="visible";parent.ls_getObj('MyReg').style.display="block";parent.ls_getObj('MyReg').style.visibility="visible";parent.ls_getObj('VilleProx').style.display="block";parent.ls_getObj('VilleProx').style.visibility="visible";parent.UpdateProxiVille();return;}
if(varname=='SHOWVILLES'){ls_getObj('MyDep').style.display="block";ls_getObj('MyDep').style.visibility="visible";ls_getObj('MyReg').style.display="block";ls_getObj('MyReg').style.visibility="visible";ls_getObj('VilleProx').style.display="block";ls_getObj('VilleProx').style.visibility="visible";var villeOrigine=ls_getObj('b_ville').value
if(SelVilleProx.length>0){villeOrigine=parseFloat(SelVilleProx);}
for(ivil=0;ivil<ls_getObj('b_VilleProx').options.length;ivil++){if(ls_getObj('b_VilleProx').options[ivil].value+''==villeOrigine+''){ls_getObj('b_VilleProx').selectedIndex=ivil;}}
return;}
if(varname=='parent.SHOWVILLES'){parent.ls_getObj('MyDep').style.display="block";parent.ls_getObj('MyDep').style.visibility="visible";parent.ls_getObj('MyReg').style.display="block";parent.ls_getObj('MyReg').style.visibility="visible";parent.ls_getObj('VilleProx').style.display="block";parent.ls_getObj('VilleProx').style.visibility="visible";var villeOrigine=parent.ls_getObj('b_ville').value
if(SelVilleProx.length>0){villeOrigine=parseFloat(SelVilleProx);}
for(ivil=0;ivil<parent.ls_getObj('b_VilleProx').options.length;ivil++){if(parent.ls_getObj('b_VilleProx').options[ivil].value+''==villeOrigine+''){parent.ls_getObj('b_VilleProx').selectedIndex=ivil;}}
return;}
if(varname=='SHOWVILLESPROXRECHERCHE'){updateSelectProxville();return;}
if(varname=='RAZGEOFLASH'){UpdateCarte();return;}
if(varname=='parent.SHOWVILLESPROXRECHERCHE'){parent.updateSelectProxville();return;}
if(varname=='parent.RAZGEOFLASH'){parent.UpdateCarte();return;}}
function updateSelectProxville(){var oldvprox=ls_getObj('oldvilleprox').value;if(oldvprox.length>0){villeOrigine=parseFloat(oldvprox);for(ivil=0;ivil<ls_getObj('x_VilleProx').options.length;ivil++){if(ls_getObj('x_VilleProx').options[ivil].value+''==villeOrigine+''){SetVilleProx(1);ls_getObj('x_VilleProx').selectedIndex=ivil;}}}}
function ScriptReponseServer(resp,varname){var ChaineRep=String(resp);if(ChaineRep.length<1){sError='retour vide';return false;}
UpdateVariable(ChaineRep,varname);return true;}
function addOption(theSelBox,theText,theValue)
{theSel=ls_getObj(theSelBox)
var newOpt=new Option(theText,theValue);var selLength=theSel.length;theSel.options[selLength]=newOpt;}