//	written	by Tan Ling	Wee	on 2 Dec 2001
//	last updated 23 June 2002
//	email :	fuushikaden@yahoo.com
//onerror=handleErr;

function handleErr(msg,url,l) // function for displaying the error message
{
    txt="There was an error on this page.\n\n";
    txt+="Error: " + msg + "\n";
    txt+="URL: " + url + "\n";
    txt+="Line: " + l + "\n\n";
    txt+="Click OK to continue.\n\n";
    alert(txt);
    return true;
}

var	fixedX = -1;			// x position (-1 if to appear below control)
var	fixedY = -1;			// y position (-1 if to appear below control)
var startAt = 1;			// 0 - sunday ; 1 - monday
var showWeekNumber = 0;	// 0 - don't show; 1 - show
var showToday = 1;		// 0 - don't show; 1 - show

//var imgDir = "http://localhost/HarNeediProd/Images/";

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."; // do not replace [date], it will be replaced by date.

var	crossobj, crossMonthObj, crossYearObj, monthSelected, yearSelected, dateSelected, omonthSelected, oyearSelected, odateSelected, monthConstructed, yearConstructed, intervalID1, intervalID2, timeoutID1, timeoutID2, ctlToPlaceValue, ctlNow, dateFormat, nStartingYear;

var	bPageLoaded=true;
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	imgsrc = new Array("drop1.gif","drop2.gif","left1.gif","left2.gif","right1.gif","right2.gif");
var	img	= new Array();

var bShow = false;
var sHTML1;
var Cur_Cal_Instance;
var objPrev;
var varCalImgBasePath;
var objHidden="";

/* hides <select> and <applet> objects (for IE only) */
//alert("SGN:" + navigator.appName + ":" + navigator.appVersion + ":" + navigator.appCodeName);

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 );
}

