//Funcion que controla los cambios de Meses y Aņos para actualizar los dias correspondintes
function populate(ano,mes,dia) {
	vDia=eval(dia.options[dia.selectedIndex].text);
	var timeA = new Date(ano.options[ano.selectedIndex].text, (eval(mes.options[mes.selectedIndex].value)-1),1);
	var IndiceDias=dia.length;
	for (var i = 0; i < IndiceDias; i++) {
		dia.options[i] = null;
	}
	var vCompara=new Date(timeA);
	while (timeA.getMonth()==vCompara.getMonth()) {
		dia.options[vCompara.getDate()-1] = new Option(iif(vCompara.getDate()<10,"0"+vCompara.getDate(),vCompara.getDate()));
		if (vCompara.getDate()==vDia){dia.options[vCompara.getDate()-1].selected=true;}
		vCompara= new Date(vCompara.getFullYear(),vCompara.getMonth(),vCompara.getDate()+1);
	}
}

//Funcion que crear cajas de seleccion Dias, Mes y Aņo de acuerdo a una fecha
function Optionsfecha(pAno,pMes,pDia,pNada,postfijo)
{
	pFecha=new Date(pAno,pMes,pDia);
	var vHoy=new Date();
    document.write("<table border=0>");
    document.write("<tr>");
    document.write("<td align=center>");
	var vLimiteSupAno=iif(pFecha.getFullYear()<vHoy.getFullYear(),vHoy.getFullYear(),pFecha.getFullYear())+2;
    document.write("<select name=year"+postfijo+" onChange=populate(this.form.year"+postfijo+",this.form.month"+postfijo+",this.form.day"+postfijo+");>");
	for (var i = 2000; i <= vLimiteSupAno; i++) {
	    document.write("<option value=",i," ",iif(pFecha.getFullYear()==i,"SELECTED",""),">",i);
 	}
    document.write("</select>");
    
    document.write("<select name=month"+postfijo+" onChange=populate(this.form.year"+postfijo+",this.form.month"+postfijo+",this.form.day"+postfijo+");>");
    document.write("<option value=01 ",iif(pFecha.getMonth()==0,"SELECTED",""),">Enero");
    document.write("<option value=02 ",iif(pFecha.getMonth()==1,"SELECTED",""),">Febrero");
    document.write("<option value=03 ",iif(pFecha.getMonth()==2,"SELECTED",""),">Marzo");
    document.write("<option value=04 ",iif(pFecha.getMonth()==3,"SELECTED",""),">Abril");
    document.write("<option value=05 ",iif(pFecha.getMonth()==4,"SELECTED",""),">Mayo");
    document.write("<option value=06 ",iif(pFecha.getMonth()==5,"SELECTED",""),">Junio");
    document.write("<option value=07 ",iif(pFecha.getMonth()==6,"SELECTED",""),">Julio");
    document.write("<option value=08 ",iif(pFecha.getMonth()==7,"SELECTED",""),">Agosto");
    document.write("<option value=09 ",iif(pFecha.getMonth()==8,"SELECTED",""),">Septiembre");
    document.write("<option value=10 ",iif(pFecha.getMonth()==9,"SELECTED",""),">Octubre");
    document.write("<option value=11 ",iif(pFecha.getMonth()==10,"SELECTED",""),">Noviembre");
    document.write("<option value=12 ",iif(pFecha.getMonth()==11,"SELECTED",""),">Diciembre");
    document.write("</select>");

	document.write("<select name=day"+postfijo+">");
	var vCompara=new Date(pFecha.getFullYear(),pFecha.getMonth(),1);
	while (pFecha.getMonth()==vCompara.getMonth()) {
	    document.write("<option value="+(vCompara.getDate())+" "+iif(pFecha.getDate()==vCompara.getDate(),"SELECTED","")+">"+iif(vCompara.getDate()<10,"0"+vCompara.getDate(),vCompara.getDate()));
		vCompara= new Date(vCompara.getFullYear(),vCompara.getMonth(),vCompara.getDate()+1);
	}
    document.write("</select>");
    
    document.write("</td>");
    document.write("</tr>");
    document.write("</table>");

}

