var bloque = Array();

	bloque[1]=Array();
  bloque[1][0] = 'calendario';
	bloque[1][1] = '/cgi-bin/apsesp/si/calendario.php';
	bloque[1][2] = 'calendario'; 
	bloque[1][3] = '&cal=1&fechacal=';
	bloque[1][4] = 'cargacal';
	
	
	
function bloque_valido(quebloque){
   var idb=-1;
	 var a;
	 //chequeamos la validez del bloque
   for (a=0;a<bloque.length;a++) {
	    if (bloque[a][0] == quebloque)	idb = a;
   }
	 if (idb==-1) {
	    alert('No vale');
	 }
   return idb;

}	
	
function actualiza_bloque(unbloque,fecha) {
   var idb = bloque_valido(unbloque);
	 if (idb == -1) {
	    alert('Bloque no valido '+ unbloque);
			return true;
	 }
	 //si es correcto hacemos la petición
	 var url2= bloque[idb][3] + fecha; 
	 var url = bloque[idb][1]+'?rnd='+Math.random()+url2;

//PDA y otros:  si no existe el destino-> recargamos la página
	 var d1 = document.getElementById(bloque[idb][2]);
	 if (d1==null) {
	 }
	 
   //si es correcto hacemos la petición
   var req = new XMLHttpRequest();
   req.open('GET',url);
   req.send(null);
	 req.onreadystatechange = function() {
     if (req.readyState == 4 && req.status == 200 && req.responseText!="") {
			  var texto = req.responseText;
		    var d1 = document.getElementById(bloque[idb][2]);
				if (d1==null) alert(unbloque);
        d1.innerHTML = texto;
      }
   }
	 return false;
}



function onoff(capa,cook){
   var a=document.getElementById(capa);
	 if ( (a.style.display == 'block') || !(a.style.display) ) {
      a.style.display='none';
			if (cook) SetCookie(cook,0); 
	 }else {
      a.style.display='block';
			if (cook) SetCookie(cook,1);
	 }
	 self.focus();
}

function on(capa){
   var a=document.getElementById(capa);
   a.style.display='block';
	 self.focus();
}

function iraldia(formulario){
    var f = formulario.an.value+formulario.me.value+'01';
		
		alert(formulario.an.value);
    var d = ''+formulario.di.value;
    var a = ''+formulario.an.value;
    var m = ''+formulario.me.value

    actualiza_bloque('calendario',f);
    return false;

}            



function SetCookie (name, value) { 
var argv = SetCookie.arguments; 
var argc = SetCookie.arguments.length; 
var expires = (argc > 2) ? argv[2] : null; 
var path = (argc > 3) ? argv[3] : null; 
var domain = (argc > 4) ? argv[4] : null; 
var secure = (argc > 5) ? argv[5] : false; 
document.cookie = name + "=" + escape (value) + 
((expires == null) ? "" : ("; expires=" + expires.toGMTString())) + 
((path == null) ? "" : ("; path=" + path)) + 
((domain == null) ? "" : ("; domain=" + domain)) + 
((secure == true) ? "; secure" : "");
}


function ValidDate (day, month, year)
{
 	
	if ( TestDate(day,month,year) )
	{
		return(false);
	};
	
  day = parseInt(day,10);
	month = parseInt(month,10);
	year = parseInt(year,10);

	
	if ( (year % 4 == 0) && ((year % 100 != 0) || (year % 400 == 0)) )
		bisiesto = true;
	else
		bisiesto = false;
	switch (month)
	{
		case 2: if (bisiesto)
				  {
					if (parseInt(day) >29)
						return(false);
				  }
				  else
				  {
					if (parseInt(day) >28)
						return(false);
				  };
				  break;
		case 4: 
		case 6: 
		case 9: 
		case 11: if (parseInt(day) >30)
					 return(false);
				   break;
		default: return (true);
	}
	return (true);
}


function TestDate(day, month, year)
{
    day = parseInt(day,10);
		month = parseInt(month,10);
		year = parseInt(year,10);
		
		if ( (day > 31) || (day < 1) )
			return(1);
			
		if ( (month > 12) || (month < 1) )
			return(1);
			
		if ( (year > 2100)	|| (year < 1800) )
			return(1);
			
		return(0)
}


function esAlfa(cadena)
{
  car = cadena.toUpperCase();
  return  (car>='A' && car<='Z');
}

function emailOk(cadena)
{
  cad = cadena;
	if (tieneEspacios(cad)) return false;

  var car;
  var arroba = 0;
  var punto = 0;
  longitud = cad.length;
  for (var i=0;i<longitud;i++)
  {
    car = cad.charAt(i);
    if (car==' ') return false;
    if (!(esAlfa(car) || car=='@' || car=='.' || car=='_' || car=='-' || (car>='0' && car<='9'))) return false;
    if (car=='@')
      if (arroba>0)
        return false;
      else
	if (i==0)
	  return false;
	else
	  arroba=i;
    else
      if (car=='.')
        if (i==0)
	  return false;
	else
	  punto=i;
  }
  return (arroba>0 && punto>0 && arroba<punto && punto>arroba+1 && car!='.');
}

function tieneEspacios(texto){
 var invalid = " "; // Invalid character is a space
 if (texto.indexOf(invalid) > -1) {
  return true;
 } else {
  return false;
 }
}

function validar(formulario) {
  if (formulario.qbop.value=='' && formulario.qorganismo.value=='' && formulario.qanio.value=='' && formulario.qnumero.value=='') {
	   alert('Debe especificar una cadena de busqueda o un organismo o un número de bop o un año');
		 return false;
	}
}

function aniofechas() {
  var f = document.getElementById('formulario_busqueda');
	if (parseInt(f.qanio.value)>0){
	   onofffechas(0);
	}else {
   	 onofffechas(1);
	}
  return false;
}

function onofffechas(tof){ 
 var cfecha = new Array();
 cfecha[0]='fbdd';cfecha[1]='fbdm';cfecha[2]='fbda';cfecha[3]='fbhd';cfecha[4]='fbhm';cfecha[5]='fbha';
 var como = true;
 if (tof==1) como = false;
 
 for (i=0;i<6;i++){ 
    var s = document.getElementById(cfecha[i]);
		s.disabled = como; 
 } 
}