<!--

function ltrim(sCadena)
{
for (var iCount = 0; iCount < sCadena.length && sCadena.charCodeAt(iCount) <= 32 ; iCount++);
return sCadena.substring(iCount, sCadena.length);
}

function rtrim(sCadena)
{
	for (var iCount = sCadena.length - 1; iCount >= 0 && sCadena.charCodeAt(iCount) <= 32 ; iCount--);
	return sCadena.substring(0, iCount + 1);
}

function trim(sCadena)
{
	return rtrim(ltrim(sCadena));
}

function parseVal(val)
{
	while (val.charAt(0) == '0')
		val = val.substring(1, val.length);
    return val;
}

function msg(obj,mensaje)
{
alert(mensaje);
obj.select();
obj.focus();
return(false);
}

function ValidarTexto( obj, min, sCampo, sOpcional)
{
	var strChrValidos = sOpcional;
	var sw = true;
	var i;
	var letra;
	var strValor = trim(obj.value);
	obj.value = strValor;

	if (strValor=='')
		return msg(obj, 'Debe ingresar un valor en el campo ' + sCampo);			
	if (min>0)
	{
		if (strValor.length<min)
			return msg(obj, 'Debe ingresar como minimo ' + min + ' en el campo ' + sCampo);		}

	for (i = 0; i < strValor.length; i++)
	{
		letra = strValor.substring(i,i+1);
		if (strChrValidos.indexOf(letra)==-1)
		{
			sw = false;
			break;
		}
	}

	if (!sw)
		return msg(obj,	'Caracter no valido en campo ' + sCampo);			
	return(true);
}

function dropspaces(cadena)
{
	var x=0, y=cadena.length-1;
	while(cadena.charAt(x)==" ") x++;	
	while(cadena.charAt(y)==" ") y--;	
	return cadena.substr(x, y-x+1);
}

function validaIngreso(valor)
{
	var reg=/(^[a-zA-Z0-9.@ ]{2,40}$)/;
	if(reg.test(valor)) return true;
	else return false;
}


var nav4 = window.Event ? true : false;
function acceptNum(evt){ 
// NOTE: Backspace = 8, Enter = 13, '0' = 48, '9' = 57 
var key = nav4 ? evt.which : evt.keyCode; 
return (key <= 13 || (key >= 48 && key <= 57));
}

function validar1(obj, min, sCampo)
{
//	var strChrValidos = sOpcional;
	var sw = true;
	var i;
	var letra;

	var strValor = trim(obj.value);
	obj.value = strValor;

	if (strValor=='')
		return msg(obj, 'Debe ingresar un valor en el campo ' + sCampo);			

	if (min>0)
	{
		if (strValor.length<min)
			return msg(obj, 'Debe ingresar como mímo ' + min + ' caracteres en el campo ' + sCampo);		}
		
	return(true);
}
//-->