var	monthName =	new	Array("January","February","March","April","May","June","July","August","September","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;cursor:pointer;font-weight:bold;font-size:10px;";
var	styleLightBorder="border-style:solid;border-width:1px;border-color:#a0a0a0;";

function swapImage(srcImg, destImg)
{
    if (ie)	
    {
        document.getElementById(srcImg).setAttribute("src",varCalImgBasePath + destImg);
    }
}

function hideCalendar()	
{
    if(Cur_Cal_Instance!=null)
    {
        Cur_Cal_Instance.innerHTML = "";
    }
    //ChangeObjView('');
    showElement( 'SELECT' );
    //showElement( '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;

    hideCalendar();
    ctlToPlaceValue.value =	constructDate(dateSelected,monthSelected,yearSelected);
    window.status="";
}

/*** 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:10px; border-width:1px; border-style:solid; border-color:#a0a0a0;color:black;' bgcolor='#f0f0f0' 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";
    
    //ChangeObjView('hidden');
}

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:10px; border-width:1px; border-style:solid; border-color:#a0a0a0;color:black;'	bgcolor='#f0f0f0' 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";
}

/*** calendar ***/
function WeekNbr(n) 
{
    // Algorithm used:
    // From Klaus Tondering's Calendar document (The Authority/Guru)
    // hhtp://www.tondering.dk/claus/calendar.html
    // a = (14-month) / 12
    // y = year + 4800 - a
    // m = month + 12a - 3
    // J = day + (153m + 2) / 5 + 365y + y / 4 - y / 100 + y / 400 - 32045
    // d4 = (J + 31741 - (J mod 7)) mod 146097 mod 36524 mod 1461
    // L = d4 / 1460
    // d1 = ((d4 - L) mod 365) + L
    // WeekNumber = d1 / 7 + 1

    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() 
{
    if(Cur_Cal_Instance.innerHTML == "")
    {
        if(yearNow<1900)
        {
            yearNow += 1900;
        }
        for	(i=0;i<imgsrc.length;i++)
        {
            img[i] = new Image;
            img[i].src = varCalImgBasePath + imgsrc[i];
        }
        sHTML1 ="<div onclick='bShow=true' id='calendar' style='z-index:+999;position:absolute;visibility:hidden;'>"+
                "   <table border=0 width="+((showWeekNumber==1)?250:220)+" style='font-family:arial;font-size:11px;border-width:1px;border-style:solid;border-color:#a0a0a0;font-family:arial; font-size:11px;' bgcolor='#ffffff' cellspacing='1px' cellpadding=0>"+
                //"      <tr><td class='calendar'>&nbsp;</td></tr> "+
                "      <tr bgcolor='#0000aa'>"+
                "         <td>"+
                "             <table width='"+((showWeekNumber==1)?248:218)+"' >"+
                "                 <tr>"+
                "                     <td style='padding:2px;font-family:arial; font-size:11px;'><font color='#ffffff'><B>"+
                "                       <span id='caption'>"+
                "                           <table cellspacing=0 cellpadding=0>"+
                "                               <tr style='padding:1px;'>"+
                "                                   <td><span id='spanLeft'	style='border-style:solid;border-width:1px;border-color:#3366FF;cursor:pointer' onmouseover='swapImage(\"changeLeft\",\"left2.gif\");this.style.borderColor=\"#88AAFF\";window.status=\""+scrollLeftMessage+"\"' onclick='javascript:decMonth()' onmouseout='clearInterval(intervalID1);swapImage(\"changeLeft\",\"left1.gif\");this.style.borderColor=\"#3366FF\";window.status=\"\"' onmousedown='clearTimeout(timeoutID1);timeoutID1=setTimeout(\"StartDecMonth()\",500)'	onmouseup='clearTimeout(timeoutID1);clearInterval(intervalID1)'>&nbsp<IMG id='changeLeft' SRC='"+varCalImgBasePath+"left1.gif' width=10 height=11 BORDER=0>&nbsp</span>&nbsp;</td>"+
                "                                   <td><span id='spanRight' style='border-style:solid;border-width:1px;border-color:#3366FF;cursor:pointer'	onmouseover='swapImage(\"changeRight\",\"right2.gif\");this.style.borderColor=\"#88AAFF\";window.status=\""+scrollRightMessage+"\"' onmouseout='clearInterval(intervalID1);swapImage(\"changeRight\",\"right1.gif\");this.style.borderColor=\"#3366FF\";window.status=\"\"' onclick='incMonth()' onmousedown='clearTimeout(timeoutID1);timeoutID1=setTimeout(\"StartIncMonth()\",500)'	onmouseup='clearTimeout(timeoutID1);clearInterval(intervalID1)'>&nbsp<IMG id='changeRight' SRC='"+varCalImgBasePath+"right1.gif'	width=10 height=11 BORDER=0>&nbsp</span>&nbsp</td>"+
                "                                   <td><span id='spanMonth' style='border-style:solid;border-width:1px;border-color:#3366FF;cursor:pointer'	onmouseover='swapImage(\"changeMonth\",\"drop2.gif\");this.style.borderColor=\"#88AAFF\";window.status=\""+selectMonthMessage+"\"' onmouseout='swapImage(\"changeMonth\",\"drop1.gif\");this.style.borderColor=\"#3366FF\";window.status=\"\"' onclick='popUpMonth()'></span>&nbsp;</td>"+
                "                                   <td><span id='spanYear' style='border-style:solid;border-width:1px;border-color:#3366FF;cursor:pointer' onmouseover='swapImage(\"changeYear\",\"drop2.gif\");this.style.borderColor=\"#88AAFF\";window.status=\""+selectYearMessage+"\"'	onmouseout='swapImage(\"changeYear\",\"drop1.gif\");this.style.borderColor=\"#3366FF\";window.status=\"\"'	onclick='popUpYear()'></span>&nbsp;</td>"+
                "                               </tr>"+
                "                               <tr>"+
                "                                   <td></td><td></td>"+
                "                                   <td><div id='selectMonth' style='z-index:+999;position:absolute;visibility:hidden;'></div></td>"+
                "                                   <td><div id='selectYear' style='z-index:+999;position:absolute;visibility:hidden;'></div></td>"+
                "                               </tr>"+
                "                           </table>"+
                "                       </span>"+
                "                       </B></font></td>"+
                "                     <td align=right valign='top'><a href='javascript:hideCalendar()'><IMG SRC='"+varCalImgBasePath+"close.gif' WIDTH='15' HEIGHT='13' BORDER='0' ALT='Close the Calendar'></a></td>"+
                "                 </tr>"+
                "             </table>"+
                "         </td>"+
                "      </tr>"+
                "      <tr>"+
                "           <td style='padding:5px' bgcolor=#ffffff>"+
                "               <span id='Cal_Content'>"+
                "               </span>"+
                "          </td>"+
                "      </tr>";

        if (showToday==1)
        {
            sHTML1 += "<tr bgcolor=#f0f0f0><td style='padding:5px' align=center><span id='lblToday'></span></td></tr>";
        }

        sHTML1 += "</table></div>";
                
        Cur_Cal_Instance.innerHTML = sHTML1;
    }
                       
    if (!ns4)
    {
        crossobj=(dom)?document.getElementById("calendar").style : ie? document.all.calendar : document.calendar;
        //hideCalendar();

        crossMonthObj=document.getElementById("selectMonth").style;

        crossYearObj=document.getElementById("selectYear").style;

        monthConstructed=false;
        yearConstructed=false;

        if (showToday==1)
        {
            document.getElementById("lblToday").innerHTML =	todayString + " <a onmousemove='window.status=\""+gotoString+"\"' onmouseout='window.status=\"\"' title='"+gotoString+"' style='"+styleAnchor+"' onclick='javascript:monthSelected=monthNow;yearSelected=yearNow;constructCalendar();'>"+dayName[(today.getDay()-startAt==-1)?6:(today.getDay()-startAt)]+", " + dateNow + " " + monthName[monthNow].substring(0,3)	+ "	" +	yearNow	+ "</a>";
        }
    }
    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	 border=0 style='font-family:verdana;font-size:10px;'><tr>";

    if (showWeekNumber==1)
    {
        sHTML += "<td width=1 rowspan=7 bgcolor='#d0d0d0' style='padding:0px'><img src='"+varCalImgBasePath+"divider.gif' width=1></td>";
    }

    for	(i=0; i<7; i++)	
    {
        sHTML += "<td width='27' align='right'><B>"+ dayName[i]+"</B></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='"+sStyle+"' onclick='javascript:dateSelected="+datePointer+";closeCalendar();'><font color=#ff0000>&nbsp;" + datePointer + "</font>&nbsp;</a></b>";
        }
        else if	(dayPointer % 7 == (startAt * -1)+1)
        {
            sHTML += "<a "+dateMessage+" title=\"" + sHint + "\" style='"+sStyle+"' onclick='javascript:dateSelected="+datePointer + ";closeCalendar();'>&nbsp;<font color=#909090>" + datePointer + "</font>&nbsp;</a>";
        }
        else
        {
            sHTML += "<a "+dateMessage+" title=\"" + sHint + "\" style='"+sStyle+"' onclick='javascript:dateSelected="+datePointer + ";closeCalendar();'>&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("Cal_Content").innerHTML   = sHTML;
    document.getElementById("spanMonth").innerHTML = "&nbsp;" +	monthName[monthSelected] + "&nbsp;<IMG id='changeMonth' SRC='"+varCalImgBasePath+"drop1.gif' WIDTH='12' HEIGHT='10' BORDER=0>";
    document.getElementById("spanYear").innerHTML =	"&nbsp;" + yearSelected	+ "&nbsp;<IMG id='changeYear' SRC='"+varCalImgBasePath+"drop1.gif' WIDTH='12' HEIGHT='10' BORDER=0>";
}

function popUpCalendar(ctl,parCalInst,format,parImgBasePath) 
{
    if(Cur_Cal_Instance!=null)
    {
        if(Cur_Cal_Instance.id != parCalInst)
        {
            Cur_Cal_Instance.innerHTML = "";
        }
    }
    varCalImgBasePath = parImgBasePath;
    Cur_Cal_Instance = document.getElementById(parCalInst);
    
    var	leftpos=0;
    var	toppos=0;
    
    ctl = document.getElementById(ctl);
    if (bPageLoaded)
    {
        if(Cur_Cal_Instance.innerHTML == "")
        {
            ctlToPlaceValue	= ctl;
            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 =	ctl.value.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;
                if(yearSelected<1900)
                {
                    yearSelected += 1900; 
                }
            }

            odateSelected=dateSelected;
            omonthSelected=monthSelected;
            oyearSelected=yearSelected;

            constructCalendar();
            crossobj.visibility=(dom||ie)? "visible" : "show";

            //ChangeObjView('hidden');
            
            hideElement( 'SELECT', document.getElementById(ctl.id),document.getElementById(parCalInst));
            //hideElement( 'APPLET', document.getElementById(ctl.id) );

            bShow = true;
        }
        else
        {
            hideCalendar();
            if (ctlNow!=ctl) 
            {
                popUpCalendar(ctl,parCalInst,format)
            }
        }
        ctlNow = ctl;
    }
}
document.onkeypress = function (event) 
{
    if(window.event)
    {
        event = window.event;
    }
    if (event.keyCode==27)
    {
        hideCalendar();
    }
}
document.onclick = function hidecal2() 
{
    if (!bShow)
    {
        hideCalendar();
    }
    bShow = false;
}

function hideElement( elmID, overDiv, parCalHolder )
{
    if( ie )
    {
        var overDivoffsetLeft = overDiv.offsetLeft;
        var overDivoffsetWidth = overDiv.offsetWidth + parCalHolder.children[0].offsetWidth;
        var overDivoffsetTop = overDiv.offsetTop;
        var overDivoffsetHeight = overDiv.offsetHeight + parCalHolder.children[0].offsetHeight;
        var overDivParent = overDiv.offsetParent;
            
        while( overDivParent.tagName.toUpperCase() != "BODY" )
        {
            overDivoffsetLeft  += overDivParent.offsetLeft;
            overDivoffsetTop   += overDivParent.offsetTop;
            overDivParent = overDivParent.offsetParent;
        }
        
        for( i = 0; i < document.all.tags( elmID ).length; i++ )
        {
            obj = document.all.tags( elmID )[i];
            
            if( !obj || !obj.offsetParent )
            {
                continue;
            }

        // Find the element's offsetTop and offsetLeft relative to the BODY tag.
            objLeft   = obj.offsetLeft;
            objTop    = obj.offsetTop;
            objParent = obj.offsetParent;
            
            while( objParent.tagName.toUpperCase() != "BODY" )
            {
                objLeft  += objParent.offsetLeft;
                objTop   += objParent.offsetTop;
                objParent = objParent.offsetParent;
            }

            objHeight = obj.offsetHeight;
            objWidth = obj.offsetWidth;
            //alert("L:" +overDivoffsetLeft + "-T:" + overDivoffsetTop + "-W:" + overDivoffsetWidth + "-H:" + overDivoffsetHeight +"\nL:" + objLeft + "-T:" + objTop + "-W:" + objWidth + "-H:" + objHeight);
            if(( overDivoffsetLeft + overDivoffsetWidth ) <= objLeft );
            else if(( overDivoffsetTop + overDivoffsetHeight ) <= objTop );
            else if( overDivoffsetTop >= ( objTop + objHeight ));
            else if( overDivoffsetLeft >= ( objLeft + objWidth ));
            else
            {
                obj.style.visibility = "hidden";
                objHidden += obj.id + ",";
            }
        }
    }
}

/*
* unhides <select> and <applet> objects (for IE only)
*/
function showElement( elmID )
{
    if( ie )
    {
        if(objHidden!="")
        {
            objHidden = objHidden.substr(0,parseInt(objHidden.length-1));
            objHidden = objHidden.split(',');
            
            for( i = 0; i < objHidden.length; i++ )
            {
                if(document.getElementById(objHidden[i])!=null)
                {
                    document.getElementById(objHidden[i]).style.visibility = "";
                }
            }
            objHidden = "";
        }
    }
}