var weekend = [0,6];
var weekendColor = "#cccccc";
var css_file = "css.css";
var classe = "edit";
var titulo = 'Calendário';
var fd = 0;
var formato_data = "DD/MM/YYYY"; // "MM/DD/YYYY";

var next_month = "<img src='imagens/Mes_proximo.gif'  border=0 alt='Pr&oacute;ximo M&ecirc;s'>";
var last_month = "<img src='imagens/Mes_anterior.gif' border=0 alt='M&ecirc;s Anterior'>";
var next_year  = "<img src='imagens/Ano_proximo.gif'  border=0 alt='Pr&oacute;ximo Ano'>";
var last_year  = "<img src='imagens/Ano_anterior.gif' border=0 alt='Ano Anterior'>";

var gNow = new Date();
var ggWinCal;
isNav = (navigator.appName.indexOf("Netscape") != -1) ? true : false;
isIE = (navigator.appName.indexOf("Microsoft") != -1) ? true : false;

Calendar.Months = ["Janeiro", "Fevereiro", "Março", "Abril", "Maio", "Junho", "Julho", "Agosto", "Setembro", "Outubro", "Novembro", "Dezembro"];

// Non-Leap year Month days..
Calendar.DOMonth = [31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31];
// Leap year Month days..
Calendar.lDOMonth = [31, 29, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31];

function Calendar(p_item, p_WinCal, p_month, p_year, p_format) {
    if ((p_month == null) && (p_year == null))    return;

    if (p_WinCal == null)
        this.gWinCal = ggWinCal;
    else
        this.gWinCal = p_WinCal;

    if (p_month == null) {
        this.gMonthName = null;
        this.gMonth = null;
        this.gYearly = true;
    } else {
        this.gMonthName = Calendar.get_month(p_month);
        this.gMonth = new Number(p_month);
        this.gYearly = false;
    }

    this.gYear = p_year;
    this.gFormat = p_format;
    this.gBGColor = "white";
    this.gFGColor = "black";
    this.gTextColor = "black";
    this.gHeaderColor = "black";
    this.gReturnForm = document.getElementById(p_item).form.name;
    this.gReturnItem = p_item;

}

Calendar.get_month = Calendar_get_month;
Calendar.get_daysofmonth = Calendar_get_daysofmonth;
Calendar.calc_month_year = Calendar_calc_month_year;
Calendar.print = Calendar_print;

function Calendar_get_month(monthNo) {
    return Calendar.Months[monthNo];
}

function Calendar_get_daysofmonth(monthNo, p_year) {
    /*
    Check for leap year ..
    1.Years evenly divisible by four are normally leap years, except for...
    2.Years also evenly divisible by 100 are not leap years, except for...
    3.Years also evenly divisible by 400 are leap years.
    */
    if ((p_year % 4) == 0) {
        if ((p_year % 100) == 0 && (p_year % 400) != 0)
            return Calendar.DOMonth[monthNo];

        return Calendar.lDOMonth[monthNo];
    } else
        return Calendar.DOMonth[monthNo];
}

function Calendar_calc_month_year(p_Month, p_Year, incr) {
    /*
    Will return an 1-D array with 1st element being the calculated month
    and second being the calculated year
    after applying the month increment/decrement as specified by 'incr' parameter.
    'incr' will normally have 1/-1 to navigate thru the months.
    */
    var ret_arr = new Array();

    if (incr == -1) {
        // B A C K W A R D
        if (p_Month == 0) {
            ret_arr[0] = 11;
            ret_arr[1] = parseInt(p_Year) - 1;
        }
        else {
            ret_arr[0] = parseInt(p_Month) - 1;
            ret_arr[1] = parseInt(p_Year);
        }
    } else if (incr == 1) {
        // F O R W A R D
        if (p_Month == 11) {
            ret_arr[0] = 0;
            ret_arr[1] = parseInt(p_Year) + 1;
        }
        else {
            ret_arr[0] = parseInt(p_Month) + 1;
            ret_arr[1] = parseInt(p_Year);
        }
    }

    return ret_arr;
}

