<!--


/* Settings. Please read readme.html file for instructions*/
    var ppcDF = "d/m/Y";
    var ppcMN = new Array("January","February","March","April","May","June","July","August","September","October","November","December");
    var ppcWN = new Array("Sunday","Monday","Tuesday","Wednesday","Thursday","Friday","Saturday");
    var ppcER = new Array(4);
    ppcER[0] = "Required DHTML functions are not supported in this browser.";
    ppcER[1] = "Target form field is not assigned or not accessible.";
    ppcER[2] = "Sorry, the chosen date is not acceptable. Please read instructions on the page.";
    ppcER[3] = "Unknown error occured while executing this script.";
    var ppcUC = false;
    var ppcUX = 4;
    var ppcUY = 4;
    var doSubmit='false';

    /* Do not edit below this line unless you are sure what are you doing! */

    var ppcIE=(navigator.appName == "Microsoft Internet Explorer");
    //var ppcNN=((navigator.appName == "Netscape")&&(document.layers));
    var ppcNN=((navigator.appName == "Netscape"));
    var ppcTT="<table width=\"200\" cellspacing=\"1\" cellpadding=\"0\" border=\"0\" style=\"background-color: White\" class=\"calDay0\">\n";
    var ppcCD=ppcTT;var ppcFT="";var ppcFC=true;
    var ppcTI=false;var ppcSV=null;var ppcRL=null;var ppcXC=null;var ppcYC=null;
    var ppcML=new Array(31,28,31,30,31,30,31,31,30,31,30,31);
    var ppcWE=new Array("Sunday","Monday","Tuesday","Wednesday","Thursday","Friday","Saturday");
    var ppcNow=new Date();var ppcPtr=new Date();
    if (ppcNN) {
        window.captureEvents(Event.RESIZE);
        window.onresize = restoreLayers;
        document.captureEvents(Event.MOUSEDOWN|Event.MOUSEUP);
        document.onmousedown = recordXY;
        document.onmouseup = confirmXY;
    }

function restoreLayers(e) {
    if (ppcNN) {
    with (window.document) {
    open("text/html");
    write("<html><head><title>Restoring the layer structure...</title></head>");
    write("<body bgcolor=\"#FFFFFF\" onLoad=\"history.go(-1)\">");
    write("</body></html>");
    close();}}
}

function recordXY(e) {
    if (ppcNN) {
    ppcXC = e.x;
    ppcYC = e.y;
    document.routeEvent(e);}
}

function confirmXY(e) {
    if (ppcNN) {
    ppcXC = (ppcXC == e.x) ? e.x : null;
    ppcYC = (ppcYC == e.y) ? e.y : null;
    document.routeEvent(e);}
}

function getCalendarFor(target,doSubm) {
    ppcSV = target;
    ppcRL = null;
    doSubmit = doSubm
    
    if (ppcFC) {
        setCalendar();
        ppcFC = false;
    }
    if ((ppcSV != null)&&(ppcSV)) 
    {
        if (ppcIE) {
            var obj = document.all['PopUpCalendar'];
            obj.style.left = document.body.scrollLeft+event.clientX;
            obj.style.top  = document.body.scrollTop+event.clientY;
            obj.style.visibility = "visible";
        }
        else if (ppcNN) {
            var obj = document.layers['PopUpCalendar'];
            obj.left = ppcXC
            obj.top  = ppcYC
            obj.visibility = "show";
        }
        else {showError(ppcER[0]);}
    }
    else {
        showError(ppcER[1]);
    }
}
    
function switchMonth(param) {
    var tmp = param.split("|");
    setCalendar(tmp[0],tmp[1]);
}

