/***********************************************
Dynamic Calendar II (By Jason Moon at http://www.jasonmoon.net)
Permission granted to Dynamicdrive.com to include script in archive
For this and 100's more DHTML scripts, visit http://dynamicdrive.com
***********************************************/

var ns6=document.getElementById&&!document.all
var ie4=document.all

var Selected_Month;
var Selected_Year;
var Current_Date = new Date();
var Current_Month = Current_Date.getMonth();
var Current_Year = Current_Date.getYear();



var Current_Year = Current_Date.getYear();
if (Current_Year < 1000)
Current_Year+=1900

var Today = Current_Date.getDate();

function Header_Lazer(Year, Month) {
   if (Month == 1) {
    Days_in_Month[1] = ((Year % 400 == 0) || ((Year % 4 == 0) && (Year % 100 !=0))) ? 29 : 28;
   }
   var Header_String = Month_Label[Month] + ' ' + Year;
   return Header_String;
}

function Make_Calendar_Lazer(Year, Month) {
   var First_Date = new Date(Year, Month, 1);
   var Heading = Header_Lazer(Year, Month);
   var First_Day = First_Date.getDay() + 1;
   if (((Days_in_Month[Month] == 31) && (First_Day >= 6)) ||
       ((Days_in_Month[Month] == 30) && (First_Day == 7))) {
      var Rows = 6;
   }
   else if ((Days_in_Month[Month] == 28) && (First_Day == 1)) {
      var Rows = 4;
   }
   else {
      var Rows = 5;
   }
   
  var msg_titulo_lazer = new Array();
  

  
  function cal_msg_titulo_lazer(ano, mes, dia, msg) {
    if (msg_titulo_lazer[dia] == null && mes == Month && ano == Year) {
        msg_titulo_lazer[dia] = " - " + msg;
    } else if (mes == Month && ano == Year) {
        msg_titulo_lazer[dia] = "[ Clique para conferir os eventos deste dia ]";
    }
  }
 
   ;   

   var HTML_String = '<table><tr><td valign="top"><table frame="box">';

HTML_String += '<tr><th colspan=7 class="mes"><a href="javascript:calendar_lazer()" title="Mês Atual">' + Heading + '</a></th></tr>';

   HTML_String += '<tr class="diasSemana"><th class="dom">D</th><th>S</th><th>T</th><th>Q</th><th>Q</th><th>S</th><th>S</th></tr>';

   var Day_Counter = 1;
   var Loop_Counter = 1;

  for (var j = 1; j <= Rows; j++) {
    HTML_String += '<tr VALIGN="top">';
      for (var i = 1; i < 8; i++) {
       if ((Loop_Counter >= First_Day) && (Day_Counter <= Days_in_Month[Month])) {
          if (msg_titulo_lazer[Day_Counter] != null) {
            if ((Month+1)<10) { 
              var linkMonth = '0'+(Month+1)
            } else {
              var linkMonth = (Month+1)
            };
            if (Day_Counter<10) { 
              var linkDay_Counter = '0'+Day_Counter
            } else {
              var linkDay_Counter = Day_Counter
            };
         
            HTML_String += '<td class="evento"><a href="interna.wsp?tmp_page=interna&tmp_secao=3&tmp_listar=1&tmp_data=' + Year + linkMonth + linkDay_Counter  + '" title="' + msg_titulo_lazer[Day_Counter] + '" >' + Day_Counter + '</a></td>';
          } else {
            HTML_String += '<td class="normal">' + Day_Counter + '</td>';
          }
          Day_Counter++;    
       } else {
          HTML_String += '<td class="vazio"> </td>';
       }
       Loop_Counter++;
      }
    HTML_String += '</tr>';
  }
   HTML_String += '</table></td></tr></table>';
   cross_el=ns6? document.getElementById("Calendar2") : document.all.Calendar
   cross_el.innerHTML = HTML_String;
}

function Check_Nums_Lazer() {
   if ((event.keyCode < 48) || (event.keyCode > 57)) {
      return false;
   }
}

function On_Year_Lazer() {
   var Year = document.whenlazer.year.value;
   if (Year.length == 4) {
      Selected_Month = document.whenlazer.month.selectedIndex;
      Selected_Year = Year;
      Make_Calendar_Lazer(Current_Year, Selected_Month);
   }
}

function On_Month_Lazer() {
   var Year = document.whenlazer.year.value;
   if (Year.length == 4) {
      Selected_Month = document.whenlazer.month.selectedIndex;
      Selected_Year = Year;
      Make_Calendar_Lazer(Selected_Year, Selected_Month);
   }
   else {
      alert('Please enter a valid year.');
      document.whenlazer.year.focus();
   }
}

function calendar_lazer() {
   if (!ie4&&!ns6)
   return
   var Mid_Screen = Math.round(document.body.clientWidth / 2);
   document.whenlazer.month.selectedIndex = Current_Month;
   document.whenlazer.year.value = Current_Year;
   Selected_Month = Current_Month;
   Selected_Year = Current_Year;
   Make_Calendar_Lazer(Current_Year, Current_Month);
}

function Skip_Lazer(Direction) {
   if (Direction == '+') {
      if (Selected_Month == 11) {
         Selected_Month = 0;
         Selected_Year++;
      }
      else {
         Selected_Month++;
      }
   }
   else {
      if (Selected_Month == 0) {
         Selected_Month = 11;
         Selected_Year--;
      }
      else {
         Selected_Month--;
      }
   }
   Make_Calendar_Lazer(Selected_Year, Selected_Month);
   document.whenlazer.month.selectedIndex = Selected_Month;
   document.whenlazer.year.value = Selected_Year;
}

function current() {
   Make_Calendar_Lazer(Current_Year, Current_Month);
}