function Calendar_print() {
    ggWinCal.print();
}

function Calendar_calc_month_year(p_Month, p_Year, incr) {
    /*
    Will return an 1-D array with 1st element being the calculated month
    and second being the calculated year
    after applying the month increment/decrement as specified by 'incr' parameter.
    'incr' will normally have 1/-1 to navigate thru the months.
    */
    var ret_arr = new Array();

    if (incr == -1) {
        // B A C K W A R D
        if (p_Month == 0) {
            ret_arr[0] = 11;
            ret_arr[1] = parseInt(p_Year) - 1;
        }
        else {
            ret_arr[0] = parseInt(p_Month) - 1;
            ret_arr[1] = parseInt(p_Year);
        }
    } else if (incr == 1) {
        // F O R W A R D
        if (p_Month == 11) {
            ret_arr[0] = 0;
            ret_arr[1] = parseInt(p_Year) + 1;
        }
        else {
            ret_arr[0] = parseInt(p_Month) + 1;
            ret_arr[1] = parseInt(p_Year);
        }
    }

    return ret_arr;
}

// This is for compatibility with Navigator 3, we have to create and discard one object before the prototype object exists.
new Calendar();

Calendar.prototype.getMonthlyCalendarCode = function()
{
    var vCode = "";
    var vHeader_Code = "";
    var vData_Code = "";

    // Begin Table Drawing code here..
    vCode = vCode + "    <table border=1 width='235' bgcolor=\"" + this.gBGColor + "\">\n";

    vHeader_Code = this.cal_header();
    vData_Code = this.cal_data();
    vCode = vCode + vHeader_Code + vData_Code;

    vCode = vCode + "    </table>\n";

    return vCode;
}

Calendar.prototype.show = function() {
    var vCode = "";
    var texto;

    this.gWinCal.document.open();

    // Setup the page...
    this.wwrite("<html>");
    this.wwrite("  <head>\n    <title>Calendario</title>");
    this.wwrite("    <link rel='stylesheet' href='" + css_file +"' type='text/css'>");
    this.wwrite("  </head>");

    this.wwrite("  <body " +
        ( this.gLinkColor ? "link=\"" + this.gLinkColor + "\" " : "" ) +
        ( this.gLinkColor ? "vlink=\"" + this.gLinkColor + "\" " : "" ) +
        ( this.gLinkColor ? "alink=\"" + this.gLinkColor + "\" " : "" ) +
        ( this.gTextColor ? "text=\"" + this.gTextColor + "\">" : "" ) );
    this.wwriteA("    <b>");
    this.wwriteA(titulo);
    this.wwrite("</b><br><br>");

    // Show navigation buttons
    var prevMMYYYY = Calendar.calc_month_year(this.gMonth, this.gYear, -1);
    var prevMM = prevMMYYYY[0];
    var prevYYYY = prevMMYYYY[1];

    var nextMMYYYY = Calendar.calc_month_year(this.gMonth, this.gYear, 1);
    var nextMM = nextMMYYYY[0];
    var nextYYYY = nextMMYYYY[1];

//    this.wwrite("<TABLE WIDTH='100%' BORDER=1 CELLSPACING=0 CELLPADDING=0 BGCOLOR='#e0e0e0'><TR><TD ALIGN=center>");
    this.wwrite("    <table class='menusuperior' width='235'>")
    this.wwrite("      <tr><td align=center width='15%'><a href=\"" +
        "javascript:window.opener.Build(" +
        "'" + this.gReturnItem + "', '" + this.gMonth + "', '" + (parseInt(this.gYear)-1) + "', '" + this.gFormat + "'" +
        ");" +
        "\" alt='Ano Anterior'>" + last_year + "<\/a></td>");
    this.wwrite("        <td align=center width='14%'><a href=\"" +
        "javascript:window.opener.Build(" +
        "'" + this.gReturnItem + "', '" + prevMM + "', '" + prevYYYY + "', '" + this.gFormat + "'" +
        ");" +
        "\" alt='M&ecirc;s Anterior'>" + last_month + "<\/a></td>");
    this.wwrite("        <td align=center><b>"+this.gMonthName + " " + this.gYear+"</b></td>");
    this.wwrite("        <td align=center width='14%'><a href=\"" +
        "javascript:window.opener.Build(" +
        "'" + this.gReturnItem + "', '" + nextMM + "', '" + nextYYYY + "', '" + this.gFormat + "'" +
        ");" +
        "\" alt='Pr&oacute;ximo M&ecirc;s'>" + next_month + "<\/a></td>");
    this.wwrite("        <td align=center width='15%'><a href=\"" +
        "javascript:window.opener.Build(" +
        "'" + this.gReturnItem + "', '" + this.gMonth + "', '" + (parseInt(this.gYear)+1) + "', '" + this.gFormat + "'" +
        ");" +
        "\" alt='Pr&oacute;ximo Ano'>" + next_year + "<\/a></td>\n      </tr>\n    </table><br>");

    // Get the complete calendar code for the month..
    vCode = this.getMonthlyCalendarCode();
    this.wwrite(vCode);

    this.wwrite("  </body>\n</html>");
    this.gWinCal.document.close();
}

