var dateField = null;
var dateFieldAlt = null;
var frequency = '';

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+ iCalendarLeftMargin;
      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 - 49;
      elm = elm.offsetParent;
    }
    //return parseInt(y);
    return (iCalendarTopMargin);
  }

  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);
  }
}

function CalendarControl() {

  var calendarId = 'CalendarControl';
  var currentYear = 0;
  var currentMonth = 0;
  var currentDay = 0;

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

  var months = ['January','February','March','April','May','June','July','August','September','October','November','December'];
  
  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() {
    clearDates();
  }

  this.setDate = setDate;

  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();
  }

  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 table = "<div style='background-color:#336; display:inline-table; padding:5 15 10 15; border:solid 1px White;'><table cellspacing='0' cellpadding='0' border='0' valign='top'> ";
    table += "<tr class='header'>";
    table += "  <td colspan='2' class='previous'><a href='javascript:changeCalendarControlMonth(-1);'>&lt;</a> <a href='javascript:changeCalendarControlYear(-1);'>&laquo;</a></td>";
    table += "  <td colspan='3' class='title'>" + months[currentMonth-1] + "<br>" + currentYear + "</td>";
    table += "  <td colspan='2' class='next'><a href='javascript:changeCalendarControlYear(1);'>&raquo;</a> <a href='javascript:changeCalendarControlMonth(1);'>&gt;</a></td>";
    table += "</tr>";
    table += "<tr><td colspan='3' class='daterange' >Date range:</td>";
    table += "<td colspan='4' style='text-align:right;'>";
    table += "<select id='daterange' size='1' class='daterange' onchange=\"setDefaultDate('daterange','" + dateField.id + "');\">";
    table += "<option value='0'>None</option>";
    table += "<option value='ytd'>Year to Date</option>";
    table += "<option value='qtd'>Quarter to Date</option>";
    table += "<option value='mtd'>Month to Date</option>";
    table += "<option value='lw'>Latest Week</option>";
    table += "<option value='ld'>Latest Day</option>";   
    table += "<option value='ly'>Last 12 Months</option>";

    table += "</select>";
    table += "</td></tr>";
    table += "<tr style='background-color:White;'><th >S</th><th>M</th><th>T</th><th>W</th><th>T</th><th>F</th><th>S</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) {
          if (dayOfMonth == selectedDay && currentYear == selectedYear && currentMonth == selectedMonth) {
            css_class = 'current';
          } else if (dayOfWeek == 0 || dayOfWeek == 6) {
            css_class = 'weekend';
          } else {
            css_class = 'weekday';
          }

          table = table + "<td><a class='"+css_class+"' href=\"javascript:setCalendarControlDate("+currentYear+","+currentMonth+","+dayOfMonth+")\">"+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></div>";

    return table;
  }

  function setDate(year, month, day) {
      setDateCustom(year, month, day, dateField, dateFieldAlt);
      //hide();
      return;
  }

  this.show = show;
  function show(field, ctl2, ctlFromDate, frequencyUI) {
    frequency = frequencyUI;
    can_hide = 0;
  
    // If the calendar is visible and associated with
    // this field do not do anything.
    if (dateField == field) {
      return;
    } else {
      dateField = field;
    }

    if ( ctl2 != null){
        dateFieldAlt = document.getElementById(ctl2);
    }

    if(dateField) {
      try {
        var dateString = new String(dateField.value);
        var dateParts = dateString.split("/");
        
        selectedMonth = parseInt(dateParts[0],10);
        selectedDay = parseInt(dateParts[1],10);
        selectedYear = parseInt(dateParts[2],10);
      } catch(e) {}
    }

    if (!(selectedYear && selectedMonth && selectedDay)) {
      try {
        var fromDate = document.getElementById(ctlFromDate);
        var dateString = new String(fromDate.value);
        var dateParts = dateString.split("/");
        
        selectedMonth = parseInt(dateParts[0],10);
        selectedDay = 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');
      }
 
     document.getElementById('divDateTop').appendChild(calendar);
  }
     
  }

  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();

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);
}

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

