var celda=0;
var celdaclik=0;
var menuactivo;

function QuitaPrincipal() {
estadisticas.style.visibility = "hidden";
}

function PoneMenu(x) {
document.all(x).className='Menu_Celdas_Clik';
document.all(x).style.color='#000000';
}

function QuitaMenu(x) {
if (!x) {
		Menu.style.visibility = "visible";
		Vsel.style.visibility = "hidden";
		document.all(celdaclik).className='V_buttonface_Cursor';
		}
if (x && x == celdaclik) {
		document.all(x).className='Menu_Celdas_Over';
		document.all(x).style.color='#FFFFFF';
		}
if (x && x != celdaclik) {document.all(celdaclik).className='V_buttonface_Cursor';}
estadisticas.style.visibility = "visible";
if (menuactivo) {eval(menuactivo);}
celdaclik = 0;
}

function ActivaPrograma(x) {
var lin;
var modal = new Array();
if (celdaclik == x) {
				QuitaMenu(x);
				return
				}
if (celdaclik !=x) {
	PoneMenu(x);
	if (celdaclik != 0) {QuitaMenu(x);}	
	lin = x;	
	}
celdaclik = lin;
if (x>0 && x<10) {QuitaPrincipal();}
if (x==1) { 
			Menu.style.visibility = "hidden";
			Vsel.style.visibility = "visible";
			Vprincipal.style.visibility= 'visible';
			menuactivo = "Vprincipal.style.visibility= 'hidden'";
			}
if (x==2) {
			SubVoces.style.visibility = "visible";
			menuactivo = "SubVoces.style.visibility= 'hidden'";
			 }
if (x==3) { 
			Vnumero.style.visibility = "visible";
			menuactivo = "Vnumero.style.visibility= 'hidden'";
			}
if (x==4) { 
			vtodo.style.visibility = "visible";
			menuactivo = "vtodo.style.visibility= 'hidden'";
			}
if (x==5) { 
			Thautos.style.visibility = "visible";
			menuactivo = "Thautos.style.visibility= 'hidden'";
			}
if (x==6) {
			SVautos.style.visibility = "visible";
			menuactivo = "SVautos.style.visibility= 'hidden'";
			form4.subvoces.focus();
			}
if (x==7) { 
			Aespeciales.style.visibility = "visible";
			menuactivo = "Aespeciales.style.visibility= 'hidden'";
			}
if (x==10) {location.href="../../../../index.html";}
if (x==100) {
			var archivo = "login.php?SID=" + SID;
			var status ="statusbar=0,toolbar=0,scrollbar=0,width=440,height=200,top=100,left=70";
			var modal = window.open(archivo,"Login_Usuario",status);
			modal.focus();
			} // x==100

}

function ActivaCelda(x) {
var est;
var acc = event.srcElement.className;
if (x == celdaclik) {return}
if (acc == 'V_buttonface_Cursor') {
	document.all(x).className='Menu_Celdas_Over';
	document.all(x).style.color='#FFFFFF';
	}
else {
	document.all(x).className='V_buttonface_Cursor';
	document.all(x).style.color='#000000';
	}
}

// Cerrar todas las ventanas (div) activas
function CerrarVentanas() {
//Vprincipal.style.visibility='hidden'

}
//	........................ VERIFICA FORMULARIO SUB-VOCES .........................
function Verifica(x) {
var men = "";
if (x==0) {
		if (!form1.voces.value) {men = "Voces\t: No puede estar en Blanco.\n";}
		}
if (x==1) {
		if (!form2.fallonumero.value) {men +="Campo Número\t: Debe contener Información.\n";}
		else {
			if(isNaN(form2.fallonumero.value)) {men +="Campo Número\t: Debe contener un NUMERO VALIDO.\n";}
			}
		}
if (x==2) {
	if (!form4.subvoces.value) {men="Campo Voces\t: Debe contener Información para Buscar.\n";}
}
if (x==3) {
	if (!form5.Anexpte.value && !form5.Acaratula.value && !form5.Asobre.value) {return false;}
	if (form5.Anexpte.value) {
		if (isNaN(form5.Anexpte.value)) {men +="Número Expediente\t: Debe contener un NÚMERO VÁLIDO.\n";}
		if (form5.Anexpte.value.indexOf(".",0) > -1) {men +="Número Expediente\t: No puede contener PUNTOS.\n";}
		if (form5.Anexpte.value.indexOf(",",0) > -1) {men +="Número Expediente\t: No puede contener COMAS.\n";}
		}
	} // fin del 3
	
if (x==4) {
	if (!form6.Alibro.value && !form6.Afojas.value && form6.AlibroBis.value=="0" && form6.AfojasBis.value=="0") {return false;}
	if (form6.Alibro.value) {
		if (isNaN(form6.Alibro.value)) {men += "Número/Libro\t:Debe contener un Número Válido.\n";}
		if (form6.Alibro.value.indexOf(".",0) > -1) {men += "Número/Libro\t: No puede contener PUNTOS.\n";}
		if (form6.Alibro.value.indexOf(",",0) > -1) {men += "Número/Libro\t: No puede contener COMAS.\n";}
		//while (form6.Alibro.value.length < 3) {form6.Alibro.value = "0" + form6.Alibro.value;}
		}
	if (form6.Afojas.value) {
		if (isNaN(form6.Afojas.value)) {men +="Número/Fojas\t:Debe contener un Número Válido.\n";}
		if (form6.Afojas.value.indexOf(".",0) > -1) {men +="Número/Fojas\t: No puede contener PUNTOS.\n";}
		if (form6.Afojas.value.indexOf(",",0) > -1) {men +="Número/Fojas\t: No puede contener COMAS.\n";}
		//while (form6.Afojas.value.length < 3) {form6.Afojas.value = "0" + form6.Afojas.value;}
		}
	}
if (men) {
	men = ". . . . . . . . . . PRECAUCION . . . . . . . . . .\n\nSe han encontrado los Siguientes ERRORES:\n\n" + men;
	alert(men);
	return false;
	}
if (!men) {return true;}
}