Calendar.prototype.showY = function() {
    var vCode = "";
    var i;
    var vr, vc, vx, vy;        // Row, Column, X-coord, Y-coord
    var vxf = 285;             // X-Factor
    var vyf = 180;             // Y-Factor
    var vxm = 10;              // X-margin
    var vym;                   // Y-margin
    if (isIE)    vym = 75;
    else if (isNav)    vym = 45;

    this.gWinCal.document.open();

    this.wwrite("<html>");
    this.wwrite("  <head>\n    <title>Calendar</title>");
    this.wwrite("    <link rel='stylesheet' href='" + css_file +"' type='text/css'>");
    this.wwrite("    <style type='text/css'>\n<!--");
    for (i=0; i<12; i++) {
        vc = i % 3;
        if (i>=0 && i<= 2)    vr = 0;
        if (i>=3 && i<= 5)    vr = 1;
        if (i>=6 && i<= 8)    vr = 2;
        if (i>=9 && i<= 11)    vr = 3;

        vx = parseInt(vxf * vc) + vxm;
        vy = parseInt(vyf * vr) + vym;

        this.wwrite(".lclass" + i + " {position:absolute;top:" + vy + ";left:" + vx + ";}");
    }
    this.wwrite("-->\n    </style>");
    this.wwrite("  </head>");

    this.wwrite("  <body " +
        "link=\"" + this.gLinkColor + "\" " +
        "vlink=\"" + this.gLinkColor + "\" " +
        "alink=\"" + this.gLinkColor + "\" " +
        "text=\"" + this.gTextColor + "\">");
    this.wwriteA("    <b>");
    this.wwriteA("Ano : " + this.gYear);
    this.wwrite("</b><br>");

    // Show navigation buttons
    var prevYYYY = parseInt(this.gYear) - 1;
    var nextYYYY = parseInt(this.gYear) + 1;

//    this.wwrite("<TABLE WIDTH='100%' BORDER=1 CELLSPACING=0 CELLPADDING=0 BGCOLOR='#e0e0e0'><TR><TD ALIGN=center>");
    var botoes = '';
    if (isIE){
        this.wwrite("<div id=\"button\">");
        botoes = "<div id=\"button\" style=\"{position:absolute;top:"+(vym + vyf*4)+";left:"+vxm+";}\">\n";
        }
    else if (isNav){
        this.wwrite("<layer id=\"button\">");
        botoes += "<layer id=\"button\" style=\"{position:absolute;top:"+(vym + vyf*4)+";left:"+vxm+";}\">\n";
        }
    botoes += "    <table width='"+(vxf*3)+"'>\n" +
              "      <tr><td width='150' align=center><a href=\"" +
              "javascript:window.opener.Build(" +
              "'" + this.gReturnItem + "', null, '" + prevYYYY + "', '" + this.gFormat + "'" +
              ");" +
              "\" alt='Ano Anterior'>" + last_year + "<\/a></td>\n"
    botoes += "        <td align=center>&nbsp;</td>\n";
    botoes += "        <td width='150'><a href=\"" +
        "javascript:window.opener.Build(" +
        "'" + this.gReturnItem + "', null, '" + nextYYYY + "', '" + this.gFormat + "'" +
        ");" +
        "\" alt='Pr&oacute;ximo Ano'>" + next_year + "<\/a></td>\n      </tr>\n    </table><br>\n";

    this.wwrite("    <table width='"+(vxf*3)+"'>");
    this.wwrite("      <tr><td width='150' align=center><a href=\"" +
        "javascript:window.opener.Build(" +
        "'" + this.gReturnItem + "', null, '" + prevYYYY + "', '" + this.gFormat + "'" +
        ");" +
        "\" alt='Ano Anterior'>" + last_year + "<\/a></td>");
    this.wwrite("        <td align=center>&nbsp;</td>");
    this.wwrite("        <td width='150'><a href=\"" +
        "javascript:window.opener.Build(" +
        "'" + this.gReturnItem + "', null, '" + nextYYYY + "', '" + this.gFormat + "'" +
        ");" +
        "\" alt='Pr&oacute;ximo Ano'>" + next_year + "<\/a></td>\n      </tr>\n    </table><br>");
    if (isIE) {
        this.wwrite("</div>");
        botoes += "</div>\n";
    }
    else if (isNav) {
        this.wwrite("</layer>");
        botoes += "</layer>\n";
    }
    // Get the complete calendar code for each month..
    var j;
    for (i=11; i>=0; i--) {
        if (isIE)
            this.wwrite("<div id=\"layer" + i + "\" class=\"lclass" + i + "\">");
        else if (isNav)
            this.wwrite("<layer id=\"layer" + i + "\" class=\"lclass" + i + "\">");

        this.gMonth = i;
        this.gMonthName = Calendar.get_month(this.gMonth);
        vCode = this.getMonthlyCalendarCode();
        this.wwrite(this.gMonthName + "/" + this.gYear + "<br>");
        this.wwrite(vCode);

        if (isIE)
            this.wwrite("</div>");
        else if (isNav)
            this.wwrite("</layer>");
    }
    this.wwrite(botoes);
    this.wwrite("    <br>\n  </body>\n</html>");
    this.gWinCal.document.close();
}

