/*  
	Modificado y arreglado por Miguel Alejandro Flórez 
	Webmaster
	Indexcol Ltda.
	mflorez@indexcol.com.co
--------------------------------------------------------------------------------------------------
	Funciones que manejan el doble drop-down para escoger departamento y ciudad de Colombia
	Para usarlos adicione en su pagina dos drop-downs con el nombre que desee.
	En el tag de body adicione esta linea:
		onLoad="CargaEstados(document.formulario1.Departamento)"
	en donde Departamento es el nombre del campo en donde quiere que aparezcan los departamentos.
	
	En el tag select de los departamentos adicione la siguiente linea:
		onChange="CargaCiudades(document.formulario1.Departamento.options[document.formulario1.Departamento.selectedIndex].value, document.formulario1.Municipio)"
	en donde ciudad es el nombre del campo en donde quiere que aparezcan las ciudades.
----------------------------------------------------------------------------------------------------*/

function CambioDePais(pais)
{
if(pais == 'Colombia')
	{
	CargaEstados(document.formulario1.Departamento);
	}
else
	{
	objEstado = document.formulario1.Departamento;
	objCity = document.formulario1.Municipio;
	var numEstados;
	var j,k=1;
	E19=["Seleccione uno ...!Seleccione uno ..."," ! "];
	numEstados=100;
	objEstado.length=numEstados;

	numEstados=E19.length;
	for(j=0;j< numEstados;j++)
		{
		//alert(k);
		objEstado.options[k].value=cEst(E19[j]);
		objEstado.options[k].text=nEst(E19[j]);
		k++;
		}
	objEstado.selectedIndex=0;
	objEstado.length=numEstados+1;
////////////////////////////////////////////////////////////////////////////////////////////////
	k=0;
	E19=["Seleccione uno ...!Seleccione uno ..."," ! "," ! "," ! "," ! "," ! "," ! "," ! "," ! "," ! "," ! "," ! "];
	numEstados=100;
	objCity.length=numEstados;

	numEstados=E19.length;
	for(j=0;j< numEstados;j++)
		{
		objCity.options[k].value=cEst(E19[j]);
		objCity.options[k].text=nEst(E19[j]);
		k++;
		}
	objCity.selectedIndex=0;
	objCity.length=numEstados+1;
	}
}

function nEst(tupla){return tupla.substring(tupla.indexOf('!')+1,tupla.length)}

function cEst(tupla){return tupla.substring(0,tupla.indexOf('!'))}

function CargaEstados(objEstado){

var numEstados;

var j,k=1;

E19=["Amazonas!Amazonas","Antioquia!Antioquia","Arauca!Arauca","Atlantico!Atlántico","Bolivar!Bolivar","Boyaca!Boyaca","Caldas!Caldas","Caqueta!Caqueta","Casanare!Casanare","Cauca!Cauca","Cesar!César","Choco!Choco","Cordoba!Córdoba","Cundinamarca!Cundinamarca","Guainia!Guainia","Guaviare!Guaviare","Huila!Huila","Guajira!La Guajira","Magdalena!Magdalena","Meta!Meta","Narino!Narino","Nortesantander!Norte de Santander","Putumayo!Putumayo","Quindio!Quindio","Risaralda!Risaralda","Sanandres!San Andrés y Providencia","Santander!Santander","Sucre!Sucre","Tolima!Tolima","Valle!Valle del Cauca","Vaupes!Vaupes","Vichada!Vichada"];

numEstados=200;
objEstado.length=numEstados;

numEstados=E19.length;
for(j=0;j< numEstados;j++)
	{
	objEstado.options[k].value=cEst(E19[j]);
	objEstado.options[k].text=nEst(E19[j]);
	k++;
	}

objEstado.selectedIndex=0;
objEstado.length=numEstados+1;
}

