direccion=location.protocol+"//"+location.host;

no_acento=1;   //Se quitan los acentos de la creacion de indices
similares=1;  //Se quitan los acentos de los indices en las busquedas
similares=0; //Se buscan similares (se aade $)
 
function inici()
{
  finestra = "";
  finestra=window.open(direccion,"","");
  //finestra.location=direccion;
  finestra.focus();
  window.close();  
}

function modificar_acentos(cadena)
{
  ar1="넉ؙ"
  ar2="";
 
  aux=0;
  while (cadena.length>aux)
  {
    ini=ar1.indexOf(cadena.substring(aux,aux+1),0);
    if (ini!=-1)
    {
      car_aux2=ar2.substring(ini,ini+1);
      cadena=cadena.substring(0,aux)+car_aux2+cadena.substring(aux+1,cadena.length+1);
    }
    aux=aux+1;
  }
  return cadena;
} 

function quitar_acentos(cadena)
{
  ar1="";
  ar2="aeiouAEIUOaeiouAEIUOaeiouAEIOUcCnN";
 
  aux=0;
  if(cadena!="")
  while (ar1.length>aux)
  {
    car_aux=ar1.substring(aux,aux+1);
    car_aux2=ar2.substring(aux,aux+1)
    ini=cadena.indexOf(car_aux,0);
    while (ini!=-1)
    {
      cadena=cadena.substring(0,ini)+car_aux2+cadena.substring(ini+1,cadena.length+1);
      ini=cadena.indexOf(car_aux,ini);
    }
    aux=aux+1;
  }
  return cadena;
} 

function obroFinestra_jerarquic() {

 X=(screen.width-5);
 Y=(screen.height-28);

//	finestreta=window.open(url,finestra,"screenX=0,left=0,screenY=0,top=0,width=" + (screen.width-5) + ",height=" + (screen.height-28) + ",menubar=no,resizable=no,titlebar=no,alwaysRaised=yes,status=no,scrollbars=yes,fullscreen=0');")
//	finestreta=window.open("wxis.exe?IsisScript=AEVSE.xis&jerarquic_field=999","jerarquic","screenX=0,left=0,screenY=0,top=0,width=" + X + ",height=" + Y + ",menubar=yes,resizable=yes,titlebar=no,alwaysRaised=yes,status=yes,scrollbars=yes,fullscreen=0');")
	finestreta=window.open("","jerarquic","screenX=0,left=0,screenY=0,top=0,width=" + X + ",height=" + Y + ",menubar=yes,resizable=yes,titlebar=no,alwaysRaised=yes,status=yes,scrollbars=yes,fullscreen=0');")
//	finestreta.location="wxis.exe?IsisScript=AEVSE.xis&jerarquic_field=981";
	finestreta.location="wxis.exe?IsisScript=AEVSE.xis&jerarquic0=jerarquic0&expression=x/(106)";
	finestreta.focus();
}

function obroFinestra(url,finestra,X,Y) {
	if (!X) { X=(screen.width-5);} else { X=X-5; }
	if (!Y) { Y=(screen.height-72);} else { Y=Y-28; }
//alert("X: "+(screen.width)+"\nY: "+(screen.height)+"\nX: "+X+"\nY: "+Y);
	finestreta=window.open(url+"&DATE_HOST="+formatDate(new Date(), "yyyy-MM-dd hh:mm:ss"),finestra,"screenX=0,left=0,screenY=0,top=0,width=" + X + ",height=" + Y + ",menubar=no,resizable=yes,titlebar=yes,alwaysRaised=yes,status=yes,scrollbars=yes,fullscreen=0');")
	//finestreta.location=url;
	finestreta.focus();
}