Calendar.prototype.wwrite = function(wtext) {
    this.gWinCal.document.writeln(wtext);
}

Calendar.prototype.wwriteA = function(wtext) {
    this.gWinCal.document.write(wtext);
}

Calendar.prototype.cal_header = function() {
    var vCode = "";

    vCode = vCode + "      <tr class='menusuperior'>\n";
    vCode = vCode + "        <td width='15%'><b>Dom</b></td>\n";
    vCode = vCode + "        <td width='14%'><b>Seg</b></td>\n";
    vCode = vCode + "        <td width='14%'><b>Ter</b></td>\n";
    vCode = vCode + "        <td width='14%'><b>Qua</b></td>\n";
    vCode = vCode + "        <td width='14%'><b>Qui</b></td>\n";
    vCode = vCode + "        <td width='14%'><b>Sex</b></td>\n";
    vCode = vCode + "        <td width='15%'><b>S&aacute;b</b></td>\n";
    vCode = vCode + "      </tr>\n";

    return vCode;
}

Calendar.prototype.cal_data = function() {
    var vDate = new Date();
    vDate.setDate(1);
    vDate.setMonth(this.gMonth);
    vDate.setFullYear(this.gYear);

    var vFirstDay=vDate.getDay();
    var vDay=1;
    var vLastDay=Calendar.get_daysofmonth(this.gMonth, this.gYear);
    var vOnLastDay=0;
    var vCode = "";

    /*
    Get day for the 1st of the requested month/year..
    Place as many blank cells before the 1st day of the month as necessary.
    */

    vCode = vCode + "      <tr>\n";
    for (i=0; i<vFirstDay; i++) {
        vCode = vCode + "        <td width='14%'" + this.write_weekend_string(i) + "> </td>\n";
//        vCode = vCode + "        <td width='14%' class='colorida'><font class='" + classe + "'> </font></td>\n";
    }

    // Write rest of the 1st week
    for (j=vFirstDay; j<7; j++) {
        var style = this.format_day(vDay);
        var text = (style.search('alerta') > 0) ? "<font style='color:red'><b>" + vDay + "</b></font>" : vDay;
        vCode = vCode + "        <td width='14%'" + this.write_weekend_string(j) + style +">" +
            "<a href='#' " +
                "onClick=\"self.opener.document." + this.gReturnForm + "." + this.gReturnItem + ".value='" +
                this.format_data(vDay) +
                "';window.close();\">" +
                text +
            "</a>" +
            "</td>\n";
        vDay=vDay + 1;
    }
    vCode = vCode + "      </tr>\n";

    // Write the rest of the weeks
    for (k=2; k<7; k++) {
        vCode = vCode + "      <tr>\n";

        for (j=0; j<7; j++) {
            var style = this.format_day(vDay);
            var text = (style.search('alerta') > 0) ? "<font style='color:red'><b>" + vDay + "</b></font>" : vDay;
            vCode = vCode + "        <td width='14%' " + ( j == 0 || j == 6 ? "class='colorida'" : '' ) + style + ">" +
                "<a href='#' " +
                    "onClick=\"self.opener.document." + this.gReturnForm + "."  + this.gReturnItem + ".value='" +
                    this.format_data(vDay) +
                    "';window.close();\">" +
                    text +
                "</a>" +
                "</td>\n";
            vDay=vDay + 1;

            if (vDay > vLastDay) {
                vOnLastDay = 1;
                break;
            }
        }

        if (j == 6)
            vCode = vCode + "      </tr>\n";
        if (vOnLastDay == 1)
            break;
    }

    // Fill up the rest of last week with proper blanks, so that we get proper square blocks
    for (m=1; m<(7-j); m++) {
        if (this.gYearly)
            vCode = vCode + "        <td width='14%'" + this.write_weekend_string(j+m) +
            " class='colorida'></td>\n";
        else
            vCode = vCode + "        <td width='14%'" + this.write_weekend_string(j+m) +
            " class='colorida'>" + m + "</td>\n";
    }

    return vCode;
}

