Reorganización directorios OpenGNSys Admin.

git-svn-id: https://opengnsys.es/svn/trunk@455 a21b9725-9963-47de-94b9-378ad31fedc9

1 files changed, 710 insertions, 0 deletions

diff --git a/admin/WebConsole/jscripts/programaciones.js b/admin/WebConsole/jscripts/programaciones.js
new file mode 100644
index 00000000..e4a46c0b
--- /dev/null
+++ b/admin/WebConsole/jscripts/programaciones.js
@@ -0,0 +1,710 @@
+// *************************************************************************************************************************************************
+//	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= "#0000cc"
+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
+//___________________________________________________________________________________________________________
+function ItemSeleccionado(o){
+	return(o.style.backgroundColor==rojo) 
+}
+//___________________________________________________________________________________________________________
+function Marca(o){
+	o.style.color=blanco 
+	o.style.backgroundColor=rojo 
+}
+//___________________________________________________________________________________________________________
+function Resalta(o){
+	o.style.color=blanco 
+	o.style.backgroundColor=azul 
+}
+//___________________________________________________________________________________________________________
+function Desmarca(o){
+	o.style.color=colororiginal
+	o.style.backgroundColor=fondooriginal
+}
+//___________________________________________________________________________________________________________
+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_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){
+	bt=document.getElementById(idbt);
+	bt.style.cursor="hand"
+	bt.style.color=negro;
+}
+//___________________________________________________________________________________________________________
+function desactiva(idbt){
+	bt=document.getElementById(idbt);
+	bt.style.cursor="default"
+	bt.style.color=gris;
+}
+//___________________________________________________________________________________________________________
+function habilitado(idbt){
+	bt=document.getElementById(idbt);
+	if (bt.style.cursor=="hand") return true
+	return false
+}
+//___________________________________________________________________________________________________________
+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;
+			ifr=document.getElementById("iframes_comodin"); // Toma objeto Iframe
+			wurl="toma_mes.php?idmes="+wmes+"&idanno="+wanno+"&vitem="+vitem
+			ifr.src=wurl; // LLama a la página
+			return(true);
+		}
+		return(false);
+	}
+}
+//___________________________________________________________________________________________________________
+function cambia_mesanno(cadecalendario,vitem){
+	tbm=document.getElementById("tbmesanno");
+	tbm.innerHTML=cadecalendario;
+	marca_item("tabla_mesanno",vitem);
+	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){
+	if (habilitado("bt_modificar")){
+		idprogramacion=valor_programacion();
+		if (idprogramacion>0)
+			gestor_programacion(ida,tia,idprogramacion,op_modificacion);
+	}
+}
+//___________________________________________________________________________________________________________
+function elimina_programacion(){
+	if (habilitado("bt_eliminar")){
+		idprogramacion=valor_programacion();
+		if (idprogramacion>0){
+			wurl="../gestores/gestor_programaciones.php?wswop="+op_eliminacion+"&widprogramacion="+idprogramacion
+			ifr=document.getElementById("iframes_comodin") // Toma IFRAME
+			ifr.src=wurl;
+		}
+	}
+}
+//___________________________________________________________________________________________________________
+function alta_programacion(ida,tia){
+	if (habilitado("bt_insertar"))
+		gestor_programacion(ida,tia,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,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;
+
+	wurl="../gestores/gestor_programaciones.php?wswop="+wswop+"&widprogramacion="+widprogramacion+"&widentificador="+widentificador+"&wtipoaccion="+wtipoaccion+"&wnombrebloque="+wnombrebloque+"&wannos="+wannos+"&wmeses="+wmeses+"&wdiario="+wdiario+"&wdias="+wdias+"&wsemanas="+wsemanas+"&whoras="+whoras+"&whorasini="+whorasini+"&whorasfin="+whorasfin
+	wurl+="&wampm="+wampm+"&wminutos="+wminutos+"&wsegundos="+wsegundos
+	wurl+="&wampmini="+wampmini+"&wminutosini="+wminutosini+"&wampmfin="+wampmfin+"&wminutosfin="+wminutosfin
+	wsw_sus=document.getElementById("sw_sus").checked;
+	wurl+="&wsw_sus="+wsw_sus
+	ifr=document.getElementById("iframes_comodin") // Toma IFRAME
+	ifr.src=wurl;
+	return
+}
+//___________________________________________________________________________________________________________
+function suspender_programacion(ida,tia){
+	var listalen=lista.options.length
+	if(listalen==0){
+		alert(TbMsg[8]);
+		wsw_sus=document.getElementById("sw_sus").checked=false;
+		return
+	}
+	widentificador=ida;
+	wtipoaccion=tia;
+	wurl="../gestores/gestor_programaciones.php?wswop="+op_suspension+"&widentificador="+widentificador+"&wtipoaccion="+wtipoaccion
+	wsw_sus=document.getElementById("sw_sus").checked;
+	wurl+="&wsw_sus="+wsw_sus
+	ifr=document.getElementById("iframes_comodin") // Toma IFRAME
+	ifr.src=wurl;
+}
+//___________________________________________________________________________________________________________
+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){
+	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++){
+			if (ItemSeleccionado(otb.rows[i].cells[j]))
+				aux=aux | otb.rows[i].cells[j].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;
+	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++){
+			if (ItemSeleccionado(otb.rows[i].cells[j])){
+				if (sw==0){
+					valor=otb.rows[i].cells[j].getAttribute("id");
+					sw++;
+				}
+				else
+					return(-1);
+			}
+		}
+	}
+	return(valor) 
+}
+//___________________________________________________________________________________________________________
+// Devuelve true si existe uno 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 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++){
+			if (ItemSeleccionado(otb.rows[i].cells[j])){
+				conta++;
+				if (conta>1) return(false);
+			}
+		}
+	}
+	return(true);
+}
+//___________________________________________________________________________________________________________
+function sobre(o){
+	if (!ItemSeleccionado(o))
+		Resalta(o);
+}
+//___________________________________________________________________________________________________________
+function fuera(o){
+	if (!ItemSeleccionado(o))
+		Desmarca(o);
+}
+
+//___________________________________________________________________________________________________________
+//	Recibe una notificación(del IFRAME) de error al grabar programacion
+//___________________________________________________________________________________________________________
+function error_programacion(swe,resultado){
+	desmarca_tablas();
+	inicializa_variables();
+	nuevo_bloque();
+}
+//___________________________________________________________________________________________________________
+//	Recibe una notificación(del IFRAME) 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(del IFRAME) 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=false;
+	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;
+	var 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){
+	filas=otb.rows.length
+	for (var i=0;i<filas;i++){
+		columnas=otb.rows[i].cells.length
+		for (var j=0;j<columnas;j++){
+			if (ItemSeleccionado(otb.rows[i].cells[j]))
+				Desmarca(otb.rows[i].cells[j])
+		}
+	}
+}
+//___________________________________________________________________________________________________________
+//	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.add(e);
+}
+//___________________________________________________________________________________________________________
+//	Llama a una página dentro del IFRAME que recupera una programacion
+//___________________________________________________________________________________________________________
+function consulta_programacion(){ 
+	idprogramacion=valor_programacion();
+	if (idprogramacion>0){
+		desmarca_tablas();
+		wurl="consulta_programaciones.php?idprogramacion="+idprogramacion;
+		ifr=document.getElementById("iframes_comodin") // Toma IFRAME
+		ifr.src=wurl;
+		desactiva("bt_insertar")
+		activa("bt_eliminar");
+		activa("bt_modificar");
+		activa("bt_duplicar");
+		activa("bt_cancelar");
+	}
+}
+//___________________________________________________________________________________________________________
+//	Recibe una consulta de programacion (del IFRAME) y la visualiza
+//___________________________________________________________________________________________________________
+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;
+			ifr=document.getElementById("iframes_comodin"); // Toma objeto Iframe
+			wmes=parseInt(valor_item("tabla_meses")); // Recupera mes
+			wanno=parseInt(valor_item("tabla_annos")); // Recupera año
+			wurl="toma_mes.php?idmes="+wmes+"&idanno="+wanno+"&vitem="+pdiario
+			ifr.src=wurl; // LLama a la página
+
+	}
+	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=0x00000001;
+	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){ 
+	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++){
+			if (otb.rows[i].cells[j].value & vhex){
+					Marca(otb.rows[i].cells[j]);
+					if (idtabla=="tabla_horas")
+						currenthoras=otb.rows[i].cells[j]
+					if (idtabla=="tabla_horasini")
+						currenthorasini=otb.rows[i].cells[j]
+					if (idtabla=="tabla_horasfin")
+						currenthorasfin=otb.rows[i].cells[j]
+			}
+		}
+	}
+}
+// ------------------------------------------------------------------
+//  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;
+
+}