function valida_pa(valor1,valor2,valor3,retorno,date1,date2,campo1,campo2)
{
  var retorno1 = "";
  var retorno2 = "";

  if(no_acento==1) {
    document.form.expression.value=quitar_acentos(document.form.expression.value);
    document.form.valor1.value=quitar_acentos(document.form.valor1.value);
    document.form.valor2.value=quitar_acentos(document.form.valor2.value);
  }
//  if (valor3.value!="" & valor3.value.length>valor2.value.length) { valor1.options[valor1.selectedIndex].selected=false; valor1.value=""; valor2.value="";}
  if (valor3.value.substring(valor3.value.length-1,valor3.value.length)!="$" & valor3.value!="" & valor3.value.length>valor2.value.length) { valor2.value="";}
  if (valor3.value==valor2.value+"$") { document.form.oper7.value="+"; }
  if (valor2.value!="") { valor1.options[valor1.selectedIndex].selected=false; valor1.value=""; }
  if (valor2.value!="" & valor2.value!="null" & (valor3.value=="" | valor3.value=="null")) { document.form.oper7.value="+"; valor3.value=valor2.value+"$"; }

  if (date1.value!="null" & date1.value!=="")  {
  if (date2.value=="null" | date2.value=="") { date2.value=date1.value; }
  if (date2.value<100) { alert("Error fecha inferior a 100"); return false; }
    retorno1=crea_any(retorno,"0",date2.value,campo1);
    retorno2=crea_any(retorno,date1.value,"3000",campo2);
//  alert(retorno1 + " * " + retorno2);
    retorno.value=retorno1 + " * " + retorno2; 
    return retorno1 + " * " + retorno2;
  }
  else
  {
    retorno.value="";
    date2.value="";
  }
}

function valida_any_aevdo(retorno,date1,date2,campo1,campo2)
{
  if (date1.value!="null" & date1.value!=="")  {
  if (date2.value=="null" | date2.value=="") { date2.value=date1.value; }
  if (date2.value<100) { alert("Error fecha inferior a 100"); return false; }
    retorno1=crea_any(retorno,"0",date2.value,campo1);
    retorno2=crea_any(retorno,date1.value,"3000",campo2);
//  alert(retorno1 + " * " + retorno2);
    retorno.value=retorno1 + " * " + retorno2; 
    return retorno1 + " * " + retorno2;
  }
  else
  {
    retorno.value="";
    date2.value="";
  }
}

function crea_any(retorno,date1,date2,campo1)
{
  var result = "";
  var result1 = "";
  var result2 = "";
  var anya=date1;
  var anyb=date2;
  var any1=parseInt(date1);
  var any2=parseInt(date2);
//  var any1=parseInt(anya);
//  var any2=parseInt(anyb);
  retorno.value="";

if (any2<100) { alert("Error fecha inferior a 100"); return false }

  if (any2-any1>=10 & (parseInt(any1/10)*10)!=0)
  {
    while (any1-(parseInt(any1/10)*10)!=0)
    {
      if (any1<1000) { result1 += "0"; result2 += "0"; }
      if (any1<100) { result1 += "0"; result2 += "0"; }
      result1 += any1+"/("+campo1.value+")+"
      any1 = any1 + 1;
    }
//  alert("<10>:"+result1);
  }
//alert(any2+"-"+any1);
  if (any2-any1>=99 & (parseInt(any1/100)*100)!=0)
  {
    while (any1-(parseInt(any1/100)*100)!=0)
    {
    if (any1<1000) { result1 += "0"; result2 += "0"; }
    if (any1<100) { result1 += "0"; result2 += "0"; }
    anya=(any1/10)+"$";
    any1=any1+10;
    result1 += anya+"/("+campo1.value+")+"
    }
//  alert("<100>:"+result1);
  }
  if (any2-any1>=1000 & (parseInt(any1/100)*100)!=0)
  {
    while (any1-(parseInt(any1/1000)*1000)!=0)
    {
    if (any1<1000) { result1 += "0"; result2 += "0"; }
    anya=(any1/100)+"$";
    any1=any1+100;
    result1 += anya+"/("+campo1.value+")+"
    }
//  alert("<1000>:"+result1);
  }

//alert(any2+"-"+any1);

  while (parseInt((any2-any1)/1000)>=1) {
    if (any1<1000) { result1 += "0"; result2 += "0"; }
    anya=(any1/1000)+"$";
    any1=any1+1000;
    result1 += anya+"/("+campo1.value+")+"
//  alert("1000:"+result1);
  }
  while (parseInt((any2-any1)/100)>=1) {
    if (any1<1000) { result1 += "0"; result2 += "0"; }
    anya=(any1/100)+"$";
    any1=any1+100;
    result1 += anya+"/("+campo1.value+")+"
//  alert("100:"+result1);
  }
  while (parseInt((any2-any1)/10)>=1) {
    if (any1<1000) { result1 += "0"; result2 += "0"; }
    if (any1<100) { result1 += "0"; result2 += "0"; }
    if (any1<10) { result1 += "0"; result2 += "0"; }
    anya=(any1/10)+"$";
    any1=any1+10;
    result1 += anya+"/("+campo1.value+")+"
//  alert("10:"+result1);
  }

  if (parseInt(any1) <= parseInt(any2) )
  {
    for (var i = any1; i <= any2; i++) {
      if (i<1000) { result1 += "0"; result2 += "0"; }
      if (i<100) { result1 += "0"; result2 += "0"; }
      if (i<10) { result1 += "0"; result2 += "0"; }
      result1 += i+"$/("+campo1.value+")+"
    }
    result1=result1.substring(0,result1.length-1);
    result2=result2.substring(0,result2.length-1);
//    result="("+result1+" + "+result2+")";
    result="("+result1+")";
    retorno.value=result;
  }
  return result
}