Calendar.prototype.format_day = function(vday) {
    var vNowDay = gNow.getDate();
    var vNowMonth = gNow.getMonth();
    var vNowYear = gNow.getFullYear();
    var style = '';
    var classe = '';

    var vDate =  eval(document.getElementById(this.gReturnItem)).value;

    if (vDate != '') {
        var Day = vDate.substr(0,2) * 1;
        var Month = vDate.substr(3,2) * 1 - 1;
        var Year = vDate.substr(6,4);
    }
    if (vday == vNowDay && this.gMonth == vNowMonth && this.gYear == vNowYear)
        classe = "class='alerta'";

    if (vday == Day && this.gMonth == Month && this.gYear == Year)
        style = " style='background-color:#8FFFFF;'";
    return (classe + style);

}

Calendar.prototype.write_weekend_string =
function(vday) {
    var i;

    // Return special formatting for the weekend day.
    for (i=0; i<weekend.length; i++) {
        if (vday == weekend[i])
            return (" bgcolor=\"" + weekendColor + "\"");
    }

    return "";
}

Calendar.prototype.format_data = function(p_day) {
    var vData;
    var vMonth = 1 + this.gMonth;
    vMonth = (vMonth.toString().length < 2) ? "0" + vMonth : vMonth;
    var vMon = Calendar.get_month(this.gMonth).substr(0,3).toUpperCase();
    var vFMon = Calendar.get_month(this.gMonth).toUpperCase();
    var vY4 = new String(this.gYear);
//    var vY2 = new String(this.gYear.substr(2,2));
    var vDD = (p_day.toString().length < 2) ? "0" + p_day : p_day;

    switch (this.gFormat) {
        case "MM\/DD\/YYYY" :
            vData = vMonth + "\/" + vDD + "\/" + vY4;
            break;
        case "MM\/DD\/YY" :
            vData = vMonth + "\/" + vDD + "\/" + vY2;
            break;
        case "MM-DD-YYYY" :
            vData = vMonth + "-" + vDD + "-" + vY4;
            break;
        case "MM-DD-YY" :
            vData = vMonth + "-" + vDD + "-" + vY2;
            break;

        case "DD\/MON\/YYYY" :
            vData = vDD + "\/" + vMon + "\/" + vY4;
            break;
        case "DD\/MON\/YY" :
            vData = vDD + "\/" + vMon + "\/" + vY2;
            break;
        case "DD-MON-YYYY" :
            vData = vDD + "-" + vMon + "-" + vY4;
            break;
        case "DD-MON-YY" :
            vData = vDD + "-" + vMon + "-" + vY2;
            break;

        case "DD\/MONTH\/YYYY" :
            vData = vDD + "\/" + vFMon + "\/" + vY4;
            break;
        case "DD\/MONTH\/YY" :
            vData = vDD + "\/" + vFMon + "\/" + vY2;
            break;
        case "DD-MONTH-YYYY" :
            vData = vDD + "-" + vFMon + "-" + vY4;
            break;
        case "DD-MONTH-YY" :
            vData = vDD + "-" + vFMon + "-" + vY2;
            break;

        case "DD\/MM\/YYYY" :
            vData = vDD + "\/" + vMonth + "\/" + vY4;
            break;
        case "DD\/MM\/YY" :
            vData = vDD + "\/" + vMonth + "\/" + vY2;
            break;
        case "DD-MM-YYYY" :
            vData = vDD + "-" + vMonth + "-" + vY4;
            break;
        case "DD-MM-YY" :
            vData = vDD + "-" + vMonth + "-" + vY2;
            break;

        default :
            vData = vMonth + "\/" + vDD + "\/" + vY4;
    }

    return vData;
}

