<!--
//Nielsoft
//Libreria estandar de validacion
//Creada por:Raul Cordero C
//Fecha: 2 de Octubre de 2003
//Modificada por: Rodrigo Ruiz B
//onkeypress="valkey('nombre')"

function valkey(tipo) 
{
	var tecla = window.event;
	
	switch(tipo)
	{
		case "entero":
			{
				if (validatecla (tecla.keyCode,"0123456789") == false)
				{
					tecla.keyCode=0;
				}	
			return;
			}

		case "numero":
			{
				if (validatecla (tecla.keyCode,"0123456789.,") == false)
				{
					tecla.keyCode=0;
				}	
			return;
			}
		return;
		case "digito":
			{
				if (validatecla (tecla.keyCode,"0123456789Kk") == false)
				{
					tecla.keyCode=0;
				}	
				if (validatecla (tecla.keyCode,"k") == true)
				{
					tecla.keyCode = tecla.keyCode - 32;
				}
			return;
			}
		case "nombre":
			{			
				if (tecla.keyCode==241)
				{
					tecla.keyCode = tecla.keyCode - 32;
					return;
				}					
				if (validatecla (tecla.keyCode," ") ==true)
				{
					return;
				}	
				else
				{                 
					if (validatecla (tecla.keyCode,"abcdefghijklmnopqrstuvwxyz") == true)
					{
						tecla.keyCode = tecla.keyCode - 32;
					}
					else
					{
						if (validatecla (tecla.keyCode,"ABCDEFGHIJKLMNOPQRSTUVWXYZ 娗") == false)
						{
							tecla.keyCode=0;
						}	
					}			
				}
			return;
			}
/////*****************************
		case "departamento":
			{
				if (tecla.keyCode==241)
				{
					tecla.keyCode = tecla.keyCode - 32;
					return;
				}
				if (validatecla (tecla.keyCode," ") ==true)
				{
					return;
				}	
				else
				{
					if (validatecla (tecla.keyCode,"abcdefghijklmnopqrstuvwxyz") == true)
					{
						tecla.keyCode = tecla.keyCode - 32;
					}
					else
					{
						if (validatecla (tecla.keyCode,"ABCDEFGHIJKLMNOPQRSTUVWXYZ.-0123456789,:;_/()$ 娗") == false)
						{
							tecla.keyCode=0;
						}	
					}
				}
			return;
			}
/////*****************************
		case "telefono":
			{
				if (validatecla (tecla.keyCode,"0123456789-()") == false)
				{
					tecla.keyCode=0;
				}	
			return;
			}
		case "observacion":
			{
				if (tecla.keyCode==241)
				{
					tecla.keyCode = tecla.keyCode - 32;
					return;
				}
				if (validatecla (tecla.keyCode," ") ==true)
				{
					return;
				}	
				else
				{
					if (validatecla (tecla.keyCode,"abcdefghijklmnopqrstuvwxyz") == true)
					{
						tecla.keyCode = tecla.keyCode - 32;
					}

					else
					{
						if (validatecla (tecla.keyCode,"ABCDEFGHIJKLMNOPQRSTUVWXYZ.-0123456789,:;_/()$% 娗") == false)
						{
							tecla.keyCode=0;
						}	
					}
				}
			return;
			}
		case "observacion_min":
			{
			//alert(tecla.keyCode);
				if (tecla.keyCode==13||tecla.keyCode==225||tecla.keyCode==233||tecla.keyCode==237||tecla.keyCode==243||tecla.keyCode==250||tecla.keyCode==193||tecla.keyCode==201||tecla.keyCode==205||tecla.keyCode==211||tecla.keyCode==218||tecla.keyCode==63||tecla.keyCode==161||tecla.keyCode==191||tecla.keyCode==33||tecla.keyCode==64||tecla.keyCode==34)
				{
					tecla.keyCode = tecla.keyCode;
					return;
				}
				if (tecla.keyCode==241||tecla.keyCode==209)
				{
					tecla.keyCode = tecla.keyCode;
					return;
				}
				if (validatecla (tecla.keyCode," ") ==true)
				{
					return;
				}	
				else
				{
					if (validatecla (tecla.keyCode,"摋薃𣾀奼衾 abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ.-'0123456789,:;_/()$%") == false)
					{
						tecla.keyCode=0;
					}	
				}
			return;
			}

		case "sitio":
			{
				if (validatecla (tecla.keyCode," ") ==true)
				{
					tecla.keyCode=0;
				}	
				else
				{
					if (validatecla (tecla.keyCode,"abcdefghijklmnopqrstuvwxyz") == true)
					{
						tecla.keyCode = tecla.keyCode - 32;
					}

					else
					{
						if (validatecla (tecla.keyCode,"ABCDEFGHIJKLMNOPQRSTUVWXYZ.-0123456789,:;_/") == false)
						{
							tecla.keyCode=0;
						}	
					}
				}
			return;
			}

		case "sitiomin":
			{
				if (validatecla (tecla.keyCode," ") ==true)
				{
					tecla.keyCode=0;
				}	
				else
				{
					if (validatecla (tecla.keyCode,"ABCDEFGHIJKLMNOPQRSTUVWXYZ") == true)
					{
						tecla.keyCode = tecla.keyCode + 32;
					}

					else
					{
						if (validatecla (tecla.keyCode,"abcdefghijklmnopqrstuvwxyz.-0123456789,:;_/") == false)
						{
							tecla.keyCode=0;
						}	
					}
				}
			return;
			}

		case "mail":
			{
				if (validatecla (tecla.keyCode," ") ==true)
				{
					tecla.keyCode=0;
				}	
				else
				{
					if (validatecla (tecla.keyCode,"abcdefghijklmnopqrstuvwxyz.-0123456789:;_@") == true)
					{
						return;
					}	
					else
					{
						if (validatecla (tecla.keyCode,"ABCDEFGHIJKLMNOPQRSTUVWXYZ") == true)
						{
							tecla.keyCode = tecla.keyCode + 32;
						}
						else
						{
							tecla.keyCode=0;
						}
					}
				}
			return;
			}	
		case "hora":
			{
				if (validatecla (tecla.keyCode,"0123456789:") == false)
				{
					tecla.keyCode=0;
				}	
			return;
			}
		case "fecha":
			{
				if (validatecla (tecla.keyCode,"0123456789-/") == false)
				{
					tecla.keyCode=0;
				}	
			return;
			}
		case "periodo":
			{
				if (validatecla (tecla.keyCode,"0123456789/") == false)
				{
					tecla.keyCode=0;
				}	
			return;
			}			
		case "clave":
			{
				if (tecla.keyCode==241)
				{
					tecla.keyCode = tecla.keyCode - 32;
					return;
				}
				if (validatecla (tecla.keyCode," ") ==true)
				{
					tecla.keyCode=0;
				}	
				else
				{
					if (validatecla (tecla.keyCode,"abcdefghijklmnopqrstuvwxyz") == true)
					{
						tecla.keyCode = tecla.keyCode - 32;
					}

					else
					{
						if (validatecla (tecla.keyCode,"ABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789 娗") == false)
						{
							tecla.keyCode=0;
						}	
					}
				}
			return;
			}

		default:
			window.alert("valida key no v"+getcharesp(0)+"lida");
			return;
	}
	var varControl=window.event.srcelement;
	var varKey=window.event.keycode;
}

/////////////////////////////////////////////////////////////////////////////////////////////

