var fixedX = -1
var fixedY = -1
var startAt = 0
var showWeekNumber = 0
var showToday = 1
var imgDir = "/images/Calender/"
var gotoString = "Go To Current Month"
var todayString = "Today is"
var weekString = "Wk"
var scrollLeftMessage = "Click to scroll to previous month. Hold mouse button to scroll automatically."
var scrollRightMessage = "Click to scroll to next month. Hold mouse button to scroll automatically."
var selectMonthMessage = "Click to select a month."
var selectYearMessage = "Click to select a year."
var selectDateMessage = "Select [date] as date."
var crossobj, crossMonthObj, crossYearObj, monthSelected, yearSelected, dateSelected, omonthSelected, oyearSelected, odateSelected, monthConstructed, yearConstructed, intervalID1, intervalID2, timeoutID1, timeoutID2, ctlToPlaceValue, ctlNow, dateFormat, nStartingYear
var bPageLoaded = false
var ie = document.all
var dom = document.getElementById
var ns4 = document.layers
var today = new Date()
var dateNow = today.getDate()
var monthNow = today.getMonth()
var yearNow = today.getYear()
var img = new Array()
bShow
var bShow = false;
var URL;
function hideElement_cal(elmID, overDiv) {
    if (ie) {
        for (i = 0; i < document.all.tags(elmID).length; i++) {
            obj = document.all.tags(elmID)[i];
            if (!obj || !obj.offsetParent) {
                continue;
            }
            objLeft = obj.offsetLeft;
            objTop = obj.offsetTop;
            objParent = obj.offsetParent;
            while (objParent.tagName.toUpperCase() != "BODY" && objParent.tagName != "HTML" /*mbr*/) {
                objLeft += objParent.offsetLeft;
                objTop += objParent.offsetTop;
                objParent = objParent.offsetParent;
            }
            objHeight = obj.offsetHeight;
            objWidth = obj.offsetWidth;
            if ((overDiv.offsetLeft + overDiv.offsetWidth) <= objLeft);
            else if ((overDiv.offsetTop + overDiv.offsetHeight) <= objTop);
            else if (overDiv.offsetTop >= (objTop + objHeight));
            else if (overDiv.offsetLeft >= (objLeft + objWidth));
            else {
                obj.style.visibility = "hidden";
            }
        }
    }
}
function showElement_cal(elmID) {
    if (ie) {
        for (i = 0; i < document.all.tags(elmID).length; i++) {
            obj = document.all.tags(elmID)[i];

            if (!obj || !obj.offsetParent) {
                continue;
            }

            obj.style.visibility = "";
        }
    }
}
function HolidayRec(d, m, y, desc) {
    this.d = d
    this.m = m
    this.y = y
    this.desc = desc
}
var HolidaysCounter = 0
var Holidays = new Array()
function addHoliday(d, m, y, desc) {
    Holidays[HolidaysCounter++] = new HolidayRec(d, m, y, desc)
}
if (dom) {
    document.getElementById("divContainer").innerHTML = "<div onclick='bShow=true' id='calendar'	style='visibility:hidden;border:1px thin #EAEAEA; '><table	style=\" FONT-FAMILY: arial; FONT-SIZE:11px;boder:1px thin  #EAEAEA;border-width:1px;background:#EAEAEA\"><tr><td><table width='100%' bgcolor='#27364e' style='background:#F7F7F7 url(Style/images/theme/navnum.gif) repeat-x scroll left top'> <tr><td style='TEXT-ALIGN: center; PADDING-BOTTOM: 5px; PADDING-LEFT: 2px; PADDING-RIGHT: 2px; FONT-FAMILY: Verdana; FONT-SIZE: 10px; PADDING-TOP: 5px;'><font color='#27364e'><B><span id='caption'></span></B></font></td><td align=right></td></tr></table></td></tr><tr><td style='PADDING-BOTTOM: 2px; PADDING-TOP: 1px' bgColor='#ffffff'><div id='content'></div></td></tr>";
    if (showToday == 1) {
        document.getElementById("divContainer").innerHTML += "";
    }
    document.getElementById("divContainer").innerHTML += "</table></div>";
}
var monthName = new Array("January", "February", "March", "April", "May", "June", "July", "August", "Sept", "October", "November", "December")
if (startAt == 0) {
    dayName = new Array("Sun", "Mon", "Tue", "Wed", "Thu", "Fri", "Sat")
}
else {
    dayName = new Array("Mon", "Tue", "Wed", "Thu", "Fri", "Sat", "Sun")
}
var styleAnchor = "text-decoration:none;color:black;"
var styleLightBorder = "border-style:solid;border-width:1px;border-color:#a0a0a0;"
function swapImage(srcImg, destImg) {
    if (ie) { document.getElementById(srcImg).setAttribute("src", imgDir + destImg) }
}
function init() {
    if (!ns4) {
        if (!ie) { yearNow += 1900 }
        crossobj = (dom) ? document.getElementById("calendar").style : ie ? document.all.calendar : document.calendar
        hideCalendar()
        monthConstructed = false;
        yearConstructed = false;
        sHTML1 = "<span id='spanLeft'	style='CURSOR: pointer; BORDER-RIGHT: #ccc 1px solid;' this.style.borderColor=\"#ffffff\";window.status=\"" + scrollLeftMessage + "\"' onclick='javascript:decMonth()' onmouseout='clearInterval(intervalID1);this.style.borderColor=\"#ffffff\";window.status=\"\"' onmousedown='clearTimeout(timeoutID1);timeoutID1=setTimeout(\"StartDecMonth()\",500)'	onmouseup='clearTimeout(timeoutID1);clearInterval(intervalID1)'>&nbsp; PREV &nbsp;</span>&nbsp;"
        sHTML1 += "<span id='spanMonth'> </span>"
        sHTML1 += "<span id='spanYear' ></span>&nbsp;"
        sHTML1 += "<span id='spanRight' style='cursor: pointer; BORDER-left: #ccc 1px solid'	this.style.borderColor=\"#ffffff\";window.status=\"" + scrollRightMessage + "\"' onmouseout='clearInterval(intervalID1);this.style.borderColor=\"#ffffff\";window.status=\"\"' onclick='incMonth()' onmousedown='clearTimeout(timeoutID1);timeoutID1=setTimeout(\"StartIncMonth()\",500)'	onmouseup='clearTimeout(timeoutID1);clearInterval(intervalID1)'>&nbsp; NEXT &nbsp;</span>&nbsp;"

        document.getElementById("caption").innerHTML = sHTML1
        bPageLoaded = true
    }
}
function hideCalendar() {
    crossobj.visibility = "hidden"
    if (crossMonthObj != null) { crossMonthObj.visibility = "hidden" }
    if (crossYearObj != null) { crossYearObj.visibility = "hidden" }

    showElement_cal('SELECT');
    showElement_cal('APPLET');
}
function padZero(num) {
    return (num < 10) ? '0' + num : num;
}
function constructDate(d, m, y) {
    sTmp = dateFormat
    sTmp = sTmp.replace("dd", "<e>")
    sTmp = sTmp.replace("d", "<d>")
    sTmp = sTmp.replace("<e>", padZero(d))
    sTmp = sTmp.replace("<d>", d)
    sTmp = sTmp.replace("mmm", "<o>")
    sTmp = sTmp.replace("mm", "<n>")
    sTmp = sTmp.replace("m", "<m>")
    sTmp = sTmp.replace("<m>", m + 1)
    sTmp = sTmp.replace("<n>", padZero(m + 1))
    sTmp = sTmp.replace("<o>", monthName[m])
    return sTmp.replace("yyyy", y)
}
function closeCalendar() {
    var sTmp
}
/*** Month Pulldown	***/
function StartDecMonth() {
    intervalID1 = setInterval("decMonth()", 80)
}

