////////////////////////////////////////////////////////////////////////////////////
//
//     Kalendorius.js 
//
//    Based on Tigra Calendar from http://www.softcomplex.com/products/tigra_calendar/
//
////////////////////////////////////////////////////////////////////////////////////

window.onerror=null; 

var Rengi;
var RengNr;
var RengString;

var R_metai;
var R_menuo; 
var R_diena;
var R_sdiena;
var R_String="Visi renginiai       ";

Rengi=0;
RengNr=0;
RengString="Visi renginiai       ";

// months as they appear in the calendar's title
var ARR_MONTHS = ["Sausis", "Vasaris", "Kovas", "Balandis", "Gegužė", "Birželis",
		"Liepa", "Rugpjūtis", "Rugsėjis", "Spalis", "Lapkritis", "Gruodis"];

// week day titles as they appear on the calendar
var ARR_WEEKDAYS = ["P", "A", "T", "K", "P", "Š", "S"];
var ARR_WEEKDAYSTxt = ["sekmadienis","pirmadienis", "antradienis", "trečiadienis", "ketvirtadienis", "penktadienis", "šeštadienis"];

// day week starts from (normally 0-Su or 1-Mo)
var NUM_WEEKSTART = 1;

var dt_current = window.parent.today();
var pb_current = window.parent.pobudis();

var dt_prev_year = new Date(dt_current);
dt_prev_year.setFullYear(dt_prev_year.getFullYear() - 1);

var dt_next_year = new Date(dt_current);
dt_next_year.setFullYear(dt_next_year.getFullYear() + 1);

// get same date in the previous month
var dt_prev_month = new Date(dt_current);
dt_prev_month.setMonth(dt_prev_month.getMonth() - 1);
if (dt_prev_month.getDate() != dt_current.getDate())
	dt_prev_month.setDate(0);

// get same date in the next month
var dt_next_month = new Date(dt_current);
dt_next_month.setMonth(dt_next_month.getMonth() + 1);
if (dt_next_month.getDate() != dt_current.getDate())
	dt_next_month.setDate(0);

// get first day to display in the grid for current month
var dt_firstday = new Date(dt_current);
dt_firstday.setDate(1);
dt_firstday.setDate(1 - (7 + dt_firstday.getDay() - NUM_WEEKSTART) % 7);

// function passing selected date to calling window

function set_datetime(n_dt, b_set_db) 
{
  var n_datetime=n_dt;
  var dt_datetime = new Date(n_datetime);       

  if (!dt_datetime) return;

  if (b_set_db) 
  {
    dt_click_day=n_dt;
    R_metai=metai=dt_datetime.getFullYear();
    R_menuo=menuo=dt_datetime.getMonth()+1; 
    R_diena=diena=dt_datetime.getDate();
    R_sdiena=sdiena=ARR_WEEKDAYSTxt[dt_datetime.getDay()];

    dt_db = new Date(metai,menuo,diena);
//    alert("Set_today iš kalendorius.js: "+dt_datetime + "; ");

    window.parent.set_today(dt_datetime);
    Rjn = window.parent.RajNr;

    strasp="../Renginiai.asp?kvieta="+Rjn+"&kpobudis="+RengNr+"&klaikas=0&kdata="+dt_db+"&kmetai="+metai+"&kmenuo="+menuo+"&kdiena="+diena+"&ksdiena="+sdiena+"&kpin="+Rengi;
    strasp=strasp+"&ktekstas="+RengString;

    window.parent.location=strasp;

    return;     
  }
  else 
  {
    dt_current = new Date(n_datetime);
    metai=dt_current.getFullYear();
    menuo=dt_current.getMonth()+1; 
    diena=dt_current.getDate();

//    alert("Naujai: " + metai + "  " + menuo + "  " + diena);

   window.parent.set_today(dt_current); 
   window.parent.frames["Kalend_vieta"].location="Kalendorius.asp";

   return;     
  }
}

