// <!-- js_.bat --> //
// <!--
// ----------------------------------------------------------------------------------------
//061102  ContadorCblStatsCuenta(NombreContadorBasico());
//081026  if (PralNom=='apafcv' || PralNom=='apafcw' || PralNom=='playpuig') ContadorNedstat(PralNom,1);
  G_L(' <DIV STYLE="clear: both;"><\/DIV>');
  G_L('<DIV CLASS="noimp">');
  G_L(' <A NAME="pie_comun"></A>');
// Pie de página
  var ImgNom=PralDir+'letrero_btn.gif';
  var ImgPro=' width="60" height="60" border="0"';
// ----------------------------------------------------------------------------------------
  var re = new RegExp("\..*\."); var wwwDom=DomNom+extDNS; if (!re.exec(wwwDom)) wwwDom="www."+wwwDom;
//  if (ImgNom!='') {
    separa();
    G_L('<P ALIGN="center" CLASS="peq">');
    G_L('<a href="javascript:history.go(-1)"><img src='+ImgNom+ImgPro+'></a><br>');
    G_L('<a href="http://'+wwwDom+'">http://'+wwwDom+'</a><br>');
    if (mailfrm!="") G_L('Informaci&oacute;n: <a href="mailto:'+mailfrm+'">'+mailfrm+'</a>'+pgpfrm+'<br>');
    if (DomNom!='cabalo') G_L('Dise&ntilde;o: <a href="mailto:'+mailwww+'">'+mailwww+'</a>'+pgpwww+'<br>');
//050926    if (PralNom!= "apafcv") G_L('<a href="'+DirCGIComun+'lssi.cgi?id='+DomNom+'">Informaci&oacute;n general (LSSI)</A><br>');
    else                    G_L('<a href="'+PralDir+'aviso_legal.html">Aviso legal</A><br>');
    G_L('</P>');
//  }
// Para asegurar el foco sobre la ventana
//  setTimeout('top.focus()', 5000);
//
  G_L('<P CLASS="cr" ALIGN="CENTER">');
  if (ie4) {
   G_L(' <A href="#" onClick=javascript:this.style.behavior="url(#default#homepage)";this.setHomePage("http://"+wwwDom+"/");return false>Poner este sitio de inicio</A><BR>');
   G_L(' <A href="javascript:favorito()">A&ntilde;adir este sitio a favoritos</A><BR>');
  }
// cblbuscador.cgi
  if (
       DirTop.indexOf(Protocolo+'//principal/')>=0
    || DirTop.indexOf('dmam.net')>=0
    || DirTop.indexOf('acazador')>=0
  ) {
   G_L(' <FORM METHOD="GET" ACTION="'+PralDir+'cria.html">');
   G_L('  <TABLE ALIGN="CENTER">');
   G_L('   <TR><TD CLASS="tabla" ALIGN="center">');
   G_L('    <INPUT TYPE="hidden" NAME="cria" VALUE="'+DirCGI+'cblbuscador.cgi">');
   G_L('    <INPUT TYPE="hidden" NAME="dir" VALUE="'+PathTop+'">');
   G_L('    <INPUT CLASS="formulariopeq" TYPE="text" NAME="txt" SIZE="25" VALUE="">');
   G_L('    <INPUT CLASS="formulariopeq" TYPE="submit" VALUE="Buscar">');
   G_L('   </TD></TR>');
   G_L('  </TABLE>');
   G_L(' </FORM>');
  }
//\ cblbuscador.cgi

//080128  google_busca();

  G_L('<CENTER>'); imprimir(); G_L('</CENTER>');
  G_L('</P>');
//110129  w3c();
  G_L('</DIV>');
// --------------------------------
function favorito() {
 window.external.AddFavorite("http://"+wwwDom+"/",window.top.document.title);
}
// --------------------------------
function paginainicio() {
 this.style.behavior='url(#default#homepage)';
 this.setHomePage("http://"+wwwDom+"/");
 return false;
}

// --------------------------------
//110129 function w3c() {
//110129 // Validación W3C
//110129   if (quien().toLowerCase()=='cabalo' && !Chivar) {
//110129    G_L('<p align="center">');
//110129    G_L('<a href="http://validator.w3.org/check?uri=referer"><img border="0" src="http://www.w3.org/Icons/valid-html401" alt="Valid HTML 4.01 Transitional" height="31" width="88"><\/a>');
//110129    G_L('<a class="right" href="http://jigsaw.w3.org/css-validator/validator?uri='+this.location+'"><img style="border:0;width:88px;height:31px" src="http://jigsaw.w3.org/css-validator/images/vcss" alt="Valid CSS!" /><\/a>');
//110129    G_L('<a href="http://validator.w3.org/checklink?uri='+this.location+'">Valida Links<\/a>');
//110129 // Validación ROBOTS.TXT
//110129    G_L('<a href="http://tool.motoricerca.info/robots-checker.phtml?checkreferer=1"><img src="http://tool.motoricerca.info/pic/valid-robots.png" border="0" alt="Valid robots.txt" width="88" height="31"><\/a>');
//110129    G_L('<\/p>');
//110129  }
//110129}

