///PARA SABER QUE BROWSER TENGO
/*ASI LO LLAMO
var browser1 = new Browser();
if (browser1.isIE)
  var Width=Width;
else
  var Width=Width1;
*/
function KeyF5Check() {
	//var tecla=window.event.keyCode;
  	//if(tecla==116) {
	// alert("Lo sentimos por seguridad no debe recargar la pgina.\n Utilice la nevegacin de la aplicacin"); 
	 //event.keyCode=0;
	 //event.returnValue=false;
	//}
}


function Browser() {
  var ua, s, i;
  this.isIE    = false;  
  this.isNS    = false;  
  this.version = null;

  ua = navigator.userAgent;

  s = "MSIE";
  if ((i = ua.indexOf(s)) >= 0) {
    this.isIE = true;
    this.version = parseFloat(ua.substr(i + s.length));
    return;
  }

  s = "Netscape6/";
  if ((i = ua.indexOf(s)) >= 0) {
    this.isNS = true;
    this.version = parseFloat(ua.substr(i + s.length));
    return;
  }

  // Treat any other "Gecko" browser as NS 6.1.

  s = "Gecko";
  if ((i = ua.indexOf(s)) >= 0) {
    this.isNS = true;
    this.version = 6.1;
    return;
  }
}

//FUNCIONES PARA FORMATEAR MONEDA
function formatNumber2(campo) {
	//campo.value=SoloNumeros(campo.value);
	if(campo){
		num = campo;	
		num = num.toString().replace(/\$|\,/g,'');
		if(isNaN(num))
		num = "0";
		sign = (num == (num = Math.abs(num)));
		num = Math.floor(num*100+0.50000000001);
		cents = num%100;
		num = Math.floor(num/100).toString();
		if(cents<10)
		cents = "0" + cents;
		for (var i = 0; i < Math.floor((num.length-(1+i))/3); i++)
		num = num.substring(0,num.length-(4*i+3))+','+
		num.substring(num.length-(4*i+3));
		campo=(((sign)?'':'-') + '$' + num + '.' + cents);
		return campo;
	}
}


function formatNumber(campo) {
	if(campo){
		num = campo.value;	
		num = num.toString().replace(/\$|\,/g,'');
		if(isNaN(num))
		num = "0";
		sign = (num == (num = Math.abs(num)));
		num = Math.floor(num*100+0.50000000001);
		cents = num%100;
		num = Math.floor(num/100).toString();
		if(cents<10)
		cents = "0" + cents;
		for (var i = 0; i < Math.floor((num.length-(1+i))/3); i++)
		num = num.substring(0,num.length-(4*i+3))+','+
		num.substring(num.length-(4*i+3));
		campo.value=(((sign)?'':'-') + '$' + num + '.' + cents);	
	}
}

function formatNumberInt(field) {
	if(field){
		num = field.value;
        num = num.toString().replace(/\$|\./g,'');
        if(isNaN(num))
               num = "0";
        sign = (num == (num = Math.abs(num)));
        num = Math.floor(num*100+0.50000000001);
        cents = num%100;
        num = Math.floor(num/100).toString();
        if(cents<10)
        cents = "0" + cents;
        for (var i = 0; i < Math.floor((num.length-(1+i))/3); i++)
        num = '$'+num.substring(0,num.length-(4*i+3))+'.'+num.substring(num.length-(4*i+3));
        field.value = num;
	}
}

function unformatNumber(num) {
	num=num.toString();
    return num.replace(/([^0-9\.\-])/g,'')*1;
} 
	
///
/* FUNCIONES PARA LA DIRECCION
*/
function actualizarCampos() {
   window.opener.document.form1.DIRECCION.value = ShowDir();
   window.close();
}

var direccion = new Array();
var z=0;

function BorrarUltimo(){
 direccion.pop();
 z--;
 document.form1.direccionfull.value=ShowDir();
}

function BorrarTodo(){
	z=0;
	direccion=0;
	direccion = new Array();
	document.form1.direccionfull.value=ShowDir();
	
}