//Nielsoft
//Libreria estandar de validacion
//Creada por:Raul Cordero C
//Fecha: 2 de Octubre de 2003
//Modificada por: Rodrigo Ruiz B
//onkeypress="valkeyminuscula('nombre')"
function valkeyminuscula(tipo) 
{
	var tecla = window.event
	
	switch(tipo)
	{
		case "nombre":
			{	
				if (tecla.keyCode==225 || tecla.keyCode==233|| tecla.keyCode==237 || tecla.keyCode==243 || tecla.keyCode==250 || tecla.keyCode==241)
				{
					return;
				}
				if (validatecla (tecla.keyCode," ") ==true)
				{
					return;
				}	
				else
				{
					if (validatecla (tecla.keyCode,"ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz 娗") == false)
					{
						tecla.keyCode=0;
					}		
				}
			return;
			}
/////*****************************
		case "departamento":
			{
				if (tecla.keyCode==225 || tecla.keyCode==233|| tecla.keyCode==237 || tecla.keyCode==243 || tecla.keyCode==250 || tecla.keyCode==241)
				{
					return;
				}
				if (validatecla (tecla.keyCode," ") ==true)
				{
					return;
				}	
				else
				{
					if (validatecla (tecla.keyCode,"ABCDEFGHIJKLMNOPQRSTUVWXYZ.-0123456789,:;_/()$abcdefghijklmnopqrstuvwxyz 娗") == false)
					{
						tecla.keyCode=0;
					}
				}
		return;		
			}
	case "hora":
			{
				if (validatecla (tecla.keyCode," ") ==true)
				{
					return;
				}	
				else
				{
					if (validatecla (tecla.keyCode,"0123456789:") == false)
					{
						tecla.keyCode=0;
					}
				}
		return;		
			}
/////*****************************

		case "observacion":
			{
				if (tecla.keyCode==225 || tecla.keyCode==233|| tecla.keyCode==237 || tecla.keyCode==243 || tecla.keyCode==250 || tecla.keyCode==241)
				{
					return;
				}
				if (validatecla (tecla.keyCode," ") ==true)
				{
					return;
				}	
				else
				{
					if (validatecla (tecla.keyCode,"ABCDEFGHIJKLMNOPQRSTUVWXYZ .-0123456789,:;_/()$%?=abcdefghijklmnopqrstuvwxyz 娗") == false)
					{
						tecla.keyCode=0;
					}	
				}
			return;
			}

		case "sitio":
			{
				if (validatecla (tecla.keyCode," ") ==true)
				{
					tecla.keyCode=0;
				}	
				else
				{
					if (validatecla (tecla.keyCode,"ABCDEFGHIJKLMNOPQRSTUVWXYZ .-0123456789,:;_/abcdefghijklmnopqrstuvwxyz") == false)
					{
						tecla.keyCode=0;
					}	
				}
			return;
			}

		default:
			window.alert("valida key no v"+getcharesp(0)+"lida");
			return;
	}
	var varControl=window.event.srcelement;
	var varKey=window.event.keycode;
}
/////////////////////////////////////////////////////////////////////////////////////////////

