// JavaScript Document
function j_validar(xinput,tipval){
	var xkey=event.keyCode;
//alert(xkey);
	if(tipval=="desabilitar01")
		if ((xkey < 48) || (xkey > 57)) event.returnValue = false;
	if(tipval=="disabled_number")
		if ((xkey < 46) || (xkey > 57)) event.returnValue = false;
    if(tipval=="desabilitar03")
		if (((xkey != 32) && (xkey < 65)) || ((xkey > 90) && (xkey < 97))) event.returnValue = false;
	if(tipval=="disabled_letra")
		if (((xkey != 32) && (xkey < 45) && (xkey == 46)) || ((xkey > 57))) event.returnValue = false;
}

function SwitchMenu(obj){
	if(document.getElementById){
	var el = document.getElementById(obj);
	var ar = document.getElementById("masterdiv").getElementsByTagName("span"); //DynamicDrive.com change
		if(el.style.display != "block"){ //DynamicDrive.com change
			for (var i=0; i<ar.length; i++){
				if (ar[i].className=="submenu") //DynamicDrive.com change
				ar[i].style.display = "none";
			}
			el.style.display = "block";
		}else{
			el.style.display = "none";
		}
	}
}

function validar_texto(e) {
	tecla = (document.all) ? e.keyCode : e.which;
	//Tecla de retroceso para borrar, siempre la permite
	if (tecla==8) return true;
	// Patron de entrada, en este caso solo acepta letras
	//patron =/[A-Za-z]/;
	patron = /\d/;
	tecla_final = String.fromCharCode(tecla);
	return patron.test(tecla_final);
}

function bNavegador() {
  if( navigator.appName ){
    if( navigator.appName == "Microsoft Internet Explorer")  return 1;
    if( navigator.appName == "Netscape")  return 2;
  }
  return 0;
}

var contador = 1;
function intranet(modulo){
  var w=640, h=480;
  var windowName = new String( contador );
    windowName = "v" + windowName;
	
  var x = bNavegador();
  if( window.screen && window.screen.availHeight ){
    h = window.screen.availHeight - 95; // 63
    if( x==2 ) h = h - 11;
    w = window.screen.availWidth - 4;
  }
  window.open( modulo + "/", windowName,
   "status=yes,resizable=yes,toolbar=yes,scrollbars=yes,top=0,left=0,width=" + w + ",height=" + h, 1 );
}

<!--
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_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_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];}
}
//-->