function crea_any_bepv(retorno,date1,date2,campo1)
{
  var result = "";
  var result1 = "";
  var anya=date1.value;
  var anyb=date2.value;
  var any1=parseInt(date1.value);
  var any2=parseInt(date2.value);
//  var any1=parseInt(anya);
//  var any2=parseInt(anyb);
  retorno.value="";

if (any2<100 | any1<100) { alert("Error fecha inferior a 100"); return false }

  if (any2-any1>=10 & (parseInt(any1/10)*10)!=0)
  {
    while (any1-(parseInt(any1/10)*10)!=0)
    {
      if (any1<1000) { result1 += "0"; result2 += "0"; }
      if (any1<100) { result1 += "0"; result2 += "0"; }
      result1 += any1+"/("+campo1.value+")+"
      any1 = any1 + 1;
    }
//  alert("<10>:"+result1);
  }
//alert(any2+"-"+any1);
  if (any2-any1>=100 & (parseInt(any1/100)*100)!=0)
  {
    while (any1-(parseInt(any1/100)*100)!=0)
    {
    if (any1<1000) { result1 += "0"; result2 += "0"; }
    if (any1<100) { result1 += "0"; result2 += "0"; }
    anya=(any1/10)+"$";
    any1=any1+10;
    result1 += anya+"/("+campo1.value+")+"
    }
//  alert("<100>:"+result1);
  }
  if (any2-any1>=1000 & (parseInt(any1/100)*100)!=0)
  {
    while (any1-(parseInt(any1/1000)*1000)!=0)
    {
    if (any1<1000) { result1 += "0"; result2 += "0"; }
    anya=(any1/100)+"$";
    any1=any1+100;
    result1 += anya+"/("+campo1.value+")+"
    }
//  alert("<1000>:"+result1);
  }

//alert(any2+"-"+any1);

  while (parseInt((any2-any1)/1000)>=1) {
    if (any1<1000) { result1 += "0"; result2 += "0"; }
    anya=(any1/1000)+"$";
    any1=any1+1000;
    result1 += anya+"/("+campo1.value+")+"
//  alert("1000:"+result1);
  }
  while (parseInt((any2-any1)/100)>=1) {
    if (any1<1000) { result1 += "0"; result2 += "0"; }
    anya=(any1/100)+"$";
    any1=any1+100;
    result1 += anya+"/("+campo1.value+")+"
//  alert("100:"+result1);
  }
  while (parseInt((any2-any1)/10)>=1) {
    if (any1<1000) { result1 += "0"; result2 += "0"; }
    if (any1<100) { result1 += "0"; result2 += "0"; }
    if (any1<10) { result1 += "0"; result2 += "0"; }
    anya=(any1/10)+"$";
    any1=any1+10;
    result1 += anya+"/("+campo1.value+")+"
//  alert("10:"+result1);
  }

  if (parseInt(any1) <= parseInt(any2) )
  {
    for (var i = any1; i <= any2; i++) {
      if (i<1000) { result1 += "0";}
      if (i<100) { result1 += "0";}
      if (i<10) { result1 += "0";}
      result1 += i+"/("+campo1.value+")+"
    }
    result1=result1.substring(0,result1.length-1);
    result="("+result1+")";
    retorno.value=result;
  }
  return result
}