function CargaCiudades(codEstado,objCity){
 var numCiudades=0;
 var j=1;
 var k=0;
 CVichada=["Puerto Carreño","La Primavera","Santa Rosalia","Cumaribo"];
 CVaupes=["Mitu","Caruru","Pacoa (Cd)","Villa Fatima","Taraira","Papunahua (Cd)","Yavarate (Cd)"];
 CValle=["Cali","Alcala","Andalucia","Ansermanuevo","Argelia","Bolivar","Buenaventura","Buga","Bugalagrande","Caicedonia","Darien","Candelaria","Cartago","Dagua","El Aguila","El Cairo","El Cerrito","El Dovio","Florida","Ginebra","Guacari","Jamundi","La Cumbre","La Union","La Victoria","Obando","Palmira","Pradera","Restrepo","Riofrio","Roldanillo","San Pedro","Sevilla","Toro","Trujillo","Tulua","Ulloa","Versalles","Vijes","Yotoco","Yumbo","Zarzal"];
 CTolima=["Ibague","Alpujarra","Alvarado","Ambalema","Anzoategui","Armero","Ataco","Cajamarca","Carmen De Apicala","Casabianca","Chaparral","Coello","Coyaima","Cunday","Dolores","Espinal","Falan","Flandes","Fresno","Guamo","Herveo","Honda","Icononzo","Lerida","Libano","Mariquita","Melgar","Murillo","Natagaima","Ortega","Palocabildo","Piedras","Planadas","Prado","Purificacion","Rioblanco","Roncesvalles","Rovira","Saldaña","San Antonio","San Luis","Santa Isabel","Suarez","Valle De San Juan","Venadillo","Villahermosa","Villarrica"];
 CSucre=["Sincelejo","Buenavista","Caimito","Ricaurte","Corozal","Chalan","Galerias","Guaranda","La Union","Los Palmitos","Majagual","Morroa","Ovejas","Palmito","Sampues","San Benito Abad","San Juan De Betulia","San Marcos","San Onofre","San Pedro","Since","Sucre","Tolu","Toluviejo"];
 CSantander=["Bucaramanga","Aguada","Albania","Aratoca","Barbosa","Barichara","Barrancabermeja","Betulia","Bolivar","Cabrera","California","Capitanejo","Carcasi","Cepita","Cerrito","Charala","Charta","Chima","Chipata","Cimitarra","Concepcion","Confines","Contratacion","Coromoro","Curiti","El Carmen De Chucuri","El Guacamayo","El Peñon","El Playon","Encino","Enciso","Florian","Floridablanca","Galan","Gambita","Giron","Guaca","Guadalupe","Guapota","Guavata","Guepsa","Hato","Jesus Maria","Jordan","La Belleza","Landazuri","La Paz","Lebrija","Los Santos","Macaravita","Malaga","Matanza","Mogotes","Molagavita","Ocamonte","Oiba","Onzaga","Palmar","Palmas Socorro","Paramo","Piedecuesta","Pinchote","Puente Nacional","Puerto Parra","Puerto Wilches","Rionegro","Sabana De Torres","San Andres","San Benito","San Gil","San Joaquin","San Jose De Miranda","San Miguel","San Vicente Chucuri","Santa Barbara","Santa Helena Del Opon","Simacota","Socorro","Suaita","Sucre","Surata","Tona","Valle De San Jose","Velez","Vetas","Villanueva","Zapatoca"];
 CSanandres=["San Andres","Providencia"];
 CRisaralda=["Pereira","Apia","Balboa","Belen De Umbria","Dosquebradas","Guatica","La Celia","La Virginia","Marsella","Mistrato","Pueblo Rico","Quinchia","Santa Rosa De Cabal","Santuario"];
 CQuindio=["Armenia","Buenavista","Calarca","Circasia","Cordoba","Filandia","Genova","La Tebaida","Montenegro","Pijao","Quimbaya","Salento"];
 CPutumayo=["Mocoa","Colon","Orito","Puerto Asis","Puerto Caicedo","Puerto Guzman","Puerto Leguizamo","Sibundoy","San Francisco","San Miguel","Santiago","Valle Del Gaumez","Villagarzon"];
 CNortesantander=["Cucuta","Abrego","Arboledas","Bochalema","Bucarasica","Cacota","Cachira","Chinacota","Chitaga","Convencion","Cucutilla","Durania","El Carmen","El Tarra","El Zulia","Gramalote","Hacari","Herran","Labateca","La Esperanza","La Playa","Los Patios","Lourdes","Mutiscua","Ocaña","Pamplona","Pamplonita","Puerto Santander","Ragonvalia","Salazar","San Calixto","San Cayetano","Santiago","Sardinata","Silos","Teorama","Tibu","Toledo","Villa Caro","Villa Del Rosario"];
 CNarino=["Bucaramanga","Aguada","Albania","Aratoca","Barbosa","Barichara","Barrancabermeja","Betulia","Bolivar","Cabrera","California","Capitanejo","Carcasi","Cepita","Cerrito","Charala","Charta","Chima","Chipata","Cimitarra","Concepcion","Confines","Contratacion","Coromoro","Curiti","El Carmen De Chucuri","El Guacamayo","El Peñon","El Playon","Encino","Enciso","Florian","Floridablanca","Galan","Gambita","Giron","Guaca","Guadalupe","Guapota","Guavata","Guepsa","Hato","Jesus Maria","Jordan","La Belleza","Landazuri","La Paz","Lebrija","Los Santos","Macaravita","Malaga","Matanza","Mogotes","Molagavita","Ocamonte","Oiba","Onzaga","Palmar","Palmas Socorro","Paramo","Piedecuesta","Pinchote","Puente Nacional","Puerto Parra","Pasto","Alban","Aldana","Ancuya","Arboleda","Barbacoas","Belen","Buesaco","Colon","Consaca","Contadero","Cordoba","Cuaspud","Cumbal","Cumbitara","Chachagui","El Charco","El Rosario","El Tablon","El Tambo","Funes","Guachucal","Guaitarilla","Gualmatan","Iles","Imues","Ipiales","La Cruz","La Florida","La Llanada5","La Tola","La Union","Leiva","Linares","Los Andes","Magui","Mallama","Mosquera","Olaya Herrera","Ospina","Francisco Pizarro","Policarpa","Potosi","Providencia","Puerres","Pupiales","Ricaurte","Roberto Payan","Samaniego","Sandona","San Bernardo","San Lorenzo","San Pablo","San Pedro De Cartag","Santa Barbara","Santacruz","Sapuyes","Taminango","Tangua","Tumaco","Tuquerres","Yacuanquer","El Peñol"];
 CMeta=["Villavicencio","Acacias","Barranca De Upia","Cabuyaro","Castilla La Nueva","San Luis De Cubarral","Cumaral","El Calvario","El Castillo","El Dorado","Fuente De Oro","Granada","Guamal","Mapiripan","Mesetas","La Macarena","La Uribe","Lejanias","Puerto Concordia","Puerto Gaitan","Puerto Lopez","Puerto Lleras","Puerto Rico","Restrepo","San Carlos De Guaroa","San Juan De Arama","San Juanito","San Martin","Vistahermosa"];
 CMagdalena=["Santa Marta","Algarrobo","Aracataca","Ariguaní","Cerro San Antonio","Chivolo","Cienaga","Concordia","El Banco","El Piñon","El Reten","Fundacion","Guamal","Pedraza","Pijiño Del Carmen","Pivijay","Plato","Puebloviejo","Remolino","Sabanas De San Angel","Salamina","San Sebastian De Buenavista","San Zenon","Santa Ana","Sitionuevo","Tenerife","Zona Bananera"];
 CGuajira=["Riohacha","Barrancas","Dibulla","Distraccion","El Molino","Fonseca","Hatonuevo","La Jagua Del Pilar","Maicao","Manaure","San Juan Del Cesar","Uribia","Urumita","Villanueva"];
 CHuila=["Neiva","Acevedo","Agrado","Aipe","Algeciras","Altamira","Baraya","Campoalegre","Colombia","Elias","Garzon","Gigante","Guadalupe","Hobo","Iquira","Isnos","La Argentina","La Plata","Nataga","Oporapa","Paicol","Palermo","Palestina","Pital","Pitalito","Rivera","Saladoblanco","San Agustin","Santa Maria","Suaza","Tarqui","Tesalia","Tello","Teruel","Timana","Villavieja","Yaguara"];
 CGuaviare=["San Jose Del Guaviare","Calamar","El Retorno","Miraflores"];
 CGuainia=["Inirida","Barranco Minas","San Felipe","Puerto Colombia","La Guadalupe","Cacahual","Pana Pana","Morichal Nuevo"];
 CCundinamarca=["Agua De Dios","Alban","Anapoima","Anolaima","Arbelaez","Beltran","Bituima","Bogota","Bojaca","Cabrera","Cachipay","Cajica","Caparrapi","Caqueza","Carmen De Carupa","Chaguani","Chia","Chipaque","Choachi","Choconta","Cogua","Cota","Cucunuba","El Colegio","El Peñon","El Rosal","Facatativa","Fomeque","Fosca","Funza","Fuquene","Fusagasuga","Gachala","Gachancipa","Gacheta","Gama","Girardot","Granada","Guacheta","Guaduas","Guasca","Guataqui","Guatavita","Guayabal De Siquima","Guayabetal","Gutierrez","Jerusalen","Junin","La Calera","La Mesa","La Palma","La Peña","La Vega","Lenguazaque","Macheta","Madrid","Manta","Medina","Mosquera","Nariño","Nemocon","Nilo","Nimaima","Nocaima","Venecia","Pacho","Paime","Pandi","Paratebueno","Pasca","Puerto Salgar","Puli","Quebradanegra","Quetame","Quipile","Apulo","Ricaurte","San Antonio Del Tequendama","San Bernardo","San Cayetano","San Francisco","San Juan De Rio Seco","Sasaima","Sesquile","Sibate","Silvania","Simijaca","Soacha","Sopo","Subachoque","Suesca","Supata","Susa","Sutatausa","Tabio","Tausa","Tena","Tenjo","Tibacuy","Tibirita","Tocaima","Tocancipa","Topaipi","Ubala","Ubaque","Ubate","Une","Utica","Vergara","Viani","Villagomez","Villapinzon","Villeta","Viota","Yacopi","Zipacon","Zipaquira"];
 CCapital=["Bogotá"];
 CCordoba=["Monteria","Ayapel","Buenavista","Canalete","Cerete","Chima","Chinu","Cienaga De Oro","Cotorra","La Apartada","Lorica","Los Cordobas","Momil","Montelibano","Moñitos","Planeta Rica","Pueblo Nuevo","Puerto Escondido","Puerto Libertador","Purisima","Sahagun","San Andres Sotavento","San Antero","San Bernardo Del Viento","San Carlos","San Pelayo","Tierralta","Valencia"];
 CChoco=["San Francisco De Quibdo","Acandi","Alto Baudo","Atrato","Bagado","Bahia Solano","Bajo Baudo","Bojaya","El Canton De San Pablo","Condoto","El Carmen De Atrato","El Litoral Del San Juan","Itsmina","Jurado","Lloro","Medio Atrato","Medio Baudo","Novita","Nuqui","Riosucio","Rio Quito","San Jose Del Palmar","Sipi","Tado","Unguia","Union Panamericana"];
 CCesar=["Valledupar","Aguachica","Agustin Codazzi","Astrea","Becerril","Bosconia","Chimichagua","Chiriguana","Curumani","El Copey","El Paso","Gamarra","Gonzalez","La Gloria","La Jagua De Ibirico","Manaure","Pailitas","Pelaya","Pueblo Bello","Rio De Oro","La Paz","San Alberto","San Diego","San Martin","Tamalameque"];
 CCauca=["Popayan","Almaguer","Argelia","Balboa","Bolivar","Buenos Aires","Cajibio","Caldono","Caloto","Corinto","El Tambo","Florencia","Guapi","Inza","Jambalo","La Sierra","La Vega","Lopez","Mercaderes","Miranda","Morales","Padilla","Paez","Patia","Piamonte","Piendamo","Puerto Tejada","Purace","Rosas","San Sebastian","Santander De Quilichao","Santa Rosa","Silvia","Paispamba","Suarez","Sucre","Timbio","Timbiqui","Toribio","Totoro","Villa Rica"];
 CCasanare=["Yopal","Aguazul","Chameza","Hato Corozal","La Salina","Mani","Monterrey","Nunchia","Orocue","Paz De Ariporo","Pore","Recetor","Sabanalarga","Sacama","San Luis De Palenque","Tamara","Tauramena","Trinidad","Villanueva"];
 CCaqueta=["Florencia","Albania","Belen De Los Andaquies","Cartagena Del Chaira","Curillo","El Doncello","El Paujil","La Montañita","Milan","Morelia","Puerto Rico","San Jose Del Fragua","San Vicente Del Caguan","Solano","Solita","Valparaiso"];
 CCaldas=["Manizales","Aguadas","Anserma","Aranzazu","Belalcazar","Chinchina","Filadelfia","La Dorada","La Merced","Manzanares","Marmato","Marquetalia","Marulanda","Neira","Norcasia","Pacora","Palestina","Pensilvania","Riosucio","Risaralda","Salamina","Samana","San Jose","Supia","Victoria","Villamaria","Viterbo"];
 CBoyaca=["Tunja","Almeida","Aquitania","Arcabuco","Belen","Berbeo","Beteitiva","Boavita","Boyaca","Briceño","Buenavista","Busbanza","Caldas","Campohermoso","Cerinza","Chinavita","Chiquinquira","Chiscas","Chita","Chitaraque","Chivata","Cienega","Combita","Coper","Corrales","Covarachia","Cubara","Cucaita","Cuitiva","Chiquiza","Chivor","Duitama","El Cocuy","El Espino","Firavitoba","Floresta","Gachantiva","Gameza","Garagoa","Guacamayas","Guateque","Guayata","Guican","Iza","Jenesano","Jerico","Labranzagrande","La Capilla","La Victoria","La Uvita","Villa De Leyva","Macanal","Maripi","Miraflores","Mongua","Mongui","Moniquira","Motavita","Muzo","Nobsa","Nuevo Colon","Oicata","Otanche","Pachavita","Paez","Paipa","Pajarito","Panqueba","Pauna","Paya","Paz De Rio","Pesca","Pisba","Puerto Boyaca","Quipama","Ramiriqui","Raquira","Rondon","Saboya","Sachica","Samaca","San Eduardo","San Jose De Pare","San Luis De Gaceno","San Mateo","San Miguel De Sema","San Pablo De Borbur","Santana","Santa Maria","Santa Rosa De Viterbo","Santa Sofia","Sativanorte","Sativasur","Siachoque","Soata","Socota","Socha","Sogamoso","Somondoco","Sora","Sotaquira","Soraca","Susacon","Sutamarchan","Sutatenza","Tasco","Tenza","Tibana","Tibasosa","Tinjaca","Tipacoque","Toca","Togui","Topaga","Tota","Tunungua","Turmeque","Tuta","Tutaza","Umbita","Ventaquemada","Viracacha","Zetaquira"];
 CBolivar=["Cartagena","Achi","Altos Del Rosario","Arenal","Arjona","Arroyohondo","Barranco De Loba","Calamar","Cantagallo","Cicuco","Cordoba","Clemencia","El Carmen De Bolivar","El Guamo","El Peñon","Hatillo De Loba","Magangue","Mahates","Margarita","Maria La Baja","Montecristo","Mompos","Morales","Pinillos","Regidor","Rio Viejo","San Cristobal","San Estanislao","San Fernando","San Jacinto","San Jacinto Del Cauca","San Juan Nepomuceno","San Martin De Loba","San Pablo","Santa Catalina","Santa Rosa","Santa Rosa Del Sur","Simiti","Soplaviento","Talaigua Nuevo","Tiquisio","Turbaco","Turbana","Villanueva","Zambrano"];
 CAtlantico=["Barranquilla","Baranoa","Campo De La Cruz","Candelaria","Galapa","Juan De Acosta","Luruaco","Malambo","Manati","Palmar De Varela","Piojo","Polonuevo","Ponedera","Puerto Colombia","Repelon","Sabanagrande","Sabanalarga","Santa Lucia","Santo Tomas","Soledad","Suan","Tubara","Usiacuri"];
 CArauca=["Arauca","Arauquita","Cravo Norte","Fortul","Puerto Rondon","Saravena","Tame"];
 CAntioquia=["Medellin","Abejorral","Abriaqui","Alejandria","Amaga","Amalfi","Andes","Angelopolis","Angostura","Anori","Santafe De Antioquia","Anza","Apartado","Arboletes","Argelia","Armenia","Barbosa","Belmira","Bello","Betania","Betulia","Ciudad Bolivar","Briceño","Buritica","Caceres","Caicedo","Caldas","Campamento","Cañasgordas","Caracoli","Caramanta","Carepa","El Carmen De Viboral","Carolina","Caucasia","Chigorodo","Cisneros","Cocorna","Concepcion","Concordia","Copacabana","Dabeiba","Don Matias","Ebejico","El Bagre","Entrerrios","Envigado","Fredonia","Frontino","Giraldo","Girardota","Gomez Plata","Granada","Guadalupe","Guarne","Guatape","Heliconia","Hispania","Itagui","Ituango","Jardin","Jerico","La Ceja","La Estrella","La Pintada","La Union","Liborina","Maceo","Marinilla","Montebello","Murindo","Mutata","Nariño","Necocli","Nechi","Olaya","Peñol","Peque","Pueblorrico","Puerto Berrio","Puerto Nare","Puerto Triunfo","Remedios","Retiro","Rionegro","Sabanalarga","Sabaneta","Salgar","San Andres","San Carlos","San Francisco","San Jeronimo","San Jose De La Montaña","San Juan De Uraba","San Luis","San Pedro","San Pedro De Uraba","San Rafael","San Roque","San Vicente","Santa Barbara","Santa Rosa De Osos","Santo Domingo","El Santuario","Segovia","Sonson","Sopetran","Tamesis","Taraza","Tarso","Titiribi","Toledo","Turbo","Uramita","Urrao","Valdivia","Valparaiso","Vegachi","Venecia","Vigia Del Fuerte","Yali","Yarumal","Yolombo","Yondo","Zaragoza"];
 CAmazonas=["Leticia"];

 objCity.length=200;


 if (codEstado=='Bogotá DC')
 {
  numCiudades=CCapital.length;
  for(j=0;j<numCiudades;j++)
  {
   objCity.options[k].value=CCapital[j];objCity.options[k].text=CCapital[j];
   k++;
  }
 }
   
 if (codEstado=='Vichada'){
  numCiudades=CVichada.length;
  for(j=0;j<numCiudades;j++){
   objCity.options[k].value=CVichada[j];objCity.options[k].text=CVichada[j];k++;}}if (codEstado=='Vaupes'){numCiudades=CVaupes.length;for(j=0;j<numCiudades;j++){objCity.options[k].value=CVaupes[j];objCity.options[k].text=CVaupes[j];k++;}}if (codEstado=='Valle'){numCiudades=CValle.length;for(j=0;j<numCiudades;j++){objCity.options[k].value=CValle[j];objCity.options[k].text=CValle[j];k++;}}if (codEstado=='Tolima'){numCiudades=CTolima.length;for(j=0;j<numCiudades;j++){objCity.options[k].value=CTolima[j];objCity.options[k].text=CTolima[j];k++;}}if (codEstado=='Sucre'){numCiudades=CSucre.length;for(j=0;j<numCiudades;j++){objCity.options[k].value=CSucre[j];objCity.options[k].text=CSucre[j];k++;}}if (codEstado=='Santander'){numCiudades=CSantander.length;for(j=0;j<numCiudades;j++){objCity.options[k].value=CSantander[j];objCity.options[k].text=CSantander[j];k++;}}if (codEstado=='Sanandres'){numCiudades=CSanandres.length;for(j=0;j<numCiudades;j++){objCity.options[k].value=CSanandres[j];objCity.options[k].text=CSanandres[j];k++;}}if (codEstado=='Risaralda'){numCiudades=CRisaralda.length;for(j=0;j<numCiudades;j++){objCity.options[k].value=CRisaralda[j];objCity.options[k].text=CRisaralda[j];k++;}}if (codEstado=='Quindio'){numCiudades=CQuindio.length;for(j=0;j<numCiudades;j++){objCity.options[k].value=CQuindio[j];objCity.options[k].text=CQuindio[j];k++;}}if (codEstado=='Putumayo'){numCiudades=CPutumayo.length;for(j=0;j<numCiudades;j++){objCity.options[k].value=CPutumayo[j];objCity.options[k].text=CPutumayo[j];k++;}}if (codEstado=='Nortesantander'){numCiudades=CNortesantander.length;for(j=0;j<numCiudades;j++){objCity.options[k].value=CNortesantander[j];objCity.options[k].text=CNortesantander[j];k++;}}if (codEstado=='Narino'){numCiudades=CNarino.length;for(j=0;j<numCiudades;j++){objCity.options[k].value=CNarino[j];objCity.options[k].text=CNarino[j];k++;}}if (codEstado=='Meta'){numCiudades=CMeta.length;for(j=0;j<numCiudades;j++){objCity.options[k].value=CMeta[j];objCity.options[k].text=CMeta[j];k++;}}if (codEstado=='Magdalena'){numCiudades=CMagdalena.length;for(j=0;j<numCiudades;j++){objCity.options[k].value=CMagdalena[j];objCity.options[k].text=CMagdalena[j];k++;}}if (codEstado=='Guajira'){numCiudades=CGuajira.length;for(j=0;j<numCiudades;j++){objCity.options[k].value=CGuajira[j];objCity.options[k].text=CGuajira[j];k++;}}if (codEstado=='Huila'){numCiudades=CHuila.length;for(j=0;j<numCiudades;j++){objCity.options[k].value=CHuila[j];objCity.options[k].text=CHuila[j];k++;}}if (codEstado=='Guaviare'){numCiudades=CGuaviare.length;for(j=0;j<numCiudades;j++){objCity.options[k].value=CGuaviare[j];objCity.options[k].text=CGuaviare[j];k++;}}if (codEstado=='Guainia'){numCiudades=CGuainia.length;for(j=0;j<numCiudades;j++){objCity.options[k].value=CGuainia[j];objCity.options[k].text=CGuainia[j];k++;}}if (codEstado=='Cundinamarca'){numCiudades=CCundinamarca.length;for(j=0;j<numCiudades;j++){objCity.options[k].value=CCundinamarca[j];objCity.options[k].text=CCundinamarca[j];k++;}}if (codEstado=='Cordoba'){numCiudades=CCordoba.length;for(j=0;j<numCiudades;j++){objCity.options[k].value=CCordoba[j];objCity.options[k].text=CCordoba[j];k++;}}if (codEstado=='Choco'){numCiudades=CChoco.length;for(j=0;j<numCiudades;j++){objCity.options[k].value=CChoco[j];objCity.options[k].text=CChoco[j];k++;}}if (codEstado=='Cesar'){numCiudades=CCesar.length;for(j=0;j<numCiudades;j++){objCity.options[k].value=CCesar[j];objCity.options[k].text=CCesar[j];k++;}}if (codEstado=='Cauca'){numCiudades=CCauca.length;for(j=0;j<numCiudades;j++){objCity.options[k].value=CCauca[j];objCity.options[k].text=CCauca[j];k++;}}if (codEstado=='Casanare'){numCiudades=CCasanare.length;for(j=0;j<numCiudades;j++){objCity.options[k].value=CCasanare[j];objCity.options[k].text=CCasanare[j];k++;}}if (codEstado=='Caqueta'){numCiudades=CCaqueta.length;for(j=0;j<numCiudades;j++){objCity.options[k].value=CCaqueta[j];objCity.options[k].text=CCaqueta[j];k++;}}if (codEstado=='Caldas'){numCiudades=CCaldas.length;for(j=0;j<numCiudades;j++){objCity.options[k].value=CCaldas[j];objCity.options[k].text=CCaldas[j];k++;}}if (codEstado=='Boyaca'){numCiudades=CBoyaca.length;for(j=0;j<numCiudades;j++){objCity.options[k].value=CBoyaca[j];objCity.options[k].text=CBoyaca[j];k++;}}if (codEstado=='Bolivar'){numCiudades=CBolivar.length;for(j=0;j<numCiudades;j++){objCity.options[k].value=CBolivar[j];objCity.options[k].text=CBolivar[j];k++;}}if (codEstado=='Atlantico'){numCiudades=CAtlantico.length;for(j=0;j<numCiudades;j++){objCity.options[k].value=CAtlantico[j];objCity.options[k].text=CAtlantico[j];k++;}}
 if (codEstado=='Arauca'){numCiudades=CArauca.length;for(j=0;j<numCiudades;j++){objCity.options[k].value=CArauca[j];objCity.options[k].text=CArauca[j];k++;}}if (codEstado=='Antioquia'){numCiudades=CAntioquia.length;for(j=0;j<numCiudades;j++){objCity.options[k].value=CAntioquia[j];objCity.options[k].text=CAntioquia[j];k++;}}if (codEstado=='Amazonas'){numCiudades=CAmazonas.length;for(j=0;j<numCiudades;j++){objCity.options[k].value=CAmazonas[j];objCity.options[k].text=CAmazonas[j];k++;}}

 objCity.length=numCiudades+1;
 objCity.options[objCity.length-1].text = ' ';
 objCity.options[objCity.length-1].value = ' ';

 if (codEstado=='Bogotá DC')
 {
 objCity.length=1;
 }

 objCity.selectedIndex=0;

 return true;
}