//onblur="valtexto("nombre",40)"
function valtexto(tipo,longitud) 
{
	var varcontrol=window.event.srcElement;
	var scrcampo = varcontrol.value;
	scrcampo.toUpperCase();

	if (scrcampo.length > longitud)
	{
		alert ("Largo m"+getcharesp(0)+"ximo permitido "+longitud+ " Caracteres");
		varcontrol.value=scrcampo.substring(0,longitud);
		varcontrol.focus();
		return;
	}

	if (valblanco(scrcampo))
	{
		varcontrol.value="";
		return;
	}
	switch(tipo)
	{
		case "entero":
			{
				if (validastring (scrcampo,"0123456789") == false)
				{
					alert ("Campo inv"+getcharesp(0)+"lido");
					varcontrol.value="";
					varcontrol.focus();
					return;
				}	
			return;
			}
		case "numero":
			{
				if (validastring (scrcampo,"0123456789.,") == false)
				{
					alert ("Campo inv"+getcharesp(0)+"lido");
					varcontrol.value="";
					varcontrol.focus();
					return;
				}	
			return;
			}	
		case "digito":
			{
				if (validastring (scrcampo,"0123456789Kk") == false)
				{
					alert ("Campo inv"+getcharesp(0)+"lido");
					varcontrol.value="";
					varcontrol.focus();
					return;
				}	
				else
				{
					varcontrol.value = scrcampo;
					return;
				}
			}
		case "nombre":
			{
				if (validastring (scrcampo,"ABCDEFGHIJKLMNOPQRSTUVWXYZ 娗" ) == false)
				{
					alert ("Campo inv"+getcharesp(0)+"lido");
					varcontrol.value="";
					varcontrol.focus();
					return;
				}	
				else
				{
					varcontrol.value = scrcampo;
					return;
				}
			}
		case "telefono":
			{
				if (validastring (scrcampo,"0123456789-()") == false)
				{
					alert ("Campo inv"+getcharesp(0)+"lido");
					varcontrol.value="";
					varcontrol.focus();
					return;
				}	
				else
				{
					var cont1=0;
					var cont2=0;
					for (var i=0; i < scrcampo.length; i++ )
					{
						if (scrcampo.charAt(i)== "(" )
						{
							cont1++;
						}
						else
						{
							if (scrcampo.charAt(i)== ")")
							{
								cont2++;
							}
						}
					}
					if (cont1 != cont2)
					{
						alert ("Campo in"+getcharesp(0)+"alido")
						varcontrol.value="";
						varcontrol.focus();
						return(false);
					}
				}
			return;
			}
		case "observacion":
			{
//				if (validastring (scrcampo,"ABCDEFGHIJKLMNOPQRSTUVWXYZ .-0123456789,:;_()$娗") == false)
				if (validastring (scrcampo,"ABCDEFGHIJKLMNOPQRSTUVWXYZ .-0123456789,:;_/()$%娗") == false)
				{
					alert ("Campo inv"+getcharesp(0)+"lido");
					varcontrol.value="";
					varcontrol.focus();
					return;
				}
				else
				{
					varcontrol.value = scrcampo;
					return;
				}
			}
	case "observacion_min":
			{
				if (validastring (scrcampo,txttilde.value+txtcaracteresespeciales.value+"abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ .-'0123456789,:;_/()$%娗") == false)
				{
					/*var arrcampo=scrcampo.split("");
					for(var i=0;i<arrcampo.length;i++)
					{
						alert(arrcampo[i]);
						alert(getcharesp(1));
					}*/
					alert ("Campo inv"+getcharesp(0)+"lido");
					varcontrol.value="";
					varcontrol.focus();
					return;
				}
				else
				{
					varcontrol.value = scrcampo;
					return;
				}
			}
		case "sitio":
			{
				if (validastring (scrcampo,"ABCDEFGHIJKLMNOPQRSTUVWXYZ .-0123456789,:;_/") == false)
				{
					alert ("Campo inv"+getcharesp(0)+"lido");
					varcontrol.value="";
					varcontrol.focus();
					return;
				}
				else
				{
					varcontrol.value = scrcampo;
					return;
				}
			}
	case "sitiomin":
			{
				if (validastring (scrcampo,"abcdefghijklmnopqrstuvwxyz.-0123456789,:;_/") == false)
				{
					alert ("Campo inv"+getcharesp(0)+"lido");
					varcontrol.value="";
					varcontrol.focus();
					return;
				}
				else
				{
					varcontrol.value = scrcampo;
					return;
				}
			}
		case "mail":
			{
				if (validamail (scrcampo,"abcdefghijklmnopqrstuvwxyz.-0123456789:;_@") == false)
				{
					alert ("E-mail incorrecto");
					varcontrol.value="";
					varcontrol.focus();
					return;
				}
				else
				{
					varcontrol.value = scrcampo;
					return;
				}
			}
		case "departamento":
			{
				if (validastring (scrcampo,"ABCDEFGHIJKLMNOPQRSTUVWXYZ .-0123456789娗") == false)
				{
					alert ("Campo inv"+getcharesp(0)+"lido");
					varcontrol.value="";
					varcontrol.focus();
					return;
				}
				else
				{
					varcontrol.value = scrcampo;
					return;
				}
			}
		case "fecha":
			{
				if (validastring (scrcampo,"0123456789-/") == false)
				{
					alert ("Campo inv"+getcharesp(0)+"lido");
					varcontrol.value="";
					varcontrol.focus();
					return;
				}	
				else
				{
					if (valfecha(scrcampo)== false)
					{
						alert ("Campo inv"+getcharesp(0)+"lido");
						varcontrol.value="";
						varcontrol.focus();
						return; 
					}
					else
					{
						
						if(Comparar_Fecha(varcontrol.value,txtfecha_sistema.value,'dma')==true)
						{
							return;
						}
						else
						{
							alert ("La fecha ingresada no puede ser mayor a la fecha actual");
							varcontrol.value="";
							varcontrol.focus();
							return; 
						}
						
					}
				}
			}
		case "fechaesp":
			{
				if (validastring (scrcampo,"0123456789-/") == false)
				{
					alert ("Campo inv"+getcharesp(0)+"lido");
					varcontrol.value="";
					varcontrol.focus();
					return;
				}	
				else
				{
					if (valfecha(scrcampo)== false)
					{
						alert ("Campo inv"+getcharesp(0)+"lido");
						varcontrol.value="";
						varcontrol.focus();
						return; 
					}
				}
				break;
			}
		case "hora":
			{
				if (validastring (scrcampo,"0123456789:") == false)
				{
					alert ("Campo inv"+getcharesp(0)+"lido");
					varcontrol.value="";
					varcontrol.focus();
					return;
				}	
				else
				{
					if(valhora(scrcampo)==false||scrcampo==":")
					{
						alert ("Campo inv"+getcharesp(0)+"lido");
						varcontrol.value="";
						varcontrol.focus();
						return;
					}
				}
				break;
			}
		case "clave":
			{
				if (validastring (scrcampo,"ABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789娗") == false)
				{
					alert ("Campo inv"+getcharesp(0)+"lido");
					varcontrol.value="";
					varcontrol.focus();
					return;
				}
				else
				{
					varcontrol.value = scrcampo;
					return;
				}
			}

			case "periodo":
			{
				if (validastring (scrcampo,"0123456789/") == false)
				{
					alert ("Campo inv"+getcharesp(0)+"lido");
					varcontrol.value="";
					varcontrol.focus();
					return;
				}
				else
				{
					if (valperiodo(varcontrol)== false)
					{
						alert ("Campo inv"+getcharesp(0)+"lido");
						varcontrol.value="";
						varcontrol.focus();
						return; 
					}
				}
				break;
			}

		default:
			window.alert("Parametros de funci"+getcharesp(3)+"n valtexto incorrecto");
			return;
	}
}
////////////////////////////////////////////////////////////
//onblur="valtextominuscula("nombre",40)"
function valtextominuscula(tipo,longitud) 
{
	var varcontrol=window.event.srcElement;
	var scrcampo = varcontrol.value;
	scrcampo.toLowerCase();

	//	if ((scrcampo > longitud)  || (scrcampo.length == 0) )
	if (scrcampo.length > longitud)
	{
		alert ("Largo m"+getcharesp(0)+"ximo permitido "+longitud+ " Caracteres");
		varcontrol.value=scrcampo.substring(0,longitud-1);
		varcontrol.focus();
		return;
	}

	switch(tipo)
	{

		case "nombre":
			{
				if (validastringminuscula (scrcampo.toLowerCase(),"abcdefghijklmnopqrstuvwxyz " ) == false)
				{
					alert ("Campo inv"+getcharesp(0)+"lido");
					varcontrol.value="";
					varcontrol.focus();
					return;
				}	
				else
				{
					varcontrol.value = scrcampo;
					return;
				}
			}

		case "observacion":
			{
				if (validastringminuscula (scrcampo.toLowerCase(),"abcdefghijklmnopqrstuvwxyz .-0123456789,:;_/()$%=?") == false)
				{
					alert ("Campo inv"+getcharesp(0)+"lido");
					varcontrol.value="";
					varcontrol.focus();
					return;
				}
				else
				{
					varcontrol.value = scrcampo;
					return;
				}
			}
		case "sitio":
			{
				if (validastringminuscula (scrcampo.toLowerCase(),"abcdefghijklmnopqrstuvwxyz .-0123456789,:;_/") == false)
				{
					alert ("Campo inv"+getcharesp(0)+"lido");
					varcontrol.value="";
					varcontrol.focus();
					return;
				}
				else
				{
					varcontrol.value = scrcampo;
					return;
				}
			}
		case "mail":
			{
				if (validamail (scrcampo.toLowerCase(),"abcdefghijklmnopqrstuvwxyz.-0123456789:;_@ ") == false)
				{
					alert ("E-mail incorrecto");
					varcontrol.value="";
					varcontrol.focus();
					return;
				}
				else
				{
					varcontrol.value = scrcampo;
					return;
				}
			}
/////*************************
		case "departamento":
			{
				if (validastringminuscula (scrcampo.toLowerCase(),"abcdefghijklmnopqrstuvwxyz .-0123456789") == false)
				{
					alert ("Campo inv"+getcharesp(0)+"lido");
					varcontrol.value="";
					varcontrol.focus();
					return;
				}
				else
				{
					varcontrol.value = scrcampo;
					return;
				}
			}
/////*************************
		default:
			window.alert("Parametros de funci"+getcharesp(3)+"n valtextominuscula incorrecto");
			return;
	}
}
///////////////////////////////////////////////////////////////
function validatecla (strtecla,strtextopermitido)
{
	var swok=0;

		for (var j=0 ; j < strtextopermitido.length; j++ )
		{
			charc = strtextopermitido.charCodeAt(j);

			if (charc==1121)  
			{
				charc=209;
			}
			if ( strtecla == charc )
			{
				swok++;
				break;
			}			
		}

		if (swok == 0 )
		{
			return (false);
		}
//	}
	return (true);
}
///***
function keyenter()
{
  //var varKey = window.event.keycode;
	var tecla = window.event;
	
	if (tecla.keyCode == 13)
	{
		tecla.keyCode= 9;
	}
}

function keyenterobs()
{
  //var varKey = window.event.keycode;
	var tecla = window.event;
	if (tecla.keyCode == 13)
	{
		tecla.keyCode= tecla.keyCode;
	}
}
//
//****

//onblur="validarut2()"
function valrut2(varcontroldigito,varcontrolrut)
{
	if (varcontroldigito.value=="")
	{
		return false;
	}
	if(verificarutok(varcontrolrut.value,varcontroldigito.value)==false)
	{
		return false;
	}
	return true;
}
//onblur="valrut(txtdigito,txtrut)"
function valrut(varcontroldigito,varcontrolrut)
{

	if (varcontroldigito.value=="")
	{
		return true;
	}
	if(verificarutok(varcontrolrut.value,varcontroldigito.value)==false)
	{
		alert("Rut Inv"+getcharesp(0)+"lido");
		varcontroldigito.value="";
		varcontroldigito.focus();
		return false;
	}
	return true;

}

