var weekend = [0,6];
var weekendColor = "#CCCCCC";
var headColor = "#BBBBBB"; 
var tablebgColor = "#EEEEEE";
var fontface = "Arial";
var fontsize = 2;

var gNow = new Date();
var ggWinCal;

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

Calendar2.Months = ["January", "February", "March", "April", "May", "June",
"July", "August", "September", "October", "November", "December"];

var PathToGif = "./";


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

function Calendar2(p_item, p_item2, p_WinCal, p_month, p_year) {
        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 = Calendar2.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 = "white";
        this.gReturnItem = p_item;
        this.gReturnItem2 = p_item2;
        this.tableheadColor = headColor;
        this.tableColor = tablebgColor;
}

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

function Calendar_get_month(monthNo) {
        return Calendar2.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 Calendar2.DOMonth[monthNo];

                return Calendar2.lDOMonth[monthNo];
        } else
                return Calendar2.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 Calendar2();

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

        // Begin Table Drawing code here..
        vCode = vCode + "<TABLE BORDER=1 BORDERCOLOR=#ffffff CELLSPACING=0 ALIGN=center BGCOLOR='" + this.tableColor + "' width=\"100%\">";

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

        vCode = vCode + "</TABLE>";

        return vCode;
}

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

        this.gWinCal.document.open();

        // Setup the page...
        this.wwrite("<html>");
        this.wwrite("<head><title>Calendar</title>");
        this.wwrite("</head>");

        this.wwrite("<body BGCOLOR=#ffffff " +
                "link=\"" + this.gLinkColor + "\" " +
                "vlink=\"" + this.gLinkColor + "\" " +
                "alink=\"" + this.gLinkColor + "\" " +
                "text=\"" + this.gTextColor + "\">");
        this.wwriteA("<FONT FACE='" + fontface + "' SIZE=3><CENTER><B>");
        this.wwriteA(this.gMonthName + " " + this.gYear);
        this.wwriteA("</B></CENTER>");

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

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

        var vNowMonth = gNow.getMonth();
        var vNowYear = gNow.getFullYear();

       this.wwrite("<TABLE WIDTH='60%' BORDER=0 CELLSPACING=0 CELLPADDING=0 BGCOLOR='#FFFFFF' ALIGN=center><TR>");

       /* Monat zurueck Anfang */
if((prevMM >= vNowMonth) || ((prevYYYY > vNowYear) && (prevMM < vNowMonth))) {
        this.wwrite("<TD ALIGN=center><A HREF=\"" + "javascript:onclick=window.opener.Build2(" + "'" + this.gReturnItem + "' ,'" + this.gReturnItem2 +  "', '" + prevMM + "', '" + prevYYYY + "');" + "\"><IMG SRC='" + PathToGif + "images/pfeil_links2.gif' BORDER=0 ALT='One month back'><\/A></TD>");
}
/* Monat zurueck ENDE */

        this.wwrite("<TD ALIGN=center><A HREF=\"" + "javascript:window.print();\"><IMG SRC='" + PathToGif + "images/print.gif' BORDER=0 ALT='Print calendar'><\/A></TD>");

