//Programed by: Armando Arista

var http = CrearAjax();//crear variable
function CrearAjax(){//crear variable
var req;
if(window.ActiveXObject){req=new ActiveXObject("Microsoft.XMLHTTP");}else{// Internet Explorer 5
if(window.XMLHttpRequest){req=new XMLHttpRequest();}else{// Firefox, Safari, Opera...
alert('Er.');}}
return req;
}
function sel_dep(op){//Seleccionar Municipio
http.open('get', 'traer_mun.php?mun='+op);
http.onreadystatechange = RecibirMun;
http.send(null);
}
function sel_dep2(op){//Seleccionar Municipio
http.open('get', 'traer_mun2.php?mun='+op);
http.onreadystatechange = RecibirMun;
http.send(null);
}
function RecibirMun(){//Recibir Municipio
if(http.readyState == 4 && http.status == 200){
var respuesta = http.responseText;
if(respuesta)municipio.innerHTML=cnt=respuesta;
}
}
function sel(op){//seleccionar check
evl="";
      if(op==0){for(i=1;i<=6;i++)evl+="form1.op"+i+".checked=false;"
}else if(op==1){for(i=1;i<=6;i++)evl+="form1.op"+i+".checked=true;"
}else if(op==2){for(i=1;i<=6;i++)evl+="form1.op"+i+".checked=!form1.op"+i+".checked;"
}
eval(evl)
}
a_anhofiscals=Array();
p_anhofiscals=0;
function AddAnhofiscal(){//anho fiscal 
for(i=0;i<p_anhofiscals;i++)
if(a_anhofiscals[i]==form1.anhofiscal.value)return;
evl ="";
evl+="anhofiscals"+p_anhofiscals+"1.innerHTML+=form1.anhofiscal.options[form1.anhofiscal.selectedIndex].text;";
evl+="anhofiscals"+p_anhofiscals+"2.innerHTML+=\"<input name=anhofiscal[] type=\\\"hidden\\\" class=\\\"cajas\\\" value=\\\""+form1.anhofiscal.value+"\\\">\";";
evl+="anhofiscals"+p_anhofiscals+"3.innerHTML+=\"<input name=anhofiscalprod[] class=\\\"cajas\\\" onkeypress=\\\"return(validar(event,'1'))\\\">\";";
evl+="anhofiscals"+p_anhofiscals+"4.innerHTML+=\"<input name=anhofiscalexp[] class=\\\"cajas\\\" onkeypress=\\\"return(validar(event,'1'))\\\">\";";
evl+="anhofiscals"+p_anhofiscals+"5.innerHTML+=\"<input name=anhofiscalprodinno[] class=\\\"cajas\\\" onkeypress=\\\"return(validar(event,'1'))\\\">\";";
eval(evl);
a_anhofiscals[p_anhofiscals++]=form1.anhofiscal.value;
}
function DelAnhofiscal(){
evl ="";
for(i=0;i<4;i++){
for(j=1;j<=5;j++){
evl+="anhofiscals"+i+""+j+".innerHTML=\"\";";
evl+="anhofiscals"+i+""+j+".innerHTML=\"\";";
evl+="anhofiscals"+i+""+j+".innerHTML=\"\";";
evl+="anhofiscals"+i+""+j+".innerHTML=\"\";";
evl+="anhofiscals"+i+""+j+".innerHTML=\"\";";
}
}
eval(evl);
a_anhofiscals=Array();
p_anhofiscals=0;
}
a_certificados=Array();
p_certificados=0;
function AddCertificado(){//certificados
if(form1.certificado.value.substr(0,1)==" "){form1.certificado.value="";return;}
if(form1.certificado.value==""){form1.certificado.value="";return;}
for(i=0;i<p_certificados;i++)
if(a_certificados[i]==form1.certificado.value)return;
certificados.innerHTML+="<input name=certificado[] type=hidden value="+form1.certificado.value+">"+form1.certificado.value+"<br>";
a_certificados[p_certificados++]=form1.certificado.value;
form1.certificado.value="";
}
function DelCertificado(){
certificados.innerHTML="<u>Certificados</u><br>";
a_certificados=Array();
p_certificados=0;
}
a_ardecas=Array();
p_ardecas=0;
function AddArdeca(){//Ardeca
if(form1.ardeca.value.substr(0,1)==" "){form1.ardeca.value="";return;}
if(form1.ardeca.value==""){form1.ardeca.value="";return;}
for(i=0;i<p_ardecas;i++)
if(a_ardecas[i]==form1.ardeca.value)return;
ardecas.innerHTML+="<input name=ardeca[] type=hidden value="+form1.ardeca.value+">"+form1.ardeca.value+"<br>";
a_ardecas[p_ardecas++]=form1.ardeca.value;
form1.ardeca.value="";
}
function DelArdeca(){
ardecas.innerHTML="<u>Otras Areas</u><br>";
a_ardecas=Array();
p_ardecas=0;
}
a_foacins=Array();
p_foacins=0;
function AddFoacin(){//Foacin
if(form1.foacin.value.substr(0,1)==" "){form1.foacin.value="";return;}
if(form1.foacin.value==""){form1.foacin.value="";return;}
for(i=0;i<p_foacins;i++)
if(a_foacins[i]==form1.foacin.value)return;
foacins.innerHTML+="<input name=foacin[] type=hidden value="+form1.foacin.value+">"+form1.foacin.value+"<br>";
a_foacins[p_foacins++]=form1.foacin.value;
form1.foacin.value="";
}
function DelFoacin(){
foacins.innerHTML="<u>Otros Fondos</u><br>";
a_foacins=Array();
p_foacins=0;
}
a_sucursales=Array();
p_sucursales=0;
function AddSucursal(){//sucursales
for(i=0;i<p_sucursales;i++)
if(a_sucursales[i]==form1.sucursal.value)return;
sucursales.innerHTML+="<input name=sucursal[] type=hidden value="+form1.sucursal.value+">"+form1.sucursal.options[form1.sucursal.selectedIndex].text+"<br>";
a_sucursales[p_sucursales++]=form1.sucursal.value;
}
function DelSucursal(){
sucursales.innerHTML="<u>Sucursales</u><br>";
a_sucursales=Array();
p_sucursales=0;
}
a_gremios=Array();
p_gremios=0;
function AddGremio(){//gremios
for(i=0;i<p_gremios;i++)
if(a_gremios[i]==form1.gremio.value)return;
Gremios.innerHTML+="<input name=gremio[] type=hidden value="+form1.gremio.value+">"+form1.gremio.options[form1.gremio.selectedIndex].text+"<br>";
a_gremios[p_gremios++]=form1.gremio.value;
}
function DelGremio(){
Gremios.innerHTML="<u>Gremios</u><br>";
a_gremios=Array();
p_gremios=0;
}
a_institucions=Array();
p_institucions=0;
function AddInstitucion(){//intituciones
for(i=0;i<p_institucions;i++)
if(a_institucions[i]==form1.institucion.value)return;
institucions.innerHTML+="<input name=institucion[] type=hidden value="+form1.institucion.value+">"+form1.institucion.options[form1.institucion.selectedIndex].text+"<br>";
a_institucions[p_institucions++]=form1.institucion.value;
}
function DelInstitucion(){
institucions.innerHTML="<u>Instituciones</u><br>";
a_institucions=Array();
p_institucions=0;
}
a_paisinvs=Array();
p_paisinvs=0;
function AddPaisinv(){//Pais origen de la inversion
for(i=0;i<p_paisinvs;i++)
if(a_paisinvs[i]==form1.paisinv.value)return;
paisinvs.innerHTML+="<input name=paisinv[] type=hidden value="+form1.paisinv.value+">"+form1.paisinv.options[form1.paisinv.selectedIndex].text+"<br>";
a_paisinvs[p_paisinvs++]=form1.paisinv.value;
}
function DelPaisinv(){
paisinvs.innerHTML="<u>Paises</u><br>";
a_paisinvs=Array();
p_paisinvs=0;
}
a_sectors=Array();
p_sectors=0;
function AddSector(){//sector
for(i=0;i<p_sectors;i++)
if(a_sectors[i]==form1.sector.value)return;
Sectors.innerHTML+="<input name=sector[] type=hidden value="+form1.sector.value+">"+form1.sector.options[form1.sector.selectedIndex].text+"<br>";
a_sectors[p_sectors++]=form1.sector.value;
}
function DelSector(){
Sectors.innerHTML="<u>Sectors</u><br>";
a_sectors=Array();
p_sectors=0;
}
a_capitals=Array();
p_capitals=0;
function AddCapital(){//capital
for(i=0;i<p_capitals;i++)
if(a_capitals[i]==form1.capital.value)return;
capitals.innerHTML+="<input name=capital[] type=hidden value="+form1.capital.value+">"+form1.capital.options[form1.capital.selectedIndex].text+"<br>";
a_capitals[p_capitals++]=form1.capital.value;
}
function DelCapital(){
capitals.innerHTML="<u>Capital</u><br>";
a_capitals=Array();
p_capitals=0;
}
function control(k){//PROBAR LAS TECLAS DE CONTROL
return( k==37 || k==39 || between(k,1,31)?true:false );
}
function validar(event,op){//Pulsaciones de Tecla
k=event.keyCode?event.keyCode:event.which;
//alert(k);
if(op=='1'){
if(!control(k) && !between(k,48,57) && k!=46){
return(false);
}
}
if(op=='tel'){
if(!control(k) && !between(k,48,57) && (k!=45)){
return(false);
}
}
if(op=='a'){
if(!control(k) && !between(k,97,122) ) {
return(false);
}
}
if(op=='Aa' || op=='aA'){
if(!control(k) && !between(k,65,90) && !between(k,97,122) && (k!=32) && (k!=241)){
return(false);
}
}
if(op=='A'){
if(!control(k) && !between(k,65,90)){
return(false);
}
}
if(op=='@'){
if(!control(k) && !between(k,65,90) && !between(k,97,122) && !between(k,48,57) && (k!=64) && (k!=46) && (k!=95) && (k!=45) ){
return(false);
}
}
if(op=='www'){
if(!control(k) && !between(k,65,90) && !between(k,97,122) && !between(k,48,57) && (k!=46) && (k!=47) && (k!=58)){
return(false);
}
}
}
function between(op,min,max){//Rango
return(op>=min && op<=max?1:0);
}
function cRequeridos(op,event){//Campos Requeridos
if(op){

if(!document.getElementById('ruc').disabled){
/*	if(colorearTxt(document.getElementById('ruc'))){return(false);}*/
}
	if(colorearCmb(form1.id_departamento      )){return(false);}
	if(colorearCmb(form1.id_municipio         )){return(false);}
	if(colorearTxt(form1.direccion            )){return(false);}
	if(colorearTxt(form1.propietario          )){return(false);}
	if(colorearTxt(form1.tel_propietario      )){return(false);}
	if(colorearRad(form1.id_actividad         )){return(false);}
	if(colorearTxt(form1.ciiu                 )){return(false);}
	if(colorearTxt(form1.producto1            )){return(false);}
	if(colorearTxt(form1.anno_creacion        )){return(false);}
	/*if(colorearLst(p_sucursales,form1.sucursal)){return(false);}*/
	/*if(colorearLst(p_gremios,form1.gremio     )){return(false);}*/
	if(colorearTxt(form1.porc_nac             )){return(false);}
	if(colorearTxt(form1.porc_ext             )){return(false);}
	if(colorearRad(form1.emp_fam              )){return(false);}
	if(colorearTxt(form1.activos_totales      )){return(false);}
	if(colorearTxt(form1.no_emp               )){return(false);}
	if(colorearTxt(form1.ventas_totales       )){return(false);}
}else{
	ob=event.srcElement?event.srcElement:event.target;
	ob.style.backgroundColor='';
	nombre=ob.name;
	if(nombre=='id_actividad'){
	form1.id_actividad[0].style.backgroundColor='';
	form1.id_actividad[1].style.backgroundColor='';
	form1.id_actividad[2].style.backgroundColor='';
	}
}
}
function colorearTxt(ob){//COLOREAR EN "CAJAS DE TEXTO"
if(ob.value==''){
ob.style.backgroundColor='red';
mostrarSeccion(form1.vinheta4, 4);
ob.focus();
return(true);
}
}
function colorearRad(obs){//COLOREAR EN "INPUT RADIO"
tamanho=obs.length;
nombre=obs[0].name;

bnd=false;
for(i=0;i<tamanho;i++){
eval("tmp=form1."+nombre+"["+i+"].checked;");
if(tmp){bnd=true;break;}
}

if(bnd==false){
	evl ="";
	for(i=0;i<tamanho;i++){
	evl+="form1."+nombre+"["+i+"].style.backgroundColor='red';";
	}
	evl+="form1."+nombre+"[0].focus();";
	eval(evl);
	mostrarSeccion(form1.vinheta4,4);
	return(true);
}else{
return(false);
}

}
function colorearLst(par,ob){//COLOREAR EN "LISTA"
if(par==0){
ob.style.backgroundColor='red';
mostrarSeccion(form1.vinheta4,4);
ob.focus();
return(true);
}else{
return(false);
}
}
function colorearCmb(ob){//COLOREAR "COMBOS"
if(ob.value==0){
ob.style.backgroundColor='red';
mostrarSeccion(form1.vinheta4,4);
ob.focus();
return(true);
}else{
return(false);
}
}
function mostrarSeccion(ths,op){
evl="";
for(i=1;i<=4;i++){
evl+="ob=document.getElementById('vinheta"+i+"');\n";
evl+="ob.style.backgroundImage='url(archivos/vinheta"+(op==i?'sel':'')+".png)';\n";
}
if(op<4){
for(i=1;i<=3;i++){
evl+="ob=document.getElementById('seccion"+i+"');\n";
evl+="ob.style.visibility='"+(op==i?'visible':'hidden')+"';\n";
evl+="ob.style.position='"+(op==i?'relative':'absolute')+"';\n";
}
}
else{
for(i=1;i<=3;i++){
evl+="ob=document.getElementById('seccion"+i+"');\n";
evl+="ob.style.visibility='visible';\n";
evl+="ob.style.position='relative';\n";
}
}
eval(evl);
}

//Programed by: Armando Arista