function ShowDir(){
	var dir='';
	for(i=0; i<direccion.length; i++){
		dir+=direccion[i];
	}
	return dir;
}

var desnom=''
function AddDes(descorta,descripcion,shownom){

	descripcion=descripcion.replace('_'," ");
	if(document.form1.nombre.style.visibility=='visible' || document.form1.desnombre.style.visibility=='visible'){
	
	}else{
			if(' '+descorta==direccion[z-1]){
				alert('No puede seleccionar dos nomenclaturas iguales');
			}else{
				if(shownom==1){
					visibility('descnombre',descripcion+' con nombre?','visible');	
					document.form1.nombre.style.visibility='visible';
					desnom=descripcion;
				}
				direccion[z++]=' '+descorta;	
				document.form1.direccionfull.value=ShowDir();
			}
	}		
}

function ShowNombre(campo){
 if(campo=='SI'){

	visibility('descnombrefull','Digite el nombre '+desnom,'visible');		
	visibility('descnombre','','hidden');		
						
	document.form1.desnombre.style.visibility='visible';			
	document.form1.nombre.style.visibility='hidden';			
 }else if(campo=='NO'){
 	document.form1.desnombre.style.visibility='hidden';
	document.form1.nombre.style.visibility='hidden';
	
	visibility('descnombre','','hidden');		
	visibility('descnombrefull','','hidden');				
 }
 document.form1.nombre.selectedIndex=0;
}


function visibility(id,msg,visible){
		var elementos=document.getElementsByTagName("label");
				for(i=0; i<elementos.length; i++){
					idelements = elementos[i].getAttribute("id");								
					if(idelements == id){
						elementos[i].style.visibility=visible;
						elementos[i].innerHTML=msg;
					}	
				}
}

function AddDesNom(campo){

	if(campo!=''){
		direccion[z++]=' '+campo.toUpperCase();
		document.form1.direccionfull.value=ShowDir();
		visibility('descnombrefull','','hidden');
		document.form1.desnombre.style.visibility='hidden';
		document.form1.desnombre.value='';
		
	}
}

function Add(campo){
	if(document.form1.nombre.style.visibility=='visible' || document.form1.desnombre.style.visibility=='visible'){
	
	}else{
			if(isNaN(direccion[z-1])==true){
				direccion[z++]=' '+campo;
			}else{
				direccion[z++]=campo;
				}
			document.form1.direccionfull.value=ShowDir();
		}
}
function AddNom(campo){
	if(document.form1.nombre.style.visibility=='visible' || document.form1.desnombre.style.visibility=='visible'){
	
	}else{
						direccion[z++]=' '+campo;	
						document.form1.direccionfull.value=ShowDir();
		}			
}

/////////////////FIN FUNCIONES PARA LA DIRECCIN

function MM_preloadImages() { //v3.0
  var d=document; if(d.images){ if(!d.MM_p) d.MM_p=new Array();
    var i,j=d.MM_p.length,a=MM_preloadImages.arguments; for(i=0; i<a.length; i++)
    if (a[i].indexOf("#")!=0){ d.MM_p[j]=new Image; d.MM_p[j++].src=a[i];}}
}

function MM_swapImgRestore() { //v3.0
  var i,x,a=document.MM_sr; for(i=0;a&&i<a.length&&(x=a[i])&&x.oSrc;i++) x.src=x.oSrc;
}

function MM_findObj(n, d) { //v4.01
  var p,i,x;  if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
    d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
  if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
  for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
  if(!x && d.getElementById) x=d.getElementById(n); return x;
}

function MM_swapImage() { //v3.0
  var i,j=0,x,a=MM_swapImage.arguments; document.MM_sr=new Array; for(i=0;i<(a.length-2);i+=3)
   if ((x=MM_findObj(a[i]))!=null){document.MM_sr[j++]=x; if(!x.oSrc) x.oSrc=x.src; x.src=a[i+2];}
}
///////////////////FGORMULARIO DE CONSULTAS consultas.php
function MM_jumpMenu(targ,selObj,restore){ //v3.0
	if(selObj.options[selObj.selectedIndex].value!=0){
		  eval(targ+".location='"+selObj.options[selObj.selectedIndex].value+"'");
		  if (restore) selObj.selectedIndex=0;
	}
}





