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);

}

// isMail: devuelve verdadero si value es una direccion de correo valida
function isMail(value) {
    try
    {
        var pattern=new RegExp("\\w+([-+.]\\w+)*@\\w+([-.]\\w+)*\\.\\w+([-.]\\w+)*");
        return value.match(pattern);
    }
    catch(e)
    {
        return false;
    }
}
//Carga las Provincias de Chile dependiendo de la Región elegida
//el = elemento que contiene la llve a buscar
//ele = elemento donde colocar
function poneprovincias(el, ele, ele_aux){
	regiones = new Array();
	cual=el.options[el.selectedIndex].index;
	cual=cual;
	for(ciclo=ele.length; ciclo>=1; ciclo--){
		ele.options[ciclo]= null;
	}
	if(typeof(ele_aux)=='object') {
		ele_aux.length=1;
		ele_aux.options[0]= new Option('Seleccione', -1);
	}
	regiones[1]="1:Parinacota,2:aaaaa,3:Iquique";
	regiones[2]="4:Tocopilla,5:El Loa,6:Antofagasta";
	regiones[3]="7:Chañaral,8:Copiapo,9:Huasco";
	regiones[4]="10:Elqui,11:Limari,12:Choapa";
	regiones[5]="13:Petorca,14:San Felipe,15:Quillota,16:Los Andes,17:Valparaiso,18:San Antonio,19:Isla De Pascua";
	regiones[6]="20:Cachapoal,21:Cardenal Caro,22:Colchagua";
	regiones[7]="23:Curico,24:Talca,25:Cauquenes,26:Linares";
	regiones[8]="27:Ñuble,28:Concepcion,29:Bio Bio,30:Arauco";
	regiones[9]="31:Malleco,32:Cautin";
	regiones[10]="33:Valdivia,34:Osorno,35:Llanquihue,36:Chiloe,37:Palena";
	regiones[11]="38:Aisen,39:Coihaique,40:General Carrera,41:Capitan Prat";
	regiones[12]="42:Ultima Esperanza,43:Magallanes,44:Tierra Del Fuego,45:Antartica Chilena";
	regiones[13]="46:Chacabuco,47:Santiago,48:Cordillera,49:Melipilla,50:Talagante,51:Maipo";
	regiones[14]="52:Valdivia,53:Corral,54:Lanco,55:Los Lagos,56:Mafil,57:Paillaco";
	regiones[15]="58:Arica,59:Camarones,60:Putre,61:Genreal Lagos";
	regiones[16]="62:Otra";
	provincias = regiones[cual].split(",");
	largo = provincias.length;
	ele.options[0]= new Option('Seleccione', -1);
	for(ciclo=0; ciclo<largo; ciclo++){
		values = provincias[ciclo].split(":");
		ele.options[ciclo+1]= new Option(values[1], values[0]);
	}
}

//Carga las Comunas de Chile dependiendo de la Región elegida
function ponecomunas(){
	regiones = new Array();
	cual=document.formulario.region.options[document.formulario.region.selectedIndex].index;
	cual=cual+1;
	for(ciclo=document.formulario.comuna.length; ciclo>=1; ciclo--){
		document.formulario.comuna.options[ciclo]= null;
	}
	regiones[1]="Iquique,Camiña,Colchane,Huara,Pica,Pozo Almonte";
	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,Futrono,La Unión,Lago Ranco,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";
	regiones[14]="Valdivia,Corral,Lanco,Los Lagos,Mafil,Paillaco,Panguipulli,San José de la Mariquina";
	regiones[15]="Arica,Camarones,Putre,General Lagos";
	regiones[16]="Otra";
	comunas = regiones[cual].split(",");
	largo = comunas.length;
	for(ciclo=0; ciclo<largo; ciclo++){
		document.formulario.comuna.options[ciclo]= new Option(comunas[ciclo]);
	}
}
function habilita() {
			document.formulario.region.disabled=document.formulario.pais.options[formulario.pais.selectedIndex].value != "chile";
			document.formulario.comuna.disabled=document.formulario.pais.options[formulario.pais.selectedIndex].value != "chile";
	  
}

// 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-9][0-9][0-9][0-9]");
    var pattern2=new RegExp("^(0[0-9]|[1-2][0-9])/(0[0-9]|1[0-2])/[1-9][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;

}

// 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);
}

// 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;
}