function Build(p_item, p_month, p_year, p_format) {
    var p_WinCal = ggWinCal;
    var gCal = new Calendar(p_item, p_WinCal, p_month, p_year, p_format);

    // Customize your Calendar here..
    gCal.gBGColor="white";
    gCal.gLinkColor="black";
    gCal.gTextColor="black";
    gCal.gHeaderColor="darkgreen";

    // Choose appropriate show function
    if (gCal.gYearly)
        gCal.showY();
    else
        gCal.show();
}

function show_calendar() {
    var vWinCal;
    vWinCal = window.open("", "calendar", "width=250,height=250,status=no,resizable=no,top=200,left=200");
    /*
        p_month : 0-11 for Jan-Dec; 12 for All Months.
        p_year    : 4-digit year
        p_format: Date format (mm/dd/yyyy, dd/mm/yy, ...)
        p_item    : Return Item.
    */
    var p_item = eval( document.getElementById(arguments[0]) );
//    var strData = eval(p_item);

    var strData = p_item;

    if (strData.value) {
        var dia = strData.value.substr(0,2);
        var mes = strData.value.substr(3,2);
        var ano = strData.value.substr(6,4);
        var strData2 = new String(ano+'-'+mes+'-'+dia);
        //alert(strData2);
    }

    p_month = (arguments[1] == null) ? ( (mes == null || mes == "" ) ? new String( gNow.getMonth() ) : mes * 1 - 1 ) :  arguments[1];
    p_year = (arguments[2] == "" || arguments[2] == null) ? ( (ano == null || ano == "") ? new String( gNow.getFullYear().toString() ) : ano * 1 ) :  arguments[1];
    p_format = (arguments[3] == null) ? formato_data : arguments[3];

    vWinCal.opener = self;
    ggWinCal = vWinCal;

    Build(p_item.id, p_month, p_year, p_format);
}
/*
Yearly Calendar Code Starts here
*/
function show_yearly_calendar(p_item, p_year, p_format) {
    // Load the defaults..
    if (p_year == null || p_year == "")
        p_year = new String(gNow.getFullYear().toString());
    if (p_format == null || p_format == "")
        p_format = formato_data;

    var vWinCal = window.open("_ano", "Calendar", "scrollbars=yes,resizable=yes,status=no");
    vWinCal.opener = self;
    ggWinCal = vWinCal;

    Build(p_item, null, p_year, p_format);
}