function open_index(campo,valor,dbxis,control)
{
  window.camp = valor;
  aux=""; 
  if (control == true && valor.value == "" ) {alert("Error introdueix inici paraula");}
  else
  {
//    if (dbxis[0].checked==true) { aux="IsisScript="+dbxis[0].value+"&"; }
//    else { aux="IsisScript="+dbxis[1].value+"&"; }
    aux="IsisScript="+dbxis.value+"&"; 
    if (valor.value!="" && valor.value!=null) {
      if (no_acento==1) { aux=aux+"from_dic="+quitar_acentos(valor.value)+"&"; }
      else { aux=aux+"from_dic="+valor.value+"&"; }
    }
    if (campo.length>4) {
      for (i=0; i<campo.length; i=i+1)	
      {
        if(campo[i].selected==true)
          aux=aux+"camp="+campo[i].value+"&";
      }
    }
    else { aux=aux+"camp="+campo.value+"&"; }

//alert(direccion+"/wxis.exe?"+aux+"diccionari=diccionari&camp="+campo.value);
//    indice=window.open(direccion+"/arxiu/wxis.exe?"+aux+"diccionari=diccionari&camp="+campo.value+"DATE_HOST="Date(),"indice","WIDTH=320,HEIGHT=400")
//alert(direccion+"/wxis.exe?"+aux+"diccionari=diccionari");
    indice=window.open(direccion+"/arxiu/wxis.exe?"+aux+"diccionari=diccionari&"+"DATE_HOST="+formatDate(new Date(), "yyyy-MM-dd hh:mm:ss"),"indice","WIDTH=320,HEIGHT=400")
  }
}

function open_index_db(campo,valor,db1,db2,titulo,control)
{
  window.camp = valor;
  aux=""; 
  if (control == true && valor.value == "" ) {alert("Error introdueix inici paraula");}
  else
  {
    if (db1.status==true || db1.checked==true) { aux="db1="+db1.value+"&"; }
    if (db2.status==true || db2.checked==true) { aux=aux+"db2="+db2.value+"&"; }
    if (titulo!="" && titulo.value!=null) { aux=aux+"titulo="+titulo+"&"; }
    if (valor.value!="" && valor.value!=null) {
      if (no_acento==1) {aux=aux+"from_dic="+quitar_acentos(valor.value)+"&";}
      else { aux=aux+"from_dic="+valor.value+"&";}
    }
    //alert(direccion+"/arxiu/wxis.exe?IsisScript=ARXIU_PA.xis&diccionari=diccionari&"+aux+"camp="+campo.value);
    indice=window.open(direccion+"/arxiu/wxis.exe?IsisScript=ARXIU_PA.xis&diccionari=diccionari&"+"DATE_HOST="+formatDate(new Date(), "yyyy-MM-dd hh:mm:ss")+"&"+aux+"camp="+campo.value,"indice","WIDTH=420,HEIGHT=400");
  }
}

