//***********************************************
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];}
}
//***********************************************
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;
}
//***********************************************
//*querystring en javascript
//***********************************************
function PageQuery(q) {
if(q.length > 1) this.q = q.substring(1, q.length);
else this.q = null;
this.keyValuePairs = new Array();
if(q) {
for(var i=0; i < this.q.split("&").length; i++) {
this.keyValuePairs[i] = this.q.split("&")[i];
}
}
this.getKeyValuePairs = function() { return this.keyValuePairs; }
this.getValue = function(s) {
for(var j=0; j < this.keyValuePairs.length; j++) {
if(this.keyValuePairs[j].split("=")[0] == s)
return this.keyValuePairs[j].split("=")[1];
}
return false;
}
this.getParameters = function() {
var a = new Array(this.getLength());
for(var j=0; j < this.keyValuePairs.length; j++) {
a[j] = this.keyValuePairs[j].split("=")[0];
}
return a;
}
this.getLength = function() { return this.keyValuePairs.length; } 
}
function queryString(key){
var page = new PageQuery(window.location.search); 
return unescape(page.getValue(key)); 
}


//***********************************************
//*quita los espacios de un string 
//***********************************************
 function quitarespacios(string) 
 {
  var temp = "";
  string = '' + string;
  splitstring = string.split(" ");
  for(i = 0; i < splitstring.length; i++)
    temp += splitstring[i];
  return temp;
 }
//***********************************************
//*valida rut
//***********************************************
function Valida_Rut(varrut)
{
 var k=2;
 var sum=0;
 var i=0;
 var cadena1=quitarespacios(varrut.value); 
 cadena=cadena1.length
  for (i = cadena-1; i >-1; i--) 
 {
  if (k == 8) 
   {
    k = 2; 
   }
  cad=parseInt(cadena1.substr(i,1));
  sum = cad*k + sum;              
  k++;   
 }  
 sum = sum%11;
 if (sum != "0")
  {
  sum = 11 - sum;
  }
 if (sum == 10) 
   {
    sum="K";
   }
 return sum
}
//***********************************************
//*valida fechas
//***********************************************
function ValidarFecha(fecha) 
 {
    var Dia_Mes_Mal = false;
    
    if ( fecha.length != 10)
        return false;
    if ( fecha.substr(2,1) != '/')
        return false;
    if ( fecha.substr(5,1) != '/')
        return false;
        
    var Dia = parseFloat(fecha);
    
    var Mes = parseInt(fecha.substr(3,2),10);
     
    var Anyo = parseInt(fecha.substr(6,4),10);
    
    if( !isNaN(Dia) && !isNaN(Mes) && !isNaN(Anyo) && Dia >= 1 && Anyo >= 1900)
      {
      if((Mes == 1 || Mes == 3 || Mes == 5 || Mes == 7 || Mes == 8 || Mes == 10 || Mes == 12) && Dia > 31)
        Dia_Mes_Mal = true;
      if((Mes == 4 || Mes == 6 || Mes == 9 || Mes == 11) && Dia > 30 ) 
        Dia_Mes_Mal = true;
      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;
      }  
     else  
      {
       return false;
      }
      
    } 
//***********************************************
//*valida hora
//***********************************************
function ValidarHora(p_hora) 
 {
    if ( (p_hora.length < 1) && (p_hora.length > 2) )
        return false;
        
    var Hora = parseInt(p_hora);
    
    return ( !isNaN(Hora) && Hora >= 0 && Hora < 24)
      
 }  
 //***********************************************
//*valida min
//***********************************************
function ValidarMin(p_min) 
 {
    if ( (p_min.length < 1) && (p_min.length > 2) )
        return false;
        
    var Min = parseInt(p_min);
    
    return ( !isNaN(Min) && Min >= 0 && Min < 60)
      
 }     
//***********************************************
//*imprime en html
//***********************************************
 function layerWrite(id,nestref,text) 
 {
    document.all[id].innerHTML = text
 }
//***********************************************
//*entrega el formato de un numero con x cant de decimales
//***********************************************
  function number_format(value, precision) 
 { 
  value = "" + value //convert value to string 
  precision = parseInt(precision); 
  
  var whole = "" + Math.round(value * Math.pow(10, precision)); 
  if (whole.length==1)
  {
   whole="0"+whole;
  }
  var decPoint = whole.length - precision; 
  if(decPoint != 0) 
  { 
  if (whole.substring(0, decPoint)=="")
   result = "0"; 
  else
   result = whole.substring(0, decPoint); 
 
  result += "."; 
  result += whole.substring(decPoint, whole.length); 
  } 
  else 
  { 
  result = "0."+whole; 
  } 
  return result; 
 }
 //***********************************************
 function numeros(caja)
 {
 if (document.all)
  {
   t=event.keyCode;
   //0-9,<-,.
   if ((t>=48 && t<=57) || (t==8) ) 
    {t=0;}
   else 
    {event.keyCode= 0;}
  }  
 }
