function Trim(s)
{
          // Remove leading spaces and carriage returns
          while ((s.substring(0,1) == ' ') || (s.substring(0,1) == '\n') || (s.substring(0,1) == '\r'))
          {
                s = s.substring(1,s.length);
          }

          // Remove trailing spaces and carriage returns
          while ((s.substring(s.length-1,s.length) == ' ') || (s.substring(s.length-1,s.length) == '\n') || (s.substring(s.length-1,s.length) == '\r'))
          {
                s = s.substring(0,s.length-1);
          }
  return s;
}


function valCaracter(val)
{
	var digits="0123456789qwertyuiopasdfghjklzxcvbnmQWERTYUIOPASDFGHJKLZXCVBNM-";
	var temp;
	for (var i=0;i<val.length;i++)
    {
      temp=val.substring(i,i+1);
			if (digits.indexOf(temp)==-1)
          {
          	return false;
 					}//if
  	}//for
   return true;
}//function


function soloLetras(val)
{
	var digits="qwertyuiopasdfghjklzxcvbnmQWERTYUIOPASDFGHJKLZXCVBNM0123456789";
	var temp;
	for (var i=0;i<val.length;i++)
    {
      temp=val.substring(i,i+1);
			if (digits.indexOf(temp)==-1)
          {
          	return false;
 					}//if
  	}//for
   return true;
}//function

function valNumbers(val)
{

	var digits="0123456789";
	var temp;
	for (var i=0;i<val.length;i++)
    {
      temp=val.substring(i,i+1);
			if (digits.indexOf(temp)==-1)
          {
          	return false;
 					}//if
  	}//for
   return true;
}//function


function newRequest()
  { 
      var xmlhttp=false; 
      try 
      { 
        xmlhttp=new ActiveXObject("Msxml2.XMLHTTP"); 
      }
      catch(e)
      { 
        try
        { 
          xmlhttp=new ActiveXObject("Microsoft.XMLHTTP"); 
        } 
        catch(E) { xmlhttp=false; }
      }
      if (!xmlhttp && typeof XMLHttpRequest!='undefined') { xmlhttp=new XMLHttpRequest(); } 
      return xmlhttp; 
  }//function
  


  
  function WindowOpen(w,h,jsp,iframe)
{
      var LeftPosition = (screen.width) ? (screen.width-w)/2 : 0;  
      var TopPosition = (screen.height) ? (screen.height-h)/2 : 0;
      settings = 'height='+h+',width='+w+',top='+TopPosition+',left='+LeftPosition+',scrollbars=yes,dependent=0,resizable=yes,status=0,dialog=YES,modal=YES';   
      newWindow=  window.open(jsp,iframe,settings);
      newWindow.focus();

}




function escapeTxt(os)
{
    var ns='';
    var t;
    var chr='';
    var cc='';
    var tn='';
        for(i=0;i<256;i++)
        {
            tn=i.toString(16);
            if(tn.length<2)tn="0"+tn;
            cc+=tn;
            chr+=unescape('%'+tn);
        }
        cc=cc.toUpperCase();
        os.replace(String.fromCharCode(13)+'',"%13");
        for(q=0;q<os.length;q++)
          {
              t=os.substr(q,1);
              for(i=0;i<chr.length;i++)
              {
                  if(t==chr.substr(i,1))
                  {
                      t=t.replace(chr.substr(i,1),"%"+cc.substr(i*2,2));
                      i=chr.length;
                  }
              }
              ns+=t;
          }
        return ns;

}


    
    
    
    
    
    
function char_validos(val)
{
	var digits="qwertyuiopasdfghjklzxcvbnmQWERTYUIOPASDFGHJKLZXCVBNM0123456789. ~`!@#$^*()-_{}[];:/";
	var temp;
	for (var i=0;i<val.length;i++)
    {
      temp=val.substring(i,i+1);
			if (digits.indexOf(temp)==-1)
          {
          	return false;
 					}//if
  	}//for
   return true;
}//function



function valDouble(val)
{

	var digits="0123456789.";
	var temp;
	for (var i=0;i<val.length;i++)
    {
      temp=val.substring(i,i+1);
			if (digits.indexOf(temp)==-1)
          {
          	return false;
 					}//if
  	}//for
   return true;
}//function



 
 var thetr=null;    
 var class_=null;
function selecciona(tr)
    {
      if(thetr!=null)thetr.className=class_;
      thetr=tr;
      class_=tr.className;
      tr.className='selecciona';
    }
    
    
      
 
 var thetr2=null;    
 var class2_=null;
function selecciona2(tr)
    {
      if(thetr2!=null)thetr2.className=class2_;
      thetr2=tr;
      class2_=tr.className;
      tr.className='selecciona';
    }
    
    
      
      
 
 var thetr3=null;    
 var class3_=null;
function selecciona3(tr)
    {
      if(thetr3!=null)thetr3.className=class3_;
      thetr3=tr;
      class3_=tr.className;
      tr.className='selecciona';
    }
    

 var thetr4=null;    
 var class4_=null;
function selecciona4(tr)
    {
      if(thetr4!=null)thetr4.className=class4_;
      thetr4=tr;
      class4_=tr.className;
      tr.className='selecciona';
    }



 var trsel=null;    
 var classsel=null;
function sel(tr)
    {
      if(trsel!=null)trsel.className=classsel;
      trsel=tr;
      classsel=tr.className;
      tr.className='selectedrow2';
    }
    