function Kalendorius_virsus() 
{
  var str;

  str="";  
  str=str+"<td class='kalmn'><a href='javascript:set_datetime("+dt_prev_year.valueOf()+",false)'>";  
  str=str+"<img src='img/prev_year.gif' width='16' height='16' border='0' alt='Metai'></a></td>";

  str=str+'<td class="kalmn"><a class="kal" href="javascript:set_datetime('+dt_prev_month.valueOf()+',false)">';
  str=str+'<img src="img/prev.gif" width="16" height="16" border="0" alt="Mėnuo"></a></td>';

  str=str+'<td class="kalmn" align="center" width="100%">'+ARR_MONTHS[dt_current.getMonth()]+' '+dt_current.getFullYear() + '</td>';

  str=str+'<td class="kalmn"><a class="kal" href="javascript:set_datetime('+dt_next_month.valueOf()+',false)">';
  str=str+'<img src="img/next.gif" width="16" height="16" border="0" alt="Mėnuo"></a>';
  str=str+'<a class="kalmn" href="javascript:set_datetime('+dt_next_year.valueOf()+',false)">';
  str=str+'<img src="img/next_year.gif" width="16" height="16" border="0" alt="Metai"></a></td>';

  return str;
} 

function Kalendorius_dienos() 
{
  var R_dt_datetime = new Date();       
  R_metai=R_dt_datetime.getFullYear();
  R_menuo=R_dt_datetime.getMonth()+1; 
  R_diena=R_dt_datetime.getDate();
  R_sdiena=ARR_WEEKDAYSTxt[R_dt_datetime.getDay()];

//  alert("Kalendorius_dienos: "+R_dt_datetime + ": "+R_metai + "  " + R_menuo + "  " + R_diena + ";");

  str="";  
  str=str+'<tr>';

  for (var n=0; n<7; n++)
  { 
    str=str+'<td ';
    if ( n<5 )  str=str+'class="kalsd" ';
    if ( n>=5 ) str=str+'class="kalss" ';
    str=str+'align="center">'+ARR_WEEKDAYS[(n)%7]+'</td>';
  }

  str=str+'</tr>';

  var dt_current_day = new Date(dt_firstday);   

  while (dt_current_day.getMonth() == dt_current.getMonth() ||
         dt_current_day.getMonth() == dt_firstday.getMonth()) 
  {
    str=str+'<tr>';

    for (var n_current_wday=0; n_current_wday<7; n_current_wday++) 
    {
      if (dt_current_day.getDate() == dt_current.getDate() &&
	      dt_current_day.getMonth() == dt_current.getMonth())                                	// print current date
          str=str+'<td class="kalde" width="14%">';
        else if (dt_current_day.getDay() == 0 || dt_current_day.getDay() == 6)                 	// weekend days
          str=str+'<td class="kalds" width="14%">';
        else										                                          	// print working days of current month
          str=str+'<td class="kaldd" width="14%">';

      str=str+'<a class="kal" href="javascript:set_datetime('+dt_current_day.valueOf() +', true);">';

      if (dt_current_day.getMonth() == this.dt_current.getMonth())
          str=str+'<font color="#606060">';							// print days of current month
      else 
          str=str+'<font color="#a0a0a0">';							// print days of other months
		
        str=str+dt_current_day.getDate();
        str=str+'</font></a></td>';
    
      dt_current_day.setDate(dt_current_day.getDate()+1);
    }

      str=str+'</tr>';
  }
  return str;
}

function KoksRenginys(eilute, b_set)
{
//  alert("Koks_0: "+eilute+", "+b_set + "; ");

  Rengi=eilute.selectedIndex;
  RengNr=eilute.options[Rengi].value;
  RengString=eilute.options[Rengi].text;  
  
  R_String=RengString;
  window.parent.set_pobudis(Rengi);
  
  if ( b_set ) 
  {
//    alert("Koks_1: "+R_metai + "  " + R_menuo + "  " + R_diena + ";  " + Rengi + ", "+RengNr+", "+R_String+";");

//    dt_db =  window.parent.get_day();
//    R_metai=dt_db.getFullYear();
//    R_menuo=dt_db.getMonth()+1; 
//    R_diena=dt_db.getDate();
//    R_sdiena=ARR_WEEKDAYSTxt[dt_db.getDay()];

    if ( window.parent.nMt==-1 ) window.parent.nMt=R_metai;
    if ( window.parent.nMn==-1 ) window.parent.nMn=R_menuo;
    if ( window.parent.nDn==-1 ) window.parent.nDn=R_diena;
    if ( window.parent.nsDn=="" ) window.parent.nsDn=R_sdiena;
    
    strasp="../Renginiai.asp?kvieta="+window.parent.RajNr+"&kpobudis="+RengNr+"&klaikas=0&kmetai="+window.parent.nMt+"&kmenuo="+window.parent.nMn+"&kdiena="+window.parent.nDn+"&ksdiena="+window.parent.nsDn+"&kpin="+Rengi;
    strasp=strasp+"&ktekstas="+R_String;

//    alert(strasp);
    window.parent.location=strasp;
  }
  
  return;
}