//////////////////////////////////////////////////////////////////////////////////////
//onblur="valfecha()"
function valfecha() 
{
	var varcontrol=window.event.srcElement;
	var fecha = varcontrol.value;
	var cont =0;
	var dia="";
	var mes="";
	var anyo="";

	if (fecha=="")
	{
		return;
	}
	
	for (var i=0;i<fecha.length ; i++)
	{
		if (fecha.charAt(i)=="/")
		{
			cont++;
		}	
	}

//////////////////////////////
	if ( cont == 0)
	{
		if (fecha.length == 6)  //  010103
		{
			dia=fecha.substring(0,2);
			mes=fecha.substring(2,4);
			anyo=fecha.substring(4,6);
		}
		else
		{
			if ( fecha.length ==8) // 01012003
			{
				dia=fecha.substring(0,2);
				mes=fecha.substring(2,4);
				anyo=fecha.substring(4,8);
			}
			else
			{
				return(false);
			}
		}
	}
	else
	{
		if (cont == 2)
		{
			var arrfecha = fecha.split("/");
			dia = arrfecha[0];
			mes = arrfecha[1];
			anyo= arrfecha[2];
		}

		else
		{
			return(false);
		}
	}


	if ((dia=="") || (mes=="") || (anyo==""))
	{
		return (false);
	}

	if (dia.length==1)	dia = "0" +dia;
	if (mes.length==1)	mes = "0" + mes;
	if (anyo.length==2) 
	{
		if (anyo<40 )
		{
			anyo = "20" + anyo;
		}
		else
		{
			anyo = "19" + anyo;
		}
	}

	var	fechadesp = dia+"/"+mes+"/"+anyo;

	if (dia == '08') dia = '8';	
	if (dia == '09') dia = '9';	
	if (mes == '08') mes = '8';	
	if (mes == '09') mes = '9'; 

	dia=parseInt(dia);
	mes=parseInt(mes);
	anyo=parseInt(anyo);

	if((anyo< 1900) || (anyo > 2100) || (mes < 1) || (mes > 12) || (dia < 1) || (dia > 31))
	{
		return (false);
	}
	else
	{
	   if((anyo%4 != 0) && (mes == 2) && (dia > 28))	   
			return (false);
	   else	
	   {
		  if ((((mes == 4) || (mes == 6) || (mes == 9) || (mes==11)) && (dia>30)) || ((mes==2) && (dia>29)))
		   return (false);	      				  	 
	   } 
	} 

	varcontrol.value =fechadesp
	return(true);
}



//onblur="valperiodo()"
function valperiodo(varcontrol) 
{

	var fecha = varcontrol.value;
	var cont =0;
	var mes="";
	var anio="";


	if (fecha=="")
	{
		return(false);
	}
	
	for (var i=0;i<fecha.length ; i++)
	{
		if (fecha.charAt(i)=="/")
		{
			cont++;
		}	
	}

//////////////////////////////
	if ( cont == 0)
	{
		if (fecha.length == 6)  //  010103
		{
			mes=fecha.substring(0,2);
			anio=fecha.substring(2,6);
		}
		else
		{
			return(false);
		}
	}
	else
	{
		if (cont == 1)
		{
			var arrfecha = fecha.split("/");
			mes = arrfecha[0];
			anio = arrfecha[1];
		}

		else
		{
			return(false);
		}
	}


	if ((mes=="") || (anio==""))
	{
		return (false);
	}
	//alert(parseFloat(mes));
	if (mes.length==1)	mes = "0" + mes;
	if (parseFloat(anio)<1900  || parseFloat(anio)>2100 )
		{
			return(false);
		}
	if((parseFloat(mes) < 1) || (parseFloat(mes)> 12) )
	{
		return (false);
	}


	var	fechadesp = mes+"/"+anio;



	varcontrol.value =fechadesp
	return(true);
}



function valhora(valor)
{
	var varcontrol=window.event.srcElement;
	var arrhoratmp=valor.split(":");
	var strvalor=valor;
	if(arrhoratmp.length==1)
	{
		if(arrhoratmp[0].length==4)
		{
			var arrhoramod=strvalor.split("");
			strvalor=arrhoramod[0]+arrhoramod[1]+":"+arrhoramod[2]+arrhoramod[3];
		}
		else
		{
			return false;
		}
	}
	var arrhora=strvalor.split(":");

	if(arrhora.length==2)
	{
		if(arrhora[0].length>0&&arrhora[0].length<3)
		{
			if(parseInt(arrhora[0])>23)
			{
				return false
			}
			else
			{
				if(arrhora[0].length==1)
				{
					arrhora[0]="0"+arrhora[0];
				}
				if(arrhora[1].length>0&&arrhora[1].length<3)
				{
					if(parseInt(arrhora[1])>59)
					{
						return false
					}
					else
					if(arrhora[1].length==1)
					{
						arrhora[1]="0"+arrhora[1];
					}
				}
			}
			varcontrol.value=arrhora[0]+":"+arrhora[1];  
		}
	}
	else
	{
		return false
	}
	return true;
}
/////////////////////////////////////////////////////////////////////////////////////////////

//onfocus="focotexto()"
function focotexto()
{
}
//onfocus="foconumero()"
function foconumero()
{
}
//onkeyup="buscacombo()"
function buscacombo()
{
}

function validastring (strtexto,strtextopermitido)
{
	var swok=0;


	for (var i=0 ; i < strtexto.length ; i++ )
	{
		swok=0;
		for (var j=0 ; j < strtextopermitido.length; j++ )
		{
			charc=strtextopermitido.charCodeAt(j);
			if (charc==1121)
			{
				charc=209;
			}
			if ( strtexto.charCodeAt(i) == charc )
			{
				swok++;
				break;
			}
			
		}
		if (swok == 0 )
		{
			return (false);
		}
	}
	return (true);
}
//----
function validastringminuscula (strtexto,strtextopermitido)
{
	var swok=0;

	for (var i=0 ; i < strtexto.length ; i++ )
	{
		swok=0;
		for (var j=0 ; j < strtextopermitido.length; j++ )
		{
			charc=strtextopermitido.charCodeAt(j);
	//		if (charc==1121)
	//		{
	//			charc=209;
	//		}
			if ( strtexto.charCodeAt(i) == charc)
			{
				swok++;
				break;
			}
			else
			{
				//                            �								   �								�								�								�									�
				//if(strtexto.charCodeAt(i) == 241 || strtexto.charCodeAt(i) == 225 || strtexto.charCodeAt(i) == 233 || strtexto.charCodeAt(i) == 237 || strtexto.charCodeAt(i) == 243 || strtexto.charCodeAt(i) == 250)
				if(strtexto.charCodeAt(i) == 241 )
				{
					swok++;
					break;
				}
				if(strtexto.charCodeAt(i) == 225 )
				{
					swok++;
					break;
				}
				if(strtexto.charCodeAt(i) == 233 )
				{
					swok++;
					break;
				}
				if(strtexto.charCodeAt(i) == 237 )
				{
					swok++;
					break;
				}
				if(strtexto.charCodeAt(i) == 243 )
				{
					swok++;
					break;
				}
				if(strtexto.charCodeAt(i) == 250 )
				{
					swok++;
					break;
				}
			}
		
		}
		if (swok == 0 )
		{
			return (false);
		}

	}
	return (true);
}


function validamail (strtexto,strtextopermitido)
{
	var swok=0;
	var cont=0;
	var cont2=0;

	for (var i=0 ; i < strtexto.length ; i++ )
	{
		swok=0;
		if (strtexto.length > 1)
		{
			if ( strtexto.charCodeAt(i) == 64)
			{
				cont++;
			}
		}

		for (var j=0 ; j < strtextopermitido.length; j++ )
		{
			charc=strtextopermitido.charCodeAt(j);
			if (charc==1121)
			{
				charc=209;
			}

			if ( strtexto.charCodeAt(i) == charc )
			{
				swok++;
				break;
			}
			
		}

		if (swok == 0 )
		{
			return (false);
		}
	}
	
	if (strtexto.length > 1)
	{
		if ((cont != 1))
		{
		return (false);
		}
	}
	
	return (true);
}