// FUNCIONES QUE CONTROLAN LA ASIGNACION DE HORARIOS 
function Horarios(ArregloHorarios){
document.write("<table border=1 cellspacing=0 cellpadding=3 width='100%'>");

	document.write("<tr>");
		document.write("<td align=center colspan=3>");
			document.write("<b>Asignaci&oacute;n Horarios</b>");
		document.write("</td>");
	document.write("</tr>");

	document.write("<tr>");
		document.write("<td align=center valign=top>");
			document.write("<table border=0 cellspacing=0 cellpadding=0>");

                document.write("<tr>");
	                document.write("<td align=right colspan=2><script> Hoy=new Date(); Optionsfecha(Hoy.getFullYear(),Hoy.getMonth(),Hoy.getDate(),1,'n'); </script></td>");
                document.write("</tr>");

				document.write("<tr>");
					document.write("<td><b>Hora Inicio: </b></td>");
					document.write("<td align=right><select name=Hora1>");
						for (var i = 0; i <= 23; i++) {
							document.write("<option value=",i,">",iif(i<10,"0"+i,i),"</option>");
						}
					document.write("</select>");
					document.write("<b> : </b><select name=Min1>");
						for (var i = 0; i <= 55; i+=5) {
							document.write("<option value=",i,">",iif(i<10,"0"+i,i),"</option>");
						}
					document.write("</select>");
					document.write("</td>");
				document.write("</tr>");


				document.write("<tr>");
					document.write("<td><b>Hora Fin: </b></td>");
					document.write("<td align=right><select name=Hora2>");
						for (var i = 0; i <= 23; i++) {
							document.write("<option value=",i,">",iif(i<10,"0"+i,i),"</option>");
						}
					document.write("</select>");
					document.write("<b> : </b><select name=Min2>");
					for (var i = 0; i <= 55; i+=5) {
						document.write("<option value=",i,">",iif(i<10,"0"+i,i),"</option>");
					}
					document.write("</select>");
					document.write("</td>");
				document.write("</tr>");

				document.write("<tr>");
					document.write("<td align=center><input type='button' name='btnAgregarH' value='Agregar' class='submit' onclick=AgregaHorario(this.form);></td>");
					document.write("<td align=center><input type='button' name='btnBorrarH' value='Borrar' class='submit' onclick=QuitaHorario(this.form);></td>");
				document.write("</tr>");
				
			document.write("</table>");
			
		document.write("</td>");

		document.write("<td align=center valign=top width=180>");
			document.write("<script> IniArrayHorarios(ArregloHorarios,this.form);</script>");
		document.write("</td>");

		document.write("<td valign=top align=center>");
			var vLinea="<input type='image' src='gif/bot_agenda.gif' name='"+vbtnAgendaValue+"' class='submit' onclick=\"return Agenda();\">"
			document.write(vLinea);
		document.write("</td>");
	document.write("</tr>");
document.write("</table>");
}

function IniArrayHorarios(ArregloHorarios,Forma){
	vindice=ArregloHorarios.length-1;
	document.write("<select name='lstHorarios[]' size=",vindice+2," multiple>");
	for (var i=0; i<ArregloHorarios.length;i++){
		document.write("<option value=",i,iif(i==0," SELECTED",""),">",ArregloHorarios[i],"</option>");
	}
	document.write("</select>");
}