function moveMonth(dir) {
    var obj = null;
    var limit = false;
    var tmp,dptrYear,dptrMonth;
    if (ppcIE) {
        obj = document.forms[0].sItem;
    }
    else if (ppcNN) {
        obj = document.layers['PopUpCalendar'].document.layers['monthSelector'].document.forms[0].sItem;
    }
    else {
        showError(ppcER[0]);
    }
    if (obj != null) {
        if ((dir.toLowerCase() == "back")&&(obj.selectedIndex > 0)) {
            obj.selectedIndex--;
        }
        else if ((dir.toLowerCase() == "forward")&&(obj.selectedIndex < 12)) {
            obj.selectedIndex++;
        }
        else {
            limit = true;
        }
    }
    if (!limit) {
        tmp = obj.options[obj.selectedIndex].value.split("|");
        dptrYear  = tmp[0];
        dptrMonth = tmp[1];
        setCalendar(dptrYear,dptrMonth);
    }
    else {
        if (ppcIE) {
            obj.style.backgroundColor = "#000000";
            window.setTimeout("document.forms[0].sItem.style.backgroundColor = '#FFFFFF'",50);
        }
    }
}

function selectDate(param) {

    var arr   = param.split("|");
    var year  = arr[0];
    var month = arr[1];
    var date  = arr[2];
    var ptr = parseInt(date);
    ppcPtr.setDate(ptr);
    
    //alert(dateFormat(year,month,date));
    
    if ((ppcSV != null)&&(ppcSV)) {
    
        if (validDate(dateFormat(year,month,date))) {
            ppcSV.value = dateFormat(year,month,date);
            hideCalendar();
            if (doSubmit=='true') {
                document.forms[0].submit();
            }
        }
        else {showError(ppcER[2]);
            if (ppcTI) {
                clearTimeout(ppcTI);
                ppcTI = false;
            }
        }
    }
    else {
        showError(ppcER[1]);
        hideCalendar();
    }
}

function setCalendar(year,month) {
    if (year  == null) {
        year = getFullYear(ppcNow);
    }
    if (month == null) {
        month = ppcNow.getMonth();setSelectList(year,month);
    }
    if (month == 1) {
        ppcML[1]  = (isLeap(year)) ? 29 : 28;
    }
    ppcPtr.setYear(year);
    ppcPtr.setMonth(month);
    ppcPtr.setDate(1);
    updateContent();
}

function updateContent() {

    generateContent();
    if (ppcIE) {
        document.all['monthDays'].innerHTML = ppcCD;
    }
    else if (ppcNN) {
        with (document.layers['PopUpCalendar'].document.layers['monthDays'].document) {
            open("text/html");
            write("<html>\n<head>\n<title>DynDoc</title>\n</head>\n<body bgcolor=\"#FFFFFF\">\n");
            write(ppcCD);
            write("</body>\n</html>");
            close();
        }
    }
    else {
        showError(ppcER[0]);
    }
    ppcCD = ppcTT;
}

function generateContent() {

    var year  = getFullYear(ppcPtr);
    var month = ppcPtr.getMonth();
    var date  = 1;
    var day   = ppcPtr.getDay();
    var len   = ppcML[month];
    var bgr,cnt,tmp = "";
    var j,i = 0;
    for (j = 0; j < 7; ++j) {
        if (date > len) {
            break;
        }
        for (i = 0; i < 7; ++i) {
            bgr = ((i == 0)||(i == 6)) ? "#B4C09E" : "#D7E3C0";
            if (((j == 0)&&(i < day))||(date > len)) {
                tmp  += makeCell(bgr,year,month,0);
            }
            else {
                tmp  += makeCell(bgr,year,month,date);++date;
            }
        }
        ppcCD += "<tr align=\"center\">\n" + tmp + "</tr>\n";tmp = "";
    }
    ppcCD += "</table>\n";
}

