// Autor          : Luis E. Cruz Campos

/*
 * Historial:
 * LCC.14012002 Agregadas funciones DayAdd, Str2Date, DateCmp
 * LCC.10012002 Agregadas funciones isDouble, isAlpha
 * LCC.04122001 Agregadas las funciones RTrim, LTrim, Trim, isModule11
 * LCC.22112001 Correción funcion email, no acepta "." en el usuario.
 */


// Empty: devuelve verdadero si value es vacio
function Empty(value) {

    var pattern=new RegExp("\^[ ]*$");
    return value.match(pattern);

}

// isInteger: devuelve verdero si value es un entero
function isInteger(value) {

    var pattern=new RegExp("^[0-9]+$");
    return value.match(pattern);

}

// isDouble: devuelve verdero si value es un double
function isDouble(value) {
    var pattern=new RegExp("^[0-9]+(\\.[0-9]+){0,1}$");
    return value.match(pattern);
}

// isMail: devuelve verdadero si value es una direccion de correo valida
function isMail(value) {
    var pattern=new RegExp("^([a-zA-Z0-9_\\-]+\\.{0,1})+@([a-zA-Z0-9_\\-]+\\.)+[a-zA-Z0-9_\\-]+$");
    return value.match(pattern);

}
function isDia(value) {

    var pattern1=new RegExp("^(0[0-9]|[1-2][0-9]|30|31)");
    var pattern2=new RegExp("^(0[0-9]|[1-2][0-9])");

    if (value.match(pattern1) || value.match(pattern2)) {
        if (parseInt(value.substr(6,4))%4!=0 && parseInt(value.substr(3,2))==2 && parseInt(value.substr(0,2))==29) {
            return false;
        } else return true;
    } else return false;

}
function isMes(value) {

    var pattern1=new RegExp("^(0[13-9]|1[0-2])");
    var pattern2=new RegExp("^(0[0-9]|1[0-2])");

    if (value.match(pattern1) || value.match(pattern2)) {
        if (parseInt(value.substr(6,4))%4!=0 && parseInt(value.substr(3,2))==2 && parseInt(value.substr(0,2))==29) {
            return false;
        } else return true;
    } else return false;

}
function isAnio(value) {

    var pattern1=new RegExp("^[1-2][0-9][0-9][0-9]");
    var pattern2=new RegExp("^[1-2][0-9][0-9][0-9]");

    if (value.match(pattern1) || value.match(pattern2)) {
        if (parseInt(value.substr(6,4))%4!=0 && parseInt(value.substr(3,2))==2 && parseInt(value.substr(0,2))==29) {
            return false;
        } else return true;
    } else return false;

}
// isDate: devuelve verdadero si value es una fecha valida en formato dd/mm/aaaa
function isDate(value) {

    var pattern1=new RegExp("^(0[0-9]|[1-2][0-9]|30|31)/(0[13-9]|1[0-2])/[1-2][0-9][0-9][0-9]");
    var pattern2=new RegExp("^(0[0-9]|[1-2][0-9])/(0[0-9]|1[0-2])/[1-2][0-9][0-9][0-9]");

    if (value.match(pattern1) || value.match(pattern2)) {
        if (parseInt(value.substr(6,4))%4!=0 && parseInt(value.substr(3,2))==2 && parseInt(value.substr(0,2))==29) {
            return false;
        } else return true;
    } else return false;

}

