function montharr(m0, m1, m2, m3, m4, m5, m6, m7, m8, m9, m10, m11)
{
   this[0] = m0;
   this[1] = m1;
   this[2] = m2;
   this[3] = m3;
   this[4] = m4;
   this[5] = m5;
   this[6] = m6;
   this[7] = m7;
   this[8] = m8;
   this[9] = m9;
   this[10] = m10;
   this[11] = m11;
}


function contaEventos(arr, dataatual){
	// contando numero de eventos, por cuas do array associativo, o .length nao funciona
	var contEventos = 0;
	var vartexttool = '';
	for (datakey in arr)
	{
		if (datakey == dataatual)
		{
			contEventos++;
			for (var jj in arr[datakey])
			{
				vartexttool += arr[datakey][jj].replace(/"/gi,'\\"')+"<br \/>";
			}
		}
		
	}

	return new Array(contEventos, vartexttool);
}
function colocacor(id,ret){
	if(ret == 'true') return;
	gete(id).style.backgroundColor = '#c8c8c8';
}
function tiracor(id,ret){
	if(ret == 'true') return;
	gete(id).style.backgroundColor = '#fff';
}
function calendar(year, month, day, lang,_link)
{
	if(lang == 'en'){
		var monthNames = new Array("January","February","March","April","May","June","July","August","September","October","November","December");
		var sdias = "days";
		var scalendario = "Calendar";
		var ssemana = "S|M|T|W|T|F|S";
	}else{
		var monthNames = new Array("Janeiro","Fevereiro","Março","Abril","Maio","Junho","Julho","Agosto","Setembro","Outubro","Novembro","Dezembro");
		var sdias = "dias";
		var scalendario = "Calendário";
		var ssemana = "D|S|T|Q|Q|S|S";
	}

   var today = new Date();
   today.setFullYear(year,month,day);
   var thisDay;
   var monthDays = new montharr(31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31);
   
   year = today.getFullYear();
   thisDay = today.getDate();
   thisMonth = today.getMonth();

   
   if (((year % 4 == 0) && (year % 100 != 0)) || (year % 400 == 0))
      monthDays[1] = 29;

   nDays = monthDays[thisMonth];

   firstDay = today;
   firstDay.setDate(1);
   startDay = firstDay.getDay();



   var arrsemana = ssemana.split("|");

   var conteudo = "";
   conteudo = "<span class='titulo'>"+scalendario+"&nbsp;"+year+"</span>";
   conteudo += "<div class='topo'>";
   conteudo += "<div class='semana'><div class='divcal2'>"+arrsemana[0]+"</div><div class='divcal2'>&nbsp;"+arrsemana[1]+"</div><div class='divcal2'>&nbsp;"+arrsemana[2]+"</div><div class='divcal2'>&nbsp;"+arrsemana[3]+"</div><div class='divcal2'>&nbsp;"+arrsemana[4]+"</div><div class='divcal2'>&nbsp;"+arrsemana[5]+"</div><div class='divcal2'>&nbsp;"+arrsemana[6]+"</div></div>";
   conteudo += "<div class='mes'><span>"+monthNames[thisMonth]+"</span></div><br clear='all'>";
   conteudo += "</div>";
   conteudo += "<div class='baixo'>";
   conteudo += "<div class='dias'>";

   column = 0;
   for (i=0; i<startDay; i++)
   {
      conteudo += "<div class='divcal'></div>";
      column++;
   }


   for (i=1; i<=nDays; i++)
   {
	// Now
	var datec = new Date();
	var d = datec.getDate();
	var m = datec.getMonth();
	var y = datec.getFullYear();

	var marcanow = 'false';
	var stylehj = '';
 	if ((i == d)  && (m == thisMonth) && (y == year)){
 		marcanow = 'true';
		stylehj = " style = 'background-color:#c8c8c8' ";
 	}


   	var mest2 = today.getMonth() + 1;
   	var diaatual = i +'-'+ mest2 +'-'+ today.getFullYear();   
	var dadosToolTips = contaEventos(eventos, diaatual);
	var diaatual = ((i<10)?'0'+i:i) +'-'+ ((mest2<10)?'0'+mest2:mest2) +'-'+ today.getFullYear();   
	
	if(dadosToolTips[0] > 0){
		if(_link=="evento"){
			conteudo += "<a href='"+site_url+_link+"/view/"+diaatual+"' class='cor_evento' onmouseout='close_menu(); tiracor(\"divlink"+i+"\",\""+marcanow+"\")' onmousemove=' idmenu=\"tooltip\"; mostra_menu(\""+dadosToolTips[1]+"\",false); colocacor(\"divlink"+i+"\",\""+marcanow+"\")' onmouseover=' idmenu=\"tooltip\"; mostra_menu(\""+dadosToolTips[1]+"\",false); colocacor(\"divlink"+i+"\",\""+marcanow+"\")'><div "+stylehj+" id='divlink"+i+"' class='divcal temevento'>"+i+"</div></a>";
		}else{
			conteudo += "<a href='"+site_url+_link+"/data/"+diaatual+"' class='cor_evento' onmouseout='close_menu(); tiracor(\"divlink"+i+"\",\""+marcanow+"\")' onmousemove=' idmenu=\"tooltip\"; mostra_menu(\""+dadosToolTips[1]+"\",6); colocacor(\"divlink"+i+"\",\""+marcanow+"\")' onmouseover=' idmenu=\"tooltip\"; mostra_menu(\""+dadosToolTips[1]+"\",false); colocacor(\"divlink"+i+"\",\""+marcanow+"\")'><div "+stylehj+" class='divcal temevento' id='divlink"+i+"'>"+i+"</div></a>";
		}
	}else{
		conteudo += "<div "+stylehj+" class='divcal'>"+i+"</div>";
	}

      column++;
      if (column == 7)
      {
         conteudo += "<div class='cb'></div>"; 
         column = 0;
      }
   }

   // dias .. 30.. 90
   var gonow = new Date();
   var gonowFull = ((gonow.getDate()<10)?'0'+gonow.getDate():gonow.getDate()) +'-'+ (((gonow.getMonth() + 1)<10)?'0'+(gonow.getMonth() + 1):(gonow.getMonth() + 1))+'-'+ gonow.getFullYear();
	
   var go7days = new Date();
   go7days.setDate(new Date().getDate()+7);
   var go7daysFull = ((go7days.getDate()<10)?'0'+go7days.getDate():go7days.getDate()) +'-'+ (((go7days.getMonth() + 1)<10)?'0'+(go7days.getMonth() + 1):(go7days.getMonth() + 1))+'-'+ go7days.getFullYear();

   var go30days = new Date();
   go30days.setDate(new Date().getDate()+30);
   var go30daysFull = ((go30days.getDate()<10)?'0'+go30days.getDate():go30days.getDate()) +'-'+ (((go30days.getMonth() + 1)<10)?'0'+(go30days.getMonth() + 1):(go30days.getMonth() + 1))+'-'+ go30days.getFullYear();

   var go90days = new Date();
   go90days.setDate(new Date().getDate()+90);
   var go90daysFull = ((go90days.getDate()<10)?'0'+go90days.getDate():go90days.getDate()) +'-'+ (((go90days.getMonth() + 1)<10)?'0'+(go90days.getMonth() + 1):(go90days.getMonth() + 1))+'-'+ go90days.getFullYear();



   conteudo += "</table>";

   conteudo += "</div>";
   conteudo += "<div class='links'>";
   conteudo += "<div class='links_cima'><a href='javascript:muda_mes(\"anterior\")'><img src='"+base_url+"img/seta_cima.gif' class='"+((ishome != null && ishome == true)?'scolorhome':'scolor')+"'></a></div>";
   conteudo += "<div class='links_baixo'><a href='javascript:muda_mes(\"proximo\")'><img src='"+base_url+"img/seta_baixo.gif' class='"+((ishome != null && ishome == true)?'scolorhome':'scolor')+"'></a></div>";
   conteudo += "</div>";
   conteudo += "</div>";
   conteudo += "<div class='links_rodape'><table cellpadding='0' cellspacing='0' border='0' width='204'><tr>"+
		"<td><a class='lnk_cal' href='"+site_url+_link+"/data/"+gonowFull+"/"+go7daysFull+"'>7&nbsp;"+sdias+"</a></td>"+
		"<td align='center'><a class='lnk_cal' href='"+site_url+_link+"/data/"+gonowFull+"/"+go30daysFull+"'>30&nbsp;"+sdias+"</a></td>"+
		"<td align='right'><a class='lnk_cal' href='"+site_url+_link+"/data/"+gonowFull+"/"+go90daysFull+"'>90&nbsp;"+sdias+"</a></td></tr></table></div>";

   gete('calendar').innerHTML = conteudo;
}