function ocultar(objCtrl){
var objText=eval('document.all.'+ objCtrl);
objText.value='';
}


function ocultar2(select,objCtrl,objNum,objFec,objAlfa){
 
  var objTextSel=eval('document.all.'+ select);
  var objText=eval('document.all.'+ objCtrl);
  var objTextNum=eval('document.all.'+ objNum);
  var objTextDate=eval('document.all.'+ objFec);
  var objTextAlfa=eval('document.all.'+ objAlfa);
  switch(objTextSel.value){
    case 'N':
      objTextNum.value=objText.value;
      objTextDate.value="";
      objTextAlfa.value="";
      break;
    case 'A':
      objTextNum.value="";
      objTextDate.value="";
      objTextAlfa.value=objText.value;
      break;
    case 'D':
      objTextNum.value="";
      objTextDate.value=objText.value;
      objTextAlfa.value="";
      break;   
  }
  
}

function abreventa(nombre,w,h){
  window.open(nombre,'newl','toolbar=no,location=no,directories=no,status=yes,menubar=no,scrollbars=yes,resizable=yes,width='+w+',screenX=20,screenY=20,height='+h);
}

function consisfec(xdia,xmes,xano) {
  if (parseInt(xdia)==0 || parseInt(xmes)==0 || parseInt(xano)==0) return false;
  var meses=new Array(31,28,31,30,31,30,31,31,30,31,30,31);
  meses[1]=((xano % 4)==0) ? 29 : 28;
  return ((xdia<=meses[xmes-1]) ? true : false);
}

function esEmail(elm) {
  var indiceArroba=elm.value.indexOf('@');
  var longitud=elm.value.length;
  if (indiceArroba<1 || longitud<5) return false;
  for (i=0;i<longitud;i++)
    if (elm.value.charAt(i) < '!' || elm.value.charAt(i) > '~') return false;

  if (elm.value.indexOf(' ') == -1 &&
      elm.value.indexOf(';') == -1 &&
      elm.value.indexOf(',') == -1 &&
      elm.value.indexOf('/') == -1 &&
      elm.value.indexOf('?') == -1 &&
      elm.value.indexOf('*') == -1 &&
      elm.value.indexOf(':') == -1 &&
      elm.value.indexOf('<') == -1 &&
      elm.value.indexOf('>') == -1 &&
      elm.value.indexOf('(') == -1 &&
      elm.value.indexOf(')') == -1 &&
      elm.value.indexOf('[') == -1 &&
      elm.value.indexOf(']') == -1 &&
      elm.value.indexOf('{') == -1 &&
      elm.value.indexOf('}') == -1 &&
      elm.value.indexOf('«') == -1 &&
      elm.value.indexOf('`') == -1 &&
      elm.value.indexOf('.') != -1 &&
      elm.value != '' &&
      indiceArroba < (longitud-5)) {
    dominioEmail=elm.value.substring(indiceArroba+1,longitud);
    if (dominioEmail.indexOf('@') == -1 &&
        dominioEmail.indexOf('.') > 0 &&
        dominioEmail.charAt(dominioEmail.length - 1) != '.')
      return true;
    else return false
  }
  else return false;
}

function noVacio(elm) {
  if (elm.value == '' ||
    elm.value == null) 
  return false;
  else return true;
}

function trim(str) {
  while (str.charAt(0) == ' ') str = str.substring(1);
  while (str.charAt(str.length - 1) == ' ') str = str.substring(0, str.length - 1);
  return str;
}

function valorDeCombo(objectoCombo) {
  return objectoCombo.options[objectoCombo.selectedIndex].value;
}