// isDate: devuelve verdadero si value es una fecha valida en formato dd/mm/aa
function isDate2(value) {

    var pattern1=new RegExp("^(0[0-9]|[1-2][0-9]|30|31)/(0[13-9]|1[0-2])/[0-9][0-9]");
    var pattern2=new RegExp("^(0[0-9]|[1-2][0-9])/(0[0-9]|1[0-2])/[0-9][0-9]");

    if (value.match(pattern1) || value.match(pattern2)) {
        if ((parseInt(value.substr(6,2))%4)+1900!=0 && parseInt(value.substr(3,2))==2 && parseInt(value.substr(0,2))==29) {
            return false;
        } else return true;
    } else return false;

}
function ponecomunas(){
	regiones = new Array();
	cual=document.form.region.options[document.form.region.selectedIndex].index;
	cual=cual+1;
	for(ciclo=document.form.ciudad.length; ciclo>=1; ciclo--){
		document.form.ciudad.options[ciclo]= null;
	}
	regiones[1]="Iquique,Camiña,Colchane,Huara,Pica,Pozo Almonte,Arica,Camarones,Putre,General Lagos";
	regiones[2]="Antofagasta,Mejillones,Sierra Gorda,Taltal,Calama,Ollagüe,San Pedro de Atacama,Tocopilla,María Elena,";
	regiones[3]="Copiapó,Caldera,Tierra Amarilla,Chañaral,Diego de Almagro,Vallenar,Alto del Carmen,Freirina,Huasco";
	regiones[4]="La Serena,Coquimbo,Andacollo,La Higuera,Paiguano,Vicuña,Illapel,Canela,Los Vilos,Salamanca,Ovalle,Combarbalá,Monte Patria,Punitaqui,Río Hurtado";
	regiones[5]="Valparaíso,Casablanca,Concón,Juan Fernández,Puchuncaví,Quilpué,Quintero,Villa Alemana,Viña del Mar,Isla de Pascua,Los Andes,Calle Larga,Rinconada,San Esteban,La Ligua,Cabildo,Papudo,Petorca,Zapallar,Quillota,Calera,Hijuelas,La Cruz,Limache,Nogales,Olmué,San Antonio,Algarrobo,Cartagena,El Quisco,El Tabo,Santo Domingo,San Felipe,Catemu,Llaillay,Panquehue,Putaendo,Santa María";
	regiones[6]="Rancagua,Codegua,Coinco,Coltauco,Doñihue,Graneros,Las Cabras,Machalí,Malloa,Mostazal,Olivar,Peumo,Pichidegua,Quinta de Tilcoco,Rengo,Requínoa,San Vicente,Pichilemu,La Estrella,Litueche,Marchihue,Navidad,Paredones,San Fernando,Chépica,Chimbarongo,Lolol,Nancagua,Palmilla,Peralillo,Placilla,Pumanque,Santa Cruz";
	regiones[7]="Talca,Constitución,Curepto,Empedrado,Maule,Pelarco,Pencahue,Río Claro,San Clemente,San Rafael,Cauquenes,Chanco,Pelluhue,Curicó,Hualañé,Licantén,Molina,Rauco,Romeral,Sagrada Familia,Teno,Vichuquén,Linares,Colbún,Longaví,Parral,Retiro,San Javier,Villa Alegre,Yerbas Buenas";
	regiones[8]="Concepción,Coronel,Chiguayante,Florida,Hualqui,Lota,Penco,San Pedro de la Paz,Santa Juana,Talcahuano,Tomé,Lebu,Arauco,Cañete,Contulmo,Curanilahue,Los Alamos,Tirúa,Los Angeles,Antuco,Cabrero,Laja,Mulchén,Nacimiento,Negrete,Quilaco,Quilleco,San Rosendo,Santa Bárbara,Tucapel,Yumbel,Chillán,Bulnes,Cobquecura,Coelemu,Coihueco,Chillán Viejo,El Carmen,Ninhue,Ñiquén,Pemuco,Pinto,Portezuelo,Quillón,Quirihue,Ránquil,San Carlos,San Fabián,San Ignacio,San Nicolás,Treguaco,Yungay";
	regiones[9]="Temuco,Carahue,Cunco,Curarrehue,Freire,Galvarino,Gorbea,Lautaro,Loncoche,Melipeuco,Nueva Imperial,Padre Las Casas,Perquenco,Pitrufquén,Pucón,Saavedra,Teodoro Schmidt,Toltén,Vilcún,Villarrica,Angol,Collipulli,Curacautín,Ercilla,Lonquimay,Los Sauces,Lumaco,Purén,Renaico,Traiguén,Victoria";
	regiones[10]="Puerto Montt,Calbuco,Cochamó,Fresia,Frutillar,Los Muermos,Llanquihue,Maullín,Puerto Varas,Castro,Ancud,Chonchi,Curaco de Vélez,Dalcahue,Puqueldón,Queilén,Quellón,Quemchi,Quinchao,Osorno,Puerto Octay,Purranque,Puyehue,Río Negro,San Juan de la Costa,San Pablo,Chaitén,Futaleufú,Hualaihué,Palena,Valdivia,Corral,Futrono,La Unión,Lago Ranco,Lanco,Los Lagos,Máfil,Mariquina,Paillaco,Panguipulli,Rio Bueno";
	regiones[11]="Coihaique,Lago Verde,Aysén,Cisnes,Guaitecas,Cochrane,O'Higgins,Tortel,Chile Chico,Río Ibáñez";
	regiones[12]="Punta Arenas,Laguna Blanca,Río Verde,San Gregorio,Navarino,Antártica,Porvenir,Primavera,Timaukel,Natales,Torres del Paine";
	regiones[13]="Santiago,Cerrillos,Cerro Navia,Conchalí,El Bosque,Estación Central,Huechuraba,Independencia,La Cisterna,La Florida,La Granja,La Pintana,La Reina,Las Condes,Lo Barnechea,Lo Espejo,Lo Prado,Macul,Maipú,Ñuñoa,Pedro Aguirre Cerda,Peñalolén,Providencia,Pudahuel,Quilicura,Quinta Normal,Recoleta,Renca,San Joaquín,San Miguel,San Ramón,Vitacura,Puente Alto,Pirque,San José de Maipo,Colina,Lampa,Tiltil,San Bernardo,Buin,Calera de Tango,Paine,Melipilla,Alhué,Curacaví,María Pinto,San Pedro,Talagante,El Monte,Isla de Maipo,Padre Hurtado,Peñaflor";
	ciudad = regiones[cual].split(",");
	largo = ciudad.length;
	for(ciclo=0; ciclo<largo; ciclo++){
		document.form.ciudad.options[ciclo]= new Option(ciudad[ciclo]);
	}
}

