function MontaCalendario () {
  
  var i; // dias
  var j=1; // dia semana
  
  var semana = ["D","S","T","Q","Q","S","S"];
  var exists = false;

  var div = document.createElement("div");  
  var table = document.createElement("table");
  var tr;
  var th;
  var td;
  var text;
  var a;

  table.id = "tblCalendario";
  table.cellPadding = 0;
  table.cellSpacing = 0;
  table.width = "100%";
  
  tr = document.createElement("tr");
  for( i=0; i<semana.length; i++ )
  {
    th = document.createElement("th");
    text = document.createTextNode( semana[i] );
    th.className = (semana.length-1==i)?"ds":"";
    th.appendChild( text );
    tr.appendChild( th );
    
  }
  table.appendChild(tr);
  
  tr = document.createElement("tr");
  for (i = 1; i<dias[0].dia; i++) 
  {
    td = document.createElement("td");
    td.id = "d"+i;
    text = document.createTextNode(i);
    
    td.appendChild( text );
    tr.appendChild( td );    

    if(i%7==0)
    {
      table.appendChild(tr);
      tr = document.createElement("tr");
    }

  }
  
  for( j in dias )
  {
    i = parseInt( dias[j].dia );
    exists = false;
    
    td = document.createElement("td");
    td.id = "d"+i;
    td.className = "pan";
    
    for( k in dias[j].eventos )
    {
      if( dias[j].eventos[k].modalidade == modalidade )
      {
        td.className += (dias[j].eventos[k].final)?" final":" dclick";      
        a = document.createElement("a");
        a.href = "/pan/2007/calendario/dia.jhtm?dia=" + dias[j].dia;
        text = document.createTextNode( i );
        a.appendChild( text );
        
        exists = true;
      }  
    }

    if(!exists)
    {
      a = document.createTextNode( i );
    }
    
    td.appendChild( a );
    tr.appendChild( td );

    if(i%7==0)
    {
      table.appendChild(tr);
      tr = document.createElement("tr");
    }
 
  }
    
  for(null;i<=34;i++)
  {
    td = document.createElement("td");
    td.id = "d"+i;
    text = (i<=31)?i:"";
    text = document.createTextNode( text );
    
    td.appendChild( text );
    tr.appendChild( td );    

    if(i%7==0)
    {
      table.appendChild(tr);
      tr = document.createElement("tr");
    }    
  }  
  
  table.appendChild(tr);
  div.appendChild(table);
  
  // monta o calendário
  document.getElementById("theCalendar").innerHTML = div.innerHTML;
}

/* verifica se existe evento no dia */
function ExisteEvento( array_dias, dia )
{
  var existe = false;
  var classe = "";
  for(i in array_dias)
  {
    if(array_dias[i].dia == dia)
    {
      existe = true;
      classe += "dclick"
      if(array_dias[i].medalhas == "1")
      {
        classe += " final";
      }
    }
  }
  
  return classe;
}

/* pega os eventos */
function PegarEventos () {
  
  var data = new Date();
  var dia = ( typeof(arguments[0]) != "undefined")? arguments[0] : data.getDate();

  if (data.getFullYear() != 2007 && typeof(arguments[0]) == "undefined") dia = 13;

  if (dia < 13 || dia > 29) dia = 13;

  // limpa a classe
  for (var k = 1; k<=35;k++)
    document.getElementById("d"+k).className = "";

  document.getElementById("d"+dia).className = "dclick";

  if (Eventos[dia].length < 8) document.getElementById("listaEventosCalendario").className = "SemTamanho";
  else document.getElementById("listaEventosCalendario").className = "ComTamanho";

  saida = "<ul>"
  for (var i=0; i<Eventos[dia].length; i++) {
    var dados = Eventos[dia][i].split("|");
    if (dados[1])
      saida += "<li><a href='"+dados[1]+"'>"+dados[0]+"</a></li>";
    else
      saida += "<li>"+dados[0]+"</li>";
  }
  document.getElementById("listaEventosCalendario").innerHTML = saida;
  document.getElementById("diaEventosCalendario").innerHTML = dia;

}