function makeCell(bgr,year,month,date) {

    var param = "\'"+year+"|"+month+"|"+date+"\'";
    var td1 = "<td style=\"height: 25px\" bgcolor=\""+bgr+"\" ";
    var td2 = (ppcIE) ? "</span></td>\n" : "</a></td>\n";
    var evt = "onMouseOver=\"this.style.backgroundColor=\'#cccccc\'\" onMouseOut=\"this.style.backgroundColor=\'"+bgr+"\'\" onMouseUp=\"selectDate("+param+")\" ";
    var ext = "<span Style=\"cursor: hand\">";
    var lck = "<span Style=\"cursor: default\">";
    var lnk = "<a href=\"javascript:selectDate("+param+")\" onMouseOver=\"window.status=\' \';return true;\">";
    var cellValue = (date != 0) ? date+"" : "&nbsp;";
    
    if ((ppcNow.getDate() == date)&&(ppcNow.getMonth() == month)&&(getFullYear(ppcNow) == year)) {
        cellValue = "<strong><font color='#000000'>"+cellValue+"</font></strong>";
    }
    var cellCode = "";
    if (date == 0) {
        if (ppcIE) {
            cellCode = td1+"Style=\"cursor: default; background-color: #cccccc\" >"+lck+ppcFT+cellValue+td2;
        }
        else {
            cellCode = td1+">"+ppcFT+cellValue+td2;
        }
    }
    else {
        if (ppcIE) {
            cellCode = td1+evt+"Style=\"cursor: hand\">"+ext+ppcFT+cellValue+td2;
        }
        else {
            if (date < 10) {
                cellValue = "&nbsp;" + cellValue + "&nbsp;";
            }
            cellCode = td1+">"+lnk+ppcFT+cellValue+td2;
        }
    }
    
    return cellCode;
}

function setSelectList(year,month) {
    var i = 0;
    var obj = null;
    if (ppcIE) {obj = document.forms[0].sItem;}
    else if (ppcNN) {obj = document.layers['PopUpCalendar'].document.layers['monthSelector'].document.forms[0].sItem;}
    else {/* NOP */}
    while (i < 13) {
    obj.options[i].value = year + "|" + month;
    obj.options[i].text  = year + " " + ppcMN[month];
    i++;
    month++;
    if (month == 12) {year++;month = 0;}}
}

function hideCalendar() {
    if (ppcIE) {document.all['PopUpCalendar'].style.visibility = "hidden";}
    else if (ppcNN) {document.layers['PopUpCalendar'].visibility = "hide";window.status = " ";}
    else {/* NOP */}
    ppcTI = false;
    setCalendar();
    ppcSV = null;
    if (ppcIE) {var obj = document.forms[0].sItem;}
    else if (ppcNN) {var obj = document.layers['PopUpCalendar'].document.layers['monthSelector'].document.forms[0].sItem;}
    else {/* NOP */}
    obj.selectedIndex = 0;
}

function showError(message) {
    window.alert("[ PopUp Calendar ]\n\n" + message);
}

function isLeap(year) {
    if ((year%400==0)||((year%4==0)&&(year%100!=0))) {return true;}
    else {return false;}
}

function getFullYear(obj) {
    if (ppcNN) {return obj.getYear() + 1900;}
    else {return obj.getYear();}
}

function validDate(date) {
    var reply = true;
    if (ppcRL == null) {/* NOP */}
    else {
    var arr = ppcRL.split(":");
    var mode = arr[0];
    var arg  = arr[1];
    var key  = arr[2].charAt(0).toLowerCase();
    if (key != "d") {
    var day = ppcPtr.getDay();
    var orn = isEvenOrOdd(date);
    reply = (mode == "[^]") ? !((day == arg)&&((orn == key)||(key == "a"))) : ((day == arg)&&((orn == key)||(key == "a")));}
    else {reply = (mode == "[^]") ? (date != arg) : (date == arg);}}
    return reply;
}

function isEvenOrOdd(date) {
    if (date - 21 > 0) {return "e";}
    else if (date - 14 > 0) {return "o";}
    else if (date - 7 > 0) {return "e";}
    else {return "o";}
}

function dateFormat(year,month,date) {
    if (ppcDF == null) {ppcDF = "m/d/Y";}
    var day = ppcPtr.getDay();
    var crt = "";
    var str = "";
    var chars = ppcDF.length;
    for (var i = 0; i < chars; ++i) {
    crt = ppcDF.charAt(i);
    switch (crt) {
    case "M": str += ppcMN[month]; break;
    case "m": str += (month<9) ? ("0"+(++month)) : ++month; break;
    case "Y": str += year; break;
    case "y": str += year.substring(2); break;
    case "d": str += ((ppcDF.indexOf("m")!=-1)&&(date<10)) ? ("0"+date) : date; break;
    case "W": str += ppcWN[day]; break;
    default: str += crt;}}
    return unescape(str);
}

//-->