function ponecomunas2(){
	regiones = new Array();
	cual=document.form2.region.options[document.form2.region.selectedIndex].index;
	cual=cual+1;
	for(ciclo=document.form2.ciudad.length; ciclo>=1; ciclo--){
		document.form2.ciudad.options[ciclo]= null;
	}
	regiones[1]="Iquique,Camiña,Colchane,Huara,Pica,Pozo Almonte,Arica,Camarones,Putre,General Lagos";
	regiones[2]="Antofagasta,Mejillones,Sierra Gorda,Taltal,Calama,Ollagüe,San Pedro de Atacama,Tocopilla,María Elena,";
	regiones[3]="Copiapó,Caldera,Tierra Amarilla,Chañaral,Diego de Almagro,Vallenar,Alto del Carmen,Freirina,Huasco";
	regiones[4]="La Serena,Coquimbo,Andacollo,La Higuera,Paiguano,Vicuña,Illapel,Canela,Los Vilos,Salamanca,Ovalle,Combarbalá,Monte Patria,Punitaqui,Río Hurtado";
	regiones[5]="Valparaíso,Casablanca,Concón,Juan Fernández,Puchuncaví,Quilpué,Quintero,Villa Alemana,Viña del Mar,Isla de Pascua,Los Andes,Calle Larga,Rinconada,San Esteban,La Ligua,Cabildo,Papudo,Petorca,Zapallar,Quillota,Calera,Hijuelas,La Cruz,Limache,Nogales,Olmué,San Antonio,Algarrobo,Cartagena,El Quisco,El Tabo,Santo Domingo,San Felipe,Catemu,Llaillay,Panquehue,Putaendo,Santa María";
	regiones[6]="Rancagua,Codegua,Coinco,Coltauco,Doñihue,Graneros,Las Cabras,Machalí,Malloa,Mostazal,Olivar,Peumo,Pichidegua,Quinta de Tilcoco,Rengo,Requínoa,San Vicente,Pichilemu,La Estrella,Litueche,Marchihue,Navidad,Paredones,San Fernando,Chépica,Chimbarongo,Lolol,Nancagua,Palmilla,Peralillo,Placilla,Pumanque,Santa Cruz";
	regiones[7]="Talca,Constitución,Curepto,Empedrado,Maule,Pelarco,Pencahue,Río Claro,San Clemente,San Rafael,Cauquenes,Chanco,Pelluhue,Curicó,Hualañé,Licantén,Molina,Rauco,Romeral,Sagrada Familia,Teno,Vichuquén,Linares,Colbún,Longaví,Parral,Retiro,San Javier,Villa Alegre,Yerbas Buenas";
	regiones[8]="Concepción,Coronel,Chiguayante,Florida,Hualqui,Lota,Penco,San Pedro de la Paz,Santa Juana,Talcahuano,Tomé,Lebu,Arauco,Cañete,Contulmo,Curanilahue,Los Alamos,Tirúa,Los Angeles,Antuco,Cabrero,Laja,Mulchén,Nacimiento,Negrete,Quilaco,Quilleco,San Rosendo,Santa Bárbara,Tucapel,Yumbel,Chillán,Bulnes,Cobquecura,Coelemu,Coihueco,Chillán Viejo,El Carmen,Ninhue,Ñiquén,Pemuco,Pinto,Portezuelo,Quillón,Quirihue,Ránquil,San Carlos,San Fabián,San Ignacio,San Nicolás,Treguaco,Yungay";
	regiones[9]="Temuco,Carahue,Cunco,Curarrehue,Freire,Galvarino,Gorbea,Lautaro,Loncoche,Melipeuco,Nueva Imperial,Padre Las Casas,Perquenco,Pitrufquén,Pucón,Saavedra,Teodoro Schmidt,Toltén,Vilcún,Villarrica,Angol,Collipulli,Curacautín,Ercilla,Lonquimay,Los Sauces,Lumaco,Purén,Renaico,Traiguén,Victoria";
	regiones[10]="Puerto Montt,Calbuco,Cochamó,Fresia,Frutillar,Los Muermos,Llanquihue,Maullín,Puerto Varas,Castro,Ancud,Chonchi,Curaco de Vélez,Dalcahue,Puqueldón,Queilén,Quellón,Quemchi,Quinchao,Osorno,Puerto Octay,Purranque,Puyehue,Río Negro,San Juan de la Costa,San Pablo,Chaitén,Futaleufú,Hualaihué,Palena,Valdivia,Corral,Futrono,La Unión,Lago Ranco,Lanco,Los Lagos,Máfil,Mariquina,Paillaco,Panguipulli,Rio Bueno";
	regiones[11]="Coihaique,Lago Verde,Aysén,Cisnes,Guaitecas,Cochrane,O'Higgins,Tortel,Chile Chico,Río Ibáñez";
	regiones[12]="Punta Arenas,Laguna Blanca,Río Verde,San Gregorio,Navarino,Antártica,Porvenir,Primavera,Timaukel,Natales,Torres del Paine";
	regiones[13]="Santiago,Cerrillos,Cerro Navia,Conchalí,El Bosque,Estación Central,Huechuraba,Independencia,La Cisterna,La Florida,La Granja,La Pintana,La Reina,Las Condes,Lo Barnechea,Lo Espejo,Lo Prado,Macul,Maipú,Ñuñoa,Pedro Aguirre Cerda,Peñalolén,Providencia,Pudahuel,Quilicura,Quinta Normal,Recoleta,Renca,San Joaquín,San Miguel,San Ramón,Vitacura,Puente Alto,Pirque,San José de Maipo,Colina,Lampa,Tiltil,San Bernardo,Buin,Calera de Tango,Paine,Melipilla,Alhué,Curacaví,María Pinto,San Pedro,Talagante,El Monte,Isla de Maipo,Padre Hurtado,Peñaflor";
	ciudad = regiones[cual].split(",");
	largo = ciudad.length;
	for(ciclo=0; ciclo<largo; ciclo++){
		document.form2.ciudad.options[ciclo]= new Option(ciudad[ciclo]);
	}
}