/*--------------------------------------------------------------------------------------------------
Fin de funciones de departamentos y ciudades
--------------------------------------------------------------------------------------------------*/

function validar(){
	if(document.formulario1.elements["Nombres"].value == '') 
		{
		alert("Digite su NOMBRE por favor.");
		document.formulario1.Nombres.focus();
		return false;
		}
	if(document.formulario1.elements["Numero_de_Documento"].value == '')
		{
		alert("Digite Su NÚMERO de identificación.");
		document.formulario1.Numero_de_Documento.focus();
		return false;
		}
	else
		{
		error=0;
		log = document.formulario1.Numero_de_Documento.value;
		largo = log.length;
		//alert(largo);
		for(i=0; i<largo; i++)
			{
			letra=log.substring(i,i+1);
			//alert(letra);
			ver = letra*1;
			if (ver != 0 && ver != 1 && ver != 2 && ver != 3 && ver != 4 && ver != 5 && ver != 6 && ver != 7 && ver != 8 && ver != 9) 
				{
				error=error + 1;
				}
			}
		if(error!=0)
			{
		    alert('Por favor escriba su NÚMERO de Documento correctamente, sin letras ni espacios o caracteres especiales.');
		    valok = 'N';
		    formulario1.Numero_de_Documento.focus();
		    return false;
			}
		}

/*	
	Elaborado por Carlos Chaparro
	Modificado por Miguel Florez
*/
	if(document.formulario1.elements["e_mail"].value != '') 
		{
		campo = document.formulario1.elements["e_mail"].value;
		nletra=0;
		nletra2=0;
		longitud=campo.length;
		for( i=0; i<longitud; i++ )
			{ 
			letra=campo.charAt(i);
			if (letra=="@")
				nletra++;
			if (letra==".")
				nletra2++;
			}

		if (nletra!=1)
			{ 
			alert ("Su email debe tener un símbolo @");
			document.formulario1.e_mail.focus();
			return false;
			}
	
		if (nletra2==0 || campo.charAt(i-1)==".")
			{
			alert ("Depues de la @ debe haber un dominio \n ej: bancodeoccidente.com.co");
			document.formulario1.e_mail.focus();
			return false;
			}
		}
//////////////////////////////////////////////////////////////////////////////////////////////

	if(document.formulario1.elements["Direccion_de_Correspondencia"].value == '')
		{
		alert("Digite su DIRECCIÓN.");
		document.formulario1.Direccion_de_Correspondencia.focus();
		return false;
		}

	if(document.formulario1.elements["Direccion_de_Correspondencia"].value != '' && document.formulario1.Pais.options[document.formulario1.Pais.selectedIndex].value == 1)
		{
		alert("Por favor seleccione un PAÍS");
		document.formulario1.Pais.focus();
		return false;
		}
	if(document.formulario1.Pais.options[document.formulario1.Pais.selectedIndex].value == 'Colombia' && document.formulario1.Departamento.options[document.formulario1.Departamento.selectedIndex].value == 1)
		{
		alert("Por favor seleccione un DEPARTAMENTO");
		document.formulario1.Departamento.focus();
		return false;
		}
	if(document.formulario1.Pais.options[document.formulario1.Pais.selectedIndex].value == 'Colombia' && document.formulario1.Municipio.options[document.formulario1.Municipio.selectedIndex].value == 1)
		{
		alert("Por favor seleccione un MUNICIPIO o CIUDAD");
		document.formulario1.Departamento.focus();
		return false;
		}
	if(document.formulario1.elements["Telefono"].value == '')
		{
		alert("Digite Su TELÉFONO.");
		document.formulario1.Telefono.focus();
		return false;
		}
	else
		{
		error=0;
		log = document.formulario1.Telefono.value;
		largo = log.length;
		//alert(largo);
		for(i=0; i<largo; i++)
			{
			letra=log.substring(i,i+1);
			//alert(letra);
			ver = letra*1;
			if (ver != 0 && ver != 1 && ver != 2 && ver != 3 && ver != 4 && ver != 5 && ver != 6 && ver != 7 && ver != 8 && ver != 9) 
				{
				error=error + 1;
				}
			}
		if(error!=0)
			{
		    alert('Por favor escriba su TELÉFONO correctamente, sin letras ni espacios o caracteres especiales.');
		    valok = 'N';
		    document.formulario1.Telefono.focus();
		    return false;
			}
		}

	
}

