var xwidth = 220;
var xheight = 180;
var browser = document.layers ? 0 : document.all ? 1 : 2;


// colori
var backtable = '#CCCCFF';
var calendback = '#FFFFCC';
var lines = '#000099';
var bright = '#000000';
var festa = '#FF0000';

// ------ Non cambiare ----------
var mesi = new Array('Gennaio', 'Febbraio', 'Marzo', 'Aprile', 'Maggio', 'Giugno',
               'Luglio', 'Agosto', 'Settembre', 'Ottobre', 'Novembre', 'Dicembre');

var days = new Array('Lu', 'Ma', 'Me', 'Gi', 'Ve', 'Sa', 'Do');
var dd = new Array(31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31);

var today = new Date();
var anno = today.getFullYear();
var mese = today.getMonth();
var currday = today.getDate();
var cellwidth = Math.floor(xwidth / 7);
xwidth = cellwidth * 7;
var xmese = 0;
var aboutx = false;
var isOn = false;
var source = null;
var calframe = null;

function format(x) {
     return x > 9 ? x : "0" + x;
}

function action(g, m , a) {
   
   isOn = calframe.showIt(false);

   if (tipo == 0) {
      source[0].value = format(g);
      source[1].value = format(m + 1);
      source[2].value = a;
   }
   else
      source.value = format(g) + '/' + format(m + 1) + '/' + a;
}

function comparedate(d1, d2) {
   if (d1.getFullYear() == d2.getFullYear() && d1.getMonth() == d2.getMonth() && d1.getDate() == d2.getDate()) 
      return true;
   return false;
}

function pasqua(aa) {
   var xx = new Array(22, 22, 23, 23, 24, 24);
   var yy = new Array(2, 2, 3, 4, 5, 5);
   var a = aa % 19;
   var b = aa % 4;
   var c = aa % 7;

   var i = Math.floor(aa / 100) - 15;
   var x = xx[i], y = yy[i];
   var d = (19*a + x) % 30;
   var e = (2*b + 4*c + 6 * d + y) % 7;

   var p = 22 + d + e;

   var m = 300;
   if (p > 31) {
      m = 400;
      p = p - 31;
   }
   return m + p;
}


function isfesta(d) {
   var feste = new Array(0, 101, 106, 425, 501, 602, 815, 1101, 1208, 1225, 1226);

   if (d.getDay() == 0)
      return true;

   var pp = pasqua(d.getFullYear()) + 1;     // Pasquetta
      if (pp % 100 > 31)
         pp = 401;

   feste[0] = pp;
   for (var i = 0; i < feste.length; i++)
      if (Math.floor(feste[i] / 100) == d.getMonth() + 1) {
         var gg = feste[i] % 100;
         if (gg == d.getDate())
            return true;
      }

   return false;
}


function calendar(currday, mese, anno) {

   var dx = 2 - (new Date(anno, mese, 1)).getDay();
   if (dx == 2)
      dx = -5;
   var daysInMonth = dd[mese];

   if (mese == 1) {
      if (anno % 4 == 0 && anno % 100 != 0  || anno % 400 == 0)
         daysInMonth++;
   }

   var tx = '<div class="mese">&nbsp;&nbsp;' + mesi[mese] + ' ' + anno +'</div>\n';
   tx += '<table width="' + xwidth + '" border="0" cellspacing="1" cellpadding="1">\n';
   tx += '<tr align="right">\n';

   for (var i = 0; i < 7; i++)
      tx += '<td width="' + cellwidth+ '" class="cal">' + days[i] + '&nbsp;</td>\n';

   tx += '</tr>\n';
   for (var j = 0; j < 6; j++) {
      tx += '<tr bgcolor="' + calendback + '" align="right">\n';
      for (var i = 0; i < 7; i++) {
         var bgstring = "";
         var fgcol = lines;
         var fgstring = '&nbsp;';

         if (dx > 0 && dx <= daysInMonth) {
            fgstring = dx;
            var ddx = new Date(anno, mese, dx);
            if (isfesta(ddx)) {
               bgstring = ' bgcolor="' + festa + '"';
            }
            if (comparedate(ddx, today)) {
               fgcol = bright;
               fgstring = '<b><u>' + dx + '</u></b>\n';
            }
            var tempdate = ddx.getDate() + ", " + ddx.getMonth() + ", " + ddx.getFullYear();
            if(fgstring != "")
	            bgstring = bgstring + ' class="num" onclick="action(' + tempdate + ');"'
            fgstring = '<font color="' + fgcol + '">' + fgstring + '</font>\n';
         }
         tx += '<td width="' + cellwidth + '"' + bgstring + '>\n';
         tx += fgstring;
         tx += '</td>\n';
         dx++;
      }
      tx += '</tr>\n';
   }
   tx += '</table>\n';

   return tx;
}