// isDate3: Fecha Pasada en formato (dd/mm/aaaa)
function isDate3(value) {
    currentDate = new Date();
    if (isDate(value)) {
        fecha=value.substr(6,4)+value.substr(3,2)+value.substr(0,2);
        currentday = String(currentDate.getDate());
        currentmonth = String(currentDate.getMonth()+1);
        currentyear= String(currentDate.getFullYear());
        if (currentday.length==1) currentday="0"+currentday;
        if (currentmonth.length==1) currentmonth="0"+currentmonth;
        current = currentyear+currentmonth+currentday;
        return fecha < current;
    } else return false;
}

// isAlpha2: devuelve verdadero si la cadena contiene solo caracteres alfabeticos o espacios más acentos
function isAlpha2(value) {
	var pattern=new RegExp("^[á-úÁ-Úà-ùÀ-Ùa-zA-ZñÑ'\\-\\s]+$");
    return value.match(pattern);
}

// isAlpha: devuelve verdadero si la cadena contiene solo caracteres alfabeticos o espacios
function isAlpha(value) {
	var pattern=new RegExp("^[a-zA-ZñÑ'\\-\\s]+$");
    return value.match(pattern);
}

// isAlphaDigit: devuelve verdadero si la cadena contiene solo caracteres alfabeticos o numeros
function isAlphaDigit(value) {
	var pattern=new RegExp("^[a-zA-Z0-9]+$");
    return value.match(pattern);
}

// isModule11: devuelve verdadero si value es valido para el modulo 11
function isModule11(value) {
    var pattern=new RegExp("^(([0-9]{1,2}\\.[0-9]{3}\\.[0-9]{3})|([0-9]{7,8}))\\-([0-9K])$", "i");
    var pattern_point=new RegExp("\\.", "g");
    var pattern_dv=new RegExp("([0-9]+)\\-([0-9K])", "i");

    value=Trim(value);
    if (value.match(pattern)) {
        value=value.replace(pattern_point, "");
        if (value.match(pattern_dv)) {
            number=new String(RegExp.$1);
            dv=new String(RegExp.$2);
            sum = 0;
            mul = 2;
            for (i = number.length - 1 ; i >= 0; i--) {
                sum += number.charAt(i) * mul;
                mul == 7 ? mul = 2:mul++;
            }
            rest = sum % 11;
            if (rest == 1) dvr = 'K';
            else if (rest == 0) dvr = '0';
            else  {
                dvr = 11-rest;
            }
            return dvr==dv.toUpperCase();
        }
    }
}