function AgregaHorario(Forma){
	var vHora1=Forma.Hora1.options[Forma.Hora1.selectedIndex].text;
	var vMin1=Forma.Min1.options[Forma.Min1.selectedIndex].text;
	var vHora2=Forma.Hora2.options[Forma.Hora2.selectedIndex].text;
	var vMin2=Forma.Min2.options[Forma.Min2.selectedIndex].text;
	var vFecha=Forma.yearn.options[Forma.yearn.selectedIndex].value+"/"+Forma.monthn.options[Forma.monthn.selectedIndex].value+"/"+Forma.dayn.options[Forma.dayn.selectedIndex].text
	if (vHora1+vMin1<vHora2+vMin2){
		var vBien=true;
		var vMalo="";
		for (var i=0; i<ArregloHorarios.length; i++){
			if (ArregloHorarios[i].substr(0,10)==vFecha){
				var vIni2=ArregloHorarios[i].substr(11,2)+ArregloHorarios[i].substr(14,2);
				var vFin2=ArregloHorarios[i].substr(17,2)+ArregloHorarios[i].substr(20,2);
				if((vHora1+vMin1>vIni2 && vHora1+vMin1<vFin2) ||(vHora2+vMin2>vIni2 && vHora2+vMin2<vFin2) || (vHora1+vMin1==vIni2 && vHora2+vMin2==vFin2) || (vHora1+vMin1<vFin2 && vHora2+vMin2>vFin2)){
					vBien=false;
					vMalo=ArregloHorarios[i];
					i=ArregloHorarios.length;
				}
			}
		}
		if (vBien){
        	vanteriorindice=vindice;
        	vindice=vindice+1;
        	ArregloHorarios[vindice]=vFecha+" "+vHora1+":"+vMin1+"-"+vHora2+":"+vMin2
        	SelectTablaHorarios(Forma);
		}
		else{ alert("El Horario: "+vFecha+" "+vHora1+":"+vMin1+"-"+vHora2+":"+vMin2+" se traslapa con el Horario: "+vMalo);}
	}
	else
	{ alert("La Hora de Inicio debe ser menor a la de Fin.");}
}

function QuitaHorario(Forma){
	if (vindice>=0){
		vanteriorindice=vindice;
		ArregloHorarios=ArrayQuita(Forma.elements["lstHorarios[]"].selectedIndex,Forma.elements["lstHorarios[]"].selectedIndex,ArregloHorarios);
		vindice=vindice-1;
		SelectTablaHorarios(Forma);
	}
}

function SelectTablaHorarios(Forma){
	ArregloHorarios.sort();
	for (var i = 0; i <= vanteriorindice+1; i++) {
		Forma.elements["lstHorarios[]"].options[i] = null;
	}
	for (var i = 0; i <= vindice; i++) {
		Forma.elements["lstHorarios[]"].options[i] = new Option(ArregloHorarios[i]);
	}
	Forma.elements["lstHorarios[]"].size=vindice+2;
	if (vindice>=0) {
		Forma.elements["lstHorarios[]"].options[0].selected=true;
	}
}

function ArrayQuita(pIni,pFin,pArreglo){
	var vArreglo=new Array();
	var n;
	n=0;
	for (var i=0; i<=pArreglo.length-1; i++){
		if (i<pIni || i>pFin){
			vArreglo[n]=pArreglo[i];
			n++;
		}
	}
	return vArreglo;
}

function HorariosTodos(Forma){
	//Esta funcion selecciona todos los elementos de la caja de horarios para poder pasarlos
	//como parametros. Se hace un borrado inicial, porque en caso de que se presente por primera 
	//vez y no se modifiquen, esta seleccion de todos no funcionaba correctamente.
	var indice=Forma.elements["lstHorarios[]"].options.length;
	for (var i=0; i<indice;i++){
		Forma.elements["lstHorarios[]"].options[i]=null;
	}
	for (var i=0; i<indice;i++){
		Forma.elements["lstHorarios[]"].options[i]=new Option(ArregloHorarios[i]);
		Forma.elements["lstHorarios[]"].options[i].selected=true;
	}
}

function HorariosBorra(Forma){
	//Esta Funcion borra los elementos de de la caja de horarios para posteriormente ser 
	//restituidos con la opcion de obtener datos
	var indice=Forma.elements["lstHorarios[]"].options.length;
	for (var i=0; i<indice;i++)
		Forma.elements["lstHorarios[]"].options[i]=null;
}
//FIN DE FUNCIONES QUE CONTROLAN ASIGNACION DE HORARIOS

function iif(pBoleano,pSicierto,pSifalso){
	if (pBoleano){
		vRegresa=pSicierto;
	}
	else
	{
		vRegresa=pSifalso;
	}
	return vRegresa;
}

