function jsPrompt(Style,Title,Prompt,DefaultChoice,ChoiceList,FieldName) //Fet servir a Subformulari DadesInstP. Obre un ModalDialog.
{
	path = location.pathname.toLowerCase();
	dbpos = path.indexOf('.nsf')+4;
	hostURL = window.location.protocol +  "//"  + window.location.host;
	db = hostURL+"/"+path.substring(1,dbpos);
	
	if (ChoiceList)
	{
		if (Style.indexOf(":") > 0)
		{
			if (Style.indexOf("[NoSort]") < 0)
			{
				ChoiceArray = ChoiceList.split(",");
				ChoiceArray.sort();
				ChoiceList = ChoiceArray.join(",");
			}
			Style = Style.substr(0,Style.indexOf(":"))
		}
		else
		{
			ChoiceArray = ChoiceList.split(",");
			ChoiceArray.sort();
			ChoiceList = ChoiceArray.join(",");
		}
	}
	switch (Style)
	{
	case "[MostrarNiveles]": 
		width = 23;
		result = window.showModalDialog( db + "/MostrarNiveles?OpenForm&Title="+Title,ChoiceList+";"+DefaultChoice,"status:no; help:no; dialogHeight:240px; dialogWidth:" + width);
		return result
		break
	}
}
function Trim(inputstringTrim)    //Es fa servir a DibuixarLinks per obtindre el codi sense espais en blanc
{
	fixedTrim = "";
	lastCh = " ";
	for(x =0; x < inputstringTrim.length; x++)
	{
		ch = inputstringTrim.charAt(x);
		if ((ch != " ") || (lastCh != " "))
		{
			fixedTrim += ch;
		}
		lastCh = ch;
	}
	if (fixedTrim.charAt(fixedTrim.length - 1) == " ")
	{
		fixedTrim = fixedTrim.substring(0, fixedTrim.length - 1);
	}
	return fixedTrim;
}
function DibuixaLinks_OLD(CodsW1, CodsW2, TemaW, divW, img)   //Fet servir als Formularis Publicats via Web. Dibuixa els Links als Documents
{
var adr;
var adrimg="/"+dbName+"/Link.gif?open";
var Cod=CodsW1.split(";");
var Cod2=CodsW2.split(";");
var Tema=TemaW.split(";");
var texte="";
if (Trim(Cod[0])!="")
{  if (Cod.length>10)
      {var max=10}
   else
      {var max=Cod.length}
   for (i=0; i<max; i++) 
  {
       adr=Trim(Cod[i]);
       codi =Trim(Cod2[i]);
       tem = Trim(Tema[i]);
       texte= texte + "<a onClick=javascript:abririnstman('"+adr+"') style='cursor:hand'> <IMG id="+img + i.toString() + "  border=0></a>&nbsp;&nbsp;"+codi+"&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;"+tem+"<br>";
   }
if (Cod.length>10)
{texte=texte+"&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;..."}
document.all[divW].innerHTML=texte;
addImg(adrimg, max, img);
}
}
function DibuixaLinks_OLD2(CodsW1, CodsW2, TemaW, divW, img)   //Fet servir als Formularis Publicats via Web. Dibuixa els Links als Documents
{
var adr;
var adrimg="/"+dbName+"/Link.gif?open";
var Cod=CodsW1.split(";");
var Cod2=CodsW2.split(";");
var Tema=TemaW.split(";");
var texte="";
var max=Cod.length
if(max>0){
   for (i=0; i<max; i++) 
  {
       adr=Trim(Cod[i]);
	if(adr!=""){
       codi =Trim(Cod2[i]);
       tem = Trim(Tema[i]);
         var pos =adr.indexOf("de baja");
     if ( pos!=-1 ) {
   texte= texte + "<IMG  src=\"icons/ecblank.gif\"   height=\"16\" width=\"15\"     id="+img + i.toString() + "  border=0>&nbsp;&nbsp;"+codi+"&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;"+tem+"<br>";
        }
      else
           {
      texte= texte + "<a onClick=\"javascript:abririnstman('"+adr+"')\" style=\"cursor:hand\"> <IMG src =' '        id="+img + i.toString() + "  border=0></a>&nbsp;&nbsp;"+codi+"&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;"+tem+"<br>";
  }
     }
   }
if(texte!=""){
  document.all[divW].innerHTML=texte;
  addImgLnk(adrimg, max, img);
}
}
}
function DibuixaLinks(CodsW1, CodsW2, TemaW, divW, img){
//alert(CodsW1);
//alert(CodsW2);
//alert(TemaW);
var adr;
var adrimg="/"+dbName+"/Link.gif?open";
if(CodsW1!="")
{
var Cod=CodsW1.split(";");
var Cod2=CodsW2.split(";");
var Tema=TemaW.split(";");
var texte="";
var max=Cod.length
if(max>0){
//Existen enlaces
texte = "<table width=99% border=0  cellpadding=0 cellspacing=0  >"
	for (i=0; i<max; i++) 
	{
		adr=Trim(Cod[i]);
		if(adr!=""){
       			codi =Trim(Cod2[i]);
			tem = Trim(Tema[i]);
			var pos =adr.indexOf("de baja");
			
			if ( pos!=-1 ) {
				var imgcode ="<IMG src=\"icons/ecblank.gif\" height=\"16\" width=\"15\" id="+img+i.toString()+" border=0>";
				var codcode = codi;
				var temacode = tem;
			} else {
				var imgcode = "<a onClick=\"javascript:abririnstman('"+adr+"')\" style=\"cursor:hand\"><IMG src=' ' id="+img + i.toString() + " border=0></a>";
				var codcode = codi;
				var temacode = tem;
			}
			texte = texte + "<tr height='16px' >";
			texte = texte + "<td    height='16px'  WIDTH='1%'   class='Label1' >"+imgcode+"</td><td  WIDTH='12%'  height='16px'    class='Label1'>"+codcode+"</td><td  height='16px'   WIDTH='82%'  class='Label1'>"+temacode+"</td>";
			texte = texte + "</tr>";
		}
	}
texte = texte + "</table>"
	if(texte!=""){
		document.all[divW].innerHTML=texte;
		addImgLnk(adrimg, max, img);
	}
}
}
}
function DibuixaLinks_IMP(CodsW1, CodsW2, TemaW, divW, img){
//alert(CodsW1);
//alert(CodsW2);
//alert(TemaW);
var adr;
var adrimg="/"+dbName+"/Link.gif?open";
if(CodsW1!="")
{
var Cod=CodsW1.split(";");
var Cod2=CodsW2.split(";");
var Tema=TemaW.split(";");
var texte="";
var max=Cod.length
if(max>0){
//Existen enlaces
texte = "<table width=99% border=0  cellpadding=0 cellspacing=0  >"
	for (i=0; i<max; i++) 
	{
		adr=Trim(Cod[i]);
		if(adr!=""){
       			codi =Trim(Cod2[i]);
			tem = Trim(Tema[i]);
			var pos =adr.indexOf("de baja");
			
			if ( pos!=-1 ) {
				var imgcode ="<IMG src=\"icons/ecblank.gif\" height=\"16\" width=\"15\" id="+img+i.toString()+" border=0>";
				var codcode = codi;
				var temacode = tem;
			} else {
				var imgcode = "<a onClick=\"javascript:abririnstman('"+adr+"')\" style=\"cursor:hand\"><IMG src=' ' id="+img + i.toString() + " border=0></a>";
				var codcode = codi;
				var temacode = tem;
			}
			texte = texte + "<tr height='16px' >";
			texte = texte + "<td    height='16px'  WIDTH='1%'   class='Label1'>"+imgcode+"</td><td  WIDTH='16%'  height='16px'    class='Label1'>"+codcode+"</td><td  height='16px'   WIDTH='82%'  class='Label1'>"+temacode+"</td>";
			texte = texte + "</tr>";
		}
	}
texte = texte + "</table>"
	if(texte!=""){
		document.all[divW].innerHTML=texte;
		addImgLnk(adrimg, max, img);
	}
}
}
}
function DibuixaFAQLinks(CodsW1, CodsW2, TemaW, divW, img){
var adr;
var adrimg="/"+dbName+"/Link.gif?open";
if(CodsW1!="")
{
var Cod=CodsW1.split(";");
var Cod2=CodsW2.split(";");
var Tema=TemaW.split(";");
var texte="";
var max=Cod.length
if(max>0){
//Existen enlaces
texte = "<table width=99% border=0  cellpadding=0 cellspacing=0>"
	for (i=0; i<max; i++) 
	{
		adr=Trim(Cod[i]);
		if(adr!=""){
       			codi =Trim(Cod2[i]);
			tem = Trim(Tema[i]);
			var pos =adr.indexOf("de baja");
			
			if ( pos!=-1 ) {
				var imgcode ="<IMG src=\"icons/ecblank.gif\" height=\"16\" width=\"15\" id="+img+i.toString()+" border=0>";
				var codcode = codi;
				var temacode = tem;
			} else {
				var imgcode = "<a onClick=\"javascript:abrirfaq('"+adr+"')\" style=\"cursor:hand\"><IMG src=' ' id="+img + i.toString() + " border=0></a>";
				var codcode = codi;
				var temacode = tem;
			}
			texte = texte + "<tr  height='16px' >";
			texte = texte + "<td    height='16px'  width='5px' class='Label1'>"+imgcode+"</td><td   height='16px'  WIDTH='95%'   class='Label1'>"+temacode+"</td>";
			texte = texte + "</tr>";
		}
	}
texte = texte + "</table>"
	if(texte!=""){
		document.all[divW].innerHTML=texte;
		addImgLnk(adrimg, max, img);
	}
}
}
}
function addImgLnk(adrimg,Numimag,nom) //Es posen després els src perque de la versió IE5 endavant, no carrega les imatges si no es així
{
 for (i=0; i<Numimag; i++) 
{
      if (typeof(document.all[nom+i] )!= "undefined")
    {
     if (typeof(document.all[nom+i].src )!= "undefined")
   {
          var pos = document.all[nom+i].src .indexOf("ecblank.gif");
         if ( pos!=-1 ) {
            document.all[nom+i].src= "http://"  + location.hostname+ "/icons/ecblank.gif"
        }
           else
        {
        document.all[nom+i].src=adrimg;
        }
}
}
}
}
/*********************************************************HISTÒRIC***************************************************/
function Secciones(id,div1,div2)//Sirve para que una seccion se despliegue sin refrescar
{
     var targetElement, div1Element, div2Element;
     targetElement = document.all(id);
     div1Element = document.all(div1);
     div2Element = document.all(div2);
     if (targetElement.style.display == "none") {
        targetElement.style.display = "";
        div1Element.style.visibility="hidden";
        div2Element.style.visibility="visible";
     } else {
        targetElement.style.display = "none";
        div2Element.style.visibility="hidden";
        div1Element.style.visibility="visible";
}
}
var usuario;
var pswd;
function abririnstman(Codi)  
{
var Codibo=ReplaceSubstring(Codi,"/","_");
  if(TUsu()==true){window.location="http://"  + location.hostname+ "/"+  dbName +"/PublPorCod/"+Codibo+"?Opendocument&Login";}else{window.location="http://"  + location.hostname+  "/"  + dbName + "/PublPorCod/"+Codibo+"?Opendocument&Login";}}