//MK changes in the contstraint
/* Monat vor ANFANG */
if((nextYYYY == vNowYear) || (nextYYYY == vNowYear+1) || (nextMM < vNowMonth && (nextYYYY == vNowYear+2))) {
        this.wwrite("<TD ALIGN=center><A HREF=\"" + "javascript:window.opener.Build2(" + "'" + this.gReturnItem + "' ,'" + this.gReturnItem2 + "', '" + nextMM + "', '" + nextYYYY + "');" + "\"><IMG SRC='" + PathToGif + "images/pfeil_rechts2.gif' BORDER=0 ALT='One month forward'><\/A></TD></TR></TABLE>");
}
else { //close <table>-Tag
    this.wwrite("</TR></TABLE>");
}
/* Monat vor ENDE */

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

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

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

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

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

       vCode = vCode + "<TR>";
        vCode = vCode + "<TD WIDTH='14%' bgcolor='" + this.tableheadColor + "'><FONT SIZE='2' FACE='" + fontface + "' COLOR='" + this.gHeaderColor + "'><B>Sun</B></FONT></TD>";
        vCode = vCode + "<TD WIDTH='14%' bgcolor='" + this.tableheadColor + "'><FONT SIZE='2' FACE='" + fontface + "' COLOR='" + this.gHeaderColor + "'><B>Mon</B></FONT></TD>";
        vCode = vCode + "<TD WIDTH='14%' bgcolor='" + this.tableheadColor + "'><FONT SIZE='2' FACE='" + fontface + "' COLOR='" + this.gHeaderColor + "'><B>Tue</B></FONT></TD>";
        vCode = vCode + "<TD WIDTH='14%' bgcolor='" + this.tableheadColor + "'><FONT SIZE='2' FACE='" + fontface + "' COLOR='" + this.gHeaderColor + "'><B>Wed</B></FONT></TD>";
        vCode = vCode + "<TD WIDTH='14%' bgcolor='" + this.tableheadColor + "'><FONT SIZE='2' FACE='" + fontface + "' COLOR='" + this.gHeaderColor + "'><B>Thu</B></FONT></TD>";
        vCode = vCode + "<TD WIDTH='14%' bgcolor='" + this.tableheadColor + "'><FONT SIZE='2' FACE='" + fontface + "' COLOR='" + this.gHeaderColor + "'><B>Fri</B></FONT></TD>";
        vCode = vCode + "<TD WIDTH='16%' bgcolor='" + this.tableheadColor + "'><FONT SIZE='2' FACE='" + fontface + "' COLOR='" + this.gHeaderColor + "'><B>Sat</B></FONT></TD>";
        vCode = vCode + "</TR>";

        return vCode;
}

Calendar2.prototype.cal_data = function() {
        var vDate = new Date();
        var vNowDay = vDate.getDate();
        var vNowMonth = gNow.getMonth();
        vDate.setDate(1);
        vDate.setMonth(this.gMonth);
        vDate.setFullYear(this.gYear);

        var vFirstDay=vDate.getDay();
        var vDay=1;
        var vLastDay=Calendar2.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>";
        for (i=0; i<vFirstDay; i++) {
                vCode = vCode + "<TD WIDTH='14%'" + this.write_weekend_string(i) + "><FONT SIZE='2' FACE='" + fontface + "'> </FONT></TD>";
        }

        // Write rest of the 1st week
        for (j=vFirstDay; j<7; j++) {
                vCode = vCode + "<TD WIDTH='14%'" + this.write_weekend_string(j) + "><FONT SIZE='2' FACE='" + fontface + "'>";

        if(vDay >= vNowDay || this.gMonth != vNowMonth  ) {
             vCode += "<A HREF='#' " + "onClick=\"self.opener.document." + this.gReturnItem + ".value='" + this.format_data_seperatly(vDay, "DAY") + "';self.opener.document." + this.gReturnItem2 + ".options[" + this.format_data_seperatly(vDay, "MONTH") + "].selected = true;window.close();\">" + this.format_day(vDay) + "</A>" + "</FONT></TD>";
        }
        else {
        vCode += this.format_day(vDay) + "</FONT></TD>";
        }
                vDay=vDay + 1;
        }
        vCode = vCode + "</TR>";

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

                for (j=0; j<7; j++) {
                        vCode = vCode + "<TD WIDTH='14%'" + this.write_weekend_string(j) + "><FONT SIZE='2' FACE='" + fontface + "'>";
        if(vDay >= vNowDay || this.gMonth != vNowMonth  ) {
            vCode += "<A HREF='#' " + "onClick=\"self.opener.document." + this.gReturnItem + ".value='" + this.format_data_seperatly(vDay, "DAY") + "';self.opener.document." + this.gReturnItem2 + ".options[" + this.format_data_seperatly(vDay, "MONTH") + "].selected = true;window.close();\">" + this.format_day(vDay) + "</A>" + "</FONT></TD>";
        }
        else {
        vCode += this.format_day(vDay) + "</FONT></TD>";
        }
                        vDay=vDay + 1;

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

                if (j == 6)
                        vCode = vCode + "</TR>";
                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) +
                        "><FONT SIZE='2' FACE='" + fontface + "' COLOR='gray'> </FONT></TD>";
                else
                        vCode = vCode + "<TD WIDTH='14%'" + this.write_weekend_string(j+m) +
                        "><FONT SIZE='2' FACE='" + fontface + "' COLOR='gray'>" + m + "</FONT></TD>";
        }

        return vCode;
}