//***********************************************
function caracteres(caja)
 {
 if (document.all)
  {
   t=event.keyCode;
   if(t==64 || t==59 || t==47 || t==60 || t==62 || t==42
	|| t==127 || t==39 || t==38 || t==36 || t==34)
    {event.keyCode= 0;}
   else
    {t=0;}
  }  
 }
//***********************************************
function numerosdecimales(caja)
 {
 var ncaja=caja.value;
 if (document.all)
  {
   t=event.keyCode;
   //0-9,<-,.
   if ((t>=48 && t<=57) || (t==8) || (t==46)) 
    {
     if (t==46)
     { 
      if (ncaja.length==0)
       {
        alert("Ingrese Enteros Antes del Punto Decimal");
        caja.focus();
        event.keyCode= 0;
        return;
       }
      if (ncaja.indexOf('.')>0)   
       {
        alert("Ya Existe un Punto Decimal");
        caja.focus();
        event.keyCode= 0;
        return;
       }
     } 
     t=0;
    }
   else 
    {
    event.keyCode= 0;
    }
  }  
 }
//***********************************************
function desactoption(optionb)
 {
  var i;
  if (optionb!=eval("undefined"))
  {
   if (optionb.length>0)
    for (i=0;i<optionb.length;i++)
     optionb[i].checked=false;     
   else
    optionb.checked=false;
  }  
 }
//***********************************************  
function imprimecodbarra(cod)
{
    var  barcode=cod;
    code = '*' + barcode + '*';
    l = "\x3C";  g = "\x3E";
    //astr = l + 'html' + g + "\n" + l + 'head' + g + "\n" + 
    //       l + 'title' + g + code + l + '/title' + g + "\n" + 
    //       l + '/head' + g + "\n";
    //astr += l + 'body' + g + "\n";
    astr = l + 'table border=0 cellspacing=0 cellpadding=0' + g + "\n" +
            l + 'tr' + g;
            //
            //l + 'caption' + g + '*' + barcode + '*' + 
            //l + '/caption' + g + "\n";
            //l + 'tr' + g;
    bcstr = "";
    for (i = 0; i < code.length; i++) {
      bc = "";
      if (code.charAt(i) == ' ') { bc = '100011101011101';}
      if (code.charAt(i) == '$') { bc = '100010001000101';}
      if (code.charAt(i) == '%') { bc = '101000100010001';}
      if (code.charAt(i) == '*') { bc = '100010111011101';}
      if (code.charAt(i) == '+') { bc = '100010100010001';}
      if (code.charAt(i) == '-') { bc = '100010101110111';}
      if (code.charAt(i) == '.') { bc = '111000101011101';}
      if (code.charAt(i) == '/') { bc = '100010001010001';}
      if (code.charAt(i) == '0') { bc = '101000111011101';}
      if (code.charAt(i) == '1') { bc = '111010001010111';}
      if (code.charAt(i) == '2') { bc = '101110001010111';}
      if (code.charAt(i) == '3') { bc = '111011100010101';}
      if (code.charAt(i) == '4') { bc = '101000111010111';}
      if (code.charAt(i) == '5') { bc = '111010001110101';}
      if (code.charAt(i) == '6') { bc = '101110001110101';}
      if (code.charAt(i) == '7') { bc = '101000101110111';}
      if (code.charAt(i) == '8') { bc = '111010001011101';}
      if (code.charAt(i) == '9') { bc = '101110001011101';}
      if (code.charAt(i) == 'A') { bc = '111010100010111';}
      if (code.charAt(i) == 'B') { bc = '101110100010111';}
      if (code.charAt(i) == 'C') { bc = '111011101000101';}
      if (code.charAt(i) == 'D') { bc = '101011100010111';}
      if (code.charAt(i) == 'E') { bc = '111010111000101';}
      if (code.charAt(i) == 'F') { bc = '101110111000101';}
      if (code.charAt(i) == 'G') { bc = '101010001110111';}
      if (code.charAt(i) == 'H') { bc = '111010100011101';}
      if (code.charAt(i) == 'I') { bc = '101110100011101';}
      if (code.charAt(i) == 'J') { bc = '101011100011101';}
      if (code.charAt(i) == 'K') { bc = '111010101000111';}
      if (code.charAt(i) == 'L') { bc = '101110101000111';}
      if (code.charAt(i) == 'M') { bc = '111011101010001';}
      if (code.charAt(i) == 'N') { bc = '101011101000111';}
      if (code.charAt(i) == 'O') { bc = '111010111010001';}
      if (code.charAt(i) == 'P') { bc = '101110111010001';}
      if (code.charAt(i) == 'Q') { bc = '101010111000111';}
      if (code.charAt(i) == 'R') { bc = '111010101110001';}
      if (code.charAt(i) == 'S') { bc = '101110101110001';}
      if (code.charAt(i) == 'T') { bc = '101011101110001';}
      if (code.charAt(i) == 'U') { bc = '111000101010111';}
      if (code.charAt(i) == 'V') { bc = '100011101010111';}
      if (code.charAt(i) == 'W') { bc = '111000111010101';}
      if (code.charAt(i) == 'X') { bc = '100010111010111';}
      if (code.charAt(i) == 'Y') { bc = '111000101110101';}
      if (code.charAt(i) == 'Z') { bc = '100011101110101';}
      //window.document.write(bc+"<br>");    
      if (bcstr != "") {bcstr+="0";}
      bcstr += bc;
    }
    for (i = 0; i < bcstr.length; i++) {
      astr += l + 'td' + g + l + 'img src="../imag/Pbc-' + 
              bcstr.charAt(i) + '.png"' + g + l + '/td' + g + "\n";
    }
    astr += l + '/tr' + g + "\n";
    astr += l + '/table' + g + "\n" + l + '/body' + g + "\n"; 
    //+l + '/html' + g + "\n";
    window.document.write(astr);    
}
//***********************************************
 function numerosyk(caja)
 {
 if (document.all)
  {
   t=event.keyCode;
   //0-9,<-,.
   if ((t>=48 && t<=57) || (t==8) || (t==107) || (t==75)) 
    {t=0;}
   else 
    {event.keyCode= 0;}
  }  
 }