//	............... BORRAR FORMULARIO SUB-VOCES .....................
function BorrarForm(x) {
if (x==1) {
			form1.voces.value = "";
			form1.tipo.value = "0";
			form1.vigentes.value = "GV";
			form1.mes.value = "0";
			form1.ano.value = "";
			}
if (x==2) {
			form2.fallonumero.value = "";
			form2.tnumero.value = "0";
			form2.tipo.value = "0";
			}
if (x==3) {	// borrar formulario caratula
			form5.Anexpte.value = "";
			form5.Acaratula.value = "";
			form5.Asobre.value = "";
			form5.Anexpte.focus();
			}
if (x==4) {	// borrar formulario libro de autos
			form6.Alibro.value 		= "";
			form6.AlibroBis.value 	= "0";
			form6.Afojas.value 		= "";
			form6.AfojasBis.value 	= "0";
			form6.Alibro.focus();
			}
}
//	....................................................................
function BorrarFecha(x) {
if (x==4) {
	form4.Ames.value = "0";
	form4.Aano.value = "";
	}
}

//	......... Función para Buscar Voces Principales ..........
function EliminaSeleccion(x) {
var k=0;
while (VozSeleccionada.length > 0) {VozSeleccionada.options.remove(0);}
if (!x) {
	for (k=0;k<voz.length;k++) {
			if (voz.options[k].selected) {voz.options[k].selected = 0;}
			}
	}
}

function BuscarLetras(y) {
location.href = "index.php?SID=" + SID + "&letra=" + y + "&buscar=Vprincipal";
}


function SelVoz(y) {
var k=0;
var pal;
EliminaSeleccion(1);
for (k=0;k<voz.length;k++) {
	if (voz.options[k].selected) {
		pal = voz.options[k].text;
		if (pal.length > 35) {
								pal = pal.substr(0,30);
								while (pal.length < 35) {pal +='.';}
								}
		var newElem = document.createElement("OPTION");
		newElem.text  = pal; //voz.options[k].text;
		newElem.value = voz.options[k].value;
		VozSeleccionada.options.add(newElem);		
		}
	}
}
//	.................. BUSCADOR DE VOCES PRINCIPALES (THESAURO).................
function BThesauro(x) {
var k=0;
var lin="";
var total=0;
if (x=="aa") {
		for (k=0;k<VPautos.length;k++) {
				if (VPautos.options[k].selected) {
						if (lin) {lin += "@";}
						lin += VPautos.options[k].value;
						total += 1;
						}
				} // fin del for
		if (total > 0) {location.href= "resultados_autos.php?SID=" + SID + "&thesauro=" + lin;}
	} // fin búsquedas de autos administrativos

if (x!='aa') {
		for (k=0;k<VozSeleccionada.length;k++) {
				if (lin) {lin += "@";}
				lin += VozSeleccionada.options[k].value;
				total += 1;
				} // fin del for
		if (total > 0) {location.href= "resultados_res.php?SID=" + SID + "&thesauro=" + lin + "&letra=" + laletra;}
		} // Busquedas de Acordadas y Resoluciones
	
} // fin dela función BThesauro

//	........................ VISUALIZACION TOTAL DE INFORMACION .............
function Vertotal(x) {
var datos="";
	if (x==1) {datos = "lac";}
	if (x==2) {datos = "lrp";}
	if (x==3) {datos = "lra";}
	if (x==4) {datos = "0";}
	form3.datos.value = datos;
	form3.submit();
}
// ................THESAURO DE AUTOS ADMINISTRATIVOS ...........................
function Conteo() {
var k;
var total = 0;
for (k=0;k<VPautos.length;k++) {
		if (VPautos.options[k].selected) {total += 1;}
		}
total = total + "";
BVth.value = "Buscar: " + total;
}
// .............................................................................