function check_fechas(fecha1,fecha2)  {
  var control,control1;
   control=check_fecha(fecha1.value);
   if(control==false){
	     return false;
	 }else{
		   		control1=check_fecha(fecha2.value);		 
		   } 
	if(control1==false){
	     return false;
	 }else{
		 control2=Comparar_Fecha(fecha1.value,fecha2.value);
		 }

  if(control2==false){
	     return false;
	 }else return true; 
 }
 
function Comparar_Fecha(fecha1,fecha2){
var campo1,campo2, cadena,cadena1,control;
var Error1 = "El ao inicial debe ser menor o igual que el final.\n"
	       + "               Revselo, por favor.                  ";
var Error2 = "El mes inicial debe ser menor o igual que el final.\n"
	       + "               Revselo, por favor.                  ";
var Error3= "El da inicial debe ser menor que el final.\n"
	      + "           Revselo, por favor.              ";
var Dia1, Mes1, Anyo1, Dia2, Mes2, Anyo2;
campo1=fecha1;
campo2=fecha2;

Dia1=campo1.substring(8,10);
Mes1=campo1.substring(5,7);
Anyo1=campo1.substring(0,4);
Dia2=campo2.substring(8,10);
Mes2=campo2.substring(5,7);
Anyo2=campo2.substring(0,4);

 if(Anyo1>Anyo2){
  	  alert(Error1);  return false;	
   }
   
   if(Anyo1==Anyo2){
	 if(Mes1>Mes2){
		    alert(Error2); return false;
		   }else if(Mes1==Mes2){
	               if(Dia1>Dia2){
		    		alert(Error3); return false;
				   }else{}
			}
	}
 		
}


function check_fecha(fecha){
var campo, cadena,cadena1,control;
var Error = "La fecha introducida es invlida.\n"
          + "       Revsela, por favor.        ";
var Error1 = "El rango de fecha no puede ser menor de 01/08/2005.\n"
           + "         es incorrecta. Revselo, por favor.        ";
var Dia, Mes, Anyo, Dia_Mes_Mal = false;
campo=fecha;
cadena="Fecha incorrecta\n"
     + " Revise por favor ";
Error="La fecha es incorrecta\n"
    + "    Revise por favor    ";
Dia=campo.substring(8,10);
Mes=campo.substring(5,7);
Anyo=campo.substring(0,4);
//Dia = parseInt(Dia);
//Mes = parseInt(Mes);
//Anyo = parseInt(Anyo);

cadena1="Fecha incorrecta. Solo nmeros\n"
           + "        Revise sus datos";
control=1;
if (campo == "")  {
      alert(Error);  return false; control=0;
	  }
if( campo.length !=10 || campo.substring(4,5) != "-" || campo.substring(7,8) != "-" ){ 
	   alert(cadena); return false; control=0;
	   } else if(isNaN(Anyo)==true || isNaN(Mes)==true || isNaN(Dia)==true){
					   alert(cadena1); return false; control=0;
	          }else if(Dia<=0 || Mes<=0 || Anyo<=0 || Mes>12 || Mes<=0){
   			        alert(Error1); return false; control=0;
			  	  }else if(control==1){
					/* Los meses de Enero, Marzo, Mayo, Julio, Agosto,  Octubre y Diciembre tienen 31 das */
					if(( Mes == 1 || Mes == 3 || Mes == 5 || Mes == 7 || Mes == 10 || Mes == 12 || Mes == 8 )  && Dia > 31 )   
							  Dia_Mes_Mal = true;
					
							/* Los meses de Mayo, Junio, Septiembre  y Noviembre tienen 30 das */
					
							if( (Mes == 4 || Mes == 6 || Mes == 9 || Mes == 11)  && Dia > 30  ) 
							 Dia_Mes_Mal = true;
					
						/* Febrero tiene 28  29 das, dependiendo de si es bisiesto o no. Un ao es 
						bisiesto si es mltiplo de 4 pero no de  100 salvo que sea mltiplo de 400. 
						Por ejemplo, 12 y 400  son bisiestos, pero 100 y 700 no. */
        if( Mes == 2 && ( Dia > 29 || ( Dia == 29 && ( (Anyo % 400 != 0) && ((Anyo % 4 != 0) || 
		         (Anyo % 100 == 0) ) ) ) ) )  Dia_Mes_Mal = true;
						
					
							   if(Dia_Mes_Mal)  {
								  alert(Error);
								  return false;
								  } 
								 } else return true;///FIN DE MI FUNCIN
}