//***********************************************  
//focus,select
//************************************************
function salta(f1,f2)
{
 if (f1.value.length==1)
  {
   f1.value=f1.value+String.fromCharCode(event.keyCode);
   event.keyCode=0;
   f2.select();
   f2.focus();  
  } 
}
//********************************************* 
 function formatohora(caja) 
 {
  var varerror=1;
  var ncaja=quitarespacios(caja.value);
  var dig=0;
  var mcaja="";
  if (ncaja!="")
  {
   var num=caja.value;
   var patron=/[0-9]{4}/;
   if (patron.test(num))
   { 
    dig=ncaja.substr(0,2);
    if (parseInt(dig)>23) 
     varerror=-1;  
    else
     {
      dig=ncaja.substr(2,2);
      if (parseInt(dig)>59) 
       varerror=-1;       
      else
       caja.value=ncaja.substr(0,2)+':'+ncaja.substr(2,2) 
     }
   }
   else
   {
    var patron=/[0-9]{2}:[0-9]{2}/;
    if (patron.test(num))
    {
     dig=ncaja.substr(0,2);
     if (parseInt(dig)>23) 
      varerror=-1;  
     else
      {
       dig=ncaja.substr(3,2);
       if (parseInt(dig)>59) 
       varerror=-1;           
      }
     }
     else 
      varerror=-1;  
    }  
  } 
  
   if (varerror==-1)
   {
    alert("La Hora Digitada es Errorea Ej:0820 o 08:20"); 
    caja.focus();
    return false;
   }
   return true;
 }
 //***********************************************
function enlaces(dir,tit) 
{
 var newdir=dir+'.asp?titulo='+tit+'&aplicacion='+dir;
 window.location.replace(newdir);
}
//*******************************************************
function funciondig(frmcaja) 
 {
  var auxa=0;
  var auxb=0;
  var auxz=0;
  var dig=0;
  var largo=0;
  largo=frmcaja.length;
  for (i = 0; i <=largo-2; i++) 
   if ((i%2)==1)
    {
    auxb=auxb+parseInt(frmcaja.substr(i,1));
    }
   else 
    {
    auxa=auxa+parseInt(frmcaja.substr(i,1));
    } 
   auxz=(auxb*3)+auxa;
   dig=10-(auxz%10);
   if (dig==10)
    return 0;
   else
    return dig; 
 }
//***********************************************   
  function valida_caracteres(cadena)
  {
   if(cadena.indexOf('@',0)!=-1 || cadena.indexOf(';',0)!=-1
	|| cadena.indexOf(' ',0)!=-1 || cadena.indexOf('/',0)!=-1
	|| cadena.indexOf(';',0)!=-1 || cadena.indexOf('<',0)!=-1
	|| cadena.indexOf('>',0)!=-1 || cadena.indexOf('*',0)!=-1
	|| cadena.indexOf('|',0)!=-1 || cadena.indexOf('`',0)!=-1
	|| cadena.indexOf('&',0)!=-1 || cadena.indexOf('$',0)!=-1
	|| cadena.indexOf('!',0)!=-1 || cadena.indexOf('"',0)!=-1
	|| cadena.indexOf(':',0)!=-1) 
    return true	
   else 
    return false	
  }
//***********************************************   
  function existesecuencia(cadena)
  {
   var auxletra=cadena.substr(0,1);
   var i=1;
   var flag=true;
   for (i=1;i<=cadena.length-1 && flag==true;i++)
   {
    if (auxletra!=cadena.substr(i,1)) 
     flag=false
   }
   return flag
  } 
//***********************************************   
 function validaemail(cadena)
  {
   var flag=false;
   if (cadena.indexOf('@', 0) == -1) 
   {     
    flag=true;
   }                          
   return flag
  }