// JavaScript Document
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 lan,i,p,q,nm,test,num,min,max,errors='',args=MM_validateForm.arguments;
	lan=args[args.length-1];	
	
  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)) {
					if (lan=='es') errors+='- '+nm+': debe contener una dirección de e-mail.\n';
					else if (lan=='de') errors+='- '+nm+': wir benötigen eine e-mail Adresse.\n';
					else errors+='- '+nm+': we need an e-mail address.\n';
				}
		  } else if (test.indexOf('Idem')!=-1) {
				p=MM_findObj(args[i+1]); q=p.name;
				p=p.value;
				if (p.toUpperCase()!=val.toUpperCase()) {
					if (lan=='es') errors+='- '+nm+', '+q+': no coinciden.\n';
					else if (lan=='de') errors+='- '+nm+', '+q+': stimmen nicht überein'; 
					else errors+='- '+nm+', '+q+': do not match';			
				}				
      } else if (test!='R') { num = parseFloat(val);
        if (isNaN(val)) {
					if (lan=='es') errors+='- '+nm+' debe contener un número.\n';
					else if (lan=='de') errors+='- '+nm+' muss eine Nummer beinhalten.\n';
					else errors+='- '+nm+' must contain a number.\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+' must contain a number between '+min+' and '+max+'.\n';
    } } } else if (test.charAt(0) == 'R') { 
		  if (lan=='es') errors += '- '+TransLabel(lan,nm)+': se necesita esta información.\n'; 
			else if (lan=='de') errors += '- '+TransLabel(lan,nm)+': wird benötigt.\n';
			else errors += '- '+TransLabel(lan,nm)+': is required.\n';
		  }
		}
  } if (errors) {        
		if (lan=='es') alert('Se han encontrado los siguientes errores:\n'+errors);
		else if (lan=='de') alert('Folgende/r Fehler sind/ist aufgetreten:\n'+errors); 
		else  alert('The following error(s) occurred:\n'+errors); 
	}
  document.MM_returnValue = (errors == '');
}

function MM_validateFormOR() { //v4.0
  var lan,i,p,q,nm,test,num,min,max,result=1,gerr='',args=MM_validateFormOR.arguments;
	lan=args[args.length-1];
  for (i=0; i<(args.length-2); i+=3) { 
	 errors='';
	 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)) {
					if (lan='es') errors+='- '+nm+': debe contener una dirección de e-mail.\n';
					else if (lan='de') errors+='- '+nm+':wir benötigen eine e-mail Adresse.\n';
					else errors+='- '+nm+': we need an e-mail address.\n';
				}
      } else if (test!='R') { num = parseFloat(val);
        if (isNaN(val)) {
					if (lan='es') errors+='- '+nm+' debe contener un número.\n';
					else if (lan='de') errors+='- '+nm+' muss eine Nummer beinhalten.\n';
					else errors+='- '+nm+' must contain a number.\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+' must contain a number between '+min+' and '+max+'.\n';
    } } } else if (test.charAt(0) == 'R') { 
		  if (lan='es') errors += '- '+nm+'.\n'; 
			else if (lan='de') errors += '- '+nm+'.\n';
			else errors += '- '+nm+'.\n';
			}
		}
		gerr += errors;
		if (!errors) result=0;
  }
	if (result) {
		if (lan='es') alert('Debe rellenar AL MENOS UNO de estos campos:\n'+gerr);
		else if (lan='de') alert('Folgende/r Fehler sind/ist aufgetreten:\n'+gerr);
		else alert('The following error(s) occurred:\n'+gerr);
	}
  document.MM_returnValue = (!result);
}

var popUpWin=0; 
function popUpWindow(URLStr, left, top, width, height)
{
  var winl = (screen.width - width) / 2;
  var wint = (screen.height - height) / 2;
	
  if(popUpWin)
  {
    if(!popUpWin.closed) 	popUpWin.close();
  }
  popUpWin = open(URLStr, 'popUpWin', 'scrollbars=1,resizable=1,width='+width+',height='+height+',left='+winl+', top='+wint+',screenX='+left+',screenY='+top+'');
}

function popUpWindow2(URLStr, win, left, top, width, height)
{
  var winl = (screen.width - width) / 2;
  var wint = (screen.height - height) / 2;
	
  open(URLStr, win, 'scrollbars=1,resizable=1,width='+width+',height='+height+',left='+winl+', top='+wint+',screenX='+left+',screenY='+top+'');
}

function popUpWindow3(URLStr, win)
{
  open(URLStr, win );
}

/* Funciones para obtencion de variables entre paginas */
function obtener_valor(variable)
{
var variable_may = variable.toUpperCase();
var variable_pos = url.indexOf(variable_may);

if (variable_pos != -1)
{
var pos_separador = url.indexOf("&", variable_pos);

if (pos_separador != -1)
{
return url.substring(variable_pos + variable_may.length + 1, pos_separador);
} else
{
return url.substring(variable_pos + variable_may.length + 1, url.length);
}
} else
{
return "NO_ENCONTRADO";
}
}

function TransLabel(lan,lab) {
  var res;  
  res=lab;
  
  if (lab=='Nombre') {
    if (lan=='en') res='Name';
    if (lan=='de') res='Name';
  }
  if (lab=='Reescribir') {
    if (lan=='en') res='Confirm E-mail';
    if (lan=='de') res='E-Mail Bestätigung';
  }
  if (lab=='Desde') {
    if (lan=='en') res='From';
    if (lan=='de') res='von';
  }
  if (lab=='Hasta') {
    if (lan=='en') res='Until';
    if (lan=='de') res='bis';
  }
    
  
  return res;
}
