var actual_date = new Date();
var today_date  = new Date();

init_date();

function init_date()
{
 
 actual_date.setDate(actual_date.getDate());

 /*var last_date = loadHTML("/clouds/cgi/last_date.pl");
 
 
 if(last_date.length > 10)
 { // Error in script last_date.pl
   actual_date.setDate(actual_date.getDate());
 }
 else
 {
   var year = last_date.substring(0,4);
   var month = last_date.substring(5,7);
   var day = last_date.substring(8,10);
   
   actual_date.setFullYear(year);
   actual_date.setMonth(month-1);
   actual_date.setDate(day);
 }     */
 
}

function show_date()
{
   var begin_year = 2000;
   i = actual_date.getFullYear()-begin_year;
   document.date_form.year[i].selected = true;
   i = actual_date.getMonth();
   document.date_form.month[i].selected = true;
   i = actual_date.getDate()-1;
   document.date_form.day[i].selected = true;
}

function date_change(i)
{
   actual_date.setDate(actual_date.getDate()+i);

   if(actual_date.getTime() > today_date.getTime() )
   {
    actual_date = new Date();
    //show_date();
    //return;
   }   

   show_date();
   showMap();
}   

function date_set()
{
   actual_date.setFullYear(document.date_form.year[document.date_form.year.selectedIndex].value);
   actual_date.setMonth(document.date_form.month[document.date_form.month.selectedIndex].value - 1);
   actual_date.setDate(document.date_form.day[document.date_form.day.selectedIndex].value);

   if(actual_date.getTime() > today_date.getTime() )
   {
    actual_date = new Date();
   }   

   show_date();
   showMap();
}

function date_string() // In MySQL format
{
   var yr = actual_date.getFullYear();
   var mn = actual_date.getMonth()+1;
   if(mn<10)
   {
     mn = "0"+mn;
   }   
   var dy = actual_date.getDate();
   if(dy<10)
   {
      dy = "0"+dy;
   }   
   
   var str = ""+yr+"-"+mn+"-"+dy;
   
   return str;
}


function makeYearList(i)
{
	var time = new Date();
	var max_year = time.getYear();
	var min_year = i;
	
	if (max_year < 1900) 
	{
		max_year = max_year + 1900;
	}
	
	var n;
	
	for (n=min_year; n<=max_year; n++)
	{
		document.writeln ("<option value=\""+n+"\">"+n);
	} 
    
}