function MM_openBrWindow(theURL,winName,features) { //v2.0
  window.open(theURL,winName,features);
}
   
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_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_openBrWindow(theURL,winName,features) { //v2.0
  window.open(theURL,winName,features);
}

function MM_jumpMenu(targ,selObj,restore){ //v3.0
  eval(targ+".location='"+selObj.options[selObj.selectedIndex].value+"'");
  if (restore) selObj.selectedIndex=0;
}

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_validateForm() { //v4.0
  var i,p,q,nm,test,num,min,max,errors='',args=MM_validateForm.arguments;
  for (i=0; i<(args.length-2); i+=3) { test=args[i+2]; val=MM_findObj(args[i]);
    if (val) { nm=val.name; if ((val=val.value)!="") {
      if (test.indexOf('isEmail')!=-1) { p=val.indexOf('@');
        if (p<1 || p==(val.length-1)) errors+='- '+nm+' debe contener un email válido.\n';
      } else if (test!='R') { num = parseFloat(val);
        if (isNaN(val)) errors+='- '+nm+' debe contener números.\n';
        if (test.indexOf('inRange') != -1) { p=test.indexOf(':');
          min=test.substring(8,p); max=test.substring(p+1);
          if (num<min || max<num) errors+='- '+nm+' debe contener un número entre '+min+' y '+max+'.\n';
    } } } else if (test.charAt(0) == 'R') errors += '- '+nm+' es necesario.\n'; }
  } if (errors) alert('Los siguientes errores se encontraron:\n'+errors);
  document.MM_returnValue = (errors == '');
}

function totalisa(){
var   fm = document.calcula;
var	uf  = Number(fm.lauf.value),
	por = Number(fm.elpor.value),
	totale = uf * por;
	iva=totale*.19;
	grantotal=totale + iva;
	fm.eltotal.value = totale;
	fm.eliva.value = iva;
	fm.elgrantotal.value = grantotal;
	MM_findObj('lacalcula').style.display="";
}
function mostracalc(){
	MM_findObj('lacalcula').style.display="";
}

function explain(name, output, msg) {
newwin = window.open('','','top=150,left=150,width=325,height=300');
if (!newwin.opener) newwin.opener = self;
with (newwin.document)
{
open();
write('<html><head><title>Ayuda Tardis Ltda</title>');
write('<link href="tardis.css" rel="stylesheet" type="text/css">');
write('</head>');
write('<body onLoad="document.form.box.focus()" bgcolor="#ffffff" class="normal"  leftmargin="0" topmargin="0" marginwidth="0" marginheight="0" class="normal">');
write('<table height="100%" width="100%" border="0" cellpadding="0" cellspacing="0" class="normal"><tr valign="top"><td width="1" align="left" background="images/e_b.gif"><img src="images/e_i_t.gif" width="6" height="6"></td>    <td width="100%" align="center" background="images/e_b.gif"><img src="images/e_b.gif" height="17" width="1"></td><td width="1" align="right"  background="images/e_b.gif"><img src="images/e_d_t.gif" width="6" height="6"></td></tr><tr height="100%"><td width="1" align="left">&nbsp;</td><td align="center" class="fondobien">');
write('<form name=form><p class="titulo">Ayuda Tardis</p>' + msg + '<br>');
write('<p>Puedes ingresar <b>' + name + '</b> aqu&iacute; y va a ser copiado al formulario.');
write('<p><center>' + name + ':  <input type=text name=box size=10 onKeyUp=' + output + '=this.value>');
write('<p><input type=button value=" Cerrar la ventana " style="width:120px" onClick=window.close()>');
write('</center></form>');
write('</td><td width="1" align="right">&nbsp;</td></tr><tr valign="bottom"><td width="1" align="left" background="images/e_t.gif"><img src="images/e_i_b.gif" width="6" height="6"></td><td width="100%" background="images/e_t.gif"><img src="images/e_t.gif" width="1" height="6"></td><td width="1" align="right" background="images/e_t.gif"><img src="images/e_d_b.gif" width="6" height="6"></td></tr></table>');
write('</body></html>');
close();
   }
}

function mostrar_re(elid) {
	var obj2=MM_findObj("t"+elid);
	if(obj2.style.display=="none"){
	obj2.style.display="";
	} else {
	obj2.style.display="none";
	}
}

function putFocus(campo) {
  var elcampo=MM_findObj(campo);
  elcampo.focus();
 }
 
 function putFocus2(campo) {
  var elcampo=MM_findObj(campo);
  elcampo.focus();
  elcampo.select()
 }
 
  function nuevoAjax(){
        var xmlhttp=false;
        try {
                xmlhttp = new ActiveXObject("Msxml2.XMLHTTP");
                } catch (e) {
                        try {
                                xmlhttp = new ActiveXObject("Microsoft.XMLHTTP");
                                } catch (E) {
                                        try{
                                                xmlhttp = new XMLHttpRequest();
                                        } catch(E2){
                                                xmlhttp = false;
                                        }
                        }
        }

        if (!xmlhttp && typeof XMLHttpRequest!='undefined') {
        xmlhttp = new XMLHttpRequest();
        }
        return xmlhttp;
}

function traePag(url, el){

        aj = nuevoAjax();
        var dir = url;
        aj.open('GET', dir, true);
        aj.onreadystatechange = function(){
                if(aj.readyState == 4){
                        //alert(aj.responseText)
                        el = MM_findObj(el);
						if(el.type=='text'){
							el.value=aj.responseText;
						} else {
							el.innerHTML = aj.responseText;
						}

                }
        }
        aj.send(null)
}