//*****************************************

function verificarutok (NumRut,Dv) 
{			
	var T_Factor = new Array(10);
	var T_Dv = new Array(10);
	var Suma;
	var Resto; 
	var Ind; 
	var i;

	if ((NumRut.length == 0) || (Dv.length == 0))
	{
		return (false);
	}

	var larrut = 9 - NumRut.length;
	for (i=0; i < larrut ; i++)
	{
		NumRut = "0" + NumRut;
	}

	for  (i=0; i< NumRut.length ; i++)
	{
		if ((parseInt(NumRut.charAt(i)) < 0) || (parseInt(NumRut.charAt(i)) > 9))
			{
			alert ("Rut incorrecto");
			return (false);
			}
	}

	T_Factor[0] = 4;
	T_Factor[1] = 3;
	T_Factor[2] = 2;
	T_Factor[3] = 7;
	T_Factor[4] = 6;
	T_Factor[5] = 5;
	T_Factor[6] = 4;
	T_Factor[7] = 3;
	T_Factor[8] = 2;
	
	for (i = 0; i <= 10; i++)
	{       
		switch (i)
		{
		case 9:
			T_Dv[i] = "K";
			break
		case 10:
			T_Dv[i] = "0";
			break
		default:
			T_Dv[i] = 1 + i;
		}        
	} 
	Suma = 0;
	for (i = 0;  i<=(parseInt(NumRut.length)-1); i++)
	{
		Suma = (Suma + (NumRut.charAt(i) * T_Factor[i]));
	}
	
	Resto = (Suma % 11);
		Ind = 11 - Resto;							

//	if (Ind==10) Ind="K";
//	if (Ind==11) Ind="0";
	if (T_Dv[Ind - 1] == Dv)
//	if (Ind == Dv)
	{
		//document.formprueba.numerorut.value=NumRut;
		return (true);
	}
	else
	{
		return (false);
	}
}

//******************************************************************************************************************************
//onblur="valnumero( 999 999 , 0 , 2)"

function valnumero(maximo,minimo,decimales) 
{
	var varcontrol=window.event.srcElement
	var numero = varcontrol.value
	var cont=0;
	var i;
	var	numerodecimal="";
	var numeroentero="";

	if (numero=="")
	{
		return (false);
	}

////  Detecta 1 o + de una coma 
	for (i=0; i<numero.length ;i++ )
	{
		if ( numero.charAt(i)!='1' && numero.charAt(i)!='2' && numero.charAt(i)!='3' && numero.charAt(i)!='4' && numero.charAt(i)!='5' && numero.charAt(i)!='6' && numero.charAt(i)!='7' && numero.charAt(i)!='8' && numero.charAt(i)!='9' && numero.charAt(i)!='0' && numero.charAt(i)!='.' && numero.charAt(i)!=',')
		{
			alert ("Error n"+getcharesp(4)+"mero Incorrecto");
			varcontrol.value="";
			varcontrol.focus();
			return (false);
		}
		else
		{
			if (numero.charAt(i)==",")
			{
				cont++;
				if (cont>1)
				{
					alert ("Error n"+getcharesp(4)+"mero Incorrecto");
					varcontrol.value="";
					varcontrol.focus();
					return (false);
				}
			}
		}
	}

/////  Detecta coma al inicio del numero y revisa si exite numero despues de la coma
	var poscoma = numero.indexOf(',') // indica la posicion de la coma
		 
	if (poscoma==0)  //inicio del numero
	{
		alert ("Error n"+getcharesp(4)+"mero Incorrecto!");
		varcontrol.value="";
		varcontrol.focus();
		return ("false");
	}
	else
	{
		if (poscoma==-1)
		{
			numeroentero  = numero;
			numerodecimal ="";
			var totdec=(decimales - numerodecimal.length)
			for (i=0; i< totdec ; i++ )
			{
				numerodecimal +="0";
			}				
		}
		else
		{
			numerodecimal   = numero.substring((poscoma+1) , numero.length)
			numeroentero = numero.substring(0 , poscoma);
			totdec =0;
			totdec = (decimales-numerodecimal.length);			

			for (i=0;i< totdec ;i++ )
			{
				numerodecimal +="0";
			}
		}
	}
/////// Valida Cantidad de decimales ingresados sea menor que el parametro
	if (numerodecimal.length > decimales)
	{
		alert ("Error m"+getcharesp(0)+"ximo " + decimales +" decimales");
		varcontrol.value="";
		varcontrol.focus();
		return (false);
	}
/////// Revisa que solo el primer campo de el arreglo puede ser menor a 3

	var arrnumeroentero = numeroentero.split(".");

	if (arrnumeroentero.length >1)
	{
			for (i=0; i<arrnumeroentero.length ;i++ )
			{
				if ( (i>0) && (arrnumeroentero[i].length < 3) )
				{
					alert ("Error n"+getcharesp(4)+"mero Incorrecto!");
					varcontrol.value="";
					varcontrol.focus();
					return (false);
				}
			}
	}
//* numeroentero = numeroentero.replace(".","");  //no reemplazo todos
 
				var numeroenteropaso="";
				for (i=0; i<numeroentero.length ;i++)
				{	
					if (numeroentero.charAt(i)=="." || numeroentero.charAt(i)==" ")
					{
						numeroenteropaso += "";
					}
					else
					{
						numeroenteropaso += numeroentero.charAt(i);
					}
				}	
				numeroentero = numeroenteropaso;
//*
//*********************** Revisa si la parte decimal posee punto
	for (i=0; i<numerodecimal.length ;i++ )
	{
		if (numerodecimal.charAt(i)==".")
		{
			cont++;
			if (cont>1)
			{
				alert ("Error n"+getcharesp(4)+"mero Incorrecto!");
				varcontrol.value="";
				varcontrol.focus();
				return (false);
			}
		}
	}
//**************************************************************************
	if (( (parseFloat(numeroentero+"."+numerodecimal)) > maximo) || ( (parseFloat(numeroentero+"."+numerodecimal)) < minimo) )
	{
		alert ("Ingrese Valores entre "+formateanumero(minimo,0,0)+"  y  "+formateanumero(maximo,0,0));
//		alert ("N"+getcharesp(4)+"mero fuera de rango "+formateanumero(maximo,0,0)+"  --  "+formateanumero(minimo,0,0));

	//	alert ("Numero fuera de rango "+minimo+ " - "+maximo);
		varcontrol.value="";
		varcontrol.focus();
		return (false);
	}
	varcontrol.value = formateanumero (numeroentero,numerodecimal,decimales);
}

/*
function validatecla ()
{
	var tecla= window.event

	alert ("tecla.keyCode "+tecla.keyCode);
	if (tecla.keyCode != 48 && tecla.keyCode != 49 && tecla.keyCode != 50 && tecla.keyCode != 51 && tecla.keyCode != 52 && tecla.keyCode != 53 && tecla.keyCode != 54 && tecla.keyCode != 55 && tecla.keyCode != 56 && tecla.keyCode != 57  && tecla.keyCode != 44)
	{
		if (tecla.keyCode==46)
		{
			tecla.keyCode=44;
		}
		else
		{
			tecla.keyCode=0;
		}
	}
}
*/
//***************************************