/**********************
    Outras funções
 **********************/


      function FiltraCampo(campo){
        if (fd == 1) return false;
        var s = "";
        var cp = "";
        vr = campo.value.trim();
        tam = vr.length;
        for (i = 0; i < tam ; i++) {
            if (vr.substring(i,i + 1) != "/" && vr.substring(i,i + 1) != "-" && vr.substring(i,i + 1) != "."  && vr.substring(i,i + 1) != "," ) {
                s = s + vr.substring(i,i + 1);
            }
        }
        if ( isNum(s) ) {
            campo.value = s;
            return cp = campo.value
        }
        else {
            foco(campo, 'O campo de tipo DATA deve ter o formato DDMMYYYY.')
            return cp = '';
        }
      }

      function FormataData(campo){
        fd = 0;
        campo.value = FiltraCampo(campo);
        var vr = campo.value;
        var tam = vr.length;
        if ( (tam) && ( tam != 8 ) ) {
            fd = 1;
            foco(campo, 'O campo de tipo DATA deve ter o formato DD/MM/YYYY.')
            return false;
        }
        if ( tam > 2 && tam < 5 )
            campo.value = vr.substr( 0, tam - 2  ) + '/' + vr.substr( tam - 2, tam );
        if ( tam >= 5 && tam <= 10 )
            campo.value = vr.substr( 0, 2 ) + '/' + vr.substr( 2, 2 ) + '/' + vr.substr( 4, 4 );
        return true;
      }

//**** Função Valida Campo Data / Gera Mensagem***
// Esta função gera uma mensagem se o campo data estiver errado.
//
//************************************
function validaDataMSG(campo){
    var obj_data, data;
    obj_data = eval(campo);
    data = obj_data.value;
    if ( (obj_data.value) && !validaData(obj_data) ) {
        alert('Data inválida.');
        obj_data.focus();
        obj_data.value = data;
        return false;
    }
    return true;
}


/****** Função Válida Campo Data **
Esta função ignora qualquer caracter que não seja numero e "_", invalida demais
teclas, permitindo uma quantidade determinada de numeros e trata outras condições
impedindo que o usuário altere o campo data (senão a partir do final do campo).
*/

/***********************************/
function validaData(campo)
{
    var strData = campo.value;
    dia = strData.substr(0,2);
    mes = strData.substr(3,2);
    ano = strData.substr(6);

    if (strData.value == '' || strData.length == 0) {
        return false;
    }
    if (mes < 1 || mes > 12) {
        return false;
    }
    if (dia < 1 || dia > 31) {
        return false;
    }
    if ((mes==4 || mes==6 || mes==9 || mes==11) &&
        dia==31) {
        return false;
    }
    if (strData.indexOf("_") != -1) {
        return false;
    }
    if (mes == 2) {
        var isleap = (ano % 4 == 0 && (ano % 100 != 0 || ano % 400 == 0))
        if (dia>29 || (dia==29 && !isleap)) {
            return false;
        }
    }
    return true;
}