var fixedX=-1;var fixedY=-1;var startAt=1
var showWeekNumber=1;var showToday=1;var imgDir='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.';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 imgsrc=new Array('drop1.gif','drop2.gif','left1.gif','left2.gif','right1.gif','right2.gif');var img=new Array();var bShow=false;function hideElement(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'){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(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){for(i=0;i<imgsrc.length;i++){img[i]=new Image;img[i].src=imgDir+imgsrc[i];}
document.write("<div onclick='bShow=true' id='calendar' style='z-index:+999;position:absolute;top:520px;visibility:hidden;'><table width="+((showWeekNumber==1)?250:220)+" style='font-family:arial;font-size:11px;border-width:1;border-style:solid;border-color:#a0a0a0;font-family:arial; font-size:11px}' bgcolor='#ffffff'><tr bgcolor='#c0c0c0'><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'></span></B></font></td><td align=right><a href='javascript:hideCalendar()'><IMG SRC='"+imgDir+"close.gif' BORDER='0' ALT='Close the Calendar' style='padding-right: 5px;'></a></td></tr></table></td></tr><tr><td style='padding:5px' bgcolor=#ffffff><span id='content'></span></td></tr>");if(showToday==1)document.write("<tr bgcolor=#f0f0f0><td style='padding:5px' align=center><span id='lblToday'></span></td></tr>");document.write("</table></div><div id='selectMonth' style='z-index:+999;position:absolute;visibility:hidden;'></div><div id='selectYear' style='z-index:+999;position:absolute;visibility:hidden;'></div>");}
var monthName=new Array('January','February','March','April','May','June','July','August','September','October','November','December');var monthName2=new Array('JAN','FEB','MAR','APR','MAY','JUN','JUL','AUG','SEP','OCT','NOV','DEC');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();crossMonthObj=(dom)?document.getElementById('selectMonth').style:ie?document.all.selectMonth:document.selectMonth;crossYearObj=(dom)?document.getElementById('selectYear').style:ie?document.all.selectYear:document.selectYear;monthConstructed=false;yearConstructed=false;if(showToday==1)document.getElementById('lblToday').innerHTML=todayString+" <a onmousemove='window.status=\""+gotoString+"\"' onmouseout='window.status=\"\"' title='"+gotoString+"' style='"+styleAnchor+"' href='javascript:monthSelected=monthNow;yearSelected=yearNow;constructCalendar();'>"+dayName[(today.getDay()-startAt==-1)?6:(today.getDay()-startAt)]+", "+dateNow+" "+monthName[monthNow].substring(0,3)+" "+yearNow+"</a>";sHTML1="<span id='spanLeft' style='cursor:pointer' onmouseover='swapImage(\"changeLeft\",\"left1.gif\");window.status=\""+scrollLeftMessage+"\"' onclick='javascript:decMonth()' onmouseout='clearInterval(intervalID1);swapImage(\"changeLeft\",\"left1.gif\");window.status=\"\"' onmousedown='clearTimeout(timeoutID1);timeoutID1=setTimeout(\"StartDecMonth()\",500)' onmouseup='clearTimeout(timeoutID1);clearInterval(intervalID1)'> <IMG id='changeLeft' SRC='"+imgDir+"left1.gif' BORDER=0> </span> ";sHTML1+="<span id='spanRight' style='cursor:pointer' onmouseover='swapImage(\"changeRight\",\"right1.gif\");window.status=\""+scrollRightMessage+"\"' onmouseout='clearInterval(intervalID1);swapImage(\"changeRight\",\"right1.gif\");window.status=\"\"' onclick='incMonth()' onmousedown='clearTimeout(timeoutID1);timeoutID1=setTimeout(\"StartIncMonth()\",500)' onmouseup='clearTimeout(timeoutID1);clearInterval(intervalID1)'> <IMG id='changeRight' SRC='"+imgDir+"right1.gif' BORDER=0> </span> ";sHTML1+="<span id='spanMonth' style='cursor:pointer' onmouseover='swapImage(\"changeMonth\",\"drop1.gif\");window.status=\""+selectMonthMessage+"\"' onmouseout='swapImage(\"changeMonth\",\"drop1.gif\");window.status=\"\"' onclick='popUpMonth()'></span> ";sHTML1+="<span id='spanYear' style='cursor:pointer' onmouseover='swapImage(\"changeYear\",\"drop1.gif\");window.status=\""+selectYearMessage+"\"' onmouseout='swapImage(\"changeYear\",\"drop1.gif\");window.status=\"\"' onclick='popUpYear()'></span> ";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('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("mmmm","<p>");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]);sTmp=sTmp.replace("<p>",monthName2[m]);sTmp=sTmp.replace("yyyy",y);return sTmp.replace("yy",padZero(y%100));}
function closeCalendar(){var sTmp;hideCalendar();ctlToPlaceValue.value=constructDate(dateSelected,monthSelected,yearSelected);}
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=\"#ffffff\"' onmouseout='this.style.backgroundColor=\"\"' style='cursor:pointer' onclick='monthConstructed=false;monthSelected="+i+";constructCalendar();popDownMonth();event.cancelBubble=true'> "+sName+" </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='#efefef' 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';crossMonthObj.left=parseInt(crossobj.left)+50;crossMonthObj.top=parseInt(crossobj.top)+26;hideElement('SELECT',document.getElementById("selectMonth"));hideElement('APPLET',document.getElementById("selectMonth"));}
function popDownMonth(){crossMonthObj.visibility="hidden";}
function incYear(){for(i=0;i<7;i++){newYear=(i+nStartingYear)+1;if(newYear==yearSelected)txtYear=" <B>"+newYear+"</B> ";else txtYear=" "+newYear+" ";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=" <B>"+newYear+"</B> ";else txtYear=" "+newYear+" ";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=\"#ffffff\"' onmouseout='this.style.backgroundColor=\"\"' style='cursor:pointer' onclick='selectYear("+j+");event.cancelBubble=true'> "+sName+" </td></tr>";j++;}
sHTML+="<tr><td align='center' onmouseover='this.style.backgroundColor=\"#ffffff\"' 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='#efefef' 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;}
crossYearObj.left=leftOffset;crossYearObj.top=parseInt(crossobj.top)+26;}
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  border=0 style='font-family:verdana;font-size:10px;'><tr>";if(showWeekNumber==1)sHTML+="<td width=27><b>"+weekString+"</b></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++)sHTML+="<td width='27' align='right'><B>"+dayName[i]+"</B></td>";sHTML+="</tr><tr>";if(showWeekNumber==1)sHTML+="<td align=right>"+WeekNbr(startDate)+" </td>";for(var i=1;i<=dayPointer;i++)sHTML+="<td> </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,""");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+"' href='javascript:dateSelected="+datePointer+";closeCalendar();'><font color=#ff0000> "+datePointer+"</font> </a></b>";else if(dayPointer%7==(startAt*-1)+1)
sHTML+="<a "+dateMessage+" title=\""+sHint+"\" style='"+sStyle+"' href='javascript:dateSelected="+datePointer+";closeCalendar();'> <font color=#909090>"+datePointer+"</font> </a>";else
sHTML+="<a "+dateMessage+" title=\""+sHint+"\" style='"+sStyle+"' href='javascript:dateSelected="+datePointer+";closeCalendar();'> "+datePointer+" </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)))+" </td>"}}
document.getElementById("content").innerHTML=sHTML;document.getElementById("spanMonth").innerHTML=" "+monthName[monthSelected]+" <IMG id='changeMonth' SRC='"+imgDir+"drop1.gif' BORDER=0>";document.getElementById("spanYear").innerHTML=" "+yearSelected+" <IMG id='changeYear' SRC='"+imgDir+"drop1.gif' BORDER=0>";}
function popUpCalendar(ctl,ctl2,format){var leftpos=0;var toppos=0;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){formatChar="";}}}}
tokensChanged=0;if(formatChar!=""){aData=ctl2.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++;}}}else if(aFormat[i]=="mmmm"){for(j=0;j<12;j++){if(aData[i]==monthName2[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;aTag=ctl;do{aTag=aTag.offsetParent;leftpos+=aTag.offsetLeft;toppos+=aTag.offsetTop;}while(aTag.tagName!="BODY");crossobj.left=fixedX==-1?ctl.offsetLeft+leftpos:fixedX;crossobj.top=fixedY==-1?ctl.offsetTop+toppos+ctl.offsetHeight+2:fixedY;constructCalendar(1,monthSelected,yearSelected);crossobj.visibility=(dom||ie)?"visible":"show";hideElement('SELECT',document.getElementById("calendar"));hideElement('APPLET',document.getElementById("calendar"));bShow=true;}else{hideCalendar();if(ctlNow!=ctl)popUpCalendar(ctl,ctl2,format);}
ctlNow=ctl;}}
document.onkeypress=function hidecal1(){if(event.keyCode==27)hideCalendar();}
document.onclick=function hidecal2(){if(!bShow)hideCalendar();bShow=false;}
if(ie)init();else window.onload=init;