/////  formatea el numero, concatenando la parte entera 
////   con la decimal y agregandole puntos y coma donde corresponda
function formateanumero (numentero,numdecimal,decimales)
{
	if(numentero.length>3)
	{
		var contcero=0;
		var numenteropaso="";
		if(numentero==""||numentero==null)
		{
			return ("");
		}
		numentero = ""+numentero+"";
		//Elimina los ceros a la izquierda	
		for (i=0; i<numentero.length ;i++ )
		{		
			if (numentero.charAt(i) == "0" && contcero == 0)
			{
				numenteropaso += "";	
				if (numentero.length-1 == i)
				{
					numenteropaso=0;
				}
			}
			else
			{
				contcero ++;
				numenteropaso += numentero.charAt(i);
			}
		}
		numentero=numenteropaso;

	////////////////////////
		var restopuntos   = (numentero.length % 3);
		var contcar       = 0;
		var numconformato ="";

		if (numentero.length > 3)
		{
				switch (restopuntos)
				{
					case 0:
						if (numentero.length>3)
						{
							for (i=0; i<numentero.length ;i++ )
								{
									contcar++;
									numconformato +=numentero.charAt(i);
									if ((contcar/3==1) && (numentero.charAt(i+1)!=""))
									{
										numconformato +=".";
										contcar=0;
									}
								}
						}
						else
						{
							numconformato=numentero;
						}
					break;

					case 1:
						numconformato +=numentero.charAt(0) + ".";

						for (i=1; i< numentero.length ;i++ )
						{
							contcar++;
							numconformato +=numentero.charAt(i);
							if ((contcar/3==1) && (numentero.charAt(i+1)!=""))
							{
								numconformato +=".";
								contcar=0;
							}
						}
					break;

					default:
						numconformato +=numentero.charAt(0);
						numconformato +=numentero.charAt(1) + ".";
						for (i=2; i<numentero.length ;i++ )
						{
							contcar++;
							numconformato +=numentero.charAt(i);
							if ((contcar/3==1) && (numentero.charAt(i+1)!=""))
							{
								numconformato +=".";
								contcar=0;
							}
						}
				}
				if (decimales >0)
				{
					numconformato +=","+numdecimal;
				}
		}
		else
		{
			if (numdecimal !="")
			{
				numconformato = numentero + "," + numdecimal;
			}
			else
			{
				numconformato = numentero;
			}
		}
		return (numconformato);
	}
	else
	{
		return(numentero);
	}
}

//******************************************************

//onblur formatea numero entero(elimina ceros de la izquierda)
function formateanumeroentero() 
{
	var varcontrol=window.event.srcElement
	var numentero = varcontrol.value

	var numenteropaso ="";
	var contcero = 0;


	if (validastring(numentero,"0123456789")==true)
	{
		for (i=0; i<numentero.length ;i++ )
		{		
			if (numentero.charAt(i) == "0" && contcero == 0)
			{
				numenteropaso = "";	
				if (numentero.length-1 == i)
				{
					numenteropaso=0;					
				}
			}
			else
			{
				contcero ++;
				numenteropaso += numentero.charAt(i);
			}
		}
		varcontrol.value=numenteropaso;
	}
	else
	{
		alert ("Error n"+getcharesp(4)+"mero Incorrecto");
		varcontrol.value="";
		varcontrol.focus();
	}
}
//***************************************************

//onkeypress="valkeyarea('nombre', 100)"
function valkeyarea(tipo, longitud)
{
	var tecla = window.event
	var varcontrol=window.event.srcElement;
	var texto = varcontrol.value;

	if (texto.length>=longitud)
	{
		tecla.keyCode=0;		
		return;
	}
	valkey(tipo) ;
}
//*******************************************************
//onkeypress="valkeyarea('nombre', 100)"
function valkeyareaminuscula(tipo, longitud)
{
	var tecla = window.event
	var varcontrol=window.event.srcElement;
	var texto = varcontrol.value;

	if (texto.length>=longitud)
	{
		tecla.keyCode=0;		
		return;
	}
	valkeyminuscula(tipo) ;
}
//**********************************************
//elimina espacios en un textarea
function verificaespacion(objeto)
{
	var contaespacios=0;
	var strtxtotrocom=objeto.value.split("");

	for(var p=0;p<strtxtotrocom.length;p++)
	{
		if(strtxtotrocom[p]==" ")
		{
			contaespacios++;
		}
	}
	if(contaespacios==strtxtotrocom.length)
	{
			objeto.value="";
	}
}
function cambiodepagina(strurl,objeto,strpaginainvoca,objeto2)
{
	if(valida())	
	{
		objeto.value=transestructura();
		document.tra_agr.action=strurl+"?pagina="+strpaginainvoca;
		document.tra_agr.method="POST";
		historia(document.tra_agr.action);
		document.tra_agr.submit();
	}
	else
	{
		if(objeto2!=undefined)
		{
			objeto2.disabled=false;
		}
	}
	
}
function getcharesp(numero)
{
	var strget=txttilde.value;
	var arrstr=strget.split("");
	return(arrstr[numero]);
}

function getcharesp_car(numero)
{
	var strget=txtcaracteresespeciales.value;
	var arrstr=strget.split("");
	return(arrstr[numero]);
}

//retorna true si el texto tiene solo espacios en blanco
function esblanco(strtexto)
{
	var varcont=0;	
	for (var i=0;i<strtexto.length ; i++)
	{
		if (strtexto.charAt(i)==" " || strtexto.charAt(i)=="-" || strtexto.charAt(i)==".")
		{
			varcont++;
		}	
		else
		{
			return(false);
		}
	}
	if (varcont==strtexto.length && strtexto.length>0)
	{
		return(true);
	}
	else
	{
		return(false);
	}

}
function opencalendar(objeto)
{
	var objsel=eval(objeto)
	var fechaini=objsel.value;
	var strfecha = new Date();
	var strmes,strano;
	if(fechaini!="")
	{
		fechaini+="/";
		var arrfecha=fechaini.split("/");
		var arrmes=arrfecha[1].split("");;
		if(arrmes[0]=="0")
			strmes = arrmes[1];
		else
			strmes=arrfecha[1];
		strmes=parseInt(strmes)-1;
		strano= arrfecha[2];
	}
	javascript:show_calendar(objeto,strmes,strano);
}

function openfono()
{

	openWin("../discar/marcafono.asp?cbofono="+callphone.value+"&txtnombre="+document.tra_agr.txtnombre.value,7);
	//alert("P"+getcharesp(0)+"gina en Construcci"+getcharesp(3)+"n");
}

function openfono2()
{
	openWin("../discar/marcafono.asp?cbofono="+frmeme.callphone.value+"&txtnombre="+frmeme.nombre_phono.value,7);
}
function openfono3()
{
	openWin("../discar/marcafono.asp?cbofono="+frm_ofn.callphone.value+"&txtnombre="+frm_ofn.txtnombre.value,7);
}
function openfono4()
{

	openWin("../discar/marcafono.asp?cbofono="+frmcup.callphone.value+"&txtnombre="+frmcup.txtnombre.value,7);
}
// funcion que entrega la edad actual para una fecha de nacimiento entregada
	
function edadactual(fechanac)
	{
		var annos,annohoy,annonacimiento;
		var meses,meshoy,mesnacimiento;
		var dias,diahoy,dianacimiento;
		
		fechahoy=new Date()	;
		annohoy=fechahoy.getFullYear();
		meshoy=fechahoy.getMonth() + 1;
		diahoy=fechahoy.getDate();
	
		annonacimiento=fechanac.anno;
		mesnacimiento=fechanac.mes;
//mesnacimiento=fechanac.mes-1;
		dianacimiento=fechanac.dia;
		dias=Math.abs(diahoy-dianacimiento);
//dias=diahoy-dianacimiento
		if (dias < 0)
		{
			if (meshoy==0) meshoy=11;
			 else meshoy--;
			dias=(diahoy+DiasMes(meshoy)-dianacimiento);
		}
	
		meses=Math.abs(meshoy-mesnacimiento);
//meses=meshoy-mesnacimiento;
	
		if (meses < 0)
		{
			meses=meshoy+12-mesnacimiento;			
			annohoy--;
		}
		annos=annohoy-annonacimiento;
		if (annos==0) annos="00"
		if (dias<10) dias="0"+dias;
		if (meses<10) meses="0"+meses;
	    alert(annos);
		alert(meses);
		alert(dias);
		return (""+annos+meses+dias);	

	}