// ----------------------------------------------------------------------------------------
// -->
// <!--
  G_L('<DIV CLASS="centrador">');
  G_L('<DIV CLASS="noimp">');
  separa();
  cblpie();

//---------------------------------
  G_L('<BR>');
  G_L('</DIV>');
  G_L('</DIV>');
// --------------------------------
function copymuestra(LicRef, LicAbr, LicPrm, LicCon, LicNom, LicOri) {
  var Ahora=new Date(); var any = Ahora.getFullYear();
  var txt='';
  txt+='<A HREF="'+LicRef+'">'+LicAbr+' '+(any-4)+'-'+any+' '+DomNom+extDNS+'</A>';
  txt+=' Se otorga permiso para '+LicPrm+' cualquier elemento original contenido en este documento '+LicCon;
  txt+=' bajo los términos de la Licencia de '+LicNom+', o cualquier otra versión posterior publicada por '+LicOri+'.';
  txt+=' Puede ver una copia traducida de esta licencia en <A HREF="'+LicRef+'">&quot;Licencia de '+LicNom+'&quot;</A>';
  txt+=' No se aceptarán responsabilidades por las pérdidas ocasionadas';
  txt+=' a las personas naturales o jurídicas que actúen o dejen de actuar';
  txt+=' como resultado de alguna información contenida en este sitio';
  G_L(txt);
}
// --------------------------------
function copyCCL() {
  var LicRef ='http://creativecommons.org/licenses/by-nc-nd/2.1/es/';
  var LicAbr ='&copy;CCL';
  var LicPrm ='copiar, distribuir y comunicar públicamente';
  var LicCon ='reconociendo y citando al autor, para fines no comerciales y sin realizar modificaciones,';
  var LicNom ='Reconocimiento-NoComercial-SinObraDerivada 2.1';
  var LicOri ='Creative Commons'
  copymuestra(LicRef, LicAbr, LicPrm, LicCon, LicNom, LicOri);
}
// --------------------------------
function copyGFDL() {
  var LicRef ='http://www.es.gnu.org/licencias/fdles.html';
  var LicAbr ='Copyleft GFDL';
  var LicPrm ='copiar, distribuir y/o modificar';
  var LicCon ='citando al autor e incluyendo un enlace al artículo original';
  var LicNom ='Documentación Libre GNU, Versión 1.1';
  var LicOri ='la Free Software Foundation'
  copymuestra(LicRef, LicAbr, LicPrm, LicCon, LicNom, LicOri);
}
// --------------------------------
function cblpie() {
//051113  G_L('<P class="cr" ALIGN="CENTER" STYLE="width: 80%;">');
//051113  copyGFDL();
//051113  G_L('<BR><A HREF="'+DirBase+'menu.html" target="_top">');
//051113  G_L(' <img src="'+DirBase+'cblani.gif" border="0" width="50" height="50" align="middle">');
//051113  G_L(' <BR>&copy; Carlos Barrachina Loras</b>');
//051113  G_L('</A>');
//051113  G_L('<BR><I>&quot;Ubi non est iustitia, ibi non potest esse ius&quot;</I>');
//051113  G_L('<BR><B>&quot;Paso corto, vista larga, lo importante es llegar&quot;</B>');
//051113  G_L('</P>');
//
//border-style:none no funciona en ne  G_L('<TABLE ALIGN="CENTER" BORDER="1" BORDERCOLOR="#C0C0C0" CELLPADDING="3" CELLSPACING="0" STYLE="border-style:none">');
  if (window.location.href.indexOf('/areap/')<0 && window.location.href.indexOf('/areaesp/')<0) {
    G_L('<TABLE ALIGN="CENTER" BORDER="1" BORDERCOLOR="#C0C0C0" CELLPADDING="3" CELLSPACING="0">');
    G_L('<TR><TH ALIGN="CENTER" CLASS="cr" COLSPAN="2">Solo clientes CBL Inform&aacute;tica</TD></TR>');
    G_L('<TR>');
    G_L(' <TD ALIGN="CENTER" CLASS="cr"><A HREF="http://principal/cabalo/areaesp/index.html" TARGET="_top">&Aacute;rea restringida</A></TD>');
    G_L(' <TD ALIGN="CENTER" CLASS="cr"><A HREF="javascript:cblaccesspide();">Solicitud acceso</A></TD>');
    G_L('</TR>');
    G_L('</TABLE>');
  }
}
// --------------------------------
function cblaccesspide(tipo) {
 var correoe=prompt ('¡SOLO CLIENTES DIRECTOS DE CBL INFORMATICA!\nIntroduzca su dirección de correo e.',"");
 if (correoe && correoe!='') {
  window.open(DirCGI+'cblaccesspide.cgi?tipo='+tipo+'&correoe='+correoe , '', ' toolbar=no,width=400,height=350');
 }
}
// -->