function ocultar(){
//MiMarco=document.all.Marco;
//MiMarco.className='';
var oculta_el=document.all.oculta
if (oculta_el!=''&&oculta_el.length==null)
    oculta_el.style.display='none'
else{
for (i=0;i<oculta_el.length;i++)
    oculta_el[i].style.display='none'
}
}

function restablecer(){
  setTimeout("window.location.reload()",1)
}


function IrUrl(URL){
   window.location.replace(URL);
   
}

function IrUrlWindow(URL){
   window.opener.location.replace(URL);
   parent.close();   
}



function OpenUrl(Url,Titulo,Width,Height)
{
   var izquierda = (screen.availWidth - Width) / 2; 
    var arriba = (screen.availHeight - Height) / 2; 

    var opciones =",toolbar='NO'"+ 
				 ",titlebar='NO'"+ 
                 ",location='NO'"+ 
                 ",status='NO'"+ 
                 ",menubar='NO'"+ 
                 ",scrollbars=yes"+ 
                 ",width=" + Width + 
                 ",height=" + Height + 
                 ",left=" + izquierda + 
                 ",top=" + arriba; 
   window.open(Url,Titulo, opciones);  
}


function OpenMunicipio(Url,Titulo,Width,Height,Top,Left)
{

   var styleStr = 'width='+Width+',height='+Height+', top='+Top+',left='+Left+',scrollbars=NO,titlebar=no,menubar=no,toolbar=no,location=no,CloseForm("Yes")=no;>';
   window.name = "main";
   window.open(Url,Titulo, styleStr);  
}


function Confirmar(msg){
var sn=confirm(msg);
 if(sn==true)
  return false;
 else
   return false;
}



//////////////////NUEVAS FUNCIONES MYPROJECT JORGE ARZUAGA
function verificar_opciones_2(start){
//start es por si acaso hay algun otro elemento antes de estos
var val_po='';
var val_po_temp='';
var temp_position= document.getElementsByTagName("select"); 	
var position=document.getElementsByTagName("select"); 	
for (var i=start; i<position.length; i++){	
		valor=position[i].value; 		
		     var cnt=0;
			 for (var k=start; k<temp_position.length; k++){	
			 		val_po=position[i].value;
					val_po=val_po.split(",");
					
					val_po_temp=temp_position[k].value;
					val_po_temp=val_po_temp.split(',');
					
					 if (val_po[0]==val_po_temp[0]) {
						 cnt=cnt+1;	
					 }
					 if(cnt >1){
						 alert("Las posiciones de las preguntas deben tener diferentes valores!");
						 return false;
						 }
			 }
 }
}


function verificar_opciones(start){
//start es por si acaso hay algun otro elemento antes de estos
var temp_position= document.getElementsByTagName("select"); 	
var position=document.getElementsByTagName("select"); 	
for (var i=start; i<position.length; i++){	
		valor=position[i].value; 		
		     var cnt=0;
			 for (var k=start; k<temp_position.length; k++){	
			 		alert(position[i].value);
					 if (position[i].value == temp_position[k].value) {
						 cnt=cnt+1;	
					 }
					 if(cnt >1){
						 alert("Las posiciones de las preguntas deben tener diferentes valores!");
						 return false;
						 }
			 }
 }
}

