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+='- '+args[i+1]+' dbe ser un Correo Electrónico.\n';
      } else if (test!='R') { num = parseFloat(val);
        if (isNaN(val)) errors+='- '+args[i+1]+' dbe ser un número.\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+='- '+args[i+1]+' debe ser un númerp entre '+min+' y '+max+'.\n';
    } } } else if (test.charAt(0) == 'R') errors += '- '+args[i+1]+' es obligatorio.\n'; }
  }
if(document.form1.Imagen ) errors += VerificarExtesion(document.form1.Imagen,1);
if(document.form1.Archivo ) errors += VerificarExtesion(document.form1.Archivo,2);
if (errors) alert('Han ocurrido un errores:\n'+errors);
  document.MM_returnValue = (errors == '');
}

function removeLeadingAndTrailingChar (inputString, removeChar) 
{
	var returnString = inputString;
	if (removeChar.length)
	{
	  while(''+returnString.charAt(0)==removeChar)
		{
		  returnString=returnString.substring(1,returnString.length);
		}
		while(''+returnString.charAt(returnString.length-1)==removeChar)
	  {
		returnString=returnString.substring(0,returnString.length-1);
	  }
	}
	return returnString;
}


function VerificarExtesion(obj, opc){

	var bolExtensionCorrecta = false, intIndexResultado = 0;
	var strRuta = new String;
	var strExtension = new String;
	strRuta = removeLeadingAndTrailingChar(obj.value, ' ')
	if ( strRuta.length > 0 )
	{
		strExtension = strRuta.substr( strRuta.length - 4, 4 )
		if(opc==1)
		{
		 if (strExtension.toUpperCase() == '.JPG' ) bolExtensionCorrecta = true;
		 if (bolExtensionCorrecta == false) return "- La Imagen NO esta en el formato correcto (*.jpg).\n";
		}
		else
		if(opc==2)
		{
		 if (strExtension.toUpperCase() == '.PDF' ) bolExtensionCorrecta = true;
		 if (bolExtensionCorrecta == false) return "- La Imagen NO esta en el formato correcto (*.pdf).\n";
		}
	}
	return "";
}

function eliminar(Id)
{
  if( confirm('¿Desea eliminar este Registro?') == true )
  {
	document.formeliminar.MM_recordId.value = Id;	
	document.formeliminar.submit();
  }
}