function setDefaultDate(select, ctl1) {
    var d;
    var adjustDate = '';
    
    
    if ((frequency == undefined) || (frequency == 'Monthly')) {
        d = new Date();
    }
    else {

    
        if (frequency == 'Weekly') {
            adjustDate = hshDates['W'];
        }
        else {
            adjustDate = hshDates['D'];
        }
        arrDate = adjustDate.split('/');
        d = new Date(arrDate[2], arrDate[0] - 1, arrDate[1]);

    }
    //alert(d);
    
    var curr_date = d.getDate();    
    var curr_month = d.getMonth();
    
    var curr_year = d.getFullYear();
    var valueFrom = '';
    var valueTo = '';
    var strDateType = document.getElementById(select).value;
    var ctlFrom, ctlTo

    clearDates();

    if (strDateType != 'lw') {
            curr_month += 1;
    }
    
    if (ctl1.indexOf('From') == -1) {
        ctlTo = ctl1;
        ctlFrom = ctl1.replace('To', 'From');
    }
    else {
        ctlTo = ctl1.replace('From', 'To');
        ctlFrom = ctl1;
    }

    switch (strDateType) {
        case 'ytd':
            valueFrom = '01/01/' + curr_year;
            valueTo = '12/31/' + curr_year;
            break;
           
        case 'qtd':
            switch (curr_month) {
                case 1:
                case 2:
                case 3:
                    valueFrom = '01/01/' + curr_year;
                    valueTo = '03/31/' + curr_year;
                    break;

                case 4:
                case 5:
                case 6:
                    valueFrom = '04/01/' + curr_year;
                    valueTo = '06/30/' + curr_year;
                    break;

                case 7:
                case 8:
                case 9:
                    valueFrom = '07/01/' + curr_year;
                    valueTo = '09/30/' + curr_year;
                    break;

                case 10:
                case 11:
                case 12:
                    valueFrom = '10/01/' + curr_year;
                    valueTo = '12/31/' + curr_year;
                    break;
            }
            break;
        case 'mtd':       
            valueFrom = formatDatePart(curr_month)  + '/01/' + curr_year;
            valueTo = formatDatePart(curr_month) + '/' + daysInMonth(curr_month-1, curr_year) + '/' + curr_year;
            break;
        case 'ld':
            if (adjustDate != '') {
                var c = new Date(curr_year, curr_month, curr_date);
                curr_date = c.getDate();
                curr_month = c.getMonth() ;
                curr_year = c.getFullYear();
            }
            
            valueFrom = formatDatePart(curr_month) + '/' + formatDatePart(curr_date) + '/' + curr_year;
            valueTo = '';
            break;
        case 'lw':
            var c = new Date(curr_year, curr_month, curr_date);

            if ((adjustDate == '') || (frequency == 'Monthly')) {

                var dayOfWeek = c.getDay();

                while (dayOfWeek != 1) {
                    if (curr_date == 1) {
                        if (curr_month == 0) {
                            curr_month = 11;
                            curr_year -= 1;
                        }
                        else {
                            curr_month -= 1;
                        }

                        curr_date = daysInMonth(curr_month, curr_year);

                    }
                    else {
                        curr_date -= 1;
                    }

                    c = new Date(curr_year, curr_month, curr_date);
                    dayOfWeek = c.getDay();
                }

            }
            else if (frequency == 'Daily') {
                var iAdjust = 6;

                if (c.getDay() == 5) {
                    iAdjust -= 2;
                }
                c.setDate(c.getDate() - iAdjust);
            }

            curr_date = c.getDate();
            curr_month = c.getMonth() + 1;
            curr_year = c.getFullYear();

            valueFrom = formatDatePart(curr_month) + '/' + formatDatePart(curr_date) + '/' + curr_year;
            valueTo = '';
            break;

        case 'ly':
            curr_year -= 1;
         
            valueFrom = formatDatePart(curr_month) + '/' + formatDatePart(curr_date) + '/' + curr_year;
            valueTo = '';
            break;
    }

    if (ctlFrom == ctlTo) {
        valueTo = valueFrom;
    }  
    
    document.getElementById(ctlFrom).value = valueFrom;
    document.getElementById(ctlTo).value = valueTo;

    if (document.getElementById('tdDateFrom') != undefined) {
        updateQueryDefault(valueFrom, 'tdDateFrom', 'All Dates');
        updateQueryDefault(valueTo, 'tdDateTo', 'All Dates');
    }
}

function formatDatePart(datePart) {
    if (datePart.toString().length == 1) {
        return '0' + datePart;
    }
    else {
        return datePart;
    }
}

function clearDates() {
    if (document.getElementById('M_B_txtDateCustom') != null) {
        document.getElementById('M_B_txtDateCustom').value = '';
        document.getElementById('divDateCustom').style.display = 'none';
        document.getElementById('divDateRange').style.display = '';
        document.getElementById('M_B_txtDateEquals').value = '';
        document.getElementById('M_B_txtDateFrom').value = '';
        document.getElementById('M_B_txtDateTo').value = '';
        document.getElementById('tdDateTo').innerHTML = 'All Dates';
        document.getElementById('tdDateFrom').innerHTML = 'All Dates';
    }
    else {
        document.getElementById('txtDateCustom').value = '';
        document.getElementById('txtDateEquals').value = '';
        document.getElementById('txtDateFrom').value = '';
        document.getElementById('txtDateTo').value = '';
    }
     
}