function mtgetValue(tcObject)
{
var loObject
var lcValue

	loObject = new Object();
	lcValue = new String();
	
	loObject = window.document.all.item(tcObject)
	
	if (loObject.type == "checkbox")
	{
		lcValue = loObject.checked;
	}
	else
	{	
		lcValue = loObject.value;
	}
	
	return lcValue;
}

function mtgetObject(tcObject, toObjectoPadre)
{
var loObject

	loObject = new Object();

	if (toObjectoPadre == null)
	{
		loObject = window.document.all.item(tcObject)
	}
	else
	{
		loObject = getObjectInObject(toObjectoPadre, tcObject)
	}
	return loObject;
}

function validData() 
{
	var loElemento = new Object();
		
	loElemento = event.srcElement;
		
	llValido = false;
	
	if (loElemento.DataType == "NoType")
	{
		return true;
	}
	
	switch(loElemento.DataType.toUpperCase())
	{
		case "NUMERIC":
			validNumeric();
			break;
		case "DATE":
			//validDate();
			break;
	}
}

function validNumeric()
{
	var lcTexto = new String();
	var loElemento = new Object();
	var llValido = new Boolean();
	
	llValido = false;
	loElemento = event.srcElement;
	lcTexto = loElemento.value;
		
	switch(event.keyCode)
	{
		case 46:
		//Punto
		return true;
		break;
		
		case 44:
		//Coma
		return true;
		break;		
	}

	/*if (event.keyCode == 44)
	{
		//Punto decimal
		event.returnValue = false;
		lcTexto = lcTexto + ".";
		llValido = true;
	}*/
	
	if(llValido)
	{
		loElemento.value = lcTexto;
		return true;
	}
	
	if (event.keyCode >= 48 && event.keyCode <= 57)
	{
		llValido = true;
	}
	
	if (!llValido)
	{
		
		event.returnValue=false;
	}
}

function validDate()
{
	var lcTexto = new String();
	var loElemento = new Object();
	var llValido = new Boolean();
	
	llValido = false;
	loElemento = event.srcElement;
	lcTexto = loElemento.value;
//	alert(event.keyCode)
		
	switch(event.keyCode)
	{
		case 47:
		//Slash
		return true;
		break;
	}

	if (event.keyCode == 45)
	{
		//Guión
		event.returnValue = false;
		lcTexto = lcTexto + "/";
		llValido = true;
	}
	
	if(llValido)
	{
		//	alert(lcTexto);
		loElemento.value = lcTexto;
		return true;
	}
	
	if (event.keyCode >= 48 && event.keyCode <= 57)
	{
		llValido = true;
	}
		
	
	if (!llValido)
	{
		event.returnValue=false;
	}
}

// Programado por Rodrigo Zumbado Moreira
// Dada una cadena, reemplaza una subcadena por otra
function Replace(tsString, tsFind, tsReplacement)
{
var lnIndice, lcStr1, lcStr2, lnInicio, lcString
var lsString 
	lsString = new String();
	
	lsString = tsString;
	
	lnInicio = 0;
	lnIndice = lsString.indexOf(tsFind, lnInicio);
	
	while (lnIndice!=-1)
	{
		lcStr1 = lsString.substring(0,lnIndice);
		lcStr2 = lsString.substring(lnIndice + tsFind.length, lsString.length);
		lsString = lcStr1 + tsReplacement + lcStr2;
		lnInicio++;
		lnIndice = lsString.indexOf(tsFind, lnInicio);
	}
	
//	lcString = tsString
	return lsString
}

function PopUpDate(strControl)
{
	var strURL = "../Includes/calendar.aspx?CTRL=" + strControl;
	var loFecha
	
	window.open(strURL,"dp","toolbar=0,location=0,directories=0,status=0,menubar=0,scrollbars=0,resizable=0," + "width=220,height=190,left=" + (window.event.screenX - 16) + ",top=" + (window.event.screenY - 100));	
	return false;
}

