var now = new Date();
var show_date = new Date();

function calpic(){
var scal ='<table style=\"BORDER-RIGHT: gray 3px solid; BORDER-TOP: gray 3px solid; Z-INDEX: 10000; BORDER-LEFT: gray 3px solid; BORDER-BOTTOM: gray 3px solid;\" id=calpic bgcolor=#eeeeee border=2 cellpadding=5><tr><td align=center>';
scal += '<table width=100% border=0><tr><td align=left>';
//Month Selection
var month_array = new Array("January","February","March","April","May","June","July","August","September","October","November","December");
scal += '<select class=sel name=selmonth id=selmonth onchange=change_month()>';
for(i=0;i<month_array.length;i++)
{
 if (now.getMonth() != i) {
  scal += '<option value='+i+'>'+month_array[i];
  }else{
  scal += '<option value='+i+' selected>'+month_array[i];
  }
}
scal += '</select>';
//Year Select
scal += '<select class=sel id=selyear name=selyear onchange=change_month()>';
for(i=2004;i<3000;i++)
{
 if (now.getFullYear() != i) {
  scal += '<option value='+i+'>'+i;
 }else{
  scal += '<option value='+i+' selected>'+i;
 }
}
scal += '</select>';
//scal += '<td align=right><BUTTON onclick=\"javascript:document.getElementById(\'Calendar\').style.visibility=\'hidden\'\"; class=wbut align=right type=button>&nbsp;x&nbsp;</BUTTON></td></tr></table>';
scal += '<td align=right><BUTTON onclick=\"javascript:document.getElementById(\'Calendar\').innerHTML=\'\'\"; class=wbut align=right type=button>&nbsp;x&nbsp;</BUTTON></td></tr></table>';
//Build Calendar
scal += '<table><tr>';
scal += '<td class=thc>&nbsp;&nbsp;Sun&nbsp;&nbsp;</td><td class=thc>&nbsp;&nbsp;Mon&nbsp;&nbsp;</td><td class=thc>&nbsp;&nbsp;Tue&nbsp;&nbsp;</td><td class=thc>&nbsp;&nbsp;Wed&nbsp;&nbsp;</td><td class=thc>&nbsp;&nbsp;Thu&nbsp;&nbsp;</td><td class=thc>&nbsp;&nbsp;&nbsp;Fri&nbsp;&nbsp;&nbsp;</td><td class=thc>&nbsp;&nbsp;Sat&nbsp;&nbsp;</td>';
scal += '</tr><tr>';
for(j=0;j<6;j++)
{
 for(i=0;i<7;i++)
 {
   scal += '<td valign=top class=tdc id=d'+i+'r'+j+'>&nbsp;</td>';

 }
 scal += '</tr>';
}
scal += '</table></td></tr></table>';

Calendar.innerHTML=scal;
//document.getElementById('Calendar').style.visibility = 'hidden';
//Write Numbers in Calendar
set_cal(show_date);
}

function set_cal(show_date){
begin_day = new Date (show_date.getFullYear(),show_date.getMonth(),1);
begin_day_date = begin_day.getDay();
end_day = new Date (show_date.getFullYear(),show_date.getMonth()+1,1);
count_day = Math.floor(1/24 + (end_day - begin_day)/1000/60/60/24);
input_table(begin_day_date,count_day);
}

function input_table(begin,count){
initcal();
j=0;
i=begin;
for (c=1;c<count+1;c++)
{
 colum_name = eval("d"+i+"r"+j);
 colum_name.innerText =  c;
 loc=document.getElementById('loc').value;
 colum_name.innerHTML =  '<a href=\"javascript:changedate(\''+(show_date.getMonth()+1)+'/'+c+'/'+show_date.getFullYear()+'\',\''+loc+'\');\">'+c+'</a>';
 document.getElementById('d'+i+'r'+j).innerHTML='<a href=\"javascript:changedate(\''+(show_date.getMonth()+1)+'/'+c+'/'+show_date.getFullYear()+'\',\''+loc+'\');\">'+c+'</a>';
 if ((now.getDate() == c)&&(show_date.getMonth() == now.getMonth())&&(show_date.getFullYear() == now.getFullYear())) {
   //colum_name.innerHTML+="<br><sup>Today</sup>"; colum_name.style.color = "red";
   colum_name.style.backgroundColor = '#ffcccc';
   document.getElementById('d'+i+'r'+j).style.backgroundColor = '#ffcccc';
 };
 i++;
 if (i==7){i=0;j++;}
}
}

function initcal()
{
for(j=0;j<6;j++)
{
 for(i=0;i<7;i++)
 {
 colum_name = eval("d"+i+"r"+j);
 colum_name.innerText =  " ";
 colum_name.style.backgroundColor ="";
 colum_name.style.color ="";
 }
}
}

function change_month()
{
sel_year=document.getElementById('selyear').value;
sel_month=document.getElementById('selmonth').value;
show_date = new Date(sel_year,sel_month,1);
set_cal(show_date);
}

function changedate(res,loc){
	if (loc == 'txtFUDate'){
		document.Form1.txtFUDate.options[0]=null;
		var len = document.Form1.txtFUDate.length++; // Increase the size of list and return the size
		document.Form1.txtFUDate.options[len].value = res;
		document.Form1.txtFUDate.options[len].text = res;
		document.Form1.txtFUDate.value=res;
	}
	document.getElementById(loc).value=res;
	document.getElementById('Calendar').style.visibility = 'hidden';
}

function showcal(loc,xpos,ypos,ffxpos,ffypos){
document.getElementById('loc').value=loc;
calpic();
change_month();
document.getElementById('Calendar').style.visibility = 'visible';
if (window.event){
var xx = eval(window.event.x + document.body.scrollLeft + eval(xpos));
var yy = eval(window.event.y + document.body.scrollTop - 100 + eval(ypos));
document.getElementById('Calendar').style.top = yy;
document.getElementById('Calendar').style.left = xx;
//status='('+xx+','+yy+')';
}else{
//alert(ffxpos);
document.getElementById('Calendar').style.top = ffypos;
document.getElementById('Calendar').style.left = ffxpos;
}
}