function getdiasan(an1, an2)
{
	var diasret=0;
	for(var i=an1+1;i<an2;i++)
	{
		if(i%4==0)
		{diasret+=365;}
		else
		{diasret+=364;}
	}
	return(diasret);
}

function getdiasmes(me1, me2,ann)
{
	var diasret=0;
	for(var i=me1;i<=me2;i++)
	{
		if(i==2)
		{
			if(ann%4==0)
			{diasret+=29;}
			else
			{diasret+=28;}
		}
		else if(i==1||i==3||i==5||i==7||i==8||i==12)
		{diasret+=31;}
		else
		{diasret+=30;}
	}
	return(diasret);
}

//diferencia de dias entre
function diasdiferen(fec1,fec2)
{
	var arrdes=fec1.split("/");
	var arrhas=fec2.split("/");
	if(arrdes.length==3&&arrhas.length==3)
	{
		var d1=0;
		var arrd1=arrdes[0].split("");
		if(arrd1[0]=="0")
			{d1=parseInt(arrd1[1]);}
		else
			{d1=parseInt(arrdes[0]);}

		var d2=0;
		var arrd2=arrhas[0].split("");
		if(arrd2[0]=="0")
			{d2=parseInt(arrd2[1]);}
		else
			{d2=parseInt(arrhas[0]);}

		var m1=0;
		var arrm1=arrdes[1].split("");
		if(arrm1[0]=="0")
			{m1=parseInt(arrm1[1]);}
		else
			{m1=parseInt(arrdes[1]);}

		var m2=0;
		var arrm2=arrhas[1].split("");
		if(arrm2[0]=="0")
			{m2=parseInt(arrm2[1]);}
		else
			{m2=parseInt(arrhas[1]);}

		var a1=parseInt(arrdes[2]);
		var a2=parseInt(arrhas[2]);

		var sfec1,sfec2
		sfec2=parseInt(arrhas[2]+arrhas[1]+arrhas[0]);
		sfec1=parseInt(arrdes[2]+arrdes[1]+arrdes[0]);
		if(sfec2>=sfec1)
		{
			if(a1==a2)
			{
				if(m1==m2)
				{
					dias=d2-d1;
				}
				else
				{
					dias=getdiasmes(m1,m2-1,a2);
					dias-=d1;
					dias+=d2;
				}
			}
			else
			{
				dias=getdiasan(a1,a2);
				dias+=getdiasmes(m1,12,a1);
				dias+=getdiasmes(1,m2-1,a2);
				dias-=d1;
				dias+=d2;
			}
			
			return (dias);
		}
		else
		{
			return(-1);
		}
	}
	return(-1);
}	
	function creafilawindowopen(objeto)
{
	if(objeto.value=="")
	{
			var strxml = xmlabrirtabla();
			strxml+= xmlabrirfila();
			strxml+=grabanodo();	
			strxml+= xmlcerrarfila() ;
			strxml+= xmlcerrartabla();
	}
	else
	{
			var strfila= xmlabrirfila();
			strfila+=grabanodo();
			strfila+= xmlcerrarfila() ;
			var strxml=xmladd(objeto.value,strfila);
	}
	objeto.value=strxml;
}

function muestrabotoneswindowopen()
{
	if(parseInt(indicesel)==(cont-1))
	{
		btnsiguiente.style.visibility="hidden"
	}
	else
	{
		btnsiguiente.style.visibility="visible"
	}
	if(parseInt(indicesel)==0)
	{
		btnanterior.style.visibility="hidden"
	}
	else
	{
		btnanterior.style.visibility="visible"
	}
}
function modificafilawindowopen(objeto1,objeto2,valor)
{
	var filaxml=grabanodo();
	var strretonoxml = xmledita (objeto1.value, valor, filaxml)

	if (existe(strretonoxml))
	{
		objeto1.value=strretonoxml;
		objeto2.value=valor;
	}
	else
	{
		return 0;
	}
}
function cargarwindowopen()
{
	if (xmlopen (indicexml))
	{
		if (xmlmovepos(parseInt(indicesel)))
		{
			cargaform();
		}
	}
}
function anteriorfilawindowopen()
{
	if(parseInt(indicesel)>0)
	{
		indicesel=parseInt(indicesel)-1;
		cargarwindowopen();
	}
}
function siguientefilawindowopen()
{
	if(parseInt(indicesel)<cont)
	{
		indicesel=parseInt(indicesel)+1;
		cargarwindowopen();
	}
}
//no incluir esta pagina en la historia del explorer
function historia(strpagina)
	{
	location.replace(strpagina); 
	if (window.event!=null)
		{
		window.event.returnValue=false; 
		window.event.cancelBubble=true;
		}
	}




//***************************************************************************************
function Comparar_Fecha(Obj1,Obj2,Formato) {
 // Obj1: objeto que contiene la primera fecha 
 // Obj2: objeto que contiene la segunda fecha 
   String1 = Obj1
   String2 = Obj2
   // Si los dia y los meses llegan con un valor menor que 10 
	// Se concatena un 0 a cada valor dentro del string  
	if (String1.substring(1,2)=="/") {
	  String1="0"+String1
	}
	if (String1.substring(4,5)=="/"){
	  String1=String1.substring(0,3)+"0"+String1.substring(3,9)
	}
	
	if (String2.substring(1,2)=="/") {
	  String2="0"+String2
	}
	if (String2.substring(4,5)=="/"){
	  String2=String2.substring(0,3)+"0"+String2.substring(3,9)
	 
	}
	
   if (Formato == "dma"){
		dia1=String1.substring(0,2);
		mes1=String1.substring(3,5);
		anyo1=String1.substring(6,10);
		dia2=String2.substring(0,2);
		mes2=String2.substring(3,5);
		anyo2=String2.substring(6,10);
   }

   if (Formato=="amd"){
   		dia1=String1.substring(8,10);
		mes1=String1.substring(5,7);
		anyo1=String1.substring(0,4);
		dia2=String2.substring(8,10);
		mes2=String2.substring(5,7);
		anyo2=String2.substring(0,4);
   }
   if (Formato == "mda"){
   		mes1=String1.substring(0,2);
		dia1=String1.substring(3,5);
		anyo1=String1.substring(6,10);
		mes2=String2.substring(0,2);
		dia2=String2.substring(3,5);
		anyo2=String2.substring(6,10);
   }
   
   if (dia1 == "08")	// parseInt("08") == 10		base octogonal
		dia1 = "8";
	if (dia1 == '09')	// parseInt("09") == 11		base octogonal
		dia1 = "9";
	if (mes1 == "08")	// parseInt("08") == 10		base octogonal
		mes1 = "8";
	if (mes1 == "09")	// parseInt("09") == 11		base octogonal
		mes1 = "9";
	if (dia2 == "08")	// parseInt("08") == 10		base octogonal
		dia2 = "8";
	if (dia2 == '09')	// parseInt("09") == 11		base octogonal
		dia2 = "9";
	if (mes2 == "08")	// parseInt("08") == 10		base octogonal
		mes2 = "8";
	if (mes2 == "09")	// parseInt("09") == 11		base octogonal
		mes2 = "9";
   dia1=parseInt(dia1);
   dia2=parseInt(dia2);
   mes1=parseInt(mes1);
   mes2=parseInt(mes2);
   anyo1=parseInt(anyo1);
   anyo2=parseInt(anyo2);
   
   
   if (anyo1>anyo2)
		{
		return false;
		}
	if ((anyo1==anyo2) && (mes1>mes2))
		{
		return false;
		}
	if ((anyo1==anyo2) && (mes1==mes2) && (dia1>dia2))
		{
		return false;
		}	  
					  
	 return true;

}
//***********************************************************************
//REPLACE
//***********************************************************************
function replacestring(strxml,stringval,stringrep)
{

	strxml+=stringval;
	var strxmlsp=strxml.split(stringval);
	var strreturn="";
	for(var i=0;i<strxmlsp.length;i++)
	{
		var reemp="";
		if(i<(strxmlsp.length-2))
		{
			reemp=stringrep;
		}
		strreturn+=strxmlsp[i]+reemp;
	}
	return(strreturn);

}

