function initCalendar ()
{
	var ns4 = document.layers;
	if (!ns4)
	{
		fDrawCal();
	}
}
var m_dCurDate = new Date();
var m_iYear = m_dCurDate.getFullYear();
var m_iMonth = m_dCurDate.getMonth();

var iCellCalWidth = 22;
var iCellCalHeight = 15;
var monthName = new Array("GENNAIO","FEBBRAIO","MARZO","APRILE","MAGGIO","GIUGNO","LUGLIO","AGOSTO","SETTEMBRE","OTTOBRE","NOVEMBRE","DICEMBRE")

function fGetDaysInMonth(iMonth, iYear)
{
	var dPrevDate = new Date(iYear, iMonth+1, 0);
	return dPrevDate.getDate();
}
function fBuildCal(iYear, iMonth)
{
	var aMonth = new Array();
	aMonth[0] = new Array(7);
	aMonth[1] = new Array(7);
	aMonth[2] = new Array(7);
	aMonth[3] = new Array(7);
	aMonth[4] = new Array(7);
	aMonth[5] = new Array(7);
	aMonth[6] = new Array(7);

	var dCalDate = new Date(iYear, iMonth, 1);
	var iDayOfFirst = dCalDate.getDay(); // 0=Dom, 1=Lun, ...
	var iDaysInMonth = fGetDaysInMonth(iMonth, iYear);
	var iVarDate = 1;
	var i, d, w;
	aMonth[0][0] = "D";
	aMonth[0][1] = "L";
	aMonth[0][2] = "M";
	aMonth[0][3] = "M";
	aMonth[0][4] = "G";
	aMonth[0][5] = "V";
	aMonth[0][6] = "S";
	for (d = iDayOfFirst; d < 7; d++) {
		aMonth[1][d] = iVarDate;
		iVarDate++;
	}
	for (w = 2; w < 7; w++) {
		for (d = 0; d < 7; d++) {
			if (iVarDate <= iDaysInMonth)
			{
				aMonth[w][d] = iVarDate;
				iVarDate++;
      }
   	}
	}
	return aMonth;
}
function fGetNextMonth()
{
	var iYear = m_iYear;
	var iMonth = m_iMonth+1;
	if (iMonth > 11)
	{
		iMonth = 0;
		iYear = iYear+1;
	}
	return monthName[iMonth];
}
function fDrawNextMonth()
{
	m_iMonth = m_iMonth+1;
	if (m_iMonth > 11)
	{
		m_iMonth = 0;
		m_iYear = m_iYear+1;
	}
	fDrawCal();
}
function fGetPrevMonth()
{
	var iYear = m_iYear;
	var iMonth = m_iMonth-1;
	if (iMonth < 0)
	{
		iMonth = 11;
		iYear = iYear-1;
	}
	return monthName[iMonth];
}
function fDrawPrevMonth()
{
	m_iMonth = m_iMonth-1;
	if (m_iMonth < 0)
	{
		m_iMonth = 11;
		m_iYear = m_iYear-1;
	}
	fDrawCal();
}
function fDrawCal()
{
	var myMonth;
	myMonth = fBuildCal(m_iYear, m_iMonth);

	sHTML1 = "<h2><a class=link title='"+monthName[m_iMonth]+" "+m_iYear+"'>"+monthName[m_iMonth]+" "+m_iYear+"</a></h2>"
	sHTML1 += "<table border='0' cellspacing='0' cellpadding='0'><thead><tr>"
	sHTML1 += "<td colspan='7' align='center' height='" + iCellCalHeight + "'>"
	sHTML1 += "</td>"
	sHTML1 += "</tr>"
	sHTML1 += "<tr>"
	sHTML1 += "<td align='center' class='bodyAgenda' width='" + iCellCalWidth + "' height='" + iCellCalHeight + "'>" + myMonth[0][0] + "</td>"
	sHTML1 += "<td align='center' class='bodyAgenda'>" + myMonth[0][1] + "</td>"
	sHTML1 += "<td align='center' class='bodyAgenda'>" + myMonth[0][2] + "</td>"
	sHTML1 += "<td align='center' class='bodyAgenda'>" + myMonth[0][3] + "</td>"
	sHTML1 += "<td align='center' class='bodyAgenda'>" + myMonth[0][4] + "</td>"
	sHTML1 += "<td align='center' class='bodyAgenda'>" + myMonth[0][5] + "</td>"
	sHTML1 += "<td align='center' class='bodyAgenda'>" + myMonth[0][6] + "</td>"
	sHTML1 += "</tr></thead><tbody>"
	for (w = 1; w < 7; w++) {
		sHTML1 += "<tr>"
		for (d = 0; d < 7; d++) {
			sHTML1 += "<td align='center' valign='top' class='bodyAgenda' width='" + iCellCalWidth + "' height='" + iCellCalHeight + "' id=calCell>"
			if (!isNaN(myMonth[w][d])) {
				giorno = myMonth[w][d]+"/"+(m_iMonth+1)+"/"+m_iYear
				if ( giorno == today )
				{
					sHTML1 += "<a class=\"linkHiAgenda\" href=\"listaschede.jsp?schedatipo=E&giorno="+giorno+"\">"+myMonth[w][d]+"</a>"
				}
				else
				{
					sHTML1 += "<a href=\"listaschede.jsp?schedatipo=E&giorno="+giorno+"\">"+myMonth[w][d]+"</a>"
				}
			} else {
				sHTML1 += "&nbsp;"
			}
			sHTML1 += "</td>"
		}
		sHTML1 += "</tr>"
	}

	var prevMonth = fGetPrevMonth();
	var nextMonth = fGetNextMonth();

	sHTML1 += "</tbody><tfoot><tr>"
	sHTML1 += "<td colspan='3' align='left' height='" + iCellCalHeight + "' onclick='fDrawPrevMonth()'>"
	sHTML1 += "<a class='link' style='cursor:hand' title='"+prevMonth+"'>"+prevMonth+"</a>"
	sHTML1 += "</td>"
	sHTML1 += "<td/>"
	sHTML1 += "<td colspan='3' align='right' height='" + iCellCalHeight + "' onclick='fDrawNextMonth()'>"
	sHTML1 += "<a class='link' style='cursor:hand' title='"+nextMonth+"'>"+nextMonth+"</a>"
	sHTML1 += "</td>"
	sHTML1 += "</tr></tfoot>"
	sHTML1 += "</table>"

	document.getElementById("calendar").innerHTML  = sHTML1
}