function open_index_db2(campo,valor,valorant,db1,db2,titulo)
{
  window.camp = valor;
  aux="";
if (db1.status==true) { aux="db1="+db1.value+"&"; }
if (db2.status==true) { aux=aux+"db2="+db2.value+"&"; }
if (valorant.selectedIndex>0) {
  if (no_acento==1) { aux=aux+"from_dic="+quitar_acentos(valorant.options[valorant.selectedIndex].value)+"&"; }
  else { aux=aux+"from_dic="+valorant.options[valorant.selectedIndex].value+"&"; }
}
if (titulo!="") { aux=aux+"titulo="+titulo+"&"; }
//alert(direccion+"/wxis.exe?IsisScript=ARXIU_PA.xis&diccionari=diccionari&"+aux+"camp="+campo.value);
// indice=window.open("http://localhost/vic/wxis.exe?IsisScript=ARXIU_PA.xis&diccionari=diccionari&camp="+campo.value,"indice","WIDTH=320,HEIGHT=400")
 indice=window.open(direccion+"/arxiu/wxis.exe?IsisScript=ARXIU_PA.xis&diccionari=diccionari&"+"DATE_HOST="+formatDate(new Date(), "yyyy-MM-dd hh:mm:ss")+"&"+aux+"camp="+campo.value,"indice","WIDTH=420,HEIGHT=400")
// indice=window.open("http://localhost/vic/wxis.exe?IsisScript=ARXIU_PA.xis&diccionari=diccionari&camp="+campo.value,"indice")
}

function open_index_db3(campo,valor,valorant,valorant2,db1,db2,titulo)
{
  window.camp = valor;
  aux="";
if (db1.status==true) { aux="db1="+db1.value+"&"; }
if (db2.status==true) { aux=aux+"db2="+db2.value+"&"; }
//alert("1 "+valorant.value+"\n2 "+valorant2.value);
if (valorant.value!="" && valorant.value!=null) {
  if (no_acento==1) { aux=aux+"from_dic="+quitar_acentos(valorant.value)+"&"; }
  else { aux=aux+"from_dic="+valorant.value+"&"; }
}
else if (valorant2.value!="" && valorant2.value!=null) {
  if (no_acento==1) { aux=aux+"from_dic="+quitar_acentos(valorant2.value)+"&"; }
  else { aux=aux+"from_dic="+valorant2.value+"&"; }
}
if (titulo!="") { aux=aux+"titulo="+titulo+"&"; }
//alert("http://localhost/vic/wxis.exe?IsisScript=ARXIU_PA.xis&diccionari=diccionari&"+aux+"camp="+campo.value);
 indice=window.open(direccion+"/arxiu/wxis.exe?IsisScript=ARXIU_PA.xis&diccionari=diccionari&"+"DATE_HOST="+formatDate(new Date(), "yyyy-MM-dd hh:mm:ss")+"&"+aux+"camp="+campo.value,"indice","WIDTH=420,HEIGHT=400")
}

function open_index_db_AEVDO(campo,valor)
{
  window.camp = valor;
  aux="";
if (valor!="" && valor.value!=null) {
  if (no_acento==1) { aux=aux+"from_dic="+quitar_acentos(valor.value)+"&"; }
  else { aux=aux+"from_dic="+valor.value+"&"; }
} 
 indice=window.open(direccion+"/arxiu/wxis.exe?IsisScript=AEVDO.xis&diccionari=diccionari&"+"DATE_HOST="+formatDate(new Date(), "yyyy-MM-dd hh:mm:ss")+"&"+aux+"camp="+campo.value,"indice","WIDTH=420,HEIGHT=400")
}