function CheckPorcentaje(campo){
	
	if((campo.value<=0 || campo.value>100) && campo.value!=''){
			alert("El porcentaje debe ser mayor que 0 y menor de 100");
			campo.value='';
			campo.focus();
		}
}

function SoloNumeros(caja)
{
   var cajaBien = "";
   if (caja)
   {
      for (var i=0; i<caja.length; i++)
         if (isNaN(caja.charAt(i))==false)
            cajaBien = cajaBien + caja.charAt(i);  			
    }	
	return cajaBien;	
} 


function SoloNumerosMoneda(campo)
{
   var cajaBien = "";
 //  alert(caja);
 var caja=campo.value;
   if (caja)
   {
      for (var i=0; i<caja.length; i++)
         if (isNaN(caja.charAt(i))==false || caja.charAt(i)=='.' || caja.charAt(i)==',' || caja.charAt(i)=='$')
            cajaBien = cajaBien + caja.charAt(i);  			
    }	
	campo.value=cajaBien;	
} 



function ChangeClass(msg,id,classname){
	 var elementos=document.getElementsByTagName("span");	
	for (i=0;i<elementos.length;i++){
			idelements = elementos[i].getAttribute("id");	
		if(idelements == id){		
			elementos[i].className=classname;
			elementos[i].innerHTML=msg;									
		}
	}	
}


function CheckOption(id,msg){
	
 var objeto=document.getElementsByName(id+'[]');
 var con=0;
 var ids="tagOptionChecked_"+id;
 
 for (i=0;i<objeto.length;i++){ 
		if(objeto[i].checked){
		  con++;
		}
	}
	
	if(con==0){
		ChangeClass(msg,ids,'textOptionMsgError');
		return false;
	}else {
			ChangeClass(msg,ids,'textOptionMsg');
			return true;
	}
	
}

function CheckInputArray(id,msg){
 var objeto=document.getElementsByName(id+'[]');
 var con=0;
 var ids="tagOptionChecked_"+id;
 for (i=0;i<objeto.length;i++){ 
		if(objeto[i].value!=''){
		  con++;
		}
	}

	if(con==0){
		ChangeClass(msg,ids,'textOptionMsgError');
		return false;
	}else {
			ChangeClass(msg,ids,'textOptionMsg');
			return true;
	}
	
}


function IsEmpty(campo,msg){
	var id="tagRequered_"+campo.name;
	var id2="tagPass_"+campo.name;
	if(campo.value==''){
				ChangeClass(msg,id,'textRequiredMsgError');	
				return false;									
		}else{				
				ChangeClass(msg,id,'textRequiredMsg');

				ChangeClass(msg,id2,'textPassMsg');
				return true;
			}
}



function IsNoEmptyOption(id,msg){
	
 var objeto=document.getElementById(id);
 var con=0;
 var ids="IsNoEmptyOption";
 alert(objeto);
 /*for (i=0;i<objeto.length;i++){ 	
		if(objeto[i].value!=''){
		  con++;
		}
	}
	*/
	if(con==0){
		ChangeClass(msg,ids,'textIsNoEmptyOptionMsgError');
		return false;
	}else {
			ChangeClass(msg,ids,'textIsNoEmptyOption');
			return true;
	}
	
}
function IsEmptySelect(campo,msg){
	var id="tagRequered_"+campo.name;

	if(campo.options[campo.selectedIndex].value==0){
				ChangeClass(msg,id,'textRequiredMsgError');			
				return false;						
		}else{				
				ChangeClass(msg,id,'textRequiredMsg');
				return true;
			}
}