//cambiar corchetes a signos html '[' a '<' 
function converhtm(strtabla)
{

	var strreturn;
	strreturn=replacestring(strtabla,"[","<");
	strreturn=replacestring(strreturn,"]",">");
	return(strreturn);
}


//remplaza en el url [and] por &
function replaceurl(strurl)
{
	return(replacestring(strurl,"[and]","&"));
}

//retorna true si el campo tiene solo espacios en blanco
function valblanco(strcampo)
{
	var strtexto;
	strtexto=replacestring(strcampo," ","");
	if (strtexto.length==0)
	{
		return(true);
	}
	else
	{
		return(false);
	}
}

function quitapuntos(objeto)
{
	objeto.value=replacestring(objeto.value,".","");
}

function MM_swapImgRestore() { //v3.0
  var i,x,a=document.MM_sr; for(i=0;a&&i<a.length&&(x=a[i])&&x.oSrc;i++) x.src=x.oSrc;
}

function MM_preloadImages() { //v3.0
  var d=document; if(d.images){ if(!d.MM_p) d.MM_p=new Array();
    var i,j=d.MM_p.length,a=MM_preloadImages.arguments; for(i=0; i<a.length; i++)
    if (a[i].indexOf("#")!=0){ d.MM_p[j]=new Image; d.MM_p[j++].src=a[i];}}
}

function MM_findObj(n, d) { //v4.0
  var p,i,x;  if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
    d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
  if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
  for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
  if(!x && document.getElementById) x=document.getElementById(n); return x;
}

function MM_swapImage() { //v3.0
  var i,j=0,x,a=MM_swapImage.arguments; document.MM_sr=new Array; for(i=0;i<(a.length-2);i+=3)
   if ((x=MM_findObj(a[i]))!=null){document.MM_sr[j++]=x; if(!x.oSrc) x.oSrc=x.src; x.src=a[i+2];}
}

function acorta(texto)
{
	if(texto.length>65)
		return(texto.substring(0,65)+"...");
	else
		return(texto.substring(0,65));
	return(texto.substring(0,16)+"...");
}
function acorta_texto(texto,largo)
{
	if(texto.length>=largo)
		return(texto.substring(0,largo)+"...");
	else
		return(texto.substring(0,largo));
}

function calcular_edad(strfecha)
{ 
    var mes 
    var ano 
    var dia 
	var meshoy
	var anohoy
	var diahoy
	var edad=0
	var array_hoy=txtfecha_sistema.value.split("/");
	var array_fecha = strfecha.split("/") 
	if (array_hoy.length!=3) 
       return false 

    if (array_fecha.length!=3) 
       return false 

    anohoy = parseInt(array_hoy[2]); 
    meshoy = parseInt(array_hoy[1]); 
    diahoy = parseInt(array_hoy[0]); 

    ano = parseInt(array_fecha[2]); 
    mes = parseInt(array_fecha[1]); 
    dia = parseInt(array_fecha[0]); 

    if (isNaN(anohoy)) 
       return 0
    if (isNaN(meshoy)) 
       return 0
    if (isNaN(diahoy)) 
       return 0

    if (isNaN(ano)) 
       return 0
    if (isNaN(mes)) 
       return 0
    if (isNaN(dia)) 
       return 0

    if (ano<=99) 
       ano +=1900 

    edad=anohoy- ano - 1; //-1 porque no se si ha cumplido a隳s ya este a隳 

	if(meshoy==mes&&diahoy>=dia)
	{
		edad+=1;
	}
	else if(meshoy>mes)
	{
		edad+=1;
	}
	return edad
} 
function intervalos_fecha(strfecha_ini,strfecha)
{
	var arr_ini=strfecha_ini.split("/");
	var arr_ter=txtfecha_sistema.value.split("/");
	var arr_fec=strfecha.split("/");

	if (arr_ini.length!=3||arr_ter.length!=3||arr_fec.length!=3)
	{
		
	}
	var valini=arr_ini[2]+""+arr_ini[1]+""+arr_ini[0];
	var valter=arr_ter[2]+""+arr_ter[1]+""+arr_ter[0];
	var valfec=arr_fec[2]+""+arr_fec[1]+""+arr_fec[0];
	if(valfec>=valini&&valfec<=valter)
	{
		return true;
	}
	return false;
}

	/*EJEMPLO DE COMO LLAMAR LA FUNCION
	elimina caracteres no numericos y le antecede "$ " y permite solo 2 decimales
	<input type="text" onblur="formatstring(this,true,2)"/>
	elimina caracteres no numericos y no permite decimales
	<input type="text" onblur="formatstring(this,false,0)"/>

	*/
	function formatstring(objeto,boolmoenda,valdec)
	{
		var valor=objeto.value;
		var arrval=	valor.split(",");
		var arrstr=	arrval[0].split("");
		var strreturn="";
		var strdec="";
		var strtextok="0123456789"
		var strmoneda="";
		var contador=0;
		for (var i=0 ; i < arrval[0].length ; i++ )
		{
			for (var j=0 ; j < strtextok.length; j++ )
			{
				charc=strtextok.charCodeAt(j);
				if (charc==1121)
				{
					charc=209;
				}
				if ( arrval[0].charCodeAt(i) == charc )
				{
					strreturn+=arrstr[i];
					break;
				}
			}	
		}
		if( arrval.length>1)
		{
			arrstr=	arrval[1].split("");
			for (var i=0 ; i < arrval[1].length ; i++ )
			{
				for (var j=0 ; j < strtextok.length; j++ )
				{
					charc=strtextok.charCodeAt(j);
					if (charc==1121)
					{
						charc=209;
					}
					if ( arrval[1].charCodeAt(i) == charc )
					{
						strdec+=arrstr[i];
						break;
					}
				}	
			}
			arrstr=	strdec.split("");
			strdec="";
			for (var i=0 ; i < arrstr.length ; i++ )
			{
				if(contador<valdec)
				{
					strdec+=arrstr[i];
					contador++;
				}
				else
				{
					break;
				}
			}
		}
		if(boolmoenda==true){strmoneda="$ "}
		
		if(valdec>0&&strdec!="")
		{	
			objeto.value=strmoneda+formateanumero(strreturn,strdec,valdec)
		}
		else
		{
			objeto.value=strmoneda+formateanumero(strreturn,0,0)
		}
	}

function rellena_ceros(numero,cantidad)
{
	var intlargo=numero.length;
	var strnumero=String(numero)
	for (var i=intlargo; i<=cantidad;i++)
	{
		strnumero="0"+strnumero;
	}
	return(strnumero);
}
-->