function print_navegar_menu()
{
document.write('<form><table width="100%" border="0" cellspacing="0" cellpadding="2" bgcolor="#821035">');
document.write('    <tr>');
if (document.primero)   { document.write('<td vAlign=center><input type="button" value="|<<" onClick="document.primero.submit();"></td>'); }
if (document.anterior)  { document.write('<td vAlign=center><input type="button" value="<<"  onClick="document.anterior.submit();"></td>'); }
if (document.siguiente) { document.write('<td vAlign=center><input type="button" value=">>"  onClick="document.siguiente.submit();"></td>'); }
if (document.ultimo)    { document.write('<td vAlign=center><input type="button" value=">>|" onClick="document.ultimo.submit();"></td>'); }
document.write('    <td width="95%" vAlign=center align=right bgcolor="#821035">');
document.write('        <a href="javascript:print();"><img src="img/imp.gif" alt="Impresora" border="0"></a>');
if(document.rebuscar!=null) { document.write('	<a href="javascript:document.rebuscar.submit();"><img src="img/buscar.gif" alt="Cerca" border="0"></a>');}
else {document.write('        <a href="javascript:history.go(-1)";><img src="img/buscar.gif" alt="Cerca" border="0"></a>');} 
//document.write('	<a href="javascript:history.go(-1);"><img src="img/atras.gif" alt="Endarrere" border="0"></a>');
document.write('	<a href="javascript:inici();"><img src="img/cerrar.gif" alt="Inici" border="0"></a>');
document.write('	<a href="javascript:window.close();" target="_top"><img src="img/salir.gif" alt="Tancar" border="0"></a>');
document.write('    </td></tr>');
document.write('  </form></table>');
}

function make_select_BEPV(numero)
{
  if (numero>1) { document.writeln('<BR>'); }
  document.writeln('<select name="camps'+numero+'">');
  document.writeln('<option value="*" selected>Nmero de registre');
  document.writeln('<option value="1">Data de descripci');
  document.writeln('<option value="2">Data de modificaci');
  document.writeln('<option value="3">Arxiver');
  document.writeln('<option value="4">Observacions');
  document.writeln('<option value="5">Tipus de fons');
  document.writeln('<option value="100">Codi dArxiu');
  document.writeln('<option value="102">Sibles de fons');
  document.writeln('<option value="103">Codi de fons');
  document.writeln('<option value="105">Nivell de descripci');
  document.writeln('<option value="106">Codi de classificaci');
  document.writeln('<option value="108">Ttol formal');
  document.writeln('<option value="109">Ttol atribut');
  document.writeln('<option value="113">Dates de referncia');
  document.writeln('<option value="114">Dates de producci');
  document.writeln('<option value="115">N dunitat arxivstica');
  document.writeln('<option value="116">N de subunitat arviv.');
  document.writeln('<option value="202">Codi productor');
  document.writeln('<option value="203">Nom del productor');
  document.writeln('<option value="204">Histria de lorganisme');
  document.writeln('<option value="205">Histria de custdia');
  document.writeln('<option value="206">Dades sobre lingrs');
  document.writeln('<option value="207">Dates de formaci de la unitat de descripci');
  document.writeln('<option value="208">Increments');
  document.writeln('<option value="301">Resum');
  document.writeln('<option value="303">Tipologia diplomtico jurdica');
  document.writeln('<option value="304">Descriptors: matries');
  document.writeln('<option value="305">Descriptors: onomstics');
  document.writeln('</select> ');

  document.writeln('<input type="text" name="valor'+numero+'" value="">');
  document.writeln('<select name="oper'+numero+'">');
  document.writeln('<option value="*" selected>AND');
  document.writeln('<option value="+">OR');
  document.writeln('<option value="^">NOT');
  document.writeln('</select>');
  document.writeln('<SCRIPT LANGUAGE="JavaScript" type="text/javascript">');
  document.writeln('window.document.forms[0].camps'+numero+'.options['+(numero)+'].selected=true;');
  document.writeln('</SCRIPT>');

}