function IsRange(campo,msg,valmin,valmax){
	var id="tag2_"+campo.name;
	if(valmax>0){
			if(unformatNumber(campo.value)<valmin || unformatNumber(campo.value)>valmax){
					ChangeClass(msg,id,'textRequiredMsgError');
					return false;
			}else{
					ChangeClass(msg,id,'textfieldMaxValueMsg');
					return true;
				}
	}else if(valmin>0){
			if(unformatNumber(campo.value)<valmin){							
					ChangeClass(msg,id,'textRequiredMsgError');
					return false;
			}else{
					ChangeClass(msg,id,'textfieldMaxValueMsg');					
					return true;
				}	
	}

}

function IsLengthMin(campo,msg,valmin){
	var id="tagLengthMin_"+campo.name;
	var id2="tagPass_"+campo.name;

			if(campo.value.length<valmin){
					ChangeClass(msg,id,'textLengthMinMsgError');
					return false;
			}else{
					ChangeClass(msg,id,'textLengthMinMsg');
					ChangeClass(msg,id2,'textPassMsg');
					return true;
				}
				

}

function IsPassEqual(pass1,pass2,msg){
	var id="tagPass_"+pass1.name;
	var id2="tagPass_"+pass2.name;

			if(pass1.value!=pass2.value){
					ChangeClass(msg,id,'textPassMsgError');
					ChangeClass(msg,id2,'textPassMsgError');
					pass1.value='';
					pass2.value='';
					return false;
			}else{
					ChangeClass(msg,id,'textPassMsg');
					ChangeClass(msg,id2,'textPassMsg');
					return true;
				}

}

function IsRangeDate(campo,msg,fechainicial,fechafinal,patron,mask){
	var id="tagDateRange_"+campo.name;

	if(fechainicial!='' && fechainicial!=''){		
			if(comparar_2_fechas(fechainicial,campo.value,patron,mask)==false || comparar_2_fechas(campo.value,fechafinal,patron,mask)==false){
					ChangeClass(msg,id,'textDateMsgError');
					return false;
			}else{
					ChangeClass(msg,id,'textDateMsg');
					return true;
				}
	}else if(fechainicial!=''){
			if(comparar_2_fechas(fechainicial,campo.value,patron,mask)==false){							
					ChangeClass(msg,id,'textDateMsgError');
					return false;
			}else{
					ChangeClass(msg,id,'textDateMsg');	
					return true;				
				}		
	}else if(fechafinal!=''){
			if(comparar_2_fechas(campo.value,fechafinal,patron,mask)==false){							
					ChangeClass(msg,id,'textDateMsgError');
					return false;
			}else{
					ChangeClass(msg,id,'textDateMsg');	
					return true;				
				}		
	}

}


function IsCheckDate(campo,msg,patron,mask){
	var id="tagDate_"+campo.name;
		
	if(check_fecha_2(campo.value,patron,mask)==false){
					ChangeClass(msg,id,'textDateMsgError');	
					return false;				
			}else{
					ChangeClass(msg,id,'textDateMsg');
					return true;
				}	
}
function comparar_2_fechas(fecha1,fecha2,patron,mask){

var Dia1, Mes1, Anyo1, Dia2, Mes2, Anyo2;
campo1=fecha1;
campo2=fecha2;

Dia1=campo1.substring(8,10);
Mes1=campo1.substring(5,7);
Anyo1=campo1.substring(0,4);
Dia2=campo2.substring(8,10);
Mes2=campo2.substring(5,7);
Anyo2=campo2.substring(0,4);
 if(Anyo1>Anyo2){
  	  return false;	
   }
   
   if(Anyo1==Anyo2){
	 if(Mes1>Mes2){
		    return false;
		   }else if(Mes1==Mes2){
	               if(Dia1>Dia2){
		    		return false;
				   }else{ 
				   		return true; }
			}
	}
 		
}