function Ano(pCadena){
	return parseInt(pCadena.substring(0,4),10);
}
function Mes(pCadena){
	return parseInt(pCadena.substring(5,7)-1,10); //El -1 es para ajustar al constructor de fecha con meses 0 a 11
}
function Dia(pCadena){
	return parseInt(pCadena.substring(8,10),10);
}

function placeFocus(pDocumento,pBoolean) {
	if (pBoolean){
    	if (pDocumento.forms.length > 0) {
    		var field = pDocumento.forms[0];
    		for (i = 0; i < field.length; i++) {
    			if ((field.elements[i].type == "text") || (field.elements[i].type == "textarea") || (field.elements[i].type.toString().charAt(0) == "s")){
    				pDocumento.forms[0].elements[i].focus();
    				break;
             	}
          	}
       	}
	}
}

function textCounter(field, countfield, maxlimit) {
	if (field.value.length > maxlimit) // if too long...trim it!
		field.value = field.value.substring(0, maxlimit);
	// otherwise, update 'characters left' counter
	else 
		countfield.value = maxlimit - field.value.length;
}

function ChecaNumeros(val) {
var mikExp="1234567890";
var strPass = val.value;
var strLength = strPass.length;
var lchar = val.value.charAt((strLength) - 1);
if(mikExp.indexOf(lchar) < 0) {
	var tst = val.value.substring(0, (strLength) - 1);
	val.value = tst;
   }
}

function ChecaDecimales(val) {
    var mikExp="1234567890.";
    var strPass = val.value;
    var strLength = strPass.length;
    var lchar = val.value.charAt((strLength) - 1);
    if(mikExp.indexOf(lchar) < 0 || (lchar=="." && strPass.indexOf(".")!=(strLength-1))) {
    	var tst = val.value.substring(0, (strLength) - 1);
    	val.value = tst;
   	}
}

function Permisos(pForma,pSeleccion){
	if (QueEs(pSeleccion.name)=="S" && pSeleccion.checked){
		var vModulo=pSeleccion.name.substr(0,2)+"000";
		pForma.elements[vModulo].checked=true;
		var vOpcion=pSeleccion.name.substr(0,4)+"0";
		pForma.elements[vOpcion].checked=true;
	}
	if (QueEs(pSeleccion.name)=="O" && !pSeleccion.checked){
		for (i=0 ; i<pForma.elements.length ; i++){
			if (pForma.elements[i].name.substr(0,4)==pSeleccion.name.substr(0,4)){
				pForma.elements[i].checked=false;
			}
		}
	}
	if (QueEs(pSeleccion.name)=="O" && pSeleccion.checked){
		var vModulo=pSeleccion.name.substr(0,2)+"000";
		pForma.elements[vModulo].checked=true;
		for (i=0 ; i<pForma.elements.length ; i++){
			if (pForma.elements[i].name.substr(0,4)==pSeleccion.name.substr(0,4)){
				pForma.elements[i].checked=true;
			}
		}
	}
	if (QueEs(pSeleccion.name)=="M" && !pSeleccion.checked){
		for (i=0 ; i<pForma.elements.length ; i++){
			if (pForma.elements[i].name.substr(0,2)==pSeleccion.name.substr(0,2)){
				pForma.elements[i].checked=false;
			}
		}
	}
	if (QueEs(pSeleccion.name)=="M" && pSeleccion.checked){
		for (i=0 ; i<pForma.elements.length ; i++){
			if (pForma.elements[i].name.substr(0,2)==pSeleccion.name.substr(0,2)){
				pForma.elements[i].checked=true;
			}
		}
	}

	return true;
}

function QueEs(pOpcion){
	var vRegresa="S";
	if (pOpcion.substr(4,4)=="0"){
		vRegresa="O";
	}
	if (pOpcion.substr(2,4)=="000"){
		vRegresa="M";
	}
	return vRegresa;
}

function Agenda(){
	agenda=window.open("agenda.php","agenda",'toolbar=no, status=no, location=no, resizable=yes, scrollbars=no,width=600,height=150, left=5, top=200');
	return false;
}

