function mouse(e) {
if (navigator.appName == 'Netscape' && (e.which == 3 || e.which == 2)){alert(' Da Capo')
return false;
}

else if (navigator.appName == 'Microsoft Internet Explorer' && (event.button == 2)){alert('Da Capo')
}
}
document.onmousedown=mouse;

//funcion que elimina los espacios de los extremos
function Trim(txt)
{
    var posi=0;
    var posf=0;
    for(var i=0;i<txt.length;i++)
    {
        if(txt.charAt(i)==" ")
            posi=posi+1;
        else
            break;
    }
    if(posi==txt.length)
        return "";
    else
    {
        for(var j=txt.length;j>0;j--)
        {
            if(txt.charAt(j-1)==" ")
                posf=posf+1;
            else
                break;
        }
    }
    texto=txt.substring(posi,txt.length);
    texto=texto.substring(0,texto.length-posf);
    return texto;
}
//funcion que verifica si es correcto un email
function EsMail(obj,msg,bor)
{
    obj.value=Trim(obj.value);
    var txtin=obj.value;
    if(txtin.search(/^[a-zA-Z0-9_]+[a-zA-Z0-9_.]+[a-zA-Z0-9_]+@[a-zA-Z0-9\-]+\.[a-zA-Z0-9\-\.]+$/)!= -1)

      return true;
    else
    {
      alert('Error: '+msg+' Please, input a valid mail');
      if(bor==1)
        obj.value="";
      obj.focus();
      obj.select();
      return false;
    }
}

function EsNumerico(obj,msg,bor)
{
    obj.value=Trim(obj.value);
    var txtin=obj.value;
    re=/[^0-9]/;
    if(re.test(txtin))
    {
        alert ('Error: '+msg+' Please, input a number');
        if(bor==1)
            obj.value="0";
        obj.focus();
        obj.select();
        return false;
    }
    else
        return true;
}

function EsBisiesto(p_year)
{
    if ((p_year % 4) == 0) {
        if ((p_year % 100) == 0 && (p_year % 400) != 0)
            return false;
        return true;
    } else
        return false;
}

function EsFecha(obj_d,obj_m,obj_a,msg,bor,ano_ini, ano_fin)
{
    var indice;
    var dia,mes,ano,bcen=1;
    indice = obj_d.selectedIndex;
    dia=obj_d.options[indice].value;
    indice = obj_m.selectedIndex;
    mes=obj_m.options[indice].value;
    obj_a.value=Trim(obj_a.value);
    ano=obj_a.value;
    fec = new Date(ano,mes,dia);
    day = fec.getDate();
    if(!day)
    {
        alert('Error: '+msg+' \nCorregir Fecha');
        obj_a.value=ano_ini;
    }
    else
    {
        meses = new Array(12);
        if(EsBisiesto(ano))
            meses = [31, 29, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31];
        else
            meses = [31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31];
        if((ano>=ano_ini)&&(ano<= ano_fin))
        {
            if(dia<meses[mes-1]+1)
                return true;
            else
            {
                alert('Error: '+msg+' \nDias No validos Para el Mes');
                indice=meses[mes-1];
                    obj_d.options[indice-1].selected=true;
            }
        }
        else
        {
            alert('Error: '+msg+' \nSu Anio esta fuera de Rango');
            obj_a.value=ano_fin;
        }
    }
    if(bor==1)
        obj_a.value=ano_fin;
    obj_a.focus();
    obj_a.select();
    return false;
}