function dataframe(x) {
   var s = '<table onblur="{isOn = calframe.showIt(false);}" onmousover="" width="' + 
   		xwidth + '" border="1" cellspacing="0" cellpadding="0" bgcolor="' + backtable + '">';
   s += '<tr>\n<td class="mese" valign="middle">';

   s += x; // calendar(currday, mese, anno);
   
   s += '</td></tr><tr><td>';
   s += '<form class="butt"><table width="100%" border="0" cellspacing="0" cellpadding="2">';
   s += '<tr>';
   s += '<td></td>';
   s += '<td align="right"><a class="a_click" onclick="altro_mese(-1)"><img src="images/prevcal.gif" name="prev" value=" - "></a>';
   s += '<a class="a_click" onclick="altro_mese(9)"><img src="images/oggi.gif" name="current" value="Default"></a>';
   s += '<a class="a_click" onclick="altro_mese(1)"><img src="images/nextcal.gif" name="next" value=" + "></a></td>';
   s += '</tr></form></table>';

   s += '</td>\n</tr>\n</table>';
   return s;
}


function altro_mese(x) {
   xmese += x;
   if (x == 9)
      xmese = 0;
   var xday = (xmese == 0)? currday : 99;
   var mm = (mese + xmese) % 12;

   while (mm < 0)
      mm += 12;

   var s = dataframe(calendar(xday, mm, anno + Math.floor((mese + xmese) / 12)));
   calframe.write(s);
   aboutx = false;
}


function showCalendar(d, xpos, ypos) {
   if (!isOn) {
           
      if (d) {
            anno = d.getFullYear();
            mese = d.getMonth();
            currday = d.getDate();
         } else {
            anno = today.getFullYear();
            mese = today.getMonth();
            currday = today.getDate();
      }
      if (arguments.length > 2) {
         calframe.move(xpos,ypos);
      }
      else
         calframe.move(100, 100);

      xmese = 0;
	  today = d;
      calframe.write(dataframe(calendar(currday, mese, anno)));
      
   }
   isOn = calframe.showIt(!isOn);
}

function jcalendar(val, t) { 
	var dt = new Array();
	var srcpos = page.elmPos(val.name);
	var xPos = srcpos.x;
	var yPos = srcpos.y;
	var srclyr = getLyr(val.name);
	xPos += srclyr.w();
//	yPos += srclyr.h();

	tipo = t;
	source = val;
	if(val.value=="")
		showCalendar(new Date(), xPos, yPos);
	else {
		if (t == 0) { 
		dt[0] = val[0].value;
		dt[1] = val[1].value;
		dt[2] = val[2].value;
		
		} else dt = val.value.split('/');
		showCalendar(new Date(dt[2], dt[1] - 1, dt[0]), xPos, yPos);
	}
}

function jcalendarOff(aEvent) { 
	var myEvent = aEvent ? aEvent : window.event; 
	if(myEvent){
		var src = aEvent ? myEvent.target : myEvent.srcElement;
		if(src.tagName=="TABLE"){
			isOn = calframe.showIt(false);
			if(aEvent)
				myEvent.stopPropagation();
			else
				myEvent.cancelBubble = true;
		}
	}
}