function VerificaForma(Boton,Forma,pEscondido){
	vRegresa=false;
	if (Boton.name==vbtnObtenerValue){
		Forma.elements[pEscondido].value=vbtnObtenerValue;
		if (Forma.txtId.value==""){alert("Debe proporcionar el Id para Obtener los Datos");}
		else{ HorariosBorra(Forma); vRegresa=true;}
	}
	if (Boton.name==vbtnAltaValue){
		if (p2011){
    		Forma.elements[pEscondido].value=vbtnAltaValue;
    		if (Forma.txtId.value!=""){alert("No debe proporcionar Id para dar de Alta un nuevo registro");}
    		else{ if (confirm("Desea dar de Alta el registro?")){ HorariosTodos(Forma); vRegresa=true;}}
		}
		else{alert(vMensajenoEntrar);}
	}
	if (Boton.name==vbtnModificarValue){
		if (p2012){
    		Forma.elements[pEscondido].value=vbtnModificarValue;
    		if (Forma.txtId.value==""){alert("Debe proporcionar el Id para poder Modificar los datos del registro");}
    		else{
    			if (Forma.elements["txtImagen"].value==""){
    				if (confirm("No ha asignado nueva imagen para el evento. Es correcto?")){
    					if (confirm("La imagen actual del evento debera ser: (Aceptar)=Respetada (Cancelar)=Borrada")){Forma.elements["vImagenReemplazar"].value=1;}
    					else{Forma.elements["vImagenReemplazar"].value=0;}
    					if (confirm("Desea Modificar el registro?")){HorariosTodos(Forma); vRegresa=true;}
    				}
    			}
    			else{if (confirm("Desea Modificar el registro?")){HorariosTodos(Forma); vRegresa=true;}}
    		}
		}
		else{alert(vMensajenoEntrar);}
	}
	if (Boton.name==vbtnBorrarValue){
		if (p2013){
    		Forma.elements[pEscondido].value=vbtnBorrarValue;
    		if (Forma.txtId.value==""){alert("Debe proporcionar el Id para poder Borrar el registro");}
    		else{if (confirm("Desea Borrar el registro?")){vRegresa=true;}}
		}
		else{alert(vMensajenoEntrar);}
	}
	if (Boton.name==vbtnConsultaValue){
		Forma.elements[pEscondido].value=vbtnConsultaValue;
		consevens=window.open("conseventos.php","consevens",'toolbar=no, status=no, location=no, scrollbars=no,width=500,height=210,left = 182,top = 200');
	}
	return vRegresa;
}

function VerificaForma2(Boton,Forma,pEscondido){
	var vRegresa=false;
	if (Boton.name==vbtnObtenerValue){
		Forma.elements[pEscondido].value=vbtnObtenerValue;
		if (Forma.txtId.value==""){alert("Debe proporcionar Id para el Usuario.");}
		else{ vRegresa=true;}
	}
	if (Boton.name==vbtnAltaValue){
		if (p2021){
    		vOk=true;
    		Forma.elements[pEscondido].value=vbtnAltaValue;
    		if (Forma.txtId.value==""){alert("Debe proporcionar Id para el Usuario."); vOk=false}
    		if (Forma.txtPass.value==""){alert("Debe proporcionar Password para el Usuario."); vOk=false}
    		if (vOk){if (confirm("Desea dar de Alta el registro?")){ vRegresa=true;}}
		}
		else{alert(vMensajenoEntrar);}
	}
	if (Boton.name==vbtnModificarValue){
		if (p2022){
    		vOk=true;
    		Forma.elements[pEscondido].value=vbtnModificarValue;
    		if (Forma.txtId.value==""){alert("Debe proporcionar Id del Usuario."); vOk=false}
    		if (Forma.txtPass.value==""){alert("Debe proporcionar Password para el Usuario."); vOk=false}
    		if (vOk) {if (confirm("Desea Modificar el registro?")){vRegresa=true;}}
		}
		else{alert(vMensajenoEntrar);}
	}
	if (Boton.name==vbtnBorrarValue){
		if (p2023){
    		vOk=true;
    		Forma.elements[pEscondido].value=vbtnBorrarValue;
    		if (Forma.txtId.value==""){alert("Debe proporcionar Id del Usuario."); vOk=false}
    		if (vOk) {if (confirm("Desea Borrar el registro?")){vRegresa=true;}}
		}
		else{alert(vMensajenoEntrar);}
	}
	if (Boton.name==vbtnConsultaValue){
		Forma.elements[pEscondido].value=vbtnConsultaValue;
		consusuarios=window.open("consusuarios.php","consusuarios",'toolbar=no, status=no, location=no, scrollbars=no,width=400,height=190, left = 212,top = 209');
	}
	return vRegresa;
}

