// Variables globales
var requete="";
var savreq="";
var question="";
var opet="";
var opou= "";
var stw = new Array("A","AN","AND","AS","BY","FOR","FROM","IN","INTO","ITS","OF","ON","THE","TO","UPON","WITH","LE","LA","LES",
                    "DANS","DE","DES","EN","LEURS","LEUR","TON","TA","SON","SA","L","D");
var flag=false;
// Developpement de sous rubrique (c) ICARE
var head="display:''"
// preload images
img1=new Image(); img1.src="http:/wwwisis/graphic/pucemenuplus.gif";
img2=new Image(); img2.src="http:/wwwisis/graphic/pucemenuminus.gif";
img3=new Image(); img3.src="http:/wwwisis/graphic/pucesubmenunormal.gif";
img4=new Image(); img4.src="http:/wwwisis/graphic/pucemenunormal_over.gif";
img5=new Image(); img5.src="http:/wwwisis/graphic/pucesubmenunormal_over.gif";
img6=new Image(); img6.src="http:/wwwisis/graphic/pucemenuplus_over.gif";
img7=new Image(); img6.src="http:/wwwisis/graphic/pucemenuminus_over.gif";
function Omitstw(str)
{
var goal="";
var mot="";
var chaine="";
var reguliere=/  /g;

chaine=str;
i=chaine.indexOf(".",0);
while ( i != -1) {
  chaine = chaine.substring(0,i)+" "+chaine.substring(i+1);
  i=chaine.indexOf(".",0);
  }
chaine=chaine.replace(/'/g," ");
chaine=chaine.replace(/;/g," ");
mots=chaine.split(" ");
for (var i in mots) {
  if (mots[i]) {
    flagfound=false;
    mot=mots[i].toUpperCase();
    for (j=0;j<stw.length-1;j++) {
      if (stw[j]==mot) flagfound=true;
    } 
    if (flagfound!=true) {
      if (goal) goal=goal+" "+mots[i]; else goal=mots[i];
    }
  } 
}
return goal;
}
function change()
{
   if(!document.all)
      return

   if (event.srcElement.id=="rub") {
      var srcIndex = event.srcElement.sourceIndex
      var content = document.all[srcIndex+2]
      var image = document.all[srcIndex+1]
      if (content.style.display=="none") {
         content.style.display=''
         image.src ="http:/wwwisis/graphic/pucemenuminus.gif"
      }
      else {
         content.style.display="none"
         image.src ="http:/wwwisis/graphic/pucemenuplus.gif"
      }
   }
   if (event.srcElement.id=="subrub") {
     image.src ="http:/wwwisis/graphic/pucesubmenunormal.gif"
   }

}

function overme(myindex) 
{
image = document.all[myindex-1];
if (image.src.indexOf('pucemenunormal.gif') != -1) {image.src='http:/wwwisis/graphic/pucemenunormal_over.gif'} 
if (image.src.indexOf('pucesubmenunormal.gif') != -1) {image.src='http:/wwwisis/graphic/pucesubmenunormal_over.gif'} 
if (image.src.indexOf('pucesubmenunormal_arabe.gif') != -1) {image.src='http:/wwwisis/graphic/pucesubmenunormal_arabe_over.gif'} 
if (image.src.indexOf('pucemenuplus.gif') != -1) {image.src='http:/wwwisis/graphic/pucemenuplus_over.gif'} 
if (image.src.indexOf('pucemenuminus.gif') != -1) {image.src='http:/wwwisis/graphic/pucemenuminus_over.gif'} 
}
function outme(myindex) 
{
image = document.all[myindex-1];
if (image.src.indexOf('pucemenunormal_over.gif') != -1) {image.src='http:/wwwisis/graphic/pucemenunormal.gif'} 
if (image.src.indexOf('pucesubmenunormal_over.gif') != -1) {image.src='http:/wwwisis/graphic/pucesubmenunormal.gif'} 
if (image.src.indexOf('pucemenuplus_over') != -1) {image.src='http:/wwwisis/graphic/pucemenuplus.gif'} 
if (image.src.indexOf('pucemenuminus_over.gif') != -1) {image.src='http:/wwwisis/graphic/pucemenuminus.gif'} 
}
document.onclick=change;
// Check Browser name  and version ( Client Side )
// alert (navigator.userAgent.toLowerCase());
function CheckString(checkStr,sourceStr) 
	{
		var size = checkStr.length;
		for (i = 0; i < sourceStr.length; i++) 
		{
			if (sourceStr.substring(i, i + size) == checkStr) return true;}
		return false;		
	}	
	str = navigator.userAgent.toLowerCase();		
	if ( CheckString('msie', str) ) 
	{ //document.write('<link href="style_ie.css" rel="stylesheet" type="text/css">');
	 } 
	else 
	{ //document.write('<link href="style_ns_ot.css" rel="stylesheet" type="text/css">');
	 }
// fenetre visite virtuelle salon
function showsalonVR(path)
 {
 var hauteur = 549;
 var largeur = 373;
                         
 window.open("vrsalon.asp?path="+path,"message","toolbar=0,location=0,directories=0,status=0,menubar=0,scrollbars=0,resizable=0,width="+hauteur+",height="+largeur);
 }
 
 // fenetre visite virtuelle par default
function showVR(path)
 {
 var hauteur = 549;
 var largeur = 373;
                         
 window.open("vr.asp?path="+path,"message","toolbar=0,location=0,directories=0,status=0,menubar=0,scrollbars=0,resizable=0,width="+hauteur+",height="+largeur);
 }
 
 function popup(path,w,h)
 {
                        
 window.open(path,"message","toolbar=0,location=0,directories=0,status=0,menubar=0,scrollbars=0,resizable=0,width="+w+",height="+h);
 }

// 
//Justice
function doTheClock() {
	var csChaine;
	var nJour, nMois, nAnnee, nHeures , nMinutes, nSecondes;
	var dtJour;
	csChaine = " ";
	dtJour = new Date();
	nJour = dtJour.getDate();
	if ( nJour < 10 ) csChaine += "0";
	csChaine += nJour;
	nMois = dtJour.getMonth() + 1;
	if (nMois == 1) csChaine += " ÌÇäÝí";
	else if (nMois == 2) csChaine += " ÝíÝÑí";
	else if (nMois == 3) csChaine += " ãÇÑÓ";
	else if (nMois == 4) csChaine += " ÃÝÑíá";
	else if (nMois == 5) csChaine += " ãÇí";
	else if (nMois == 6) csChaine += " ÌæÇä";
	else if (nMois == 7) csChaine += " ÌæíáíÉ";
	else if (nMois == 8) csChaine += " ÃæÊ";
	else if (nMois == 9) csChaine += " ÓÈÊãÈÑ";
	else if (nMois == 10) csChaine += " ÃßÊæÈÑ";
	else if (nMois == 11) csChaine += " äæÝãÈÑ";
	else if (nMois == 12) csChaine += " ÏíÓãÈÑ";
	csChaine += " ";
	nAnnee = dtJour.getYear();
	if (nAnnee < 1900) nAnnee += 1900;
	csChaine += nAnnee + " ";
	nHeures = dtJour.getHours();
	if (nHeures < 10) csChaine += "0";
	csChaine += nHeures + ":";
	nMinutes = dtJour.getMinutes();
	if (nMinutes < 10) csChaine += "0";
	csChaine += nMinutes + ":";
	nSecondes = dtJour.getSeconds();
	if (nSecondes < 10) csChaine += "0";
	csChaine += nSecondes;

	if (document.getElementById)
	{
		document.getElementById("clock").innerHTML = csChaine;
	}
	if (document.layers)
	{ 
 		document.clock.document.write("<br>&nbsp;&nbsp;"+csChaine); 
		document.clock.document.close(); 
	}

	if ((document.all)&&(!document.getElementById))
	{ 
 		document.all["clock"].innerHTML = csChaine;
	}

	setTimeout("doTheClock()", 1000)
}

function OpenWindow(LURL) {
	msg=open("","Help","location=no,status=no,toolbar=no,directories=no,resizable=yes,menubar=no,scrollbars=yes,width=400,height=400,screenx=200,screeny=200");	
//      Le positionnement de la fenetre en X et Y ne fonctionne que sous Netscape
  	msg.location.href=LURL;
  	msg.focus();
}

function SubmitSort() {
requete="";
if (document.SELECT.elements.DBOPTION["0"].checked == true) {
    document.COPY.bool.value = document.SELECT.EQUATION.value;
    document.COPY.t2010.value = document.SELECT.EQUATION.value;
    document.COPY.from.value = "";
    document.COPY.t2011.value = "";
    document.COPY.to.value = "";
    document.COPY.t2012.value = "";
}
if (document.SELECT.elements.DBOPTION["1"].checked == true) {
    document.COPY.bool.value = "";
    document.COPY.t2010.value = "";
    document.COPY.from.value = document.SELECT.FROM.value;
    document.COPY.t2011.value = document.SELECT.FROM.value;
    document.COPY.to.value = document.SELECT.TO.value;
    document.COPY.t2012.value = document.SELECT.TO.value;
}
if (document.SELECT.elements.DBOPTION["2"].checked == true) {
    document.COPY.bool.value = "";
    document.COPY.t2010.value = "";
    document.COPY.from.value = "1";
    document.COPY.t2011.value = "1";
    document.COPY.to.value = "150000";
    document.COPY.t2012.value = "150000";
}
if ((document.SELECT.elements.DBOPTION["0"].checked == true) && (document.COPY.bool.value  == "")) {
	alert("ÂÓÝ ¡ ãÚÇÏáÉ ÇáÈÍË ÝÇÑÛÉ");
	return;
}
document.COPY.sorttag.value = document.SELECT.sorttag.value;
document.COPY.pft.value = document.COPY.pft.value;
document.COPY.submit();
}


function IndexValue(Val,Target)
{
// Renvoi les termes de l'index
var chaine = "";
if (Target && Val) {
	// Mettre en commentaire les deux lignes suivantes si on ne recupere pas les
	// termes existants dans la zone de texte
	chaine = eval("document.GENISIS."+Target+".value");
	if (chaine) Val = Val + ';' + chaine;
	eval("document.GENISIS."+Target+'.value=Val');
}
msg.close();
}
function IndexValueMaj(Val,Target,elementindex,rep)
{
// Renvoi les termes de l'index
var src=String.fromCharCode(13);
var retour = Val;
if (rep == "1") retour = retour.replace(/;/g,src);
j = Target.indexOf("div",0);
if (j != -1) {
  if (Target && Val) {
    Element=document.getElementById(Target).firstChild;
    chaine=Element.value
    if (chaine && rep=="1") {
      retour = chaine + retour; 
      } 
    eval("Element.value=retour");
    }
  }
else
  { 
  if (Target && Val) {
    chaine=document.getElementById(Target).value
    if (chaine && rep=="1") {
      retour = chaine + retour; 
      } 
    eval("document.getElementById(Target).value=retour");
    }
}
msg.close();
}
function IndexValueMajLibel(Val,Target,elementindex,rep,TarLibel)
{
// Renvoi les termes de l'index
var argv = IndexValueMajLibel.arguments;
var argc = IndexValueMajLibel.arguments.length;
var Libel=document.INDEX.t2024.value;
var src=String.fromCharCode(13);
var retour = Val;
if (rep == "1") retour = retour.replace(/;/g,src);
j = Target.indexOf("div",0);
if (j != -1) {
  if (Target && Val) {
    Element=document.getElementById(Target).firstChild;
    chaine=Element.value
    if (chaine && rep=="1") {
      retour = chaine + retour; 
      } 
    eval("Element.value=retour");
    }
  }
else
  { 
  if (Target && Val) {
    chaine=document.getElementById(Target).value
    if (chaine && rep=="1") {
      retour = chaine + retour; 
      } 
    eval("document.getElementById(Target).value=retour");
    if (argc > 4) {
      eval("document.getElementById(TarLibel).value=Libel");
      }
    }
}
msg.close();
}


function IndexHistory(Val)
{
// Renvoi les termes de l'index
var chaine = "";
if (Val) {
	// Mettre en commentaire les deux lignes suivantes si on ne recupere pas les
	// termes existants dans la zone de texte
	chaine = eval("document.ISISREQ.t3000"+".value");
	if (chaine) Val = Val + ' * ' + chaine;
      eval("document.ISISREQ.t3000"+'.value=Val');
}
msg.close();
}

function IndexValueAjout(Val,Target,elementindex,idlibel)
{
// Renvoi les termes de l'index
var chaine = "";
var stmp = "";
var libel ="";
if (Target && Val) {
	// Mettre en commentaire les deux lignes suivantes si on ne recupere pas les
	// termes existants dans la zone de texte
	//chaine = eval("document.AJOUT.elements[elementindex].value");
	//if (chaine) Val = Val + ';' + chaine;
      decoupe=Val.split("|");
	if(decoupe.length>1)
	{
		eval("document.AJOUT.elements[elementindex].value=decoupe[1]");
            libel = "<b>" + decoupe[0] + "</b>";
	      stmp=idlibel+".innerHTML=libel";
            eval(stmp);
	}
      else
	      eval("document.AJOUT.elements[elementindex].value=Val");

}
msg.close();
}
function selectExp(Val)
{
   eval("document.AJOUT.elements[0].value=Val");
   msg.close();
}

// Reinitialise le formulaire
function showPDF(LURL)
 {
 var hauteur = 849;
 var largeur = 473;
 if ((document.petitefenetre) && (!document.petitefenetre.closed)) {document.petitefenetre.close()};
   msg=window.open("","petitefenetre","resizable=yes,height=350,width=600,scrollbars=yes directories=no,status=yes,copyhistory=no,left=50,top=100");
   msg.location.href=LURL;
   msg.focus();
 
}
function showHTML(LURL)
 {
 var hauteur = 849;
 var largeur = 473;
 if ((document.petitefenetre) && (!document.petitefenetre.closed)) {document.petitefenetre.close()};
   msg=window.open("","petitefenetre","resizable=yes,height=350,width=600,scrollbars=yes,toolbar=yes,directories=no,status=yes,copyhistory=no,left=50,top=100");
   msg.location.href=LURL;
   msg.focus();
 
}
function showPage(LURL)
 {
 var hauteur = 849;
 var largeur = 473;
 if ((document.petitefenetre) && (!document.petitefenetre.closed)) {document.petitefenetre.close()};
   msg=window.open("","petitefenetre","resizable=yes,height=350,width=600,scrollbars=yes,toolbar=yes,directories=no,status=yes,copyhistory=no,left=50,top=100");
   msg.location.href=LURL;
   msg.focus();
 
}

function ResetForm() {
	document.GENISIS.reset();
}
function isarabicword(chaine) {
  if ((chaine.charCodeAt(0) >= 1569 &&  chaine.charCodeAt(0) <= 1594) || (chaine.charCodeAt(0) >= 1601 &&  chaine.charCodeAt(0) <= 1610)) 
    return true; else return false;
}
function getaliflem(chaine) {
  var stmp = "";
  stmp = chaine;
  if (stmp.charCodeAt(0) == 1575 && stmp.charCodeAt(1) == 1604) {
       stmp = stmp.substr(2,chaine.length-2) 
  } else {
       stmp = "Çá" + chaine;
  }   
  return stmp;
}

// Lire une Textbox
function ReadTextBox(CTL,UNI) {
var src = document.GENISIS.elements[CTL].value;
var chaine=src;
if (UNI) {
      chaine=Omitstw(src);
	i=chaine.indexOf(" ",0);
	while ( i != -1) {
	  chaine = chaine.substring(0,i)+";"+chaine.substring(i+1);
	  i=chaine.indexOf(" ",0);
	}
}
return chaine;
}
function ReadTextBoxFahras(CTL,UNI) {
var src = document.GENFAHRAS.elements[CTL].value;
var chaine=src;
if (UNI) {
      chaine=Omitstw(src);
	i=chaine.indexOf(" ",0);
	while ( i != -1) {
	  chaine = chaine.substring(0,i)+";"+chaine.substring(i+1);
	  i=chaine.indexOf(" ",0);
	}
}
return chaine;
}

// Mise en forme requete
// CTL = Element du formulaire (retour d'une fonction)
// TRN = Troncature (caractere $)
// LIB = Libellé en clair
// CDS = Etiquette ISIS
// PRF = Préfixe
// OPE = Opérateur
function MakeRequest(CTL,TRN,LIB,CDS,PRF,OPE) {
var but="";
var aff="";
var bis="";
var act="";
if (OPE==" AND ") {
	act=opet;
} else {
	act=opou;
}
decoupe=CTL.split(";");
for (var i in decoupe) {
if (decoupe[i]) {
if (but) {
	but = but + OPE + "\"" + PRF + decoupe[i] + TRN + "\"" + CDS;
	bis = bis + OPE + "#" + PRF + decoupe[i] + TRN + "#" + CDS;
	aff = aff + act + decoupe[i] + TRN;
} else {
	but = "\"" + PRF + decoupe[i] + TRN + "\"" + CDS;
	bis = "#" + PRF + decoupe[i] + TRN + "#" + CDS;
	aff = decoupe[i] + TRN;
}
}
}
if (but) {
	aff = "(" + LIB + "=" + aff + ")";
	flag=true;
	if (requete) {
		requete = requete+" AND ("+but+")";
		savreq = savreq+" AND ("+bis+")";
	} else {
		requete = "("+but+")";
		savreq = "("+bis+")";
	}
	if (question) {
		question = question+opet+aff;
	} else {
		question = aff;
	}
}
}
function MakeRequestML(CTL,TRN,LIB,CDS,PRF,OPE,OPEML) {
var but="";
var aff="";
var bis="";
var act="";
var actml="";
if (OPE==" AND ") {
	act=opet;
} else {
	act=opou;
}
if (OPEML==" AND ") {
	actml=opet;
} else {
  if (OPEML==" AND NOT ") {
    actml=opnot;
  }
  else {
    actml=opou;
  }
}
decoupe=CTL.split(";");
for (var i in decoupe) {
if (decoupe[i]) {
if (but) {
	but = but + OPE + "\"" + PRF + decoupe[i] + TRN + "\"" + CDS;
	bis = bis + OPE + "#" + PRF + decoupe[i] + TRN + "#" + CDS;
	aff = aff + act + decoupe[i] + TRN;
} else {
	but = "\"" + PRF + decoupe[i] + TRN + "\"" + CDS;
	bis = "#" + PRF + decoupe[i] + TRN + "#" + CDS;
	aff = decoupe[i] + TRN;
}
}
}
if (but) {
	aff = "(" + LIB + "=" + aff + ")";
	flag=true;
	if (requete) {
		requete = requete+OPEML+"("+but+")";
		savreq = savreq+OPEML+"("+bis+")";
	} else {
		requete = "("+but+")";
		savreq = "("+bis+")";
	}
	if (question) {
		question = question+actml+aff;
	} else {
		question = aff;
	}
}
}
function MakeRequestAlif(CTL,TRN,LIB,CDS,PRF,OPE) {
var but="";
var aff="";
var bis="";
var act="";
if (OPE==" AND ") {
	act=opet;
} else {
	act=opou;
}
decoupe=CTL.split(";");
for (var i in decoupe) {
if (decoupe[i]) {
if (but) {
	if (isarabicword(decoupe[i])) { 
        but = but + OPE + " (" + "\"" + PRF + decoupe[i] + TRN + "\"" + CDS;
	  bis = bis + OPE + " (" + "#" + PRF + decoupe[i] + TRN + "#" + CDS;
	  aff = aff +  act + decoupe[i] + TRN;
        but = but + " OR " + "\"" + PRF + getaliflem(decoupe[i]) + TRN + "\"" + CDS + ") ";
	  bis = bis + " OR " + "#" + PRF + getaliflem(decoupe[i]) + TRN + "#" + CDS + ") ";
      } else {
        but = but + OPE + "\"" + PRF + decoupe[i] + TRN + "\"" + CDS; 
	  bis = bis + OPE + "#" + PRF + decoupe[i] + TRN + "#" + CDS; 
	  aff = aff + act + decoupe[i] + TRN;
      }
} else {
      if (isarabicword(decoupe[i])) { 
	  but = "(" + "\"" + PRF + decoupe[i] + TRN + "\"" + CDS;
	  bis = "(" + "#" + PRF + decoupe[i] + TRN + "#" + CDS;
	  aff = decoupe[i] + TRN;
        but = but + " OR " + "\"" + PRF + getaliflem(decoupe[i]) + TRN + "\"" + CDS + ")";
	  bis = bis + " OR " + "#" + PRF + getaliflem(decoupe[i]) + TRN + "#" + CDS + ")";
	} else {
        but = "\"" + PRF + decoupe[i] + TRN + "\"" + CDS;
	  bis = "#" + PRF + decoupe[i] + TRN + "#" + CDS;
	  aff = decoupe[i] + TRN;
      }
}
}
}
if (but) {
	aff = "(" + LIB + "=" + aff + ")";
	flag=true;
	if (requete) {
		requete = requete+" AND ("+but+")";
		savreq = savreq+" AND ("+bis+")";
	} else {
		requete = "("+but+")";
		savreq = "("+bis+")";
	}
	if (question) {
		question = question+opet+aff;
	} else {
		question = aff;
	}
}
}

function MakeRequestAlifML(CTL,TRN,LIB,CDS,PRF,OPE,OPEML) {
var but="";
var aff="";
var bis="";
var act="";
var actml="";
if (OPE==" AND ") {
	act=opet;
} else {
	act=opou;
}
if (OPEML==" AND ") {
	actml=opet;
} else {
  if (OPEML==" AND NOT ") {
    actml=opnot;
  }
  else {
    actml=opou;
  }
}

decoupe=CTL.split(";");
for (var i in decoupe) {
if (decoupe[i]) {
if (but) {
	if (isarabicword(decoupe[i])) { 
        but = but + OPE + " (" + "\"" + PRF + decoupe[i] + TRN + "\"" + CDS;
	  bis = bis + OPE + " (" + "#" + PRF + decoupe[i] + TRN + "#" + CDS;
	  aff = aff +  act + decoupe[i] + TRN;
        but = but + " OR " + "\"" + PRF + getaliflem(decoupe[i]) + TRN + "\"" + CDS + ") ";
	  bis = bis + " OR " + "#" + PRF + getaliflem(decoupe[i]) + TRN + "#" + CDS + ") ";
      } else {
        but = but + OPE + "\"" + PRF + decoupe[i] + TRN + "\"" + CDS; 
	  bis = bis + OPE + "#" + PRF + decoupe[i] + TRN + "#" + CDS; 
	  aff = aff + act + decoupe[i] + TRN;
      }
} else {
      if (isarabicword(decoupe[i])) { 
	  but = "(" + "\"" + PRF + decoupe[i] + TRN + "\"" + CDS;
	  bis = "(" + "#" + PRF + decoupe[i] + TRN + "#" + CDS;
	  aff = decoupe[i] + TRN;
        but = but + " OR " + "\"" + PRF + getaliflem(decoupe[i]) + TRN + "\"" + CDS + ")";
	  bis = bis + " OR " + "#" + PRF + getaliflem(decoupe[i]) + TRN + "#" + CDS + ")";
	} else {
        but = "\"" + PRF + decoupe[i] + TRN + "\"" + CDS;
	  bis = "#" + PRF + decoupe[i] + TRN + "#" + CDS;
	  aff = decoupe[i] + TRN;
      }
}
}
}
if (but) {
	aff = "(" + LIB + "=" + aff + ")";
	flag=true;
	if (requete) {
		requete = requete+OPEML+"("+but+")";
		savreq = savreq+OPEML+"("+bis+")";
	} else {
		requete = "("+but+")";
		savreq = "("+bis+")";
	}
	if (question) {
		question = question+actml+aff;
	} else {
		question = aff;
	}
}
}


// Mise en forme requete-
// CTL = Element du formulaire (retour d'une fonction)
// TRN = Troncature (caractere $)
// LIB = Libellé en clair
// CDS = Etiquette ISIS
// PRF = Préfixe
// OPE = Opérateur
function MakeRequestMulti(CTL,CMB,OPE) {
var chaine="";
chaine=ReadListSimple(CMB);
decoupe=chaine.split("|");
MakeRequest(ReadTextBox(CTL,decoupe[3]),decoupe[2],decoupe[0],decoupe[1],decoupe[4],OPE);
}
function MakeRequestMultiML(CTL,CMB,OPE,OPEML) {
var chaine="";
chaine=ReadListSimple(CMB);
decoupe=chaine.split("|");
MakeRequestML(ReadTextBox(CTL,decoupe[3]),decoupe[2],decoupe[0],decoupe[1],decoupe[4],OPE,OPEML);
}

function MakeRequestMultiAlifML(CTL,CMB,OPE,OPEML) {
var chaine="";
chaine=ReadListSimple(CMB);
decoupe=chaine.split("|");
MakeRequestAlifML(ReadTextBox(CTL,decoupe[3]),decoupe[2],decoupe[0],decoupe[1],decoupe[4],OPE,OPEML);
}
function MakeRequestMultiAlif(CTL,CMB,OPE,OPEML) {
var chaine="";
chaine=ReadListSimple(CMB);
decoupe=chaine.split("|");
MakeRequestAlif(ReadTextBox(CTL,decoupe[3]),decoupe[2],decoupe[0],decoupe[1],decoupe[4],OPE,OPEML);
}

// Lire checkBox
function ReadCheckBox(CTL,IND) {
var terme="";
if (document.GENISIS.elements[CTL].length == undefined) {
  if (document.GENISIS.elements[CTL].checked) {
    if (terme) {
	terme=terme+";"+document.GENISIS.elements[CTL].value;
     }
     else {
      terme=document.GENISIS.elements[CTL].value;
     }
   }
   return terme;
}
else {
  for (var i=0; i<IND; i++) {
	if (document.GENISIS.elements[CTL][i].checked) {
	if (terme) {
		terme=terme+";"+document.GENISIS.elements[CTL][i].value;
	} else {
		terme=document.GENISIS.elements[CTL][i].value;
	}}
  }
  return terme;
}
}
// Lire Bouton Radio
function ReadRadio(CTL) {
for (var i=0; i<document.GENISIS.elements[CTL].length; i++) {
if (document.GENISIS.elements[CTL][i].checked ) return document.GENISIS.elements[CTL][i].value;
}
return "";
}
function ReadRadioFahras(CTL) {
for (var i=0; i<document.GENFAHRAS.elements[CTL].length; i++) {
if (document.GENFAHRAS.elements[CTL][i].checked ) return document.GENFAHRAS.elements[CTL][i].value;
}
return "";
}

// Liste multiple
function ReadListMulti(CTL) {
var terme = "";
for (var i=0; i<document.GENISIS.elements[CTL].length; i++) {
if (document.GENISIS.elements[CTL].options[i].selected) {
if (terme == "") {
	terme=document.GENISIS.elements[CTL].options[i].value;
} else {
	terme=terme+";"+document.GENISIS.elements[CTL].options[i].value;
}}}
return terme;
}
// Liste simple
function ReadListSimple(CTL) {
i=document.GENISIS.elements[CTL].options.selectedIndex;
if (i < 0) return "";
if (document.GENISIS.elements[CTL].options[i].value.length == 1)
  return document.GENISIS.elements[CTL].options[i].value + " "; else return document.GENISIS.elements[CTL].options[i].value;
}
function ReadListSimpleFahras(CTL) {
i=document.GENFAHRAS.elements[CTL].options.selectedIndex;
if (i < 0) return "";
if (document.GENFAHRAS.elements[CTL].options[i].value.length == 1)
  return document.GENFAHRAS.elements[CTL].options[i].value + " "; else return document.GENFAHRAS.elements[CTL].options[i].value;
}

function GetLastKey(CDS,RET,FIC,TIT,PFX,POS,WIN,REFROOT,ADDURL) {
	document.GETLASTKEY.t2000.value = CDS;
	document.GETLASTKEY.t2001.value = RET;
	document.GETLASTKEY.t2002.value = POS;
	document.GETLASTKEY.t2003.value = FIC;
	document.GETLASTKEY.t2004.value = TIT;
	document.GETLASTKEY.t2006.value = PFX;
	document.GETLASTKEY.t2007.value = REFROOT;
	document.GETLASTKEY.t2008.value = ADDURL;
      if (document.UPDREC != undefined) {
        document.GETLASTKEY.t2009.value = document.UPDREC.t2008.value ;
      }

if (WIN=="1") 
     {
     if ((document.detail) && (!document.detail.closed)) {document.detail.close()};
     msg=window.open("","detail","resizable=yes,height=400,width=720,scrollbars=yes directories=no,status=yes,copyhistory=no,left=50,top=50");
     msg.focus();
     document.GETLASTKEY.target="detail";
     }
     document.GETLASTKEY.submit();
}

function GetLastRequest(CDS,RET,FIC,TIT,PFX,POS,WIN,REFROOT,ADDURL) {
	document.GETLASTKEY.t2000.value = CDS;
	document.GETLASTKEY.t2001.value = RET;
	document.GETLASTKEY.t2002.value = POS;
	document.GETLASTKEY.t2003.value = FIC;
	document.GETLASTKEY.t2004.value = TIT;
	document.GETLASTKEY.t2006.value = PFX;
	document.GETLASTKEY.t2007.value = REFROOT;
	document.GETLASTKEY.t2008.value = ADDURL;
      if (document.UPDREC != undefined) {
        document.GETLASTKEY.t2009.value = document.UPDREC.t2008.value ;
      }

if (WIN=="1") 
     {
     if ((document.RequestForm) && (!document.RequestForm.closed)) {document.RequestForm.close()};
     msg=window.open("","RequestForm","resizable=yes,location=no,height=650,width=820,scrollbars=yes,directories=yes,toolbar=yes,status=yes,copyhistory=no,left=50,top=50");
     msg.focus();
     document.GETLASTKEY.target="RequestForm";
     }
     document.GETLASTKEY.submit();
}

function OpenIndex(CDS,RET,FIC,TIT,PFX,POS,Lgx,Lgy) {
// Ouverture d'un index
	msg=window.open("","index","resizable=no,height="+Lgx+",width="+Lgy+",scrollbars=yes,screenx=100,screeny=100");
	contenu='<body><BR>Please wait ...</body>';
	msg.document.write(contenu);
	document.INDEX.t2000.value = CDS;
	document.INDEX.t2001.value = RET;
	document.INDEX.t2002.value = POS;
	document.INDEX.t2003.value = FIC;
	document.INDEX.t2004.value = TIT;
	document.INDEX.t2006.value = PFX;
	document.INDEX.target="index";
	msg.focus();
	document.INDEX.submit();
}

function OpenClasseur(CDS,RET,FIC,PFX,POS,ORDRE) {
// Ouverture d'un classeur
	document.CLASSEUR.t4000.value = CDS;
	document.CLASSEUR.t4001.value = RET;
	document.CLASSEUR.t4002.value = POS;
	document.CLASSEUR.t4003.value = FIC;
	document.CLASSEUR.t4006.value = PFX;
	document.CLASSEUR.t4023.value = ORDRE;
	document.CLASSEUR.submit();
}

function OpenLink(LURL) {
	msg=open("","Help","location=no,status=no,toolbar=no,directories=no,resizable=yes,menubar=no,scrollbars=yes,screenx=200,screeny=200");	
//      Le positionnement de la fenetre en X et Y ne fonctionne que sous Netscape
	contenu='<body><BR>Attendre Chargement ...</body>';
	msg.document.write(contenu);
  	msg.focus();
      msg.location.href=LURL;
}

function getHistory(Appli) {
	msg=window.open("","index","resizable=yes,height=200,width=600,scrollbars=yes,screenx=100,screeny=100");
	msg.focus();
      msg.location.href = Appli+"/history.htm";
}

function OpenCatalogue(Lgx,Lgy,iddiv) {
  // Ouverture d'un index
  document.INDEX.t2010.value = iddiv;
  msg=window.open("","catalog","resizable=no,height="+Lgx+",width="+Lgy+",scrollbars=yes,screenx=100,screeny=100");
  msg.focus();
  msg.location.href = "/loanv1/livre/idxcata/form.htm";
}

function OpenIndexAjout(CDS,RET,FIC,TIT,PFX,POS,Lgx,Lgy,idxCDS,IDDIV) {
// Ouverture d'un index
	msg=window.open("","index","resizable=no,height="+Lgx+",width="+Lgy+",scrollbars=yes,screenx=100,screeny=100");
	contenu='<body><BR>Please wait ...</body>';
	msg.document.write(contenu);
	document.INDEX.t2000.value = CDS;
	document.INDEX.t2001.value = RET;
	document.INDEX.t2002.value = POS;
	document.INDEX.t2003.value = FIC;
	document.INDEX.t2004.value = TIT;
	document.INDEX.t2006.value = PFX;
	document.INDEX.t2007.value = idxCDS;
	document.INDEX.t2010.value = IDDIV;
	document.INDEX.target="index";
	msg.focus();
	document.INDEX.submit();
}
function OpenFileBrowser(CDS,RET,FIC,TIT,PFX,POS,Lgx,Lgy,idxCDS,Rep) {
// Ouverture d'un index
	msg=window.open("","index","resizable=no,height="+Lgx+",width="+Lgy+",scrollbars=yes,screenx=100,screeny=100");
	contenu='<body><BR>Please wait ...</body>';
	msg.document.write(contenu);
      document.FILEBROWSER.repertoire.value = FIC;
	document.FILEBROWSER.Target.value = RET;
      document.FILEBROWSER.rep.value = Rep;
	document.FILEBROWSER.elt.value = idxCDS;
	document.FILEBROWSER.racine.value = TIT;
	document.FILEBROWSER.target="index";
	msg.focus();
	document.FILEBROWSER.submit();
}

function OpenIndexMaj(CDS,RET,FIC,TIT,PFX,POS,Lgx,Lgy,idxCDS,Rep) {
// Ouverture d'un index
	msg=window.open("","index","resizable=no,height="+Lgx+",width="+Lgy+",scrollbars=yes,screenx=100,screeny=100");
	contenu='<body><BR>Please wait ...</body>';

	msg.document.write(contenu);
      document.INDEX.t2000.value = CDS;
	document.INDEX.t2001.value = RET;
	document.INDEX.t2002.value = POS;
	document.INDEX.t2003.value = FIC;
	document.INDEX.t2004.value = TIT;
	document.INDEX.t2006.value = PFX;
	document.INDEX.t2007.value = idxCDS;
	document.INDEX.t2011.value = Rep;
	document.INDEX.target="index";
	msg.focus();
	document.INDEX.submit();
}
function OpenIndexMajLibel(CDS,RET,FIC,TIT,PFX,POS,Lgx,Lgy,idxCDS,Rep,Libel,EcrireLibel) {
// Ouverture d'un index
     
	msg=window.open("","index","resizable=no,height="+Lgx+",width="+Lgy+",scrollbars=yes,screenx=100,screeny=100");
	contenu='<body><BR>Please wait ...</body>';
	msg.document.write(contenu);
      document.INDEXLIBEL.t2000.value = CDS;
	document.INDEXLIBEL.t2001.value = RET;
	document.INDEXLIBEL.t2002.value = POS;
	document.INDEXLIBEL.t2003.value = FIC;
	document.INDEXLIBEL.t2004.value = TIT;
	document.INDEXLIBEL.t2006.value = PFX;
	document.INDEXLIBEL.t2007.value = idxCDS;
      document.INDEXLIBEL.t2008.value = "DET";
	document.INDEXLIBEL.t2011.value = Rep;
	document.INDEXLIBEL.t2023.value = Libel;
	document.INDEXLIBEL.t2025.value = EcrireLibel;
      document.INDEXLIBEL.target="index";
	msg.focus();
	document.INDEXLIBEL.submit();
}
function OpenIndexMajLibelOnly(CDS,RET,FIC,TIT,PFX,POS,Lgx,Lgy,idxCDS,Rep,Libel,EcrireLibel) {
// Ouverture d'un index
	var taille=window.outerWidth
      msg=window.open("","index","resizable=yes,height="+Lgx+",width="+taille+",scrollbars=yes,screenx=100,screeny=100");
	contenu='<body><BR>Please wait ...</body>';
	msg.document.write(contenu);
      document.INDEXLIBEL.t2000.value = CDS;
	document.INDEXLIBEL.t2001.value = RET;
	document.INDEXLIBEL.t2002.value = POS;
	document.INDEXLIBEL.t2003.value = FIC;
	document.INDEXLIBEL.t2004.value = TIT;
	document.INDEXLIBEL.t2006.value = PFX;
	document.INDEXLIBEL.t2007.value = idxCDS;
      document.INDEXLIBEL.t2008.value = "Libel";
	document.INDEXLIBEL.t2011.value = Rep;
	document.INDEXLIBEL.t2023.value = Libel;
	document.INDEXLIBEL.t2025.value = EcrireLibel;
      document.INDEXLIBEL.target="index";
	msg.focus();
	document.INDEXLIBEL.submit();
}


function OpenIndexMulti(CTL,CMB,Lgx,Lgy) {
// Ouverture d'un index
var chaine="";
var champ="";
chaine=ReadListSimple(CMB);
decoupe=chaine.split("|");
OpenIndex(decoupe[7],CTL,decoupe[6],decoupe[5],decoupe[4],"",Lgx,Lgy);
}
//
function NewRecord(Appli) {
  location.href = Appli + "/ajout.htm";
}  

function NewRecordMFN(Appli) {
	location.href = Appli + "/ajoutMFN.htm";
}

function NewRecordSHT(Appli) {
	location.href = Appli + "/ajoutSHT.htm";
}

function NewRecordAr(Appli) {
   location.href = "/wwwisis/cdsar.02/ajout.htm";
}

function NewRecordS(Appli,msg) {
  if(GetCookie("add") != "Add") {
      alert(msg);
  } else {  
      location.href = Appli + "/ajout.htm";
  }
}  


function NewRecordMFNS(Appli,msg) {
  if(GetCookie("add") != "Add") {
      alert(msg);
  } else {  
      location.href = Appli + "/ajoutMFN.htm";
  }
}  
function NewRecordSHTS(Appli,msg) {
  if(GetCookie("add") != "Add") {
      alert(msg);
  } else {  
      location.href = Appli + "/ajoutSHT.htm";
  }
}  

function callMaint(Appli) {
  location.href = Appli + "/maint.htm";
}  
function callMaintPHP(Appli) {
  location.href = Appli + "/maint_php.htm";
}  

function callMaintS(Appli,msg) {
  if(GetCookie("mnt") != "Mnt") {
      alert(msg);
  } else {  
      location.href = Appli + "/maint.htm";
  }
}  

function RepQte(term) { 
  var but="";
  decoupe=term.split("'");
  for (var i in decoupe) { 
    if (decoupe[i]) { 
      if (but) { 
	  but = but + "&#39" +  decoupe[i];
      } else {
	  but = decoupe[i];
      }
    }
  return but;
  } 
}

function checknamecode(elementindex) {
	test=document.AJOUT.elements[elementindex].value.split(";");
	if(test.length>1) {
		document.AJOUT.elements[elementindex].value = test[0];
	}
	
	decoupe=document.AJOUT.elements[elementindex].value.split("|");
	if(decoupe.length>1)
	{
		document.AJOUT.elements[elementindex].value = decoupe[1];
	}
}

function readfile(fname) {
    top.frames["menu"].document.mailframe.location.href = fname;
    alert(top.frames["menu"].document.mailframe.document);
}

function sendtextmail(address, subject, txt) {
	if(top.frames["menu"])
	{
		top.frames["menu"].document.MAIL.msg.value = txt;
		top.frames["menu"].document.MAIL.action = "mailto:"+address+"?subject="+subject;
		top.frames["menu"].document.MAIL.submit();
	}
	else
	{
		top.opener.top.frames["menu"].document.MAIL.msg.value = txt;
		top.opener.top.frames["menu"].document.MAIL.action = "mailto:"+address+"?subject="+subject;
		top.opener.top.frames["menu"].document.MAIL.submit();
	}
}

function sendreservationmail(address, subject, nom, divid) {
	var btitle = divid.innerHTML;
	var msgtext = top.opener.top.frames[0].salutation+nom+top.opener.top.frames[0].mailprolog+btitle+top.opener.top.frames[0].mailepilog;
      sendtextmail(address, subject, msgtext);	
      self.focus();      
}

function sendprofilemail(el) {
	var msgtext = el.value;
	var msgtext = top.frames[0].salutation+top.frames["menu"].document.PROFILE.nom.value+top.frames[0].notifyprolog+msgtext+top.frames[0].notifyepilog;
	sendtextmail(top.frames["menu"].document.PROFILE.email.value, "Notification", msgtext);	
}
function sdprofilemailHTML(el) {
	var address=document.PROFILE.email.value;
      var subject="Notification";
      var msgtext = el.value;
	var entete='<html><head><META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=windows-1256"></head><body dir="rtl">';
      var msgtext = entete+document.PROFILE.salutation.value+document.PROFILE.nom.value+document.PROFILE.notifyprolog.value+msgtext+document.PROFILE.notifyepilog.value;
	document.MAIL.message.value = msgtext;
	//document.MAIL.action = "mailto:"+address+"?subject="+subject;
      if ((document.mailfenetre) && (!document.mailfenetre.closed)) {document.mailfenetre.close()};
      msg=window.open("","mailfenetre","resizable=yes,height=300,width=300,scrollbars=yes directories=no,status=yes,copyhistory=no,left=50,top=100");
      contenu='<body><BR><center>Envoi Message Patientez SVP...</center></body>';
	msg.document.write(contenu);
      msg.focus();
      document.MAIL.target="mailfenetre";
      document.MAIL.submit();
      //FormUpd(document.PROFILE.code.value); 
}
function sdprofilemail(el) {
	var address=document.PROFILE.email.value;
      var subject="Notification";
      var msgtext = el.value;
	//var entete='<html><head><META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=windows-1256"></head></body>';
      var msgtext = document.PROFILE.salutation.value+document.PROFILE.nom.value+document.PROFILE.notifyprolog.value+msgtext+document.PROFILE.notifyepilog.value;
	document.MAIL.msg.value = msgtext;
	document.MAIL.action = "mailto:"+address+"?subject="+subject;
      //if ((document.mailfenetre) && (!document.mailfenetre.closed)) {document.mailfenetre.close()};
      //msg=window.open("","mailfenetre","resizable=yes,height=300,width=300,scrollbars=yes directories=no,status=yes,copyhistory=no,left=50,top=100");
      //contenu='<body><BR><center>Envoi Message Patientez SVP...</center></body>';
	//msg.document.write(contenu);
      //msg.focus();
      //document.MAIL.target="mailfenetre";
      document.MAIL.submit();
      FormUpd(document.PROFILE.code.value); 
}

function sendfilemail(address, subject, fname) {
	readfile(fname);
	top.frames["menu"].document.MAIL.msg.value = top.frames["menu"].document.mailframe.innerHTML;	
	top.frames["menu"].document.MAIL.action = "mailto:"+address+"?subject="+subject;
	top.frames["menu"].document.MAIL.submit();
}

function profiler(code, nom, email, keywords) {
	//alert(top.frames["menu"].document.PROFILE);
	top.frames["menu"].document.PROFILE.code.value = code;
	top.frames["menu"].document.PROFILE.nom.value = nom;
	top.frames["menu"].document.PROFILE.email.value = email;
	top.frames["menu"].document.PROFILE.t2000.value = keywords;
	top.frames["menu"].document.PROFILE.t2001.value = keywords;
	top.frames["menu"].document.PROFILE.t2002.value = keywords;
	top.frames["menu"].document.PROFILE.submit();
}

function startSong(today) {
 if ((document.petitefenetre) && (!document.petitefenetre.closed)) {document.petitefenetre.close()};
   msg=window.open("","petitefenetre","resizable=yes,height=300,width=300,scrollbars=yes directories=no,status=yes,copyhistory=no,left=50,top=100");
   msg.location.href="http:/wav/SelectSong.htm?"+today
   msg.focus();
}
function GetProc(fonction) {
retour="";
if (fonction == 1) {
  i=document.AJOUT.V1.options.selectedIndex;
  champ=document.AJOUT.V1.options[i].value;
  retour="'a"+champ+"#"+document.AJOUT.valeur.value+"#'";
}
if (fonction == 2) {
  occ=document.DELETE.occur.value;
  i=document.DELETE.V1.options.selectedIndex;
  champ=document.DELETE.V1.options[i].value;
  retour="(if iocc = " + occ + " then 'd" + champ + "',fi)";
}
if (fonction == 3) {
  occ=document.CHANGER.occur.value;
  i=document.CHANGER.V1.options.selectedIndex;
  champ=document.CHANGER.V1.options[i].value;
  retour="(if iocc = "+occ+" then 'd"+champ+"a"+champ+"#"+document.CHANGER.valeur.value+"#',fi)";
}
return retour;
}
function getURLParameters(numero) 
  {
  var valeur = "";
  var sURL = window.document.URL.toString();
  if (sURL.indexOf("?") > 0) {
    var arrParams = sURL.split("?");
    var arrURLParams = arrParams[1].split("&");
    var arrParamNames = new Array(arrURLParams.length);
    var arrParamValues = new Array(arrURLParams.length);
    var i = 0;
    for (i=0;i<arrURLParams.length;i++) {
	var sParam =  arrURLParams[i].split("=");
	arrParamNames[i] = sParam[0];
	if (sParam[1] != "") {
	  arrParamValues[i] = unescape(sParam[1]);
        if (numero == i + 1) valeur = arrParamValues[i] ;
      }  		
	else
	  arrParamValues[i] = "No Value";
    }
  }
  return(valeur);
}
function HelpThes(URL)
    {
    window.open( URL,'newwin','toolbar=0,location=0,directories=0,status=0,menubar=0,width=400,height=350,scrollbars=yes')

    }

//-->
function Terme() { 
var aff="";
var bis="";
var requete="";
var savreq="";
var question="";
var libtag="/(101)";
var chaine=document.PHCROSS.t2015.value;
var cgi=document.PHCROSS.t2005.value + "afficheDet.in]/"; 
requete = "\"" + chaine + "\"" + libtag;
bis = "#" + chaine + "#" + libtag;
aff = chaine;
aff = "(Terme" + "=" + aff + ")";
requete = "(" + requete + ")";
savreq = "(" + bis + ")";
question = aff;
document.PHCROSS.t2000.value = requete;
document.PHCROSS.t2001.value = savreq;
document.PHCROSS.t2002.value = question;
document.PHCROSS.t2004.value = "1";
document.PHCROSS.t2008.value = "DET";
document.PHCROSS.t2012.value = "0";
document.PHCROSS.t2013.value = "10";
document.PHCROSS.t2015.value = "";
document.PHCROSS.action = cgi;
document.PHCROSS.submit();
}