Calendar2.prototype.format_day = function(vday) {
        var vNowDay = gNow.getDate();
        var vNowMonth = gNow.getMonth();
        var vNowYear = gNow.getFullYear();

        if (vday == vNowDay && this.gMonth == vNowMonth && this.gYear == vNowYear)
                return ("<FONT COLOR=\"RED\"><B>" + vday + "</B></FONT>");
        else
                return (vday);
}

Calendar2.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 "";
}

Calendar2.prototype.format_data = function(p_day) {
        var vData;
        var vMonth = 1 + this.gMonth;
        vMonth = (vMonth.toString().length < 2) ? "0" + vMonth : vMonth;
        var vMon = Calendar2.get_month(this.gMonth).substr(0,3).toUpperCase();
        var vFMon = Calendar2.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;

        vData = vDD + "-" + vMonth + "-" + vY4;
        return vData;
}

Calendar2.prototype.format_data_seperatly = function(p_day, showValue) {
        var vData;
	var vMonth = 1 + this.gMonth;
        // uncomment, if 2-digit-format wanted
        //vMonth = (vMonth.toString().length < 2) ? "0" + vMonth : vMonth;
        var vMon = Calendar2.get_month(this.gMonth).substr(0,3).toUpperCase();
	var vFMon = Calendar2.get_month(this.gMonth).toUpperCase();
	var vY4 = new String(this.gYear);
        var vY2 = new String(this.gYear.substr(2,2));
        // uncomment, if 2-digit-format wanted
        //var vDD = (p_day.toString().length < 2) ? "0" + p_day : p_day;
        var vDD = p_day;
        if(showValue == "MONTH") {
		var monthOffset;
		var now = new Date();
		var oneYearAhead = now.getFullYear() + 1 == this.gYear ? 1 : 0;
		var twoYearsAhead = now.getFullYear() + 2 == this.gYear ? 1 : 0;
		var monthOffset  = twoYearsAhead ? 24 : 12;
		monthOffset -= now.getMonth();
		if((vMonth - 1 + monthOffset)>23){
			vData = vMonth - 1 + monthOffset -12; //for options[i], i = 0..11
		} else {
			if((!oneYearAhead) && (!twoYearsAhead) && ((vMonth - 1 + monthOffset)>11)){
				vData = vMonth - 1 + monthOffset -12; //for options[i], i = 0..11
			} else {
				vData = vMonth - 1 + monthOffset; //for options[i], i = 0..11
			}
		}
	}
        else {
            vData = vDD;
        }
	return vData;
}

function Build2(p_item, p_item2, p_month, p_year) {
        var p_WinCal = ggWinCal;
        gCal = new Calendar2(p_item, p_item2, p_WinCal, p_month, p_year);

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

        // Choose appropriate show function
        gCal.show();
}

function open_calender() {
        /*
                p_month : 0-11 for Jan-Dec; 12 for All Months.
                p_year        : 4-digit year
                p_format: Date format (dd/mm/yyyy, mm/dd/yy, ...)
                p_item        : Return Item.
        */
        var vNowMonth = new String(gNow.getMonth());
        //var vNowYear = new String(gNow.getFullYear().toString());
        var vNowYear = gNow.getFullYear();
        /* for (i=0; i<4 ; i++ ) {
            alert("arguments[" + i + "] = " + arguments[i]);
        }*/


        p_item = arguments[0];
        p_item2 = arguments[1];
        p_item3 = arguments[0];
        p_item4 = arguments[1];
        if (arguments[2] == null) {
                p_month = vNowMonth;
		p_year	= vNowYear;
        } else {
             //getting p_month
             var monthStr = new String(arguments[2]);
//           alert (monthStr);
             var index = monthStr.indexOf("-");
             monthStr = monthStr.substring(0, index);
             p_month = monthStr - 1;
//           alert (p_month);
             //getting p_year
             monthStr = new String(arguments[2]);
             index = monthStr.indexOf("-");
             monthStr = monthStr.substring(index + 1, index + 5);
             p_year = monthStr;
//           alert(p_year);
        }
//        alert("p_month = " + p_month + "\np_year = " + p_year); 

/* windows.open(" ",...); " " is importent for SSL-Access with "" it will not be able to hold the "secure line" */
        vWinCal = window.open("", "Calendar", "width=250,height=200,status=no,resizable=no,top=400,left=600");
        vWinCal.opener = self;
        ggWinCal = vWinCal;
        Build2(p_item, p_item2, p_month, p_year);
}