function VerificaForma3(Boton,Forma,pEscondido){
	vRegresa=false;
	if (Boton.name==vbtnObtenerValue){
		Forma.elements[pEscondido].value=vbtnObtenerValue;
		if (Forma.txtId.value==""){alert("Debe proporcionar el Id para Obtener los Datos");}
		else{ vRegresa=true;}
	}
	if (Boton.name==vbtnAltaValue){
		if (p2031){
    		Forma.elements[pEscondido].value=vbtnAltaValue;
    		if (Forma.txtId.value!=""){alert("No debe proporcionar Id para dar de Alta un nuevo registro");}
    		else{ if (confirm("Desea dar de Alta el registro?")){	vRegresa=true;}}
		}
		else{alert(vMensajenoEntrar);}
	}
	if (Boton.name==vbtnModificarValue){
		if (p2032){
    		Forma.elements[pEscondido].value=vbtnModificarValue;
    		if (Forma.txtId.value==""){alert("Debe proporcionar el Id para poder Modificar los datos del registro");}
    		else{if (confirm("Desea Modificar el registro?")){vRegresa=true;}}
		}
		else{alert(vMensajenoEntrar);}
	}
	if (Boton.name==vbtnBorrarValue){
		if (p2033){
    		Forma.elements[pEscondido].value=vbtnBorrarValue;
    		if (Forma.txtId.value==""){alert("Debe proporcionar el Id para poder Borrar el registro");}
    		else{if (confirm("Desea Borrar el registro?")){vRegresa=true;}}
		}
		else{alert(vMensajenoEntrar);}
	}
	if (Boton.name==vbtnConsultaValue){
		Forma.elements[pEscondido].value=vbtnConsultaValue;
		vRegresa=true;
	}
	return vRegresa;
}

function VerificaForma4(Boton,Forma,pEscondido){
	vRegresa=false;
	if (Boton.name==vbtnObtenerValue){
		Forma.elements[pEscondido].value=vbtnObtenerValue;
		if (Forma.txtId.value==""){alert("Debe proporcionar el Id para Obtener los Datos");}
		else{ vRegresa=true;}
	}
	if (Boton.name==vbtnAltaValue){
		if (p2041){
    		Forma.elements[pEscondido].value=vbtnAltaValue;
        		if (Forma.txtId.value!=""){alert("No debe proporcionar Id para dar de Alta un nuevo registro");}
        		else{ 
				   	if (Forma.elements["txtArchivo"].value!=""){if (confirm("Desea dar de Alta el registro?")){vRegresa=true;}}
					else{ alert("No ha asignado archivo al documento");}
				}
		}
		else{alert(vMensajenoEntrar);}
	}
	if (Boton.name==vbtnModificarValue){
		if (p2042){
    		Forma.elements[pEscondido].value=vbtnModificarValue;
    		if (Forma.txtId.value==""){alert("Debe proporcionar el Id para poder Modificar los datos del registro");}
    		else{if (confirm("Desea Modificar el registro?")){vRegresa=true;}}
		}
		else{alert(vMensajenoEntrar);}
	}
	if (Boton.name==vbtnBorrarValue){
		if (p2043){
    		Forma.elements[pEscondido].value=vbtnBorrarValue;
    		if (Forma.txtId.value==""){alert("Debe proporcionar el Id para poder Borrar el registro");}
    		else{if (confirm("Desea Borrar el registro?")){vRegresa=true;}}
		}
		else{alert(vMensajenoEntrar);}
	}
	if (Boton.name==vbtnConsultaValue){
		Forma.elements[pEscondido].value=vbtnConsultaValue;
		consdocumentos=window.open("consdocumentos.php","consdocumentos",'toolbar=no, status=no, location=no, scrollbars=no,width=500,height=160,left = 182,top = 200');
	}
	return vRegresa;
}