function check_fecha_2(fecha,patron,mask){
var campo, cadena,cadena1,control;
var Dia, Mes, Anyo, Dia_Mes_Mal = false;
campo=fecha;

Dia=campo.substring(8,10);
Mes=campo.substring(5,7);
Anyo=campo.substring(0,4);

control=1;
if (campo == "")  {
       return false; control=0;
	  }
if( campo.length !=10 || campo.substring(4,5) != patron || campo.substring(7,8) != patron ){ 
	   return false; control=0;
	   } else if(isNaN(Anyo)==true || isNaN(Mes)==true || isNaN(Dia)==true){
					   return false; control=0;
	          }else if(Dia<=0 || Mes<=0 || Anyo<=0 || Mes>12 || Mes<=0){
   			        return false; control=0;
			  	  }else if(control==1){
					/* Los meses de Enero, Marzo, Mayo, Julio, Agosto,  Octubre y Diciembre tienen 31 das */
					if(( Mes == 1 || Mes == 3 || Mes == 5 || Mes == 7 || Mes == 10 || Mes == 12 || Mes == 8 )  && Dia > 31 )   
							  Dia_Mes_Mal = true;
					
							/* Los meses de Mayo, Junio, Septiembre  y Noviembre tienen 30 das */
					
							if( (Mes == 4 || Mes == 6 || Mes == 9 || Mes == 11)  && Dia > 30  ) 
							 Dia_Mes_Mal = true;
					
						/* Febrero tiene 28  29 das, dependiendo de si es bisiesto o no. Un ao es 
						bisiesto si es mltiplo de 4 pero no de  100 salvo que sea mltiplo de 400. 
						Por ejemplo, 12 y 400  son bisiestos, pero 100 y 700 no. */
        if( Mes == 2 && ( Dia > 29 || ( Dia == 29 && ( (Anyo % 400 != 0) && ((Anyo % 4 != 0) || 
		         (Anyo % 100 == 0) ) ) ) ) )  Dia_Mes_Mal = true;
						
					
							   if(Dia_Mes_Mal)  {
								
								  return false;
								  } 
								 } else return true;///FIN DE MI FUNCIN
}






function checkMail(campo,msg) {
 var id="tagMail_"+campo.name;
 var email=campo.value;
 var filter=/^[A-Za-z][A-Za-z0-9_.]*@[A-Za-z0-9_]+\.[A-Za-z0-9_.]+[A-za-z]$/;
 if(email!=''){
			
						if (filter.test(email)){
							ChangeClass(msg,id,'textMailMsg'); 
							campo.value = email;
							return true;
						 }else{
						 	ChangeClass(msg,id,'textMailMsgError'); return false;	
						 }

						
  }else{
	  	ChangeClass(msg,id,'textMailMsg');return true;
  		}
}

/**************************************************************
Mscara de entrada. Script creado por Tunait! (21/12/2004)
Si quieres usar este script en tu sitio eres libre de hacerlo con la condicin de que permanezcan intactas estas lneas, osea, los crditos.
No autorizo a distribur el cdigo en sitios de script sin previa autorizacin
Si quieres distriburlo, por favor, contacta conmigo.
Ver condiciones de uso en http://javascript.tunait.com/
tunait@yahoo.com 
****************************************************************/
var patron = new Array(2,2,4);
var patron2 = new Array(4,2,2);
var patron3 = new Array(2,2,2);
var patron4 = new Array(2);
var patron5 = new Array(4,2);

function mascara(d,pat,sep,nums){

switch(pat){
		case 'yyyymm':
			pat=patron5;
		break;
		case 'ddmmyyyy':
			pat=patron;
		break;
		case 'yyyymmdd':
			pat=patron2;
		break;
		case 'ddmmyy':
			pat=patron3;
		break;
		case '(##) ######':
			pat=patron4;
		break;
	}
if(d.valant != d.value){

	val = d.value
	largo = val.length
	val = val.split(sep)
	val2 = ''
	for(r=0;r<val.length;r++){
		val2 += val[r]	
	}
	if(nums){
		for(z=0;z<val2.length;z++){
			if(isNaN(val2.charAt(z))){
				letra = new RegExp(val2.charAt(z),"g")
				val2 = val2.replace(letra,"")
			}
		}
	}
	val = ''
	val3 = new Array()
	for(s=0; s<pat.length; s++){
		val3[s] = val2.substring(0,pat[s])
		val2 = val2.substr(pat[s])
	}
	for(q=0;q<val3.length; q++){
		if(q ==0){
			val = val3[q]
		}
		else{
			if(val3[q] != ""){
				val += sep + val3[q]
				}
		}
	}
	d.value = val
	d.valant = val
	}
}

