// INICIO Funciones para scroll contínuo de eventos
function checkBrowser(){
	this.ver=navigator.appVersion
	this.dom=document.getElementById?1:0
	this.ie5=(this.ver.indexOf("MSIE 5")>-1 && this.dom)?1:0;
	this.ie4=(document.all && !this.dom)?1:0;
	this.ns5=(this.dom && parseInt(this.ver) >= 5) ?1:0;
	this.ns4=(document.layers && !this.dom)?1:0;
	this.bw=(this.ie5 || this.ie4 || this.ns4 || this.ns5)
	return this
}
bw=new checkBrowser()

lstart=5 
loop=true
// Velocidad
speed=80
pr_step=1

function makeObj(obj,nest){
    nest=(!nest) ? '':'document.'+nest+'.'
	this.el=bw.dom?document.getElementById(obj):bw.ie4?document.all[obj]:bw.ns4?eval(nest+'document.'+obj):0;
  	this.css=bw.dom?document.getElementById(obj).style:bw.ie4?document.all[obj].style:bw.ns4?eval(nest+'document.'+obj):0;
	this.scrollHeight=bw.ns4?this.css.document.height:this.el.offsetHeight
	this.newsScroll=newsScroll;
	this.moveIt=b_moveIt; this.x; this.y;
    this.obj = obj + "Object"
    eval(this.obj + "=this")
    return this
}
function b_moveIt(x,y){
	this.x=x;this.y=y
	this.css.left=this.x
	this.css.top=this.y
}
function newsScroll(speed){
	if(this.y>-this.scrollHeight){
		this.moveIt(0,this.y-pr_step)
		setTimeout(this.obj+".newsScroll("+speed+")",speed)
	}else if(loop) {
		this.moveIt(0,lstart)
		eval(this.obj+".newsScroll("+speed+")")
	}
}
function newsScrollInit(speed){
	oNewsCont=new makeObj('ListaCalendario')
	oNewsScroll=new makeObj('ListaProximosEventos','ListaCalendario')
	oNewsScroll.moveIt(0,lstart)
	oNewsCont.css.visibility='visible'
	oNewsScroll.newsScroll(speed)
}
// FIN Funciones para scroll contínuo de eventos
function Cliente(){
	//Función de ajax
	Success=false;
	try{
	// Mozilla / Safari / IE7
		xmlhttp=new XMLHttpRequest();
	}catch(e){
	// IE
		var XMLHTTP_IDS=['MSXML2.XMLHTTP.5.0','MSXML2.XMLHTTP.4.0','MSXML2.XMLHTTP.3.0','MSXML2.XMLHTTP','Microsoft.XMLHTTP'];
		var success=false;
		for(i=0;i<XMLHTTP_IDS.length && !success;i++) {
			try{
				xmlhttp=new ActiveXObject(XMLHTTP_IDS[i]);
				success=true;
			}catch(e){};
		};
		if(!success) return false;
	};
	return xmlhttp;
};
function ObtenerListaEventos(AnoMes){
	//Bajar el calendario
	var parametros="AnoMes="+AnoMes+"&EEE="+EEE+"&COKO="+COKO;
	var xmlhttp = Cliente();
	xmlhttp.open('post','/CRM/prg/calendario/genlistaeventos.php', true);
	xmlhttp.setRequestHeader('Content-type','application/x-www-form-urlencoded');
	xmlhttp.setRequestHeader('Content-length',parametros.length);
	xmlhttp.setRequestHeader('Connection','close');
	xmlhttp.onreadystatechange=function(){
		if (4 == xmlhttp.readyState){
			if (AnoMes < AnoMesActual){
				var Titulo = 'Eventos anteriores';
			}else{
				var Titulo = 'Próximos eventos';
			};
			document.getElementById('TituloProximosEventos').innerHTML = Titulo;
			eval("listaEventos="+xmlhttp.responseText);
			CrearHTMLLista();
			document.getElementById('ListaEventoDia').style.visibility='hidden';
			newsScrollInit(speed);
		};
	};
	xmlhttp.send(parametros);
	return true;
};
function ObtenerCalendario(AnoMes){
	//Bajar el calendario
	var parametros="AnoMes="+AnoMes+"&EEE="+EEE+"&COKO="+COKO;
	var xmlhttp = Cliente();
	xmlhttp.open('post','/CRM/prg/calendario/gencalendario.php', true);
	xmlhttp.setRequestHeader('Content-type','application/x-www-form-urlencoded');
	xmlhttp.setRequestHeader('Content-length',parametros.length);
	xmlhttp.setRequestHeader('Connection','close');
	xmlhttp.onreadystatechange=function(){
		if (4 == xmlhttp.readyState){
			document.getElementById('CajaCalendario').innerHTML = xmlhttp.responseText;
		};
	};
	xmlhttp.send(parametros);
	return true;
};
function CrearHTMLLista() {
	primEventoEncont = false;
	for (diaSistema in listaEventos){
		document.getElementById("ListaProximosEventos").innerHTML = document.getElementById("ListaProximosEventos").innerHTML + listaEventos[diaSistema];
	};
}
function verDetalleDia(diaSeleccionado){
	if (!listaEventos[diaSeleccionado]){
		var parametros="diaSistema="+diaSeleccionado+"&EEE="+EEE+"&COKO="+COKO;
		var xmlhttp = Cliente();
		xmlhttp.open('post','/CRM/prg/calendario/obtenerevento.php', false);
		xmlhttp.setRequestHeader('Content-type','application/x-www-form-urlencoded');
		xmlhttp.setRequestHeader('Content-length',parametros.length);
		xmlhttp.setRequestHeader('Connection','close');
		xmlhttp.send(parametros);
		listaEventos[diaSeleccionado] = xmlhttp.responseText;
		document.getElementById('ListaEventoDia').innerHTML = listaEventos[diaSeleccionado];
	};
	oNewsCont.css.visibility='hidden';
	pos = listaEventos[diaSeleccionado].search('/');
	fecha = listaEventos[diaSeleccionado].substr(pos-2,10);
	document.getElementById('ListaEventoDia').style.visibility='visible';
	document.getElementById('TituloProximosEventos').innerHTML = "Eventos del " + fecha;
	document.getElementById('ListaEventoDia').innerHTML = listaEventos[diaSeleccionado];
};
ObtenerListaEventos(AnoMesActual);
ObtenerCalendario(AnoMesActual);