function VerificaForma5(Boton,Forma,pEscondido){
	vRegresa=false;
	if (Boton.name==vbtnObtenerValue){
		Forma.elements[pEscondido].value=vbtnObtenerValue;
		if (Forma.txtId.value==""){alert("Debe proporcionar el Id para Obtener los Datos");}
		else{ HorariosBorra(Forma); vRegresa=true;}
	}
	if (Boton.name==vbtnModificarValue){
		if (p2051){
    		Forma.elements[pEscondido].value=vbtnModificarValue;
    		if (Forma.txtId.value==""){alert("Debe proporcionar el Id para poder Modificar los datos del registro");}
    		else{if (confirm("Desea Modificar el registro?")){vRegresa=true;}}
		}
		else{alert(vMensajenoEntrar);}
	}
	if (Boton.name==vbtnBorrarValue){
		if (p2052){
    		Forma.elements[pEscondido].value=vbtnBorrarValue;
    		if (Forma.txtId.value==""){alert("Debe proporcionar el Id para poder Borrar el registro");}
    		else{if (confirm("Desea Borrar el registro?")){vRegresa=true;}}
		}
		else{alert(vMensajenoEntrar);}
	}
	if (Boton.name==vbtnConsultaValue){
		Forma.elements[pEscondido].value=vbtnConsultaValue;
		conscontactoss=window.open("conscontactos.php","conscontactos",'toolbar=no, status=no, location=no, scrollbars=no,width=500,height=350,left = 15,top = 50');
	}
	return vRegresa;
}

function VerificaForma6(Forma){
	vRegresa=false;
    if (confirm("Desea enviar el correo?")){vRegresa=true;}
	return vRegresa;
}

function VerificaForma7(Boton,Forma,pEscondido){
	vRegresa=false;
	if (Boton.name==vbtnObtenerValue){
		Forma.elements[pEscondido].value=vbtnObtenerValue;
		if (Forma.txtId.value==""){alert("Debe proporcionar el Id para Obtener los Datos");}
		else{ HorariosBorra(Forma); vRegresa=true;}
	}
	if (Boton.name==vbtnModificarValue){
		if (p2061){
    		Forma.elements[pEscondido].value=vbtnModificarValue;
    		if (Forma.txtId.value==""){alert("Debe proporcionar el Id para poder Modificar los datos del registro");}
    		else{if (confirm("Desea Modificar el registro?")){vRegresa=true;}}
		}
		else{alert(vMensajenoEntrar);}
	}
	if (Boton.name==vbtnBorrarValue){
		if (p2062){
    		Forma.elements[pEscondido].value=vbtnBorrarValue;
    		if (Forma.txtId.value==""){alert("Debe proporcionar el Id para poder Borrar el registro");}
    		else{if (confirm("Desea Borrar el registro?")){vRegresa=true;}}
		}
		else{alert(vMensajenoEntrar);}
	}
	if (Boton.name==vbtnConsultaValue){
		Forma.elements[pEscondido].value=vbtnConsultaValue;
		consevenregis=window.open("consevenregis.php","consevenregis",'toolbar=no, status=no, location=no, scrollbars=no,width=500,height=250,left = 15,top = 50');
	}
	return vRegresa;
}

function VerificaForma8(Boton,Forma,pEscondido){
	vRegresa=false;
	if (Boton.name==vbtnObtenerValue){
		Forma.elements[pEscondido].value=vbtnObtenerValue;
		vRegresa=true;
	}
	if (Boton.name==vbtnModificarValue){
		Forma.elements[pEscondido].value=vbtnModificarValue;
		if (confirm("Desea Modificar el registro?")){vRegresa=true;}
	}
	return vRegresa;
}