function make_select_BEPV_index(numero)
{
  document.writeln('<select name="camps'+numero+'">');
  document.writeln('<option value="901">Autor');
  document.writeln('<option value="902">Ttol');
  document.writeln('<option value="903">Matria');
  document.writeln('<option value="907">Paraula clau');
  document.writeln('<option value="918">Paraula clau dautor');
  document.writeln('<option value="919">Paraula clau de ttol');
  document.writeln('<option value="920">Paraula clau de matria');
  document.writeln('<option value="912">Llengua');
  document.writeln('<option value="915">Tipus document');
  document.writeln('<option value="914">Data');
  document.writeln('<option value="916">ISBN-ISSN');
  document.writeln('<option value="917">Nivel bibliogrfic');
  document.writeln('</select> ');

  document.writeln('<input type="text" name="valor'+numero+'" value="" size="40">');
  document.writeln('<select name="oper'+numero+'">');
  document.writeln('<option value="*" selected>AND');
  document.writeln('<option value="+">OR');
  document.writeln('<option value="^">NOT');
  document.writeln('</select>');
  document.writeln('<A HREF="#" onClick="open_index(forms[0].camps'+numero+','+'forms[0].valor'+numero+',forms[0].IsisScript,true);"> ndex </A>');
  document.writeln('<SCRIPT LANGUAGE="JavaScript" type="text/javascript">');
  document.writeln('window.document.forms[0].camps'+numero+'.options['+(numero-5)+'].selected=true;');
  document.writeln('</SCRIPT>');
  if (numero>1) { document.writeln('<BR>'); }
}

function make_select_AEVSE(numero)
{
  if (numero>1) { document.writeln('<BR>'); }
  document.writeln('<select name="camps'+numero+'">');
  document.writeln('<option value="1">Data de descripci');
  document.writeln('<option value="2">Data de modificaci');
  document.writeln('<option value="3">Arxiver');
  document.writeln('<option value="4">Observacions');
  document.writeln('<option value="5">Tipus de fons');
  document.writeln('<option value="100">Codi dArxiu');
  document.writeln('<option value="102">Sibles de fons');
  document.writeln('<option value="103">Codi de fons');
  document.writeln('<option value="105">Nivell de descripci');
  document.writeln('<option value="106">Codi de classificaci');
  document.writeln('<option value="108">Ttol formal');
  document.writeln('<option value="109">Ttol atribut');
  document.writeln('<option value="113">Dates de referncia');
  document.writeln('<option value="114">Dates de producci');
  document.writeln('<option value="115">N dunitat arxivstica');
  document.writeln('<option value="116">N de subunitat arviv.');
  document.writeln('<option value="202">Codi productor');
  document.writeln('<option value="203">Nom del productor');
  document.writeln('<option value="204">Histria de lorganisme');
  document.writeln('<option value="205">Histria de custdia');
  document.writeln('<option value="206">Dades sobre lingrs');
  document.writeln('<option value="207">Dates de formaci de la unitat de descripci');
  document.writeln('<option value="208">Increments');
  document.writeln('<option value="301">Resum');
  document.writeln('<option value="303">Tipologia diplomtico jurdica');
  document.writeln('<option value="304">Descriptors: matries');
  document.writeln('<option value="305">Descriptors: onomstics');
  document.writeln('<option value="306">Descriptors: geogrfic');
  document.writeln('<option value="307">Descriptors: id. lliures');
  document.writeln('<option value="308">Instruments de descripci');
  document.writeln('<option value="309">Documents de lexpedient');
  document.writeln('<option value="401">Llengua dels documents');
  document.writeln('<option value="402">Sistema dorganitzaci');
  document.writeln('<option value="403">Original/cpia');
  document.writeln('<option value="405">Catacterstiques fsiques');
  document.writeln('<option value="406">Volum de la unitat');
  document.writeln('<option value="407">Estat de cibvervaci');
  document.writeln('<option value="408">Manuscrit/imprs');
  document.writeln('<option value="501">Dipsit');
  document.writeln('<option value="502">Signatura topopgrfica');
  document.writeln('<option value="503">Topogrfic');
  document.writeln('<option value="504">Topogrfic antic');
  document.writeln('<option value="601">U.desc. internes relacinad');
  document.writeln('<option value="602">U.desc. externes relacinad');
  document.writeln('<option value="603">Bibliografia');
  document.writeln('<option value="604">Localitzaci dels originals');
  document.writeln('<option value="605">Existncia de cpies');
  document.writeln('<option value="718">Informaci avaluaci i tria');
  document.writeln('<option value="801">Estatus legal');
  document.writeln('<option value="802">Nivell de confidencialitat');
  document.writeln('<option value="803">Condicions daccs');
  document.writeln('<option value="804">Drets i cond. de reproducci');
  document.writeln('<option value="900">Notes');
  document.writeln('<option value="980">Fons');
  document.writeln('<option value="981">Codi de classificaci');
  document.writeln('<option value="982">Ttol');
  document.writeln('<option value="983">Dates de producci');
  document.writeln('<option value="984">Nom del productor');
  document.writeln('<option value="985">Paraula clau de contingut');
  document.writeln('<option value="986">Descriptors');
  document.writeln('<option value="987">Llengua');
  document.writeln('<option value="989">Documents relacionats');
  document.writeln('<option value="990">Codi darxiu');
  document.writeln('<option value="991">Codi Productor');
  document.writeln('<option value="993">Nivell de descripci');
  document.writeln('<option value="994">Signatura topogrfica');
  document.writeln('</select> ');
  document.writeln('<SCRIPT LANGUAGE="JavaScript" type="text/javascript">');
  document.writeln('window.document.forms[0].camps'+numero+'.options['+(numero)+'].selected=true;');
  document.writeln('</SCRIPT>');

  document.writeln('<input type="text" name="valor'+numero+'" value="">');
  document.writeln('<select name="oper'+numero+'">');
  document.writeln('<option value="*" selected>AND');
  document.writeln('<option value="+">OR');
  document.writeln('<option value="^">NOT');
  document.writeln('</select>');
}