// LTrim: Quita espacios en blanco a la izquerda de una cadena
function LTrim(value) {
    var pattern=new RegExp("^\\s+", "g")
    return value.replace(pattern, "");
}

// RTrim: Quita espacios en blanco a la derecha de una cadena
function RTrim(value) {
    var pattern=new RegExp("\\s+$", "g")
    return value.replace(pattern, "");
}

// Trim: Quita espacios en blanco a la derecha y a la izquierda de una cadena
function Trim(value) {
    return RTrim(LTrim(value));
}

/**
* Str2Date: Convierte un valor string en formato dd/mm/aaaa a fecha
*/
function Str2Date(sDate) {
	
	if (!isDate(sDate)) return;	
	sDate = new String(sDate);
		
	aDate = new Array();
	aDate = sDate.split('/');
		
	return new Date(aDate[2], aDate[1]-1, aDate[0], 0, 0,0 );
		
}
	
/**
* DateCmp(A, B): Compara dos fechas devuelve 0=iguales, 1=A>B, -1=B>A
*/
function DateCmp(dDateA, dDateB) {	

	if (dDateA.getTime() == dDateB.getTime()) return 0;
	if (dDateA.getTime() > dDateB.getTime()) return 1;
	else return -1;
		
}
	
/**
* DayAdd(dDate, iDays): Suma (o resta) dias a una fecha dada
*/
function DayAdd(dDate, iDays) {	
	dDate.setTime(dDate.getTime()+iDays*24*60*60*1000);	
	return dDate;
}

function IsRut(theRut)
{
	rut = theRut;
	var tmpstr = "";
	largo = rut.length;
	for ( i=0; i < largo; i++ )
		if ( rut.charAt(i) != ' ' && rut.charAt(i) != '.' && rut.charAt(i) != '-' )
			tmpstr = tmpstr + rut.charAt(i);
	rut = tmpstr;
	largo = rut.length;
	if ( largo < 2 )
	{
		return false;
	}

	for (i=0; i < largo ; i++ )
	{ 
		if ( rut.charAt(i) !="0" && rut.charAt(i) != "1" && rut.charAt(i) !="2" && rut.charAt(i) != "3" && rut.charAt(i) != "4" && rut.charAt(i) !="5" && rut.charAt(i) != "6" && rut.charAt(i) != "7" && rut.charAt(i) !="8" && rut.charAt(i) != "9" && rut.charAt(i) !="k" && rut.charAt(i) != "K" )
		{
			return false;
		}
	}
	var dtexto = "";
	cnt = 0;
	for ( i=largo-1, j=largo-1+3; i>=0; i--, j-- )
	{
		if ( cnt == 3 )
		{
			dtexto = rut.charAt(i) + dtexto;
			dtexto = '.' + dtexto;
			cnt = 1;
		}
		else
		{ 
			dtexto = rut.charAt(i) + dtexto;
			if( cnt == 0 )
				dtexto = '-' + dtexto;
			cnt++;
		}
	}
	return checkDV(rut);
}

function checkDV( crut )
{
	largo = crut.length;
	if ( largo > 2 )
		rut = crut.substring(0, largo - 1);
	else
		rut = crut.charAt(0);
	dv = crut.charAt(largo-1);
	if ( rut == null || dv == null )
		return 0;
	var dvr = '0';
	suma = 0;
	mul  = 2;
	for (i = rut.length - 1 ; i >= 0; i--)
	{
		suma += rut.charAt(i) * mul;
		if (mul == 7)
			mul = 2;
		else    
			mul++;
	}
	res = suma % 11;
	if (res == 1)
		dvr = 'k';
	else if (res == 0)
		dvr = '0';
	else
	{
		dvi = 11-res;
		dvr = dvi + "";
	}
	if ( dvr != dv.toLowerCase() )
		return false;

	return true;
}
// otros destinos
function check_destino(valor){
        if (valor=="OTHER") {

        window.open ("destinos_form.html","OtrosDestinos","width=200,height=100");
        }

}

// Devuelve verdadero si los caracteres ingresados corresponden a numeros.
function solonum(valor) {
	valor=valor.toUpperCase();
	for(var i=0;i<valor.length;i++){
		var c=valor.charAt(i);
		if(!((c>='0')&&(c<='9'))) return false;
	}
	return true;
}