function VerificaForma9(Boton,Forma,pEscondido){
	vRegresa=false;
	if (Boton.name==vbtnObtenerValue){
		Forma.elements[pEscondido].value=vbtnObtenerValue;
		if (Forma.txtId.value==""){alert("Debe proporcionar el Id para Obtener los Datos");}
		else{ vRegresa=true;}
	}
	if (Boton.name==vbtnAltaValue){
		if (p2081){
    		Forma.elements[pEscondido].value=vbtnAltaValue;
    		if (Forma.txtId.value!=""){alert("No debe proporcionar Id para dar de Alta un nuevo registro");}
    		else{ if (confirm("Desea dar de Alta el registro?")){ vRegresa=true;}}
		}
		else{alert(vMensajenoEntrar);}
	}
	if (Boton.name==vbtnModificarValue){
		if (p2082){
    		Forma.elements[pEscondido].value=vbtnModificarValue;
    		if (Forma.txtId.value==""){alert("Debe proporcionar el Id para poder Modificar los datos del registro");}
    		else{
    			if (Forma.elements["txtImagen"].value==""){
    				if (confirm("No ha asignado nueva imagen para el evento. Es correcto?")){
    					if (confirm("La imagen actual del evento debera ser: (Aceptar)=Respetada (Cancelar)=Borrada")){Forma.elements["vImagenReemplazar"].value=1;}
    					else{Forma.elements["vImagenReemplazar"].value=0;}
    					if (confirm("Desea Modificar el registro?")){vRegresa=true;}
    				}
    			}
    			else{if (confirm("Desea Modificar el registro?")){vRegresa=true;}}
    		}
		}
		else{alert(vMensajenoEntrar);}
	}
	if (Boton.name==vbtnBorrarValue){
		if (p2083){
    		Forma.elements[pEscondido].value=vbtnBorrarValue;
    		if (Forma.txtId.value==""){alert("Debe proporcionar el Id para poder Borrar el registro");}
    		else{if (confirm("Desea Borrar el registro?")){vRegresa=true;}}
		}
		else{alert(vMensajenoEntrar);}
	}
	if (Boton.name==vbtnConsultaValue){
		Forma.elements[pEscondido].value=vbtnConsultaValue;
		consplatillos=window.open("consplatillos.php","consplatillos",'toolbar=no, status=no, location=no, scrollbars=no,width=600,height=210,left = 182,top = 200');
	}
	return vRegresa;
}

function EventosRegistro(pUsuario,pEvento){
	eventosregistro=window.open("eventosregistro.php?usuario="+$pUsuario+"&evento="+pEvento,"eventosregistro",'toolbar=no, status=no, location=no, scrollbars=no,width=500,height=160,left = 182,top = 200');
}

function AbreCorreo(pDe,pPara,pAsunto,pIdcontacto){
	correo=window.open("correocontactos.php?para="+pPara+"&asunto="+pAsunto+"&de="+pDe+"&idcontacto="+pIdcontacto,"correo",'toolbar=no, status=no, location=no, scrollbars=no,width=520,height=360,left = 15,top = 50');
	return false;
}

function AbreCorreo2(pDe,pPara,pAsunto,pIdcontacto){
	correoevenregis=window.open("correoevenregis.php?para="+pPara+"&asunto="+pAsunto+"&de="+pDe+"&idcontacto="+pIdcontacto,"correoevenregis",'toolbar=no, status=no, location=no, scrollbars=no,width=520,height=360,left = 15,top = 50');
	return false;
}

function Reemplaza(pCadena,pCaracter,pPorCaracter){
    var vRegresa="";
    for (i=0; i<pCadena.length ; i++){
		alert(i+pCadena.substr(i,1));
    	if (pCadena.substr(i,1)==pCaracter){
    		vRegresa=vRegresa+pPorCaracter;
    	}
    	else{
    		vRegresa=vRegresa+pCadena.substr(i,1);
    	}
    }
	return vRegresa;
}