function abrirfaq(Codi)  
{
var dbFAQName = dbNameFAQ;
var Codibo=Codi; // es un UniversalID
  if(TUsu()==true){window.location="http://"  + urlFAQ + "/"+  dbFAQName +"/nvvFAQPorUNID/"+Codibo+"?Opendocument&Login";}else{window.location="http://"  + urlFAQ +  "/"  + dbFAQName + "/nvvFAQPorUNID/"+Codibo+"?Opendocument&Login";}}
function abririnstmanSP(Codi)  
{var Codibo=ReplaceSubstring(Codi,"/","_");if(TUsu()==true){window.location= "http://apintra1.sp.asepeyo.net/aoc/aoc0301.nsf/PublPorCod/"+Codibo+"?Opendocument&Login";}else{window.location= "http://apintra1.sp.asepeyo.net/aoc/aoc0301.nsf/PublPorCod/"+Codibo+"?Opendocument&Login";}}
function ReplaceSubstring(inputString, badString, goodString, caseSensitive){fixedReplace="";UI=inputString;UB=badString;	if ((caseSensitive != 1) && (caseSensitive != true)){UI=inputString.toUpperCase();UB=badString.toUpperCase();}badEnd=-1;badLoc=UI.indexOf(UB);if (badLoc!=-1){for(x=1;(badLoc!=-1);x++){fixedReplace=fixedReplace+inputString.substring((badEnd+1),badLoc)+goodString;badEnd=eval(badLoc+UB.length-1);badLoc=UI.indexOf(UB,(badLoc+1));}fixedReplace=fixedReplace+inputString.substr((badEnd+1));}else{fixedReplace=inputString;}return fixedReplace;}
function TUsu(){usuario="";pswd="";if (getCookieP("intracookie")){var idxUsuario=String(document.cookie).indexOf("Usuario=");var value = String(document.cookie).substr(idxUsuario+8);var arrUsuario=value.split(":");if (arrUsuario){if (arrUsuario.length == 3){usuario = arrUsuario[1];var px1=arrUsuario[2].split(";");var pa= px1[0];var pswdDe = D(pa);pswd = D(pswdDe);}}}if (usuario==""){return(false);}else{return(true);}}
function getCookieP(){var cookieValue = "";wantedCookie=arguments[0];allCookies=document.cookie;cookieArr=allCookies.split("; ");for(var t=0;t<cookieArr.length;t++){if(cookieArr[t].split("=")[0] == wantedCookie){cookieValue=cookieArr[t].split("=");cookieValue=unescape(cookieValue[1]);return true;}}return false;}
function D(s){var c=new String();var r=new String();c=s;var key=new Array(c.length);j = 0;for(i=0;i<c.length;i+=2){key[j]=c.substring(i,i+2);key[j]=key[j];r=r.concat(unescape("%"+key[j]));j++;}return r;}
function doPopups(ndiv) {
	//var IEVersion = 0 /*@cc_on+ScriptEngineMajorVersion()@*/; //detectar versión de IE, devuelve 0 si no es internet explorer
  var IEVersion=/*@cc_on function(){ switch(@_jscript_version){ case 1.0:return 3;
      case 3.0:return 4;case 5.0:return 5; case 5.1:return 5; case 5.5:return 5.5;
      case 5.6:return 6; case 5.7:return 7; case 5.8:return 8;case  9:return 9; }}()||@*/0;
	
 
if (  IEVersion == 0 ) 
{
     if (!!navigator.userAgent.match(/Trident\/7\./)) 
    IEVersion=11
} 
	if(IEVersion>6) {
		var div = document.getElementById(ndiv);
             if ( div )
              {
	 	var links = div.getElementsByTagName("a");
	 	for (var i = 0; i < links.length; i++) {
			if (links[i].onclick == null) {
				links[i].onclick = function() {
					window.open(this.getAttribute("href"), "", "toolbar=no,top=100,left=20,height=470,width=660,location=no,directories=no,status=no,menubar=no,scrollbars=yes,resizable=yes");
					return false;
				}
			}
		}
	}
}
}