// *************************************************************************************************************************************************
//	Libreria de scripts de Javascript
// Autor: José Manuel Alonso (E.T.S.I.I.) Universidad de Sevilla
// Fecha Creación:2003-2004
// Fecha Última modificación: Marzo-2005
// Nombre del fichero: programaciones.js
// Descripción : 
//		Este fichero implementa las funciones javascript del fichero programaciones.php
// *************************************************************************************************************************************************
var gris="#bbbcb9";
var rojo="#cc3366";
var negro="#000000";
var azul= "#4e4ea6";
var blanco="#eeeeee";
var fondooriginal="#EEEECC";
var colororiginal="#003300";
var gmes=0;
var ganno=0;
var op_alta=1;
var op_modificacion=2;
var op_eliminacion=3;
var op_suspension=4;
var currenthoras=null;
var currenthorasini=null;
var currenthorasfin=null;
var swpz=false;
var currentVitem;
var currentcolor;
//___________________________________________________________________________________________________________
function ItemSeleccionado(o){
	if(o==null) return(false);
	if(o.getAttribute("selitem")==1) return(true);
	return(false);
}
//___________________________________________________________________________________________________________
function Marca(o){
	o.style.color=blanco; 
	o.style.backgroundColor=rojo; 
	o.setAttribute("selitem",1);
}
//___________________________________________________________________________________________________________
function Resalta(o){
	o.style.color=blanco; 
	o.style.backgroundColor=azul 
}
//___________________________________________________________________________________________________________
function Desmarca(o){
	o.style.color=colororiginal;
	o.style.backgroundColor=fondooriginal;
	o.setAttribute("selitem",0);
}
//___________________________________________________________________________________________________________
function TH_clic(o){
	var tbobj=TBSource(o); // Busca la tabla donde se pulsó
	var oTD=tbobj.getElementsByTagName('TD');
	for(var i=0;i<oTD.length;i++){
		if(oTD[i].getAttribute("id")!="")
			clic(oTD[i],true)
	}
	cuestionesclic(o)
}
//___________________________________________________________________________________________________________
function clic(o,sw){
	if (!ItemSeleccionado(o))
		Marca(o);
	else // Deselección
		Desmarca(o);
	if(document.fprogramaciones.tipoaccion.value==EJECUCION_RESERVA){
			var idtb=Sourcetb(o); // Busca la tabla donde se pulsó
			if (idtb=="tabla_horas"){
				if(currenthoras!=o &&currenthoras!=null )
						Desmarca(currenthoras);
				currenthoras=o;
			}
			if (idtb=="tabla_horasini" && currenthorasini !=null ){
				if(currenthorasini!=o)
						Desmarca(currenthorasini);
				currenthorasini=o;
			}
			if (idtb=="tabla_horasfin" && currenthorasfin !=null ){
				if(currenthorasfin!=o)
						Desmarca(currenthorasfin);
				currenthorasfin=o;
			}

	}

	if(!sw){
		cuestionesclic(o)
	}
}
//___________________________________________________________________________________________________________
function cuestionesclic(o){
	var idtb=Sourcetb(o); // Busca la tabla donde se pulsó
	if (idtb=="tabla_meses" || idtb=="tabla_annos")
		cuestion_opciones();
	if (!swpz){
			activa("bt_insertar");
			activa("bt_cancelar");
			swpz=!swpz;
	}
}
//___________________________________________________________________________________________________________-
function Sourcetb(o){
	while (o.tagName!="TABLE"){
		o=o.parentNode;
	}
	return(o.getAttribute("id"));
}
//___________________________________________________________________________________________________________-
function TBSource(o){
	while (o.tagName!="TABLE"){
		o=o.parentNode;
	}
	return(o);
}
//___________________________________________________________________________________________________________
function activa(idbt){
	var bt=document.getElementById(idbt);
	bt.style.visibility="visible";
	bt.style.color=negro;
}
//___________________________________________________________________________________________________________
function desactiva(idbt){
	var bt=document.getElementById(idbt);
	bt.style.visibility="hidden";
	bt.style.color=gris;
}
//___________________________________________________________________________________________________________
function habilitado(idbt){
	var bt=document.getElementById(idbt);
	if (bt.style.visibility=="visible")	 return true;
	return false
}
//___________________________________________________________________________________________________________
function sobreboton(bt){
	currentcolor=bt.style.color;
	bt.style.color="#999999";
}
//___________________________________________________________________________________________________________
function fueraboton(bt){
	bt.style.color=currentcolor;
}
//___________________________________________________________________________________________________________
function cuestion_opciones(){
	swotbm=opcion_simple("tabla_meses");
	swotba=opcion_simple("tabla_annos");
	if (swotbm && swotba){
		var vd=valor_HEX("tabla_mesanno");
		if (!detecta_cambio(vd))
			visible_simple();
	}
	else{ // Conmutación a opción multiple
		visible_multiple();
	}
}
//___________________________________________________________________________________________________________
function detecta_cambio(vitem){ // vitem es el valor hexdecimal a mostrar

	wmes=parseInt(valor_item("tabla_meses")); // Recupera mes
	wanno=parseInt(valor_item("tabla_annos")); // Recupera año
	if (wmes>0 && wanno>0){ // Si se ha elegido un año y un mes ...
		if (gmes!=wmes || ganno!=wanno){ // Cara de nuevo el mes en blanco
			gmes=wmes;
			ganno=wanno;
			var wurl="toma_mes.php";
			var prm="idmes="+wmes+"&idanno="+wanno;
			currentVitem=vitem;
			CallPage(wurl,prm,"retornoMesAnno","POST");
			return(true);
		}
		return(false);
	}
}
//______________________________________________________________________________________________________
function retornoMesAnno(htmlMes){
	tbm=document.getElementById("tbmesanno");
	tbm.innerHTML=htmlMes;
	marca_item("tabla_mesanno",currentVitem);
	visible_simple();
}
//___________________________________________________________________________________________________________
function visible_multiple(){
	fm=document.getElementById("fechasmultiples");
	fs=document.getElementById("fechassimples");
	fm.style.visibility = "visible"; 
	fs.style.visibility = "hidden";
}
//___________________________________________________________________________________________________________
function visible_simple(){
	fm=document.getElementById("fechasmultiples");
	fs=document.getElementById("fechassimples");
	fm.style.visibility = "hidden"; 
	fs.style.visibility = "visible";
}
//___________________________________________________________________________________________________________
function modifica_programacion(ida,tia,ses){
	if (habilitado("bt_modificar")){
		idprogramacion=valor_programacion();
		if (idprogramacion>0)
			gestor_programacion(ida,tia,ses,idprogramacion,op_modificacion);
	}
}
//___________________________________________________________________________________________________________
function elimina_programacion(){
	if (habilitado("bt_eliminar")){
		idprogramacion=valor_programacion();
		if (idprogramacion>0){
			var wurl="../gestores/gestor_programaciones.php";
			var prm="wswop="+op_eliminacion+"&widprogramacion="+idprogramacion;
			CallPage(wurl,prm,"retornoGestor","POST");				
		}
	}
}
//___________________________________________________________________________________________________________
function retornoGestor(fncallbck){
	if(fncallbck.length>0)
		eval(fncallbck);
}
//___________________________________________________________________________________________________________
function alta_programacion(ida,tia,ses){

	if (habilitado("bt_insertar")){
		gestor_programacion(ida,tia,ses,0,op_alta) 
	}
}
//___________________________________________________________________________________________________________
function duplicar_programacion(){
	activa("bt_insertar");
	desactiva("bt_eliminar");
	desactiva("bt_modificar");
	desactiva("bt_duplicar");
	activa("bt_cancelar");
	nuevo_bloque();
}

