
/* POSITION INFO */

function positionInfo(object)
{
  var p_elm = object;

  this.getElementLeft = getElementLeft;

  function getElementLeft()
  {
    var x = 0;
    var elm;

    if(typeof(p_elm) == "object")
    {
      elm = p_elm;
    }
    else
    {
      elm = document.getElementById(p_elm);
    }

    while (elm != null)
    {
      x+= elm.offsetLeft;
      elm = elm.offsetParent;
    }

    return parseInt(x);
  }

  this.getElementWidth = getElementWidth;

  function getElementWidth()
  {
    var elm;

    if(typeof(p_elm) == "object")
    {
      elm = p_elm;
    }
    else
    {
      elm = document.getElementById(p_elm);
    }

    return parseInt(elm.offsetWidth);
  }

  this.getElementRight = getElementRight;

  function getElementRight()
  {
    return getElementLeft(p_elm) + getElementWidth(p_elm);
  }

  this.getElementTop = getElementTop;

  function getElementTop()
  {
    var y = 0;
    var elm;

    if(typeof(p_elm) == "object")
    {
      elm = p_elm;
    }
    else
    {
      elm = document.getElementById(p_elm);
    }

    while (elm != null)
    {
      y+= elm.offsetTop;
      elm = elm.offsetParent;
    }

    return parseInt(y);
  }

  this.getElementHeight = getElementHeight;

  function getElementHeight()
  {
    var elm;

    if(typeof(p_elm) == "object")
    {
      elm = p_elm;
    }
    else
    {
      elm = document.getElementById(p_elm);
    }

    return parseInt(elm.offsetHeight);
  }

  this.getElementBottom = getElementBottom;

  function getElementBottom()
  {
    return getElementTop(p_elm) + getElementHeight(p_elm);
  }
}

/* CALENDAR CONTROL */