/* Funcion Ponecomunas para formularios de quimica / Importar e Internar
// Carga las Comunas de Chile dependiendo de la Región elegida

function ponecomunas_importar(){
	regiones = new Array();
	cual=document.formulario.region_importador.options[document.formulario.region_importador.selectedIndex].index;
	cual=cual+1;
	for(ciclo=document.formulario.comuna_importador.length; ciclo>=1; ciclo--){
		document.formulario.comuna_importador.options[ciclo]= null;
	}
	regiones[1]="General Lagos,Putre,Arica,Camarones,Huara,Camiña,Colchane,Iquique,Pozo Almonte,Pica";
	regiones[2]="Tocopilla,Maria Elena,Calama,Ollagüe,San Pedro de Atacama,Mejillones,Sierra Gorda,Antofagasta,Tal tal";
	regiones[3]="Chañaral,Diego de Almagro,Caldera,Copiapo,Tierra Amarilla,Huasco,Vallenar,Freirina,Alto del Carmen";
	regiones[4]="La Higuera,Vicuña,La Serena,Coquimbo,Andacollo,Paiguano,Ovalle,Rio Hurtado,Punitaqui,Monte Patria,Combarbala,Canela,Illapel,Los Vilos,Salamanca";
	regiones[5]="Petorca,La Ligua,Cabildo,Papudo,Zapallar,Putaendo,Catemu,San Felipe,Santa Maria,Panquehue,Llaillay,Nogales,Calera,La Cruz,Quillota,Hijuelas,Limache,Olmue,San Esteban,Rinconada,Calle Larga,Los Andes,Puchuncavi,Juan Fernández,Quintero,Viña del Mar,Villa Alemana,Valparaíso,Quilpue,Casablanca,Con Con,Algarrobo,El Quisco,El Tabo,Cartagena,San Antonio,Santo Domingo,Isla de Pascua";
	regiones[6]="Mostazal,Graneros,Codegua,Rancagua,Machali,Las Cabras,Coltauco,Doñihue,Olivar,Coinco,Requinoa,Peumo,Quinta de Tilcoco,Pichidegua,San Vicente,Malloa,Rengo,Navidad,Litueche,La Estrella,Pichilemu,Marchihue,Paredones,Peralillo,Palmilla,San Fernando,San Fernando,Pumanque,Santa Cruz,Nancagua,Placilla,Lolol,Chepica,Chimbarongo,Colbun,Linares,Retiro,Longavi,Parral";
	regiones[7]="Teno,Vichuquen,Hualañe,Rauco,Curico,Romeral,Licanten,Sagrada Familia,Molina,Curepto,Río Claro,Constitución,Pencahue,Talca,Pelarco,San Clemente,Maule,Empedrado,San Rafael,Chanco,Cauquenes,Pelluhue,San Javier,Villa Alegre,Yerbas Buenas,";
	regiones[8]="Cobquecura,Quirihue,Ninhue,San Carlos,Ñiquen,San Fabián,San Nicolás,Treguaco,Portezuelo,Chillan,Coihueco,Coelemu,Ranquil,Pinto,Quillon,Bulnes,San Ignacio,El Carmen,Pemuco,Yungay,Chillan Viejo,Tome,Talcahuano,Penco,Florida,Concepción,Coronel,Hualqui,Lota,Santa Juana,San Pedro de la Paz,Chiguayante,San Rosendo,Yumbel,Cabrero,Laja,Los Ángeles,Tucapel,Antuco,Quilleco,Nacimiento,Negrete,Mulchen,Santa Bárbara,Quilaco,Arauco,Curanilahue,Lebu,Los Álamos,Cañete,Contulmo,Tirua";
	regiones[9]="Angol,Renaico,Collipulli,Puren,Los Sauces,Ercilla,Lonquimay,Lumaco,Traiguen,Victoria,Curacautín,Galvarino,Perquenco,Carahue,Nueva Imperial,Temuco,Lautaro,Vilcun,Melipeuco,Saavedra,Teodoro Schmidt,Freire,Cunco,Tolten ,Pitrufquen,Gorbea,Loncoche,Villarrica,Pucon,Curarrehue,Padre las Casas";
	regiones[10]="Mariquina,Lanco,Panguipulli,Mafil,Valdivia,Los Lagos,Corral,Paillaco,Futrono,La Unión,Lago Ranco,Río Bueno,San Juan de la Costa,San Pablo,Osorno,Puyehue,Rió Negro,Puerto Octay,Purranque,Fresia,Frutillar,Puerto Varas,Llanquihue,Los Muermos,Puerto Montt,Cochamo,Maullin,Calbuco,Ancud,Quemchi,Dalcahue,Castro,Curaco de Vélez,Quinchao,Chonchi,Puqueldon,Queilen,Quellon,Hualañe,Chaiten,Futaleufu,Palena";
	regiones[11]="Guaitecas,Cisnes,Aisen,Lago Verde,Coyhaique,Río Ibáñez,Chile Chico,Cochrane,Tortel,O´Higgins";
	regiones[12]="Natales,Torres del Paine,Laguna Blanca,San Gregorio,Rio Verde,Punta Arenas,Primavera,Porvenir,Timaukel,Cabo de Hornos,Antártica";
	regiones[13]="Tiltil,Colina,Lampa,Quilicura,Huechuraba,Lo Barnechea,Pudahuel,Renca,Conchali,Vitacura,Independencia,Recoleta,Las Condes,Cerro Navia,Quinta Normal,Providencia,Lo Prado,Estación Central,Santiago,Ñuñoa,La Reina,Maipú,Cerrillos,Lo Espejo,Pedro Aguirre Cerda,San Miguel,San Joaquín,Macul,Peñalolen,La Cisterna,San Ramón,La Granja,La Florida,El Bosque,La Pintana,San José de Maipú,Puente Alto,Pirque,Curacavi,Maria Pinto,Melipilla,San Pedro,Alhue,Peñaflor,El Monte,Talagante,Isla de Maipú,Padre Hurtado,Calera de Tango,San Bernardo,Buin,Paine";
	comunas = regiones[cual].split(",");
	largo = comunas.length;
	for(ciclo=0; ciclo<largo; ciclo++){
		document.formulario.comuna_importador.options[ciclo]= new Option(comunas[ciclo]);
	}
}

/* Funcion Ponecomunas para formularios de quimica / Exportar y expedir
// Carga las Comunas de Chile dependiendo de la Región elegida

function ponecomunas_exportar(){
	regiones = new Array();
	cual=document.formulario.region_exportador.options[document.formulario.region_exportador.selectedIndex].index;
	cual=cual+1;
	for(ciclo=document.formulario.comuna_exportador.length; ciclo>=1; ciclo--){
		document.formulario.comuna_exportador.options[ciclo]= null;
	}
	regiones[1]="General Lagos,Putre,Arica,Camarones,Huara,Camiña,Colchane,Iquique,Pozo Almonte,Pica";
	regiones[2]="Tocopilla,Maria Elena,Calama,Ollagüe,San Pedro de Atacama,Mejillones,Sierra Gorda,Antofagasta,Tal tal";
	regiones[3]="Chañaral,Diego de Almagro,Caldera,Copiapo,Tierra Amarilla,Huasco,Vallenar,Freirina,Alto del Carmen";
	regiones[4]="La Higuera,Vicuña,La Serena,Coquimbo,Andacollo,Paiguano,Ovalle,Rio Hurtado,Punitaqui,Monte Patria,Combarbala,Canela,Illapel,Los Vilos,Salamanca";
	regiones[5]="Petorca,La Ligua,Cabildo,Papudo,Zapallar,Putaendo,Catemu,San Felipe,Santa Maria,Panquehue,Llaillay,Nogales,Calera,La Cruz,Quillota,Hijuelas,Limache,Olmue,San Esteban,Rinconada,Calle Larga,Los Andes,Puchuncavi,Juan Fernández,Quintero,Viña del Mar,Villa Alemana,Valparaíso,Quilpue,Casablanca,Con Con,Algarrobo,El Quisco,El Tabo,Cartagena,San Antonio,Santo Domingo,Isla de Pascua";
	regiones[6]="Mostazal,Graneros,Codegua,Rancagua,Machali,Las Cabras,Coltauco,Doñihue,Olivar,Coinco,Requinoa,Peumo,Quinta de Tilcoco,Pichidegua,San Vicente,Malloa,Rengo,Navidad,Litueche,La Estrella,Pichilemu,Marchihue,Paredones,Peralillo,Palmilla,San Fernando,San Fernando,Pumanque,Santa Cruz,Nancagua,Placilla,Lolol,Chepica,Chimbarongo,Colbun,Linares,Retiro,Longavi,Parral";
	regiones[7]="Teno,Vichuquen,Hualañe,Rauco,Curico,Romeral,Licanten,Sagrada Familia,Molina,Curepto,Río Claro,Constitución,Pencahue,Talca,Pelarco,San Clemente,Maule,Empedrado,San Rafael,Chanco,Cauquenes,Pelluhue,San Javier,Villa Alegre,Yerbas Buenas,";
	regiones[8]="Cobquecura,Quirihue,Ninhue,San Carlos,Ñiquen,San Fabián,San Nicolás,Treguaco,Portezuelo,Chillan,Coihueco,Coelemu,Ranquil,Pinto,Quillon,Bulnes,San Ignacio,El Carmen,Pemuco,Yungay,Chillan Viejo,Tome,Talcahuano,Penco,Florida,Concepción,Coronel,Hualqui,Lota,Santa Juana,San Pedro de la Paz,Chiguayante,San Rosendo,Yumbel,Cabrero,Laja,Los Ángeles,Tucapel,Antuco,Quilleco,Nacimiento,Negrete,Mulchen,Santa Bárbara,Quilaco,Arauco,Curanilahue,Lebu,Los Álamos,Cañete,Contulmo,Tirua";
	regiones[9]="Angol,Renaico,Collipulli,Puren,Los Sauces,Ercilla,Lonquimay,Lumaco,Traiguen,Victoria,Curacautín,Galvarino,Perquenco,Carahue,Nueva Imperial,Temuco,Lautaro,Vilcun,Melipeuco,Saavedra,Teodoro Schmidt,Freire,Cunco,Tolten ,Pitrufquen,Gorbea,Loncoche,Villarrica,Pucon,Curarrehue,Padre las Casas";
	regiones[10]="Mariquina,Lanco,Panguipulli,Mafil,Valdivia,Los Lagos,Corral,Paillaco,Futrono,La Unión,Lago Ranco,Río Bueno,San Juan de la Costa,San Pablo,Osorno,Puyehue,Rió Negro,Puerto Octay,Purranque,Fresia,Frutillar,Puerto Varas,Llanquihue,Los Muermos,Puerto Montt,Cochamo,Maullin,Calbuco,Ancud,Quemchi,Dalcahue,Castro,Curaco de Vélez,Quinchao,Chonchi,Puqueldon,Queilen,Quellon,Hualañe,Chaiten,Futaleufu,Palena";
	regiones[11]="Guaitecas,Cisnes,Aisen,Lago Verde,Coyhaique,Río Ibáñez,Chile Chico,Cochrane,Tortel,O´Higgins";
	regiones[12]="Natales,Torres del Paine,Laguna Blanca,San Gregorio,Rio Verde,Punta Arenas,Primavera,Porvenir,Timaukel,Cabo de Hornos,Antártica";
	regiones[13]="Tiltil,Colina,Lampa,Quilicura,Huechuraba,Lo Barnechea,Pudahuel,Renca,Conchali,Vitacura,Independencia,Recoleta,Las Condes,Cerro Navia,Quinta Normal,Providencia,Lo Prado,Estación Central,Santiago,Ñuñoa,La Reina,Maipú,Cerrillos,Lo Espejo,Pedro Aguirre Cerda,San Miguel,San Joaquín,Macul,Peñalolen,La Cisterna,San Ramón,La Granja,La Florida,El Bosque,La Pintana,San José de Maipú,Puente Alto,Pirque,Curacavi,Maria Pinto,Melipilla,San Pedro,Alhue,Peñaflor,El Monte,Talagante,Isla de Maipú,Padre Hurtado,Calera de Tango,San Bernardo,Buin,Paine";
	comunas = regiones[cual].split(",");
	largo = comunas.length;
	for(ciclo=0; ciclo<largo; ciclo++){
		document.formulario.comuna_exportador.options[ciclo]= new Option(comunas[ciclo]);
	}
}
/*function habilita() {
			document.formulario.region_importador.disabled=document.formulario.pais.options[formulario.pais.selectedIndex].value != "chile";
			document.formulario.comuna_importador.disabled=document.formulario.pais.options[formulario.pais.selectedIndex].value != "chile";
	  
}*/