function mtFormatFecha (tcFecha)
//Formatea un string como fecha valida
//Roy Barrantes A.
{
	var lcSeparador;
	lcSeparador='/';	
	if ((tcFecha.search(lcSeparador)== -1)&&(tcFecha.length > 5))
	{//toma un string y lo formatea como una fecha dd/mm/aaaa si es necesario
		lcMes = tcFecha.substr(0,2);
		lcDia = tcFecha.substr(2,2);
		lcAno = tcFecha.substr(4);
		if (lcAno.length == 2)
		{			
			lcAno = "20" + lcAno;
		}
		tcFecha=(lcMes+'/'+lcDia+'/'+lcAno);				
	}
	else if ((tcFecha.search(lcSeparador)!= -1)&&(tcFecha.length <= 8))
	{ //en caso de que el año se digite en 2 digitos lo convierte a 4
		lcFecha=tcFecha.substring(0,tcFecha.length-2);
		lcAno=tcFecha.slice(tcFecha.length-3,tcFecha.length);				
		if ((lcAno.search(lcSeparador)!= -1)&&(lcAno.search(lcSeparador)== 0))
		{
			lcAno = '20' + tcFecha.slice(tcFecha.length-2,tcFecha.length);
			tcFecha = lcFecha + lcAno;
		}
	}
	return tcFecha
}

function check_date(field)
{
	var ldFecha;
	var lcFecha = new String (field.value);
	var lnIndex1,lnIndex2;
	var lcDia, lcMes, lcAno;
	var lnDia, lnMes, lnAno;
	
	lcFecha = mtFormatFecha(lcFecha)
	
	lnIndex1 = lcFecha.indexOf("\/");
	lnIndex2 = lcFecha.lastIndexOf("\/");
	
	if(lcFecha.length == 0) return true;

	if (lnIndex1 == -1 || lnIndex1 == lnIndex2)
	{
		field.value = "";
		field.focus();
		return false;
	}

	lcMes = lcFecha.substring(0, lnIndex1);	
	lcDia = lcFecha.substring(lnIndex1+1, lnIndex2);
	lcAno = lcFecha.substring(lnIndex2 +1, lcFecha.length);
	
	if (lcAno.length == 2)
	{
		lcAno = "20" + lcAno;
	}
	
	lcFecha = lcMes + "/" + lcDia + "/" + lcAno
	ldFecha = new Date(lcMes + "/" + lcDia + "/" + lcAno);

	lnDia = ldFecha.getDate();
	lnMes = ldFecha.getMonth() + 1;
	lnAno = ldFecha.getFullYear();
	
	lcMes = lcMes.valueOf();
	lcDia = lcDia.valueOf();
	lcAno = lcAno.valueOf();

	if(lnDia != lcDia || lnMes != lcMes || lnAno != lcAno){
		field.value = "";
		field.focus();
		return false;
	}

	field.value =  lcMes + "/" + lcDia + "/" + lcAno;
	return true;
}

function validTime(field, type)
{
	if(type == "HOUR")
	{
		if(field.value > 12)
		{			
			field.value = "";
			field.focus();
		}
	}
	else if(type == "MIN")
	{
		if(field.value > 59)
		{
			field.value = "";
			field.focus();
		}	
	}
}

function mtQuitaFormatoNumero(tlcNumero, tnFormato)
{
	var lcNumero, lcSeparadorDec, lcSeparadorMil
	
	lcNumero = new String()
	
	lcNumero.replace()

	lcSeparadorDec = ".";
	lcSeparadorMil = ",";
	
	lcNumero = tlcNumero;
	lcSeparadorMil = ",";
	lcNumero = Replace(lcNumero, lcSeparadorMil, "");
	
	return lcNumero;
}

function check_number(field)
{
	var inStr
	var inLen
	var lnNumPuntos, lcPrefijo

	inStr = mtQuitaFormatoNumero(field.value,1);
	
    inLen = inStr.length;
    
    lnNumPuntos = 0
    lRetorno = true    
	for (var i=0; i<inLen; i++) {
		var ch = inStr.substring(i,i+1)
				
		if (ch < "0" || "9" < ch){
			if (ch == ","){
				lnNumPuntos = lnNumPuntos + 1;
				if (lnNumPuntos > 1)
				{
					field.value = "";
					field.focus();				
					lRetorno = false;
				}
			}
			else
			{
				field.value = "";
				field.focus();			
				lRetorno = false;
            }			
        }
    }
	return lRetorno	
}

function checkEmail(field)
{
    var eMailField = field;
    var eMailValue = "";

    eMailValue = eMailField.value;
	
	if (eMailValue.length == 0)
	{
		return true;
	}
	else if (!(/^\w+([\.-]?\w+)*@\w+([\.-]?\w+)*(\.\w{2,3})+$/.test(eMailValue)))
	{
		alert("Incorrect E-mail");
		field.focus();
	}	
}

function validMaxLength(object, maxLength)
{
      /*if (maxLength)
      {
            if (object.value.length > maxLength)
            {
                  object.value=object.value.substring(0,maxLength); 
                  object.focus;
            }
      }*/
}