function selec_radio_valor(objeto,valor)
{
  if (objeto.length)
   for (i=0; i < objeto.length; i=i+1)
   {
    if(valor==objeto[i].value) { objeto[i].checked=true; break; }
   }
  else if (valor==objeto.value) objeto.checked=true;
}

function selec_select_valor(objeto,valor)
{
 for (i=0; i < objeto.length; i=i+1)
 {
  if(valor==objeto[i].value) { objeto[i].selected=true; break; }
 }
}


function selec_radio(objeto,valor)
{
 for (i=0; i < objeto.length; i=i+1)
 {
  objeto[i].checked=(thisCookie) ? getCookie(objeto[i].name+"["+i+"]") : valor;
 }
}

function selec_selected(elemento,maximo,valor)
{ for (i=0; i<maximo;i=i+1)
  { if (elemento[i].value==valor || i==valor)
    { elemento[i].selected=true; break; }
  }
}

function addZero(vNumber){ 
  return ((vNumber < 10) ? "0" : "") + vNumber 
} 
      
function formatDate(vDate, vFormat){ 
  var vDay                      = addZero(vDate.getDate()); 
  var vMonth            = addZero(vDate.getMonth()+1); 
  var vYearLong         = addZero(vDate.getFullYear()); 
  var vYearShort        = addZero(vDate.getFullYear().toString().substring(3,4)); 
  var vYear             = (vFormat.indexOf("yyyy")>-1?vYearLong:vYearShort) 
  var vHour             = addZero(vDate.getHours()); 
  var vMinute           = addZero(vDate.getMinutes()); 
  var vSecond           = addZero(vDate.getSeconds()); 
  var vDateString       = vFormat.replace(/dd/g, vDay).replace(/MM/g, vMonth).replace(/y{1,4}/g, vYear) 
  vDateString           = vDateString.replace(/hh/g, vHour).replace(/mm/g, vMinute).replace(/ss/g, vSecond) 
  return vDateString 
} 