function CalendarControl(lang, sync, avDays)
{
  var calendarId = 'CalendarControl';	/* id */
  var currentYear = 0;
  var currentMonth = 0;
  var currentDay = 0;

  var selectedYear = 0;
  var selectedMonth = 0;
  var selectedDay = 0;

  var months

  if(lang != 'it')		/* lang */
  {
    months = ['January','February','March','April','May','June','July','August','September','October','November','December'];
    days = ['S','M','T','W','T','F','S'];
  }
  else
  {
    months = ['Gennaio','Febbraio','Marzo','Aprile','Maggio','Giugno','Luglio','Agosto','Settembre','Ottobre','Novembre','Dicembre'];
    days = ['D','L','M','M','G','V','S'];
  }

  var dateField = null;		/* dal o al */

  var dal = null;		/* dal */
  var al = null;		/* al  */
  var avDays = avDays;          /* giorni disponibili */

  function getProperty(p_property)
  {
    var p_elm = calendarId;
    var elm = null;

    if(typeof(p_elm) == "object")
    {
      elm = p_elm;
    }
    else
    {
      elm = document.getElementById(p_elm);
    }

    if (elm != null)
    {
      if(elm.style)
      {
        elm = elm.style;

        if(elm[p_property])
        {
          return elm[p_property];
        }
        else
        {
          return null;
        }

      }
      else
      {
        return null;
      }
    }
  }

  function setElementProperty(p_property, p_value, p_elmId)
  {
    var p_elm = p_elmId;
    var elm = null;

    if(typeof(p_elm) == "object")
    {
      elm = p_elm;
    }
    else
    {
      elm = document.getElementById(p_elm);
    }

    if((elm != null) && (elm.style != null))
    {
      elm = elm.style;
      elm[ p_property ] = p_value;
    }
  }

  function setProperty(p_property, p_value)
  {
    setElementProperty(p_property, p_value, calendarId);
  }

  function getDaysInMonth(year, month)
  {
    return [31,((!(year % 4 ) && ( (year % 100 ) || !( year % 400 ) ))?29:28),31,30,31,30,31,31,30,31,30,31][month-1];
  }

  function getDayOfWeek(year, month, day)
  {
    var date = new Date(year,month-1,day)
    return date.getDay();
  }

  this.clearDate = clearDate;

  function clearDate()
  {
    dateField.value = '';
    hide();
  }

  this.setDate = setDate;

  function setDate(year, month, day)
  {
    if (dateField)
    {
      if (month < 10) {month = "0" + month;}
      if (day < 10) {day = "0" + day;}

      //var dateString = month+"-"+day+"-"+year;
      var dateString = day + "-" + month + "-" + year;
      dateField.value = dateString;
      hide();
    }
    return;
  }

  this.changeMonth = changeMonth;

  function changeMonth(change)
  {
    currentMonth += change;
    currentDay = 0;
    if(currentMonth > 12)
    {
      currentMonth = 1;
      currentYear++;
    }
    else if(currentMonth < 1)
    {
      currentMonth = 12;
      currentYear--;
    }

    calendar = document.getElementById(calendarId);
    calendar.innerHTML = calendarDrawTable();
  }

/*
  // blocco anno
  function changeMonth(change)
  {
    currentMonth += change;
    currentDay = 0;
    if(currentMonth > 12)
    {
      currentMonth = 12;
    }
    else if(currentMonth < 1)
    {
      currentMonth = 1;
    }

    calendar = document.getElementById(calendarId);
    calendar.innerHTML = calendarDrawTable();
  }
*/

  this.changeYear = changeYear;

  function changeYear(change)
  {
    currentYear += change;
    currentDay = 0;
    calendar = document.getElementById(calendarId);
    calendar.innerHTML = calendarDrawTable();
  }

  function getCurrentYear()
  {
    var year = new Date().getYear();
    if(year < 1900) year += 1900;
    return year;
  }

  function getCurrentMonth()
  {
    return new Date().getMonth() + 1;
  }

  function getCurrentDay()
  {
    return new Date().getDate();
  }

  function calendarDrawTable()
  {
    var dayOfMonth = 1;
    var validDay = 0;
    var startDayOfWeek = getDayOfWeek(currentYear, currentMonth, dayOfMonth);
    var daysInMonth = getDaysInMonth(currentYear, currentMonth);
    var css_class = null; //CSS class for each day

    var dateDal = null;
    var dateAl = null;

    if(sync != null)
    {
      if(dal.value != '')
      {
        arrDal = dal.value.split('-');
        dateDal = new Date(arrDal[2], arrDal[1], arrDal[0]);	/* data dal */
      }
      if(al.value != '')
      {
        arrAl = al.value.split('-');
        dateAl = new Date(arrAl[2], arrAl[1], arrAl[0]);	/* data al  */
      }
    }

    var table = "<table cellspacing='0' cellpadding='0' border='0'>";
    table = table + "<tr class='header'>";
    table = table + "  <td colspan='2' class='previous'><a href='javascript:changeCalendarControlMonth(-1);'>&lt;</a></td>";
    table = table + "  <td colspan='3' class='title'>" + months[currentMonth-1] + "<br>" + currentYear + "</td>";
    table = table + "  <td colspan='2' class='next'><a href='javascript:changeCalendarControlMonth(1);'>&gt;</a></td>";
    table = table + "</tr>";
    table = table + "<tr><th>"+days[0]+"</th><th>"+days[1]+"</th><th>"+days[2]+"</th><th>"+days[3]+"</th><th>"+days[4]+"</th><th>"+days[5]+"</th><th>"+days[6]+"</th></tr>";

    for(var week=0; week < 6; week++)
    {
      table = table + "<tr>";

      for(var dayOfWeek=0; dayOfWeek < 7; dayOfWeek++)
      {
        if(week == 0 && startDayOfWeek == dayOfWeek)
        {
          validDay = 1;
        }
        else if (validDay == 1 && dayOfMonth > daysInMonth)
        {
          validDay = 0;
        }

        if(validDay)
        {
	  actualDate = new Date(currentYear, currentMonth, dayOfMonth);

          if (dayOfMonth == selectedDay && currentYear == selectedYear && currentMonth == selectedMonth)
          {
            css_class = 'current';

            if(avDays.contains(dayOfWeek))
            {
	      js = "javascript:setCalendarControlDate("+currentYear+","+currentMonth+","+dayOfMonth+")"
            }
            else
            {
	      js = "javascript:void(0)"
	    }
          }
          else if (avDays.contains(dayOfWeek))
          {
            css_class = 'weekend';

            if(sync != null)
            {
              if(dateDal == null && dateAl == null)	/* NULL */
              {

	        js = "javascript:setCalendarControlDate("+currentYear+","+currentMonth+","+dayOfMonth+")";
              }

              if((dateDal == null && dateAl != null) || (dateAl == null && dateDal != null))	/* uno NULL */
              {
                if(dateField == dal)
                {
                  if(dateDal == null)
                  {

                    if(actualDate < dateAl)
                    {
	              js = "javascript:setCalendarControlDate("+currentYear+","+currentMonth+","+dayOfMonth+")";
                    }
                    else
                    {
                      css_class = 'weekday';
	              js = "javascript:void(0)";
                    }
                  }
                }
                else
                {
	          js = "javascript:setCalendarControlDate("+currentYear+","+currentMonth+","+dayOfMonth+")";
                }


                if(dateField == al)
                {
                  if(dateAl == null)
                  {

                    if(actualDate > dateDal)
                    {
	              js = "javascript:setCalendarControlDate("+currentYear+","+currentMonth+","+dayOfMonth+")";
                    }
                    else
                    {
                      css_class = 'weekday';
	              js = "javascript:void(0)";
                    }
                  }
                }
                else
                {
	          js = "javascript:setCalendarControlDate("+currentYear+","+currentMonth+","+dayOfMonth+")";
                }
              }

              if(dateDal != null && dateAl != null)	/* no NULL */
              {
                if(dateField == dal)
                {
                  if(actualDate < dateAl)
                  {
	            js = "javascript:setCalendarControlDate("+currentYear+","+currentMonth+","+dayOfMonth+")";
                  }
                  else
                  {
                    css_class = 'weekday';
	            js = "javascript:void(0)";
                  }
                }

                if(dateField == al)
                {
                  if(actualDate > dateDal)
                  {
                    js = "javascript:setCalendarControlDate("+currentYear+","+currentMonth+","+dayOfMonth+")";
                  }
                  else
                  {
                    css_class = 'weekday';
	            js = "javascript:void(0)";
                  }
                }
              }
            }
            else
            {
	      js = "javascript:setCalendarControlDate("+currentYear+","+currentMonth+","+dayOfMonth+")";
            }
          }
          else
          {
            css_class = 'weekday';
	    js = "javascript:void(0)";
          }

          table = table + "<td><a class='"+css_class+"' href=\""+js+"\">"+dayOfMonth+"</a></td>";

          dayOfMonth++;
        }
        else
        {
          table = table + "<td class='empty'>&nbsp;</td>";
        }
      }

      table = table + "</tr>";
    }

    table = table + "<tr class='header'><th colspan='7' style='padding: 3px;'><a href='javascript:clearCalendarControl();'>Clear</a> | <a href='javascript:hideCalendarControl();'>Close</a></td></tr>";
    table = table + "</table>";

    return table;
  }

  this.show = show;

  function show(field)	/* show */
  {
    can_hide = 0;

    if (dateField == field)
    {
      return;
    }
    else
    {
      dateField = field;
    }

    if(sync != null)
    {
      dal = document.getElementById(sync[0]);		/* dal */
      al = document.getElementById(sync[1]);		/* al */
    }

    if(dateField)
    {
      var dateVal = dateField.value;
      var dateString = new String(dateVal);
      var dateParts = dateString.split("-");
      selectedDay = parseInt(dateParts[0],10);
      selectedMonth = parseInt(dateParts[1],10);
      selectedYear = parseInt(dateParts[2],10);

      try
      {
        if(dateField == dal)
        {

        }
        if(dateField == al)
        {
          if(dateField.value == '')
          {
            dateVal = dal.value;
            dateString = new String(dateVal);
            dateParts = dateString.split("-");
	    usaDate = dateParts[1] + '-' + dateParts[0] + '-' + dateParts[2];
	    dateString = Format(DateAdd('d', 7, usaDate), 'd-m-yyyy', 1);
            dateParts = dateString.split("-");
            selectedDay = parseInt(dateParts[0],10);
            selectedMonth = parseInt(dateParts[1],10);
            selectedYear = parseInt(dateParts[2],10);
          }
        }
      } catch(e) {}
    }

    if (!(selectedYear && selectedMonth && selectedDay)) {
      selectedMonth = getCurrentMonth();
      selectedDay = getCurrentDay();
      selectedYear = getCurrentYear();
    }

    currentMonth = selectedMonth;
    currentDay = selectedDay;
    currentYear = selectedYear;

    if(document.getElementById){

      calendar = document.getElementById(calendarId);
      calendar.innerHTML = calendarDrawTable(currentYear, currentMonth);

      setProperty('display', 'block');

      var fieldPos = new positionInfo(dateField);
      var calendarPos = new positionInfo(calendarId);

      var x = fieldPos.getElementLeft();
      var y = fieldPos.getElementBottom();

      setProperty('left', x + "px");
      setProperty('top', y + "px");

      if (document.all) {
        setElementProperty('display', 'block', 'CalendarControlIFrame');
        setElementProperty('left', x + "px", 'CalendarControlIFrame');
        setElementProperty('top', y + "px", 'CalendarControlIFrame');
        setElementProperty('width', calendarPos.getElementWidth() + "px", 'CalendarControlIFrame');
        setElementProperty('height', calendarPos.getElementHeight() + "px", 'CalendarControlIFrame');
      }
    }
  }

  this.hide = hide;

  function hide()
  {
    if(dateField)
    {
      setProperty('display', 'none');
      setElementProperty('display', 'none', 'CalendarControlIFrame');
      dateField = null;
    }
  }

  this.visible = visible;

  function visible()
  {
    return dateField
  }

  this.can_hide = can_hide;
  var can_hide = 0;
}

var calendarControl = new CalendarControl(lang = 'it', sync = ['form_dal', 'form_al'], avDays = [6]);	/* CALENDAR */

function showCalendarControl(textField)
{
  calendarControl.show(textField);
}

function clearCalendarControl()
{
  calendarControl.clearDate();
}

function hideCalendarControl()
{
  if (calendarControl.visible())
  {
    calendarControl.hide();
  }
}

function setCalendarControlDate(year, month, day)
{
  calendarControl.setDate(year, month, day);
}

function changeCalendarControlYear(change)
{
  calendarControl.changeYear(change);
}

function changeCalendarControlMonth(change)
{
  calendarControl.changeMonth(change);
}

if (!Array.prototype.contains)
{
  Array.prototype.contains = function(obj)
  {
    var len = this.length;
    for (var i = 0; i < len; i++){
      if(this[i]===obj){ return true;}
    }
    return false;
  };
}

document.write("<iframe id='CalendarControlIFrame' src='javascript:false;' frameBorder='0' scrolling='no'></iframe>");
document.write("<div id='CalendarControl'></div>");