function StartIncMonth() {
    intervalID1 = setInterval("incMonth()", 80)
}

function incMonth() {
    monthSelected++
    if (monthSelected > 11) {
        monthSelected = 0
        yearSelected++
    }
    constructCalendar()
}
function decMonth() {
    monthSelected--
    if (monthSelected < 0) {
        monthSelected = 11
        yearSelected--
    }
    constructCalendar()
}
function constructMonth() {
    popDownYear()
    if (!monthConstructed) {
        sHTML = ""
        for (i = 0; i < 12; i++) {
            sName = monthName[i];
            if (i == monthSelected) {
                sName = "<B>" + sName + "</B>"
            }
            sHTML += "<tr><td id='m" + i + "' onmouseover='this.style.backgroundColor=\"#FFCC99\"' onmouseout='this.style.backgroundColor=\"\"' style='cursor:pointer' onclick='monthConstructed=false;monthSelected=" + i + ";constructCalendar();popDownMonth();event.cancelBubble=true'>&nbsp;" + sName + "&nbsp;</td></tr>"
        }

        document.getElementById("selectMonth").innerHTML = "<table width=70	style='font-family:arial; font-size:11px; border-width:1; border-style:solid; border-color:#a0a0a0;' bgcolor='#FF7E16' cellspacing=0 onmouseover='clearTimeout(timeoutID1)'	onmouseout='clearTimeout(timeoutID1);timeoutID1=setTimeout(\"popDownMonth()\",100);event.cancelBubble=true'>" + sHTML + "</table>"

        monthConstructed = true
    }
}
function popUpMonth() {
    constructMonth()
    crossMonthObj.visibility = (dom || ie) ? "visible" : "show"
    hideElement_cal('SELECT', document.getElementById("selectMonth"));
    hideElement_cal('APPLET', document.getElementById("selectMonth"));
}
function popDownMonth() {
    crossMonthObj.visibility = "hidden"
}
/*** Year Pulldown ***/
function incYear() {
    for (i = 0; i < 7; i++) {
        newYear = (i + nStartingYear) + 1
        if (newYear == yearSelected)
        { txtYear = "&nbsp;<B>" + newYear + "</B>&nbsp;" }
        else
        { txtYear = "&nbsp;" + newYear + "&nbsp;" }
        document.getElementById("y" + i).innerHTML = txtYear
    }
    nStartingYear++;
    bShow = true
}
function decYear() {
    for (i = 0; i < 7; i++) {
        newYear = (i + nStartingYear) - 1
        if (newYear == yearSelected)
        { txtYear = "&nbsp;<B>" + newYear + "</B>&nbsp;" }
        else
        { txtYear = "&nbsp;" + newYear + "&nbsp;" }
        document.getElementById("y" + i).innerHTML = txtYear
    }
    nStartingYear--;
    bShow = true
}
function selectYear(nYear) {
    yearSelected = parseInt(nYear + nStartingYear);
    yearConstructed = false;
    constructCalendar();
    popDownYear();
}
function constructYear() {
    popDownMonth()
    sHTML = ""
    if (!yearConstructed) {
        sHTML = "<tr><td align='center'	onmouseover='this.style.backgroundColor=\"#FFCC99\"' onmouseout='clearInterval(intervalID1);this.style.backgroundColor=\"\"' style='cursor:pointer'	onmousedown='clearInterval(intervalID1);intervalID1=setInterval(\"decYear()\",30)' onmouseup='clearInterval(intervalID1)'>-</td></tr>"
        j = 0
        nStartingYear = yearSelected - 3
        for (i = (yearSelected - 3); i <= (yearSelected + 3); i++) {
            sName = i;
            if (i == yearSelected) {
                sName = "<B>" + sName + "</B>"
            }
            sHTML += "<tr><td id='y" + j + "' onmouseover='this.style.backgroundColor=\"#FFCC99\"' onmouseout='this.style.backgroundColor=\"\"' style='cursor:pointer' onclick='selectYear(" + j + ");event.cancelBubble=true'>&nbsp;" + sName + "&nbsp;</td></tr>"
            j++;
        }
        sHTML += "<tr><td align='center' onmouseover='this.style.backgroundColor=\"#FFCC99\"' onmouseout='clearInterval(intervalID2);this.style.backgroundColor=\"\"' style='cursor:pointer' onmousedown='clearInterval(intervalID2);intervalID2=setInterval(\"incYear()\",30)'	onmouseup='clearInterval(intervalID2)'>+</td></tr>"
        document.getElementById("selectYear").innerHTML = "<table width=44 style='font-family:arial; font-size:11px; border-width:1; border-style:solid; border-color:#a0a0a0;'	bgcolor='#FF7E16' onmouseover='clearTimeout(timeoutID2)' onmouseout='clearTimeout(timeoutID2);timeoutID2=setTimeout(\"popDownYear()\",100)' cellspacing=0>" + sHTML + "</table>"
        yearConstructed = true
    }
}
function popDownYear() {
    clearInterval(intervalID1)
    clearTimeout(timeoutID1)
    clearInterval(intervalID2)
    clearTimeout(timeoutID2)
    crossYearObj.visibility = "hidden"
}
function popUpYear() {
    var leftOffset
    constructYear()
    crossYearObj.visibility = (dom || ie) ? "visible" : "show"
    leftOffset = parseInt(crossobj.left) + document.getElementById("spanYear").offsetLeft
    if (ie) {
        leftOffset += 6
    }
}
/*** calendar ***/
function WeekNbr(n) {
    year = n.getFullYear();
    month = n.getMonth() + 1;
    if (startAt == 0) {
        day = n.getDate() + 1;
    }
    else {
        day = n.getDate();
    }
    a = Math.floor((14 - month) / 12);
    y = year + 4800 - a;
    m = month + 12 * a - 3;
    b = Math.floor(y / 4) - Math.floor(y / 100) + Math.floor(y / 400);
    J = day + Math.floor((153 * m + 2) / 5) + 365 * y + b - 32045;
    d4 = (((J + 31741 - (J % 7)) % 146097) % 36524) % 1461;
    L = Math.floor(d4 / 1460);
    d1 = ((d4 - L) % 365) + L;
    week = Math.floor(d1 / 7) + 1;

    return week;
}
function constructCalendar() {
    var aNumDays = Array(31, 0, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31)
    var dateMessage
    var startDate = new Date(yearSelected, monthSelected, 1)
    var endDate
    if (monthSelected == 1) {
        endDate = new Date(yearSelected, monthSelected + 1, 1);
        endDate = new Date(endDate - (24 * 60 * 60 * 1000));
        numDaysInMonth = endDate.getDate()
    }
    else {
        numDaysInMonth = aNumDays[monthSelected];
    }
    datePointer = 0
    dayPointer = startDate.getDay() - startAt
    if (dayPointer < 0) {
        dayPointer = 6
    }
    sHTML = "<table cellSpacing='1' cellPadding='3' width='100%'	 border='0' style=' border:1px thin #EAEAEA; FONT-FAMILY: verdana; BACKGROUND: #f2f2f2; FONT-SIZE: 10px; BORDER-TOP:1px thin #EAEAEA; BORDER-RIGHT:1px thin #EAEAEA'><tr style='BACKGROUND: #999'>"

    if (showWeekNumber == 1) {
        sHTML += "<td style='padding:3px 4px;  color:#ffffff; background:#999999  '  align='middle' width='12%'>" + weekString + "</td><td width=1 rowspan=7 bgcolor='#d0d0d0' style='padding:0px'><img src='" + imgDir + "divider.gif' width=1></td>"
    }
    for (i = 0; i < 7; i++) {
        if (dayName[i] == "Fri")
            sHTML += "<td style='padding:3px 6px;color:#ffffff; background:#999999  '  align='middle' width='12%'>" + dayName[i] + "</td>"
        else
            sHTML += "<td style='padding:3px 4px;color:#ffffff; background:#999999  '  align='middle' width='12%'>" + dayName[i] + "</td>"
    }
    sHTML += "</tr><tr>"
    if (showWeekNumber == 1) {
        sHTML += "<td align=right>" + WeekNbr(startDate) + "&nbsp;</td>"
    }
    for (var i = 1; i <= dayPointer; i++) {
        sHTML += "<td>&nbsp;</td>"
    }
    for (datePointer = 1; datePointer <= numDaysInMonth; datePointer++) {
        dayPointer++;
        sHTML += "<td align=right>"
        sStyle = styleAnchor
        if ((datePointer == odateSelected) && (monthSelected == omonthSelected) && (yearSelected == oyearSelected))
        { sStyle += styleLightBorder }

        sHint = ""
        for (k = 0; k < HolidaysCounter; k++) {
            if ((parseInt(Holidays[k].d) == datePointer) && (parseInt(Holidays[k].m) == (monthSelected + 1))) {
                if ((parseInt(Holidays[k].y) == 0) || ((parseInt(Holidays[k].y) == yearSelected) && (parseInt(Holidays[k].y) != 0))) {
                    sStyle += "background-color:#FFDDDD;"
                    sHint += sHint == "" ? Holidays[k].desc : "\n" + Holidays[k].desc
                }
            }
        }
        var regexp = /\"/g
        sHint = sHint.replace(regexp, "&quot;")
        dateMessage = "onmousemove='window.status=\"" + selectDateMessage.replace("[date]", constructDate(datePointer, monthSelected, yearSelected)) + "\"' onmouseout='window.status=\"\"' "
        if ((datePointer == dateNow) && (monthSelected == monthNow) && (yearSelected == yearNow))
        { sHTML += "<b><a " + dateMessage + " title=\"" + sHint + "\" style='BORDER-BOTTOM: #a0a0a0 1px solid; BORDER-LEFT: #a0a0a0 1px solid; BACKGROUND: #ccc; COLOR: black; BORDER-TOP: #a0a0a0 1px solid; BORDER-RIGHT: #a0a0a0 1px solid; TEXT-DECORATION: none'" + "' href='javascript:dateSelected=" + datePointer + ";closeCalendar();CalenderLink(\"" + constructDate(datePointer, monthSelected, yearSelected) + "\",\"" + URL + "\");'><font color=#ff0000>&nbsp;" + datePointer + "</font>&nbsp;</a></b>" }
        else if (dayPointer % 7 == (startAt * -1) + 1)
        { sHTML += "<a " + dateMessage + " title=\"" + sHint + "\" style='" + sStyle + "' href='javascript:dateSelected=" + datePointer + ";closeCalendar();CalenderLink(\"" + constructDate(datePointer, monthSelected, yearSelected) + "\",\"" + URL + "\");'>&nbsp;<font color=#909090>" + datePointer + "</font>&nbsp;</a>" }
        else
        { sHTML += "<a " + dateMessage + " title=\"" + sHint + "\" style='" + sStyle + "' href='javascript:dateSelected=" + datePointer + ";closeCalendar();CalenderLink(\"" + constructDate(datePointer, monthSelected, yearSelected) + "\",\"" + URL + "\");'>&nbsp;" + datePointer + "&nbsp;</a>" }

        sHTML += ""
        if ((dayPointer + startAt) % 7 == startAt) {
            sHTML += "</tr><tr>"
            if ((showWeekNumber == 1) && (datePointer < numDaysInMonth)) {
                sHTML += "<td align=right>" + (WeekNbr(new Date(yearSelected, monthSelected, datePointer + 1))) + "&nbsp;</td>"
            }
        }
    }
    document.getElementById("content").innerHTML = sHTML
    document.getElementById("spanMonth").innerHTML = "&nbsp;" + monthName[monthSelected] + "&nbsp;"
    document.getElementById("spanYear").innerHTML = "&nbsp;" + yearSelected + "&nbsp;"
}
function popUpCalendar(	/*ctl,ctl2,*/format, strURL, UserDate) {
    var leftpos = 0
    var toppos = 0
    URL = strURL
    if (bPageLoaded) {
        if (crossobj.visibility == "hidden") {
            //ctlToPlaceValue	= ctl2
            dateFormat = format;
            formatChar = " "
            aFormat = dateFormat.split(formatChar)
            if (aFormat.length < 3) {
                formatChar = "/"
                aFormat = dateFormat.split(formatChar)
                if (aFormat.length < 3) {
                    formatChar = "."
                    aFormat = dateFormat.split(formatChar)
                    if (aFormat.length < 3) {
                        formatChar = "-"
                        aFormat = dateFormat.split(formatChar)
                        if (aFormat.length < 3) {
                            // invalid date	format
                            formatChar = ""
                        }
                    }
                }
            }
            tokensChanged = 0
            if (formatChar != "") {
                // use user's date
                aData = UserDate.split(formatChar)
                for (i = 0; i < 3; i++) {
                    if ((aFormat[i] == "d") || (aFormat[i] == "dd")) {
                        dateSelected = parseInt(aData[i], 10)
                        tokensChanged++
                    }
                    else if ((aFormat[i] == "m") || (aFormat[i] == "mm")) {
                        monthSelected = parseInt(aData[i], 10) - 1
                        tokensChanged++
                    }
                    else if (aFormat[i] == "yyyy") {
                        yearSelected = parseInt(aData[i], 10)
                        tokensChanged++
                    }
                    else if (aFormat[i] == "mmm") {
                        for (j = 0; j < 12; j++) {
                            if (aData[i] == monthName[j]) {
                                monthSelected = j
                                tokensChanged++
                            }
                        }
                    }
                }
            }
            if ((tokensChanged != 3) || isNaN(dateSelected) || isNaN(monthSelected) || isNaN(yearSelected)) {
                dateSelected = dateNow
                monthSelected = monthNow
                yearSelected = yearNow
            }
            odateSelected = dateSelected
            omonthSelected = monthSelected
            oyearSelected = yearSelected
            constructCalendar(1, monthSelected, yearSelected);
            crossobj.visibility = (dom || ie) ? "visible" : "show"
            hideElement_cal('SELECT', document.getElementById("calendar"));
            hideElement_cal('APPLET', document.getElementById("calendar"));
            bShow = true;
        }
        else {
            if (ctlNow != ctl) { popUpCalendar(format, URL) }
        }
    }
}
document.onkeypress = function hidecal1() {

}
document.onclick = function hidecal2() {
    if (!bShow) {
    }
    bShow = false
}
init()