//Cdigo para colocar 
//los indicadores de miles mientras se escribe
//script por tunait!
//<input type="text" name="pepe" onkeyup = "puntitos(this,this.value.charAt(this.value.length-1))">

function miles(donde,caracter){
	pat = /[\*,\+,\(,\),\?,\,$,\[,\],\^]/
	valor = donde.value
	largo = valor.length
	crtr = true
	if(isNaN(caracter) || pat.test(caracter) == true){
		if (pat.test(caracter)==true){ 
			caracter = "\\" + caracter
		}
		carcter = new RegExp(caracter,"g")
		valor = valor.replace(carcter,"")
		donde.value = valor
		crtr = false
	}
	else{
		var nums = new Array()
		cont = 0
		for(m=0;m<largo;m++){
			if(valor.charAt(m) == "." || valor.charAt(m) == " ")
				{continue;}
			else{
				nums[cont] = valor.charAt(m)
				cont++
			}
		}
	}
	var cad1="",cad2="",tres=0
	if(largo > 3 && crtr == true){
		for (k=nums.length-1;k>=0;k--){
			cad1 = nums[k]
			cad2 = cad1 + cad2
			tres++
			if((tres%3) == 0){
				if(k!=0){
					cad2 = "." + cad2
				}
			}
		}
		donde.value = cad2
	}
}	

/*****************************************************************************
Cdigo para colocar los indicadores de miles  y decimales mientras se escribe
Script creado por Tunait!
Si quieres usar este script en tu sitio eres libre de hacerlo con la condicin de que permanezcan intactas estas lneas, osea, los crditos.

http://javascript.tunait.com
tunait@yahoo.com  27/Julio/03

//onkeyup="puntitos(this,this.value.charAt(this.value.length-1),'decimales')"
// onclick="puntitos(this.form.textfield,this.form.textfield.value.charAt(this.form.textfield.value.length-1),this.name)" 2 decimales
******************************************************************************/
function decimales(donde,caracter,campo)
{
var decimales = false
campo = eval("donde.form." + campo)
	for (d =0; d < campo.length; d++)
		{
		if(campo[d].checked == true)
			{
			dec = new Number(campo[d].value)
			break;
			}
		}
	if (dec != 0)
		{decimales = true}




pat = /[\*,\+,\(,\),\?,\\,\$,\[,\],\^]/
valor = donde.value
largo = valor.length
crtr = true
if(isNaN(caracter) || pat.test(caracter) == true)
	{
	if (pat.test(caracter)==true) 
		{caracter = "\\" + caracter}
	carcter = new RegExp(caracter,"g")
	valor = valor.replace(carcter,"")
	donde.value = valor
	crtr = false
	}
else
	{
	var nums = new Array()
	cont = 0
	for(m=0;m<largo;m++)
		{
		if(valor.charAt(m) == "." || valor.charAt(m) == " " || valor.charAt(m) == ",")
			{continue;}
		else{
			nums[cont] = valor.charAt(m)
			cont++
			}
		
		}
	}

if(decimales == true) {
	ctdd = eval(1 + dec);
	nmrs = 1
	}
else {
	ctdd = 1; nmrs = 3
	}
var cad1="",cad2="",cad3="",tres=0
if(largo > nmrs && crtr == true)
	{
	for (k=nums.length-ctdd;k>=0;k--){
		cad1 = nums[k]
		cad2 = cad1 + cad2
		tres++
		if((tres%3) == 0){
			if(k!=0){
				cad2 = "." + cad2
				}
			}
		}
		
	for (dd = dec; dd > 0; dd--)	
	{cad3 += nums[nums.length-dd] }
	if(decimales == true)
	{cad2 += "," + cad3}
	 donde.value = cad2
	}
donde.focus()
}	