/* Registo

function ponecomunas_registro1(){
	regiones = new Array();
	cual=document.formulario.region.options[document.formulario.region.selectedIndex].index;
	cual=cual+1;
	for(ciclo=document.formulario.comuna.length; ciclo>=1; ciclo--){
		document.formulario.comuna.options[ciclo]= null;
	}
	regiones[1]="General Lagos,Putre,Arica,Camarones,Huara,Camiña,Colchane,Iquique,Pozo Almonte,Pica";
	regiones[2]="Tocopilla,Maria Elena,Calama,Ollagüe,San Pedro de Atacama,Mejillones,Sierra Gorda,Antofagasta,Tal tal";
	regiones[3]="Chañaral,Diego de Almagro,Caldera,Copiapo,Tierra Amarilla,Huasco,Vallenar,Freirina,Alto del Carmen";
	regiones[4]="La Higuera,Vicuña,La Serena,Coquimbo,Andacollo,Paiguano,Ovalle,Rio Hurtado,Punitaqui,Monte Patria,Combarbala,Canela,Illapel,Los Vilos,Salamanca";
	regiones[5]="Petorca,La Ligua,Cabildo,Papudo,Zapallar,Putaendo,Catemu,San Felipe,Santa Maria,Panquehue,Llaillay,Nogales,Calera,La Cruz,Quillota,Hijuelas,Limache,Olmue,San Esteban,Rinconada,Calle Larga,Los Andes,Puchuncavi,Juan Fernández,Quintero,Viña del Mar,Villa Alemana,Valparaíso,Quilpue,Casablanca,Con Con,Algarrobo,El Quisco,El Tabo,Cartagena,San Antonio,Santo Domingo,Isla de Pascua";
	regiones[6]="Mostazal,Graneros,Codegua,Rancagua,Machali,Las Cabras,Coltauco,Doñihue,Olivar,Coinco,Requinoa,Peumo,Quinta de Tilcoco,Pichidegua,San Vicente,Malloa,Rengo,Navidad,Litueche,La Estrella,Pichilemu,Marchihue,Paredones,Peralillo,Palmilla,San Fernando,San Fernando,Pumanque,Santa Cruz,Nancagua,Placilla,Lolol,Chepica,Chimbarongo,Colbun,Linares,Retiro,Longavi,Parral";
	regiones[7]="Teno,Vichuquen,Hualañe,Rauco,Curico,Romeral,Licanten,Sagrada Familia,Molina,Curepto,Río Claro,Constitución,Pencahue,Talca,Pelarco,San Clemente,Maule,Empedrado,San Rafael,Chanco,Cauquenes,Pelluhue,San Javier,Villa Alegre,Yerbas Buenas,";
	regiones[8]="Cobquecura,Quirihue,Ninhue,San Carlos,Ñiquen,San Fabián,San Nicolás,Treguaco,Portezuelo,Chillan,Coihueco,Coelemu,Ranquil,Pinto,Quillon,Bulnes,San Ignacio,El Carmen,Pemuco,Yungay,Chillan Viejo,Tome,Talcahuano,Penco,Florida,Concepción,Coronel,Hualqui,Lota,Santa Juana,San Pedro de la Paz,Chiguayante,San Rosendo,Yumbel,Cabrero,Laja,Los Ángeles,Tucapel,Antuco,Quilleco,Nacimiento,Negrete,Mulchen,Santa Bárbara,Quilaco,Arauco,Curanilahue,Lebu,Los Álamos,Cañete,Contulmo,Tirua";
	regiones[9]="Angol,Renaico,Collipulli,Puren,Los Sauces,Ercilla,Lonquimay,Lumaco,Traiguen,Victoria,Curacautín,Galvarino,Perquenco,Carahue,Nueva Imperial,Temuco,Lautaro,Vilcun,Melipeuco,Saavedra,Teodoro Schmidt,Freire,Cunco,Tolten ,Pitrufquen,Gorbea,Loncoche,Villarrica,Pucon,Curarrehue,Padre las Casas";
	regiones[10]="Mariquina,Lanco,Panguipulli,Mafil,Valdivia,Los Lagos,Corral,Paillaco,Futrono,La Unión,Lago Ranco,Río Bueno,San Juan de la Costa,San Pablo,Osorno,Puyehue,Rió Negro,Puerto Octay,Purranque,Fresia,Frutillar,Puerto Varas,Llanquihue,Los Muermos,Puerto Montt,Cochamo,Maullin,Calbuco,Ancud,Quemchi,Dalcahue,Castro,Curaco de Vélez,Quinchao,Chonchi,Puqueldon,Queilen,Quellon,Hualañe,Chaiten,Futaleufu,Palena";
	regiones[11]="Guaitecas,Cisnes,Aisen,Lago Verde,Coyhaique,Río Ibáñez,Chile Chico,Cochrane,Tortel,O´Higgins";
	regiones[12]="Natales,Torres del Paine,Laguna Blanca,San Gregorio,Rio Verde,Punta Arenas,Primavera,Porvenir,Timaukel,Cabo de Hornos,Antártica";
	regiones[13]="Tiltil,Colina,Lampa,Quilicura,Huechuraba,Lo Barnechea,Pudahuel,Renca,Conchali,Vitacura,Independencia,Recoleta,Las Condes,Cerro Navia,Quinta Normal,Providencia,Lo Prado,Estación Central,Santiago,Ñuñoa,La Reina,Maipú,Cerrillos,Lo Espejo,Pedro Aguirre Cerda,San Miguel,San Joaquín,Macul,Peñalolen,La Cisterna,San Ramón,La Granja,La Florida,El Bosque,La Pintana,San José de Maipú,Puente Alto,Pirque,Curacavi,Maria Pinto,Melipilla,San Pedro,Alhue,Peñaflor,El Monte,Talagante,Isla de Maipú,Padre Hurtado,Calera de Tango,San Bernardo,Buin,Paine";
	comunas = regiones[cual].split(",");
	largo = comunas.length;
	for(ciclo=0; ciclo<largo; ciclo++){
		document.formulario.comuna.options[ciclo]= new Option(comunas[ciclo]);
	}
}

/* Plantas

function ponecomunas_registro(){
	regiones = new Array();
	cual=document.formulario.region_plantas.options[document.formulario.region_plantas.selectedIndex].index;
	cual=cual+1;
	for(ciclo=document.formulario.comuna_plantas.length; ciclo>=1; ciclo--){
		document.formulario.comuna_plantas.options[ciclo]= null;
	}
	regiones[1]="General Lagos,Putre,Arica,Camarones,Huara,Camiña,Colchane,Iquique,Pozo Almonte,Pica";
	regiones[2]="Tocopilla,Maria Elena,Calama,Ollagüe,San Pedro de Atacama,Mejillones,Sierra Gorda,Antofagasta,Tal tal";
	regiones[3]="Chañaral,Diego de Almagro,Caldera,Copiapo,Tierra Amarilla,Huasco,Vallenar,Freirina,Alto del Carmen";
	regiones[4]="La Higuera,Vicuña,La Serena,Coquimbo,Andacollo,Paiguano,Ovalle,Rio Hurtado,Punitaqui,Monte Patria,Combarbala,Canela,Illapel,Los Vilos,Salamanca";
	regiones[5]="Petorca,La Ligua,Cabildo,Papudo,Zapallar,Putaendo,Catemu,San Felipe,Santa Maria,Panquehue,Llaillay,Nogales,Calera,La Cruz,Quillota,Hijuelas,Limache,Olmue,San Esteban,Rinconada,Calle Larga,Los Andes,Puchuncavi,Juan Fernández,Quintero,Viña del Mar,Villa Alemana,Valparaíso,Quilpue,Casablanca,Con Con,Algarrobo,El Quisco,El Tabo,Cartagena,San Antonio,Santo Domingo,Isla de Pascua";
	regiones[6]="Mostazal,Graneros,Codegua,Rancagua,Machali,Las Cabras,Coltauco,Doñihue,Olivar,Coinco,Requinoa,Peumo,Quinta de Tilcoco,Pichidegua,San Vicente,Malloa,Rengo,Navidad,Litueche,La Estrella,Pichilemu,Marchihue,Paredones,Peralillo,Palmilla,San Fernando,San Fernando,Pumanque,Santa Cruz,Nancagua,Placilla,Lolol,Chepica,Chimbarongo,Colbun,Linares,Retiro,Longavi,Parral";
	regiones[7]="Teno,Vichuquen,Hualañe,Rauco,Curico,Romeral,Licanten,Sagrada Familia,Molina,Curepto,Río Claro,Constitución,Pencahue,Talca,Pelarco,San Clemente,Maule,Empedrado,San Rafael,Chanco,Cauquenes,Pelluhue,San Javier,Villa Alegre,Yerbas Buenas,";
	regiones[8]="Cobquecura,Quirihue,Ninhue,San Carlos,Ñiquen,San Fabián,San Nicolás,Treguaco,Portezuelo,Chillan,Coihueco,Coelemu,Ranquil,Pinto,Quillon,Bulnes,San Ignacio,El Carmen,Pemuco,Yungay,Chillan Viejo,Tome,Talcahuano,Penco,Florida,Concepción,Coronel,Hualqui,Lota,Santa Juana,San Pedro de la Paz,Chiguayante,San Rosendo,Yumbel,Cabrero,Laja,Los Ángeles,Tucapel,Antuco,Quilleco,Nacimiento,Negrete,Mulchen,Santa Bárbara,Quilaco,Arauco,Curanilahue,Lebu,Los Álamos,Cañete,Contulmo,Tirua";
	regiones[9]="Angol,Renaico,Collipulli,Puren,Los Sauces,Ercilla,Lonquimay,Lumaco,Traiguen,Victoria,Curacautín,Galvarino,Perquenco,Carahue,Nueva Imperial,Temuco,Lautaro,Vilcun,Melipeuco,Saavedra,Teodoro Schmidt,Freire,Cunco,Tolten ,Pitrufquen,Gorbea,Loncoche,Villarrica,Pucon,Curarrehue,Padre las Casas";
	regiones[10]="Mariquina,Lanco,Panguipulli,Mafil,Valdivia,Los Lagos,Corral,Paillaco,Futrono,La Unión,Lago Ranco,Río Bueno,San Juan de la Costa,San Pablo,Osorno,Puyehue,Rió Negro,Puerto Octay,Purranque,Fresia,Frutillar,Puerto Varas,Llanquihue,Los Muermos,Puerto Montt,Cochamo,Maullin,Calbuco,Ancud,Quemchi,Dalcahue,Castro,Curaco de Vélez,Quinchao,Chonchi,Puqueldon,Queilen,Quellon,Hualañe,Chaiten,Futaleufu,Palena";
	regiones[11]="Guaitecas,Cisnes,Aisen,Lago Verde,Coyhaique,Río Ibáñez,Chile Chico,Cochrane,Tortel,O´Higgins";
	regiones[12]="Natales,Torres del Paine,Laguna Blanca,San Gregorio,Rio Verde,Punta Arenas,Primavera,Porvenir,Timaukel,Cabo de Hornos,Antártica";
	regiones[13]="Tiltil,Colina,Lampa,Quilicura,Huechuraba,Lo Barnechea,Pudahuel,Renca,Conchali,Vitacura,Independencia,Recoleta,Las Condes,Cerro Navia,Quinta Normal,Providencia,Lo Prado,Estación Central,Santiago,Ñuñoa,La Reina,Maipú,Cerrillos,Lo Espejo,Pedro Aguirre Cerda,San Miguel,San Joaquín,Macul,Peñalolen,La Cisterna,San Ramón,La Granja,La Florida,El Bosque,La Pintana,San José de Maipú,Puente Alto,Pirque,Curacavi,Maria Pinto,Melipilla,San Pedro,Alhue,Peñaflor,El Monte,Talagante,Isla de Maipú,Padre Hurtado,Calera de Tango,San Bernardo,Buin,Paine";
	comunas = regiones[cual].split(",");
	largo = comunas.length;
	for(ciclo=0; ciclo<largo; ciclo++){
		document.formulario.comuna_plantas.options[ciclo]= new Option(comunas[ciclo]);
	}
}

/* Anexo

function ponecomunas_anexo(){
	regiones = new Array();
	cual=document.formulario.anexo_region.options[document.formulario.anexo_region.selectedIndex].index;
	cual=cual+1;
	for(ciclo=document.formulario.anexo_comuna.length; ciclo>=1; ciclo--){
		document.formulario.anexo_comuna.options[ciclo]= null;
	}
	regiones[1]="General Lagos,Putre,Arica,Camarones,Huara,Camiña,Colchane,Iquique,Pozo Almonte,Pica";
	regiones[2]="Tocopilla,Maria Elena,Calama,Ollagüe,San Pedro de Atacama,Mejillones,Sierra Gorda,Antofagasta,Tal tal";
	regiones[3]="Chañaral,Diego de Almagro,Caldera,Copiapo,Tierra Amarilla,Huasco,Vallenar,Freirina,Alto del Carmen";
	regiones[4]="La Higuera,Vicuña,La Serena,Coquimbo,Andacollo,Paiguano,Ovalle,Rio Hurtado,Punitaqui,Monte Patria,Combarbala,Canela,Illapel,Los Vilos,Salamanca";
	regiones[5]="Petorca,La Ligua,Cabildo,Papudo,Zapallar,Putaendo,Catemu,San Felipe,Santa Maria,Panquehue,Llaillay,Nogales,Calera,La Cruz,Quillota,Hijuelas,Limache,Olmue,San Esteban,Rinconada,Calle Larga,Los Andes,Puchuncavi,Juan Fernández,Quintero,Viña del Mar,Villa Alemana,Valparaíso,Quilpue,Casablanca,Con Con,Algarrobo,El Quisco,El Tabo,Cartagena,San Antonio,Santo Domingo,Isla de Pascua";
	regiones[6]="Mostazal,Graneros,Codegua,Rancagua,Machali,Las Cabras,Coltauco,Doñihue,Olivar,Coinco,Requinoa,Peumo,Quinta de Tilcoco,Pichidegua,San Vicente,Malloa,Rengo,Navidad,Litueche,La Estrella,Pichilemu,Marchihue,Paredones,Peralillo,Palmilla,San Fernando,San Fernando,Pumanque,Santa Cruz,Nancagua,Placilla,Lolol,Chepica,Chimbarongo,Colbun,Linares,Retiro,Longavi,Parral";
	regiones[7]="Teno,Vichuquen,Hualañe,Rauco,Curico,Romeral,Licanten,Sagrada Familia,Molina,Curepto,Río Claro,Constitución,Pencahue,Talca,Pelarco,San Clemente,Maule,Empedrado,San Rafael,Chanco,Cauquenes,Pelluhue,San Javier,Villa Alegre,Yerbas Buenas,";
	regiones[8]="Cobquecura,Quirihue,Ninhue,San Carlos,Ñiquen,San Fabián,San Nicolás,Treguaco,Portezuelo,Chillan,Coihueco,Coelemu,Ranquil,Pinto,Quillon,Bulnes,San Ignacio,El Carmen,Pemuco,Yungay,Chillan Viejo,Tome,Talcahuano,Penco,Florida,Concepción,Coronel,Hualqui,Lota,Santa Juana,San Pedro de la Paz,Chiguayante,San Rosendo,Yumbel,Cabrero,Laja,Los Ángeles,Tucapel,Antuco,Quilleco,Nacimiento,Negrete,Mulchen,Santa Bárbara,Quilaco,Arauco,Curanilahue,Lebu,Los Álamos,Cañete,Contulmo,Tirua";
	regiones[9]="Angol,Renaico,Collipulli,Puren,Los Sauces,Ercilla,Lonquimay,Lumaco,Traiguen,Victoria,Curacautín,Galvarino,Perquenco,Carahue,Nueva Imperial,Temuco,Lautaro,Vilcun,Melipeuco,Saavedra,Teodoro Schmidt,Freire,Cunco,Tolten ,Pitrufquen,Gorbea,Loncoche,Villarrica,Pucon,Curarrehue,Padre las Casas";
	regiones[10]="Mariquina,Lanco,Panguipulli,Mafil,Valdivia,Los Lagos,Corral,Paillaco,Futrono,La Unión,Lago Ranco,Río Bueno,San Juan de la Costa,San Pablo,Osorno,Puyehue,Rió Negro,Puerto Octay,Purranque,Fresia,Frutillar,Puerto Varas,Llanquihue,Los Muermos,Puerto Montt,Cochamo,Maullin,Calbuco,Ancud,Quemchi,Dalcahue,Castro,Curaco de Vélez,Quinchao,Chonchi,Puqueldon,Queilen,Quellon,Hualañe,Chaiten,Futaleufu,Palena";
	regiones[11]="Guaitecas,Cisnes,Aisen,Lago Verde,Coyhaique,Río Ibáñez,Chile Chico,Cochrane,Tortel,O´Higgins";
	regiones[12]="Natales,Torres del Paine,Laguna Blanca,San Gregorio,Rio Verde,Punta Arenas,Primavera,Porvenir,Timaukel,Cabo de Hornos,Antártica";
	regiones[13]="Tiltil,Colina,Lampa,Quilicura,Huechuraba,Lo Barnechea,Pudahuel,Renca,Conchali,Vitacura,Independencia,Recoleta,Las Condes,Cerro Navia,Quinta Normal,Providencia,Lo Prado,Estación Central,Santiago,Ñuñoa,La Reina,Maipú,Cerrillos,Lo Espejo,Pedro Aguirre Cerda,San Miguel,San Joaquín,Macul,Peñalolen,La Cisterna,San Ramón,La Granja,La Florida,El Bosque,La Pintana,San José de Maipú,Puente Alto,Pirque,Curacavi,Maria Pinto,Melipilla,San Pedro,Alhue,Peñaflor,El Monte,Talagante,Isla de Maipú,Padre Hurtado,Calera de Tango,San Bernardo,Buin,Paine";
	comunas = regiones[cual].split(",");
	largo = comunas.length;
	for(ciclo=0; ciclo<largo; ciclo++){
		document.formulario.anexo_comuna.options[ciclo]= new Option(comunas[ciclo]);
	}
} */