//___________________________________________________________________________________________________________
function gestor_programacion(ida,tia,ses,idr,swop)
{
	widentificador=ida;
	wtipoaccion=tia;
	widprogramacion=idr;
	wswop=swop;
	wannos=valor_HEX("tabla_annos");
	if (wannos==0){
		alert(TbMsg[0]);
		return
	}
	wmeses=valor_HEX("tabla_meses");
	if (wmeses==0){
		alert(TbMsg[1]);
		return
	}
	fm=document.getElementById("fechasmultiples");
	if (fm.style.visibility == "visible"){ // Activada opciones múltiples
		wdiario=valor_HEX("tabla_diasmes");
		wdias=valor_HEX("tabla_dias");
		wsemanas=valor_HEX("tabla_semanas");
			
		if (wdiario==0 && wdias==0 && wsemanas==0 ){
			alert(TbMsg[2]);
			return
		}
	}
   else{
		wdiario=valor_HEX("tabla_mesanno");
		if (wdiario==0){
			alert(TbMsg[3]);
			return
		}
		wdias=0;
		wsemanas=0
   }

	whoras=valor_HEX("tabla_horas");

	if (whoras==0){
		if(wtipoaccion!=EJECUCION_RESERVA){
			alert(TbMsg[4]);
			return
		}
	}

	if(wtipoaccion==EJECUCION_RESERVA){
		whorasini=valor_HEX("tabla_horasini");
		if (whorasini==0){
			alert(TbMsg[4]);
			return
		}
		whorasfin=valor_HEX("tabla_horasfin");
		if (whorasfin==0){
			alert(TbMsg[4]);
			return
		}
	}

	inputprogramacion=document.getElementById("nombrebloque");
	wnombrebloque=inputprogramacion.value;
	if (wnombrebloque==""){
		alert(TbMsg[5]);
		return
	}
	wampm=document.getElementById("ampm").value;
	wminutos=document.getElementById("minutos").value;
	if (wminutos<0 || wminutos>59){
		alert(TbMsg[6]);
		document.getElementById("minutos").focus();
		return
	}
	if(wtipoaccion==EJECUCION_RESERVA){
		wampmini=document.getElementById("ampmini").value;
		wminutosini=document.getElementById("minutosini").value;
		if (wminutosini<0 || wminutosini>59){
			alert(TbMsg[6]);
			document.getElementById("minutosini").focus();
			return;
		}
		wampmfin=document.getElementById("ampmfin").value;
		wminutosfin=document.getElementById("minutosfin").value;
		if (wminutosfin<0 || wminutosfin>59){
			alert(TbMsg[6]);
			document.getElementById("minutosfin").focus();
			return;
		}
	}
	else{
		whorasini=0;
		wampmini=0;
		wminutosini=0;
		whorasfin=0;
		wampmfin=0;
		wminutosfin=0;
	}

	wsegundos=0;

	var wurl="../gestores/gestor_programaciones.php";
	var prm="wswop="+wswop+"&widprogramacion="+widprogramacion+"&widentificador="+widentificador;
	prm+="&wtipoaccion="+wtipoaccion+"&wnombrebloque="+wnombrebloque+"&wannos="+wannos+"&wmeses="+wmeses;
	prm+="&wdiario="+wdiario+"&wdias="+wdias+"&wsemanas="+wsemanas+"&whoras="+whoras+"&whorasini="+whorasini;
	prm+="&whorasfin="+whorasfin+"&wampm="+wampm+"&wminutos="+wminutos+"&wsegundos="+wsegundos;
	prm+="&wampmini="+wampmini+"&wminutosini="+wminutosini+"&wampmfin="+wampmfin+"&wminutosfin="+wminutosfin;
	
	wsw_sus=document.getElementById("sw_sus").checked;
	prm+="&wsw_sus="+wsw_sus;
	prm+="&wsesion="+ses;
	CallPage(wurl,prm,"retornoGestor","POST");		

}
//___________________________________________________________________________________________________________
function suspender_programacion(ida,tia,ses){
	var listalen=lista.options.length;
	if(listalen==0){
		alert(TbMsg[8]);
		wsw_sus=document.getElementById("sw_sus").checked=false;
		return
	}
	widentificador=ida;
	wtipoaccion=tia;
	
	var wurl="../gestores/gestor_programaciones.php";
	var prm="wswop="+op_suspension+"&widentificador="+widentificador+"&wtipoaccion="+wtipoaccion;
	wsw_sus=document.getElementById("sw_sus").checked;
	prm+="&wsw_sus="+wsw_sus;
	
	CallPage(wurl,prm,"retornoGestor","POST");		
	
}
//___________________________________________________________________________________________________________
function resultado_suspender_programacion(){
	wsw_sus=document.getElementById("sw_sus").checked;
	if(wsw_sus)
		alert(TbMsg[9]);
	else
		alert(TbMsg[10]);
}
//___________________________________________________________________________________________________________
// Devualve el valor Hexadecimal que corresponde a los items 
//___________________________________________________________________________________________________________
function valor_HEX(idtb)
{
	var oTD;
	otb=document.getElementById(idtb);
	var aux=0x00000000;
	filas=otb.rows.length;
	for (i=0;i<filas;i++){
		columnas=otb.rows[i].cells.length;
		for (j=0;j<columnas;j++){
			oTD=otb.rows[i].cells[j];
			if(oTD.tagName=="TD"){
				if (ItemSeleccionado(oTD)){
					aux=aux | oTD.getAttribute("value")
				}
			}
		}
	}
	return(aux)
}
//___________________________________________________________________________________________________________
// Devuelve el valor decimal de un item de la tabla (ID)
// 0=no elección -1=más de un item n:valor del item
//___________________________________________________________________________________________________________
function valor_item(idtb){
	var valor=0,sw=0;
	var oTD;
	otb=document.getElementById(idtb); 
	filas=otb.rows.length;
	for (i=0;i<filas;i++){
		columnas=otb.rows[i].cells.length;
		for (j=0;j<columnas;j++){
			oTD=otb.rows[i].cells[j];
			if(oTD.tagName=="TD"){
				if (ItemSeleccionado(oTD)){
					if (sw==0){
						valor=oTD.getAttribute("id");
						sw++;
					}
					else
						return(-1);
				}
			}
		}
	}
	return(valor) 
}
//___________________________________________________________________________________________________________
// Devuelve true si no existe ningún item seleccionado en la tabla
// y false en caso contrario
//  El parametro de entrada es el identificador dela tabla
//___________________________________________________________________________________________________________
function opcion_simple(idtb)
{
	var oTD;
	var conta=0;
	otb=document.getElementById(idtb); 
	filas=otb.rows.length;
	for (i=0;i<filas;i++){
		columnas=otb.rows[i].cells.length;
		for (j=0;j<columnas;j++){
			oTD=otb.rows[i].cells[j];
			if(oTD.tagName=="TD"){
				if (ItemSeleccionado(oTD)){
					conta++;
					if (conta>1) return(false);
				}
			}
		}
	}
	return(true);
}
//___________________________________________________________________________________________________________
function sobre(o){
	if (!ItemSeleccionado(o))
		Resalta(o);
}
//___________________________________________________________________________________________________________
function fuera(o){
	if (!ItemSeleccionado(o))
		Desmarca(o);
}

//___________________________________________________________________________________________________________
//	Error al grabar programacion
//___________________________________________________________________________________________________________
function error_programacion(){
	desmarca_tablas();
	inicializa_variables();
	nuevo_bloque();
}
//___________________________________________________________________________________________________________
//	Recibe una notificación de la acción ejecutada
//___________________________________________________________________________________________________________		
function registro_programacion(idr,nombrere,swop)
{
	wswop=parseInt(swop); // Toma la opción ALTA,MODIFICACION O ELIMINACION
	switch (wswop){
		case op_alta:
			alert(TbMsg[11]);
			programacion_metelista(idr,nombrere);
			break;
		case op_modificacion:	
			alert(TbMsg[12]);
			modifica_texto(nombrere);
			break;
		case op_eliminacion:
			alert(TbMsg[13]);
			elimina_item();
			break;
	}
	desmarca_tablas();
	inicializa_variables();
	nuevo_bloque();

	visible_simple();
	activa("bt_insertar");
	desactiva("bt_eliminar");
	desactiva("bt_modificar");
	desactiva("bt_duplicar");
	desactiva("bt_cancelar");
	swpz=false;
}
//___________________________________________________________________________________________________________
//	Devuelve el valor del item seleccionado
//___________________________________________________________________________________________________________
function valor_programacion(){
	var lista=document.getElementById("lista_programaciones");
	p=lista.selectedIndex;
	if (p==-1){
		alert(TbMsg[14]);
		return(-1);
	}
	else
		return(lista.options[p].value)
}
//___________________________________________________________________________________________________________
//	Modifica el texto del item seleccionado
//___________________________________________________________________________________________________________
function modifica_texto(nombrere){
	var lista=document.getElementById("lista_programaciones");
	p=lista.selectedIndex;
	lista.options[p].text=nombrere
}
//___________________________________________________________________________________________________________
//	Elimina el item seleccionado
//___________________________________________________________________________________________________________
function elimina_item(){
	var lista=document.getElementById("lista_programaciones");
	p=lista.selectedIndex;
	lista.remove(p);
}
//___________________________________________________________________________________________________________
//	Recibe una notificación de grabación correcta programacion
//___________________________________________________________________________________________________________		
function inicializa_variables(){
	gmes=0;
	ganno=0;
}
//___________________________________________________________________________________________________________
//	Desmarca todos los items de todas las tablas
//___________________________________________________________________________________________________________		
function desmarca_tablas(){
	desmarca_tabla("tabla_annos");
	desmarca_tabla("tabla_meses");
	desmarca_tabla("tabla_mesanno");
	desmarca_tabla("tabla_dias");
	desmarca_tabla("tabla_semanas");
	desmarca_tabla("tabla_diasmes");
	desmarca_tabla("tabla_horas");
	
	document.getElementById("ampm").selectedIndex=1;
	document.getElementById("minutos").value="";
	//document.getElementById("segundos").value="";

	whorasini=	document.getElementById("tabla_horasini");
	if(whorasini!=null){
		desmarca_tabla("tabla_horasini");
		wampmini=	document.getElementById("ampmini");
		wminutosini=	document.getElementById("minutosini");
		wampmini.selectedIndex=1;
		wminutosini.value="";
	}
	whorasfin=	document.getElementById("tabla_horasfin");
	if(whorasfin!=null){
		desmarca_tabla("tabla_horasfin");
		wampmfin=	document.getElementById("ampmfin");
		wminutosfin=	document.getElementById("minutosfin");
		wampmfin.selectedIndex=1;
		wminutosfin.value="";
	}
}
//___________________________________________________________________________________________________________
// Averigua el nombre del bloque según lo que ya existe
//___________________________________________________________________________________________________________
function nuevo_bloque(){
	var lista=document.getElementById("lista_programaciones");
	var listalen=lista.options.length;
	var nb=1;
	var cbloque="bloque";
	var nbloque=cbloque+nb;
	var swb;
	while(true){
		swb=false;
		for(var i=0;i<listalen;i++){
			if(lista.options[i].text==nbloque){
				swb=true;
				break;
			}
		}
		if(swb){
			nb++;
			nbloque=cbloque+nb
		}
		else
			break;
	}
	document.getElementById("nombrebloque").value=nbloque;
	lista=document.getElementById("lista_programaciones");
	lista.selectedIndex=-1;
}
//___________________________________________________________________________________________________________
// Desmarca todos los items de una tabla
//___________________________________________________________________________________________________________
function desmarca_tabla(idtb){
	otb=document.getElementById(idtb);
	if (!otb) return;
	desmarcando_tabla(otb);
}
//___________________________________________________________________________________________________________
// Desmarca todos los items de una tabla ( parametro objeto tabla)
//___________________________________________________________________________________________________________
function desmarcando_tabla(otb)
{
	var oTD;
	filas=otb.rows.length;
	for (var i=0;i<filas;i++){
		columnas=otb.rows[i].cells.length;
		for (var j=0;j<columnas;j++){
			oTD=otb.rows[i].cells[j];
			if(oTD.tagName=="TD"){
				if (ItemSeleccionado(oTD))
					Desmarca(oTD)
			}
		}
	}
}
//___________________________________________________________________________________________________________
//	Añade la programacion a la caja de lista
//___________________________________________________________________________________________________________
function programacion_metelista(valor,texto){
	var lista=document.getElementById("lista_programaciones");
	var e=document.createElement("OPTION");

	e.value=valor;
	e.text=texto;

	lista.appendChild(e);
}
//___________________________________________________________________________________________________________
function consulta_programacion(){ 
	idprogramacion=valor_programacion();
	if (idprogramacion>0){
		desmarca_tablas();
		var wurl="consulta_programaciones.php";
		var prm="idprogramacion="+idprogramacion;
		CallPage(wurl,prm,"retornoConsulta","POST");		
		desactiva("bt_insertar");
		activa("bt_eliminar");
		activa("bt_modificar");
		activa("bt_duplicar");
		activa("bt_cancelar");
	}
}
//______________________________________________________________________________________________________
function retornoConsulta(programacion){
	if(programacion.length>0)
		muestra_programacion(programacion);
	else
		error_programacion
}
//___________________________________________________________________________________________________________
function muestra_programacion(cadena_campos)
{ 
	campos=cadena_campos.split(";");
	var pnombrebloque=campos[3];
	var pannos=campos[4];
	var pmeses=campos[5];
	var pdiario=campos[6];
	var pdias=campos[7];
	var psemanas=campos[8];
	var phoras=campos[9];
	var pampm=campos[10];
	var pminutos=campos[11];
	var psegundos=campos[12];
	var phorasini=campos[13];
	var pampmini=campos[14];
	var pminutosini=campos[15];
	var phorasfin=campos[16];
	var pampmfin=campos[17];
	var pminutosfin=campos[18];

	document.getElementById("nombrebloque").value=pnombrebloque;
	marca_item("tabla_annos",pannos);
	marca_item("tabla_meses",pmeses);
	if (opcion_multiple(pannos) || opcion_multiple(pmeses)){
		marca_item("tabla_diasmes",pdiario);
		marca_item("tabla_dias",pdias);
		marca_item("tabla_semanas",psemanas);
		visible_multiple();
	}
	else{
		gmes=pmeses;
		ganno=pannos;
		wmes=parseInt(valor_item("tabla_meses")); // Recupera mes
		wanno=parseInt(valor_item("tabla_annos")); // Recupera año
		var wurl="toma_mes.php";
		var prm="idmes="+wmes+"&idanno="+wanno;
		currentVitem=pdiario;
		CallPage(wurl,prm,"retornoMesAnno","POST");			
	}
	marca_item("tabla_horas",phoras);
	document.getElementById("ampm").value=pampm;
	document.getElementById("minutos").value=pminutos;
	//document.getElementById("segundos").value=psegundos;

	wtabla_horasini=	document.getElementById("tabla_horasini");
	if(wtabla_horasini!=null)
		marca_item("tabla_horasini",phorasini);
	wampmini=	document.getElementById("ampmini");
	wminutosini=	document.getElementById("minutosini");
	if(wampmini!=null){
		wampmini.value=pampmini;
		wminutosini.value=pminutosini;
	}
	wtabla_horasfin=	document.getElementById("tabla_horasfin");
	if(wtabla_horasfin!=null)
		marca_item("tabla_horasfin",phorasfin);
	wampmfin=	document.getElementById("ampmfin");
	wminutosfin=	document.getElementById("minutosfin");
	if(wampmfin!=null){
		wampmfin.value=pampmfin;
		wminutosfin.value=pminutosfin;
	}
}
// ___________________________________________________________________________________________________________
//
//  Devuelve true si hay más de un item seleccionado, false al contrario
//  El parametro de entrada es el valor HEXadecimal
//___________________________________________________________________________________________________________
function opcion_multiple(valor){ 
	var conta=0;
	var auxhex;
	for (auxhex=0x00000001;auxhex!=0x00000000;auxhex=auxhex<<1){
		if (valor & auxhex){
			conta++;
			if (conta>1) return(true);
		}
	}
	return(false);
}
// ___________________________________________________________________________________________________________
//
//  Marca todos los items de una tabla según el valor HEX enviado
//___________________________________________________________________________________________________________
function marca_item(idtabla,vhex)
{
	var oTD;
	otb=document.getElementById(idtabla);
	filas=otb.rows.length;
	for (i=0;i<filas;i++){
		columnas=otb.rows[i].cells.length;
		for (j=0;j<columnas;j++){
			oTD=otb.rows[i].cells[j];
			if(oTD.tagName=="TD"){
				if (oTD.getAttribute("value") & vhex){
					Marca(oTD);
					if (idtabla=="tabla_horas")
						currenthoras=oTD;
					if (idtabla=="tabla_horasini")
						currenthorasini=oTD;
					if (idtabla=="tabla_horasfin")
						currenthorasfin=oTD
				}
			}		
		}
	}
}
// ___________________________________________________________________________________________________________
//
//  Cancela todos los items de las tabalas e inicia variables
//___________________________________________________________________________________________________________
function cancela_programacion(){ 
	desmarca_tablas();
	inicializa_variables();
	nuevo_bloque();
	visible_simple();
	activa("bt_insertar");
	desactiva("bt_eliminar");
	desactiva("bt_modificar");
	desactiva("bt_duplicar");
	desactiva("bt_cancelar");
	swpz=false;

}