/* ----------------------- */
/* CalendarPopup-Functions */


// CONSTRUCTOR for the CalendarPopup Object
function CalendarPopup(div)
{
   var c;

   c = new PopupWindow(div);

   c.autoHide();

   // Calendar-specific properties
   c.monthNames = new Array("January","February","March","April","May","June","July","August","September","October","November","December");
   c.monthAbbreviations = new Array("Jan","Feb","Mar","Apr","May","Jun","Jul","Aug","Sep","Oct","Nov","Dec");
   c.dayHeaders = new Array("S","M","T","W","T","F","S");
   c.returnFunction = "CP_tmpReturnFunction";
   c.returnMonthFunction = "CP_tmpReturnMonthFunction";
   c.returnQuarterFunction = "CP_tmpReturnQuarterFunction";
   c.returnYearFunction = "CP_tmpReturnYearFunction";
   c.weekStartDay = 0;
   c.isShowYearNavigation = false;
   c.displayType = "date";
   c.disabledWeekDays = new Object();
   c.disabledDatesExpression = "";
   c.yearSelectStartOffset = 2;
   c.currentDate = null;
   c.todayText="Today";
   c.cssPrefix="";
   c.isShowNavigationDropdowns=false;
   c.isShowYearNavigationInput=false;
   window.CP_calendarObject = null;
   window.CP_targetInput = null;
   window.CP_dateFormat = "MM/dd/yyyy";

   // Method mappings
   c.copyMonthNamesToWindow = CP_copyMonthNamesToWindow;
   c.setReturnFunction = CP_setReturnFunction;
   c.setReturnMonthFunction = CP_setReturnMonthFunction;
   c.setReturnQuarterFunction = CP_setReturnQuarterFunction;
   c.setReturnYearFunction = CP_setReturnYearFunction;
   c.setMonthNames = CP_setMonthNames;
   c.setMonthAbbreviations = CP_setMonthAbbreviations;
   c.setDayHeaders = CP_setDayHeaders;
   c.setWeekStartDay = CP_setWeekStartDay;
   c.setDisplayType = CP_setDisplayType;
   c.setDisabledWeekDays = CP_setDisabledWeekDays;
   c.addDisabledDates = CP_addDisabledDates;
   c.setYearSelectStartOffset = CP_setYearSelectStartOffset;
   c.setTodayText = CP_setTodayText;
   c.showYearNavigation = CP_showYearNavigation;
   c.showCalendar = CP_showCalendar;
   c.hideCalendar = CP_hideCalendar;
   c.getStyles = getCalendarStyles;
   c.refreshCalendar = CP_refreshCalendar;
   c.getCalendar = CP_getCalendar;
   c.select = CP_select;
   c.setCssPrefix = CP_setCssPrefix;
   c.showNavigationDropdowns = CP_showNavigationDropdowns;
   c.showYearNavigationInput = CP_showYearNavigationInput;
   c.copyMonthNamesToWindow();

   // Return the object
   return c;
}

function CP_copyMonthNamesToWindow()
{
   // Copy these values over to the date.js
   if (typeof(window.MONTH_NAMES)!="undefined" && window.MONTH_NAMES!=null) {
      window.MONTH_NAMES = new Array();
      for (var i=0; i<this.monthNames.length; i++) {
	 window.MONTH_NAMES[window.MONTH_NAMES.length] = this.monthNames[i];
      }
      for (var i=0; i<this.monthAbbreviations.length; i++) {
	 window.MONTH_NAMES[window.MONTH_NAMES.length] = this.monthAbbreviations[i];
      }
   }
}


// Temporary default functions to be called when items clicked, so no error is thrown
function CP_tmpReturnFunction(y,m,d)
{
   if (window.CP_targetInput!=null) {
      var dt = new Date(y,m-1,d,0,0,0);
      if (window.CP_calendarObject!=null) { window.CP_calendarObject.copyMonthNamesToWindow(); }
      window.CP_targetInput.value = formatDate(dt,window.CP_dateFormat);
   }
   else {
      alert('Use setReturnFunction() to define which function will get the clicked results!');
   }
}


function CP_tmpReturnMonthFunction(y,m)
{
   alert('Use setReturnMonthFunction() to define which function will get the clicked results!\nYou clicked: year='+y+' , month='+m);
}


function CP_tmpReturnQuarterFunction(y,q)
{
   alert('Use setReturnQuarterFunction() to define which function will get the clicked results!\nYou clicked: year='+y+' , quarter='+q);
}


function CP_tmpReturnYearFunction(y)
{
   alert('Use setReturnYearFunction() to define which function will get the clicked results!\nYou clicked: year='+y);
}


// Set the name of the functions to call to get the clicked item
function CP_setReturnFunction(name)
{
   this.returnFunction = name;
}


function CP_setReturnMonthFunction(name)
{
   this.returnMonthFunction = name;
}


function CP_setReturnQuarterFunction(name)
{
   this.returnQuarterFunction = name;
}


function CP_setReturnYearFunction(name)
{
   this.returnYearFunction = name;
}


// Over-ride the built-in month names
function CP_setMonthNames()
{
   for (var i=0; i<arguments.length; i++)
      this.monthNames[i] = arguments[i];

   this.copyMonthNamesToWindow();
}


// Over-ride the built-in month abbreviations
function CP_setMonthAbbreviations()
{
   for (var i=0; i<arguments.length; i++)
      this.monthAbbreviations[i] = arguments[i];

   this.copyMonthNamesToWindow();
}


// Over-ride the built-in column headers for each day
function CP_setDayHeaders()
{
   for (var i=0; i<arguments.length; i++)
      this.dayHeaders[i] = arguments[i];
}


// Set the day of the week (0-7) that the calendar display starts on
// This is for countries other than the US whose calendar displays start on Monday(1), for example
function CP_setWeekStartDay(day)
{
   this.weekStartDay = day;
}


// Show next/last year navigation links
function CP_showYearNavigation()
{
   this.isShowYearNavigation = (arguments.length>0)?arguments[0]:true;
}


// Which type of calendar to display
function CP_setDisplayType(type)
{
   if (type!="date"&&type!="week-end"&&type!="month"&&type!="quarter"&&type!="year")
   {
      alert("Invalid display type! Must be one of: date,week-end,month,quarter,year");
      return false;
   }

   this.displayType=type;
}


// How many years back to start by default for year display
function CP_setYearSelectStartOffset(num)
{
   this.yearSelectStartOffset=num;
}


// Set which weekdays should not be clickable
function CP_setDisabledWeekDays()
{
   this.disabledWeekDays = new Object();
   for (var i=0; i<arguments.length; i++)
      this.disabledWeekDays[arguments[i]] = true;
}


// Disable individual dates or ranges
// Builds an internal logical test which is run via eval() for efficiency
function CP_addDisabledDates(start, end)
{
   if (arguments.length==1)
      end=start;

   if (start==null && end==null)
      return;

   if (this.disabledDatesExpression!="")
      this.disabledDatesExpression+= "||";

   if (start!=null)
   {
      start = parseDate(start);
      start=""+start.getFullYear()+LZ(start.getMonth()+1)+LZ(start.getDate());
   }

   if (end!=null)
   {
      end=parseDate(end);
      end=""+end.getFullYear()+LZ(end.getMonth()+1)+LZ(end.getDate());
   }

   if (start==null)
      this.disabledDatesExpression+="(ds<="+end+")";

   else if (end  ==null)
      this.disabledDatesExpression+="(ds>="+start+")";

   else
      this.disabledDatesExpression+="(ds>="+start+"&&ds<="+end+")";
}


// Set the text to use for the "Today" link
function CP_setTodayText(text)
{
   this.todayText = text;
}


// Set the prefix to be added to all CSS classes when writing output
function CP_setCssPrefix(val)
{
   this.cssPrefix = val;
}


// Show the navigation as an dropdowns that can be manually changed
function CP_showNavigationDropdowns()
{
   this.isShowNavigationDropdowns = (arguments.length>0)?arguments[0]:true;
}


// Show the year navigation as an input box that can be manually changed
function CP_showYearNavigationInput()
{
   this.isShowYearNavigationInput = (arguments.length>0)?arguments[0]:true;
}


// Hide a calendar object
function CP_hideCalendar()
{
   if (arguments.length > 0)
      window.popupWindowObjects[arguments[0]].hidePopup();
   else
      this.hidePopup();
}


// Refresh the contents of the calendar display
function CP_refreshCalendar(index)
{
   var calObject = window.popupWindowObjects[index];

   if (arguments.length>1)
      calObject.populate(calObject.getCalendar(arguments[1],arguments[2],arguments[3],arguments[4],arguments[5]));

   else
      calObject.populate(calObject.getCalendar());

   calObject.refresh();
}


// Populate the calendar and display it
function CP_showCalendar()
{
   if (arguments.length>1)
   {
      if (arguments[1]==null||arguments[1]=="")
	 this.currentDate=new Date();

      else
	 this.currentDate=new Date(parseDate(arguments[1]));
   }

   this.populate(this.getCalendar());
   this.showPopup();
}


// Simple method to interface popup calendar with a text-entry box
function CP_select(inputobj, linkname, format)
{
   var selectedDate=(arguments.length>3)?arguments[3]:null;

   if (!window.getDateFromFormat)
   {
      alert("calendar.select: To use this method you must also include 'date.js' for date formatting");
      return;
   }

   if (this.displayType!="date"&&this.displayType!="week-end")
   {
      alert("calendar.select: This function can only be used with displayType 'date' or 'week-end'");
      return;
   }

   if (inputobj.type!="text" && inputobj.type!="hidden" && inputobj.type!="textarea")
   {
      alert("calendar.select: Input object passed is not a valid form input object");
      window.CP_targetInput=null;
      return;
   }

   if (inputobj.disabled)
      return;   // Can't use calendar input on disabled form input!

   window.CP_targetInput = inputobj;
   window.CP_calendarObject = this;
   this.currentDate=null;
   var time=0;

   if (selectedDate!=null)
      time = getDateFromFormat(selectedDate,format)

   else if (inputobj.value!="")
      time = getDateFromFormat(inputobj.value,format);


   if (selectedDate!=null || inputobj.value!="")
   {
      if (time==0)
         this.currentDate=null;

      else
         this.currentDate=new Date(time);
   }

   window.CP_dateFormat = format;
   this.showCalendar(linkname);
}


// Get style block needed to display the calendar correctly
function getCalendarStyles()
{
   var result = "";
   var p = "";

   if (this!=null && typeof(this.cssPrefix)!="undefined" && this.cssPrefix!=null && this.cssPrefix!="")
      p=this.cssPrefix;

   result += "<STYLE>\n";
   result += "."+p+"cpYearNavigation,."+p+"cpMonthNavigation { background-color:#C0C0C0; text-align:center; vertical-align:center; text-decoration:none; color:#000000; font-weight:bold; }\n";
   result += "."+p+"cpDayColumnHeader, ."+p+"cpYearNavigation,."+p+"cpMonthNavigation,."+p+"cpCurrentMonthDate,."+p+"cpCurrentMonthDateDisabled,."+p+"cpOtherMonthDate,."+p+"cpOtherMonthDateDisabled,."+p+"cpCurrentDate,."+p+"cpCurrentDateDisabled,."+p+"cpTodayText,."+p+"cpTodayTextDisabled,."+p+"cpText { font-family:arial; font-size:8pt; }\n";
   result += "TD."+p+"cpDayColumnHeader { text-align:right; border:solid thin #C0C0C0;border-width:0px 0px 1px 0px; }\n";
   result += "."+p+"cpCurrentMonthDate, ."+p+"cpOtherMonthDate, ."+p+"cpCurrentDate  { text-align:right; text-decoration:none; }\n";
   result += "."+p+"cpCurrentMonthDateDisabled, ."+p+"cpOtherMonthDateDisabled, ."+p+"cpCurrentDateDisabled { color:#D0D0D0; text-align:right; text-decoration:line-through; }\n";
   result += "."+p+"cpCurrentMonthDate, .cpCurrentDate { color:#000000; }\n";
   result += "."+p+"cpOtherMonthDate { color:#808080; }\n";
   result += "TD."+p+"cpCurrentDate { color:white; background-color: #C0C0C0; border-width:1px; border:solid thin #800000; }\n";
   result += "TD."+p+"cpCurrentDateDisabled { border-width:1px; border:solid thin #FFAAAA; }\n";
   result += "TD."+p+"cpTodayText, TD."+p+"cpTodayTextDisabled { border:solid thin #C0C0C0; border-width:1px 0px 0px 0px;}\n";
   result += "A."+p+"cpTodayText, SPAN."+p+"cpTodayTextDisabled { height:20px; }\n";
   result += "A."+p+"cpTodayText { color:black; }\n";
   result += "."+p+"cpTodayTextDisabled { color:#D0D0D0; }\n";
   result += "."+p+"cpBorder { border:solid thin #808080; }\n";
   result += "</STYLE>\n";
   return result;
}


// Return a string containing all the calendar code to be displayed
function CP_getCalendar()
{
   var now = new Date();
   var windowref = "";
   var result = "";

   // Table for the Calendar-Div
   result += '<TABLE CLASS="'+this.cssPrefix+'cpBorder" WIDTH=144 BORDER=1 BORDERWIDTH=1 CELLSPACING=0 CELLPADDING=1>\n';
   result += '<TR><TD ALIGN=CENTER>\n';
   result += '<CENTER>\n';

   // Code for DATE display (default)
   // -------------------------------
   if (this.displayType=="date" || this.displayType=="week-end")
   {
      if (this.currentDate==null)
         this.currentDate = now;

      if (arguments.length > 0)
         var month = arguments[0];
      else
         var month = this.currentDate.getMonth()+1;

      if (arguments.length > 1 && arguments[1]>0 && arguments[1]-0==arguments[1])
         var year = arguments[1];
      else
         var year = this.currentDate.getFullYear();

      var daysinmonth= new Array(0,31,28,31,30,31,30,31,31,30,31,30,31);

      if ( ( (year%4 == 0)&&(year%100 != 0) ) || (year%400 == 0) )
	 daysinmonth[2] = 29;

      var current_month = new Date(year,month-1,1);
      var display_year = year;
      var display_month = month;
      var display_date = 1;
      var weekday= current_month.getDay();
      var offset = 0;

      offset = (weekday >= this.weekStartDay) ? weekday-this.weekStartDay : 7-this.weekStartDay+weekday ;

      if (offset > 0)
      {
	 display_month--;
	 if (display_month < 1)
         {
            display_month = 12;
            display_year--;
         }

	 display_date = daysinmonth[display_month]-offset+1;
      }

      var next_month = month+1;
      var next_month_year = year;

      if (next_month > 12)
      {
         next_month=1;
         next_month_year++;
      }

      var last_month = month-1;
      var last_month_year = year;

      if (last_month < 1)
      {
         last_month=12;
         last_month_year--;
      }

      var date_class;

      result += "<TABLE WIDTH=144 BORDER=0 BORDERWIDTH=0 CELLSPACING=0 CELLPADDING=0>";
      result += '<TR>\n';

      var refresh = windowref+'CP_refreshCalendar';
      var refreshLink = 'javascript:' + refresh;

      if (this.isShowNavigationDropdowns)
      {
	 result += '<TD CLASS="'+this.cssPrefix+'cpMonthNavigation" WIDTH="78" COLSPAN="3"><select CLASS="'+this.cssPrefix+'cpMonthNavigation" name="cpMonth" onChange="'+refresh+'('+this.index+',this.options[this.selectedIndex].value-0,'+(year-0)+');">';

	 for( var monthCounter=1; monthCounter<=12; monthCounter++ )
         {
	    var selected = (monthCounter==month) ? 'SELECTED' : '';
	    result += '<option value="'+monthCounter+'" '+selected+'>'+this.monthNames[monthCounter-1]+'</option>';
	 }

	 result += '</select></TD>';
	 result += '<TD CLASS="'+this.cssPrefix+'cpMonthNavigation" WIDTH="10">&nbsp;</TD>';
	 result += '<TD CLASS="'+this.cssPrefix+'cpYearNavigation" WIDTH="56" COLSPAN="3"><select CLASS="'+this.cssPrefix+'cpYearNavigation" name="cpYear" onChange="'+refresh+'('+this.index+','+month+',this.options[this.selectedIndex].value-0);">';

	 for( var yearCounter=year-this.yearSelectStartOffset; yearCounter<=year+this.yearSelectStartOffset; yearCounter++ )
         {
	    var selected = (yearCounter==year) ? 'SELECTED' : '';
	    result += '<option value="'+yearCounter+'" '+selected+'>'+yearCounter+'</option>';
	 }

	 result += '</select></TD>';
      }
      else
      {
	 if (this.isShowYearNavigation)
         {
	    result += '<TD CLASS="'+this.cssPrefix+'cpMonthNavigation" WIDTH="10"><A CLASS="'+this.cssPrefix+'cpMonthNavigation" HREF="'+refreshLink+'('+this.index+','+last_month+','+last_month_year+');">&lt;</A></TD>';
	    result += '<TD CLASS="'+this.cssPrefix+'cpMonthNavigation" WIDTH="58"><SPAN CLASS="'+this.cssPrefix+'cpMonthNavigation">'+this.monthNames[month-1]+'</SPAN></TD>';
	    result += '<TD CLASS="'+this.cssPrefix+'cpMonthNavigation" WIDTH="10"><A CLASS="'+this.cssPrefix+'cpMonthNavigation" HREF="'+refreshLink+'('+this.index+','+next_month+','+next_month_year+');">&gt;</A></TD>';
	    result += '<TD CLASS="'+this.cssPrefix+'cpMonthNavigation" WIDTH="10">&nbsp;</TD>';
	    result += '<TD CLASS="'+this.cssPrefix+'cpYearNavigation" WIDTH="10"><A CLASS="'+this.cssPrefix+'cpYearNavigation" HREF="'+refreshLink+'('+this.index+','+month+','+(year-1)+');">&lt;</A></TD>';

	    if (this.isShowYearNavigationInput)
	       result += '<TD CLASS="'+this.cssPrefix+'cpYearNavigation" WIDTH="36"><INPUT NAME="cpYear" CLASS="'+this.cssPrefix+'cpYearNavigation" SIZE="4" MAXLENGTH="4" VALUE="'+year+'" onBlur="'+refresh+'('+this.index+','+month+',this.value-0);"></TD>';
	    else
	       result += '<TD CLASS="'+this.cssPrefix+'cpYearNavigation" WIDTH="36"><SPAN CLASS="'+this.cssPrefix+'cpYearNavigation">'+year+'</SPAN></TD>';

	    result += '<TD CLASS="'+this.cssPrefix+'cpYearNavigation" WIDTH="10"><A CLASS="'+this.cssPrefix+'cpYearNavigation" HREF="'+refreshLink+'('+this.index+','+month+','+(year+1)+');">&gt;</A></TD>';
	 }
	 else
         {
	    result += '<TD CLASS="'+this.cssPrefix+'cpMonthNavigation" WIDTH="22"><A CLASS="'+this.cssPrefix+'cpMonthNavigation" HREF="'+refreshLink+'('+this.index+','+last_month+','+last_month_year+');">&lt;&lt;</A></TD>\n';
	    result += '<TD CLASS="'+this.cssPrefix+'cpMonthNavigation" WIDTH="100"><SPAN CLASS="'+this.cssPrefix+'cpMonthNavigation">'+this.monthNames[month-1]+' '+year+'</SPAN></TD>\n';
	    result += '<TD CLASS="'+this.cssPrefix+'cpMonthNavigation" WIDTH="22"><A CLASS="'+this.cssPrefix+'cpMonthNavigation" HREF="'+refreshLink+'('+this.index+','+next_month+','+next_month_year+');">&gt;&gt;</A></TD>\n';
	 }
      }

      result += '</TR></TABLE>\n';
      result += '<TABLE WIDTH=120 BORDER=0 CELLSPACING=0 CELLPADDING=1 ALIGN=CENTER>\n';
      result += '<TR>\n';

      for (var j=0; j<7; j++)
	 result += '<TD CLASS="'+this.cssPrefix+'cpDayColumnHeader" WIDTH="14%"><SPAN CLASS="'+this.cssPrefix+'cpDayColumnHeader">'+this.dayHeaders[(this.weekStartDay+j)%7]+'</TD>\n';

      result += '</TR>\n';

      for (var row=1; row<=6; row++)
      {
	 result += '<TR>\n';
	 for (var col=1; col<=7; col++)
         {
	    var disabled=false;

	    if (this.disabledDatesExpression!="")
            {
	       var ds=""+display_year+LZ(display_month)+LZ(display_date);
	       eval("disabled=("+this.disabledDatesExpression+")");
	    }

	    var dateClass = "";

	    if ((display_month == this.currentDate.getMonth()+1) && (display_date==this.currentDate.getDate()) && (display_year==this.currentDate.getFullYear()))
	       dateClass = "cpCurrentDate";
	    else if (display_month == month)
	       dateClass = "cpCurrentMonthDate";
            else
	       dateClass = "cpOtherMonthDate";

	    if (disabled || this.disabledWeekDays[col-1])
	       result += '	<TD CLASS="'+this.cssPrefix+dateClass+'"><SPAN CLASS="'+this.cssPrefix+dateClass+'Disabled">'+display_date+'</SPAN></TD>\n';
	    else
            {
	       var selected_date = display_date;
	       var selected_month = display_month;
	       var selected_year = display_year;

	       if (this.displayType=="week-end")
               {
		  var d = new Date(selected_year,selected_month-1,selected_date,0,0,0,0);
		  d.setDate(d.getDate() + (7-col));
		  selected_year = d.getYear();

		  if (selected_year < 1000)
                     selected_year += 1900;

		  selected_month = d.getMonth()+1;
		  selected_date = d.getDate();
	       }

	       result += '	<TD CLASS="'+this.cssPrefix+dateClass+'"><A HREF="javascript:'+windowref+this.returnFunction+'('+selected_year+','+selected_month+','+selected_date+');'+windowref+'CP_hideCalendar(\''+this.index+'\');" CLASS="'+this.cssPrefix+dateClass+'">'+display_date+'</A></TD>\n';
	    }

	    display_date++;

	    if (display_date > daysinmonth[display_month])
            {
	       display_date=1;
	       display_month++;
	    }

	    if (display_month > 12)
            {
	       display_month=1;
	       display_year++;
	    }
	 }

	 result += '</TR>';
      }

      var current_weekday = now.getDay() - this.weekStartDay;

      if (current_weekday < 0)
	 current_weekday += 7;

      result += '<TR>\n';
      result += '	<TD COLSPAN=7 ALIGN=CENTER CLASS="'+this.cssPrefix+'cpTodayText">\n';

      if (this.disabledDatesExpression!="")
      {
	 var ds=""+now.getFullYear()+LZ(now.getMonth()+1)+LZ(now.getDate());
	 eval("disabled=("+this.disabledDatesExpression+")");
      }

      if (disabled || this.disabledWeekDays[current_weekday+1])
   	 result += '		<SPAN CLASS="'+this.cssPrefix+'cpTodayTextDisabled">'+this.todayText+'</SPAN>\n';
      else
	 result += '		<A CLASS="'+this.cssPrefix+'cpTodayText" HREF="javascript:'+windowref+this.returnFunction+'(\''+now.getFullYear()+'\',\''+(now.getMonth()+1)+'\',\''+now.getDate()+'\');'+windowref+'CP_hideCalendar(\''+this.index+'\');">'+this.todayText+'</A>\n';

      result += '		<BR>\n';
      result += '	</TD></TR></TABLE></CENTER></TD></TR></TABLE>\n';
   }

   // Code common for MONTH, QUARTER, YEAR
   // ------------------------------------
   if (this.displayType=="month" || this.displayType=="quarter" || this.displayType=="year")
   {
      if (arguments.length > 0)
         var year = arguments[0];
      else
      {
	 if (this.displayType=="year")
	    var year = now.getFullYear()-this.yearSelectStartOffset;
	 else
            var year = now.getFullYear();
      }

      if (this.displayType!="year" && this.isShowYearNavigation)
      {
	 result += "<TABLE WIDTH=144 BORDER=0 BORDERWIDTH=0 CELLSPACING=0 CELLPADDING=0>";
	 result += '<TR>\n';
	 result += '	<TD CLASS="'+this.cssPrefix+'cpYearNavigation" WIDTH="22"><A CLASS="'+this.cssPrefix+'cpYearNavigation" HREF="javascript:'+windowref+'CP_refreshCalendar('+this.index+','+(year-1)+');">&lt;&lt;</A></TD>\n';
	 result += '	<TD CLASS="'+this.cssPrefix+'cpYearNavigation" WIDTH="100">'+year+'</TD>\n';
	 result += '	<TD CLASS="'+this.cssPrefix+'cpYearNavigation" WIDTH="22"><A CLASS="'+this.cssPrefix+'cpYearNavigation" HREF="javascript:'+windowref+'CP_refreshCalendar('+this.index+','+(year+1)+');">&gt;&gt;</A></TD>\n';
	 result += '</TR></TABLE>\n';
      }
   }

   // Code for MONTH display
   // ----------------------
   if (this.displayType=="month")
   {
      // If POPUP, write entire HTML document
      result += '<TABLE WIDTH=120 BORDER=0 CELLSPACING=1 CELLPADDING=0 ALIGN=CENTER>\n';

      for (var i=0; i<4; i++)
      {
	 result += '<TR>';

	 for (var j=0; j<3; j++)
         {
	    var monthindex = ((i*3)+j);
	    result += '<TD WIDTH=33% ALIGN=CENTER><A CLASS="'+this.cssPrefix+'cpText" HREF="javascript:'+windowref+this.returnMonthFunction+'('+year+','+(monthindex+1)+');'+windowref+'CP_hideCalendar(\''+this.index+'\');" CLASS="'+date_class+'">'+this.monthAbbreviations[monthindex]+'</A></TD>';
	 }

	 result += '</TR>';
      }

      result += '</TABLE></CENTER></TD></TR></TABLE>\n';
   }

   // Code for QUARTER display
   // ------------------------
   if (this.displayType=="quarter")
   {
      result += '<BR><TABLE WIDTH=120 BORDER=1 CELLSPACING=0 CELLPADDING=0 ALIGN=CENTER>\n';

      for (var i=0; i<2; i++)
      {
	 result += '<TR>';

	 for (var j=0; j<2; j++)
         {
	    var quarter = ((i*2)+j+1);
	    result += '<TD WIDTH=50% ALIGN=CENTER><BR><A CLASS="'+this.cssPrefix+'cpText" HREF="javascript:'+windowref+this.returnQuarterFunction+'('+year+','+quarter+');'+windowref+'CP_hideCalendar(\''+this.index+'\');" CLASS="'+date_class+'">Q'+quarter+'</A><BR><BR></TD>';
	 }

	 result += '</TR>';
      }

      result += '</TABLE></CENTER></TD></TR></TABLE>\n';
   }

   // Code for YEAR display
   // ---------------------
   if (this.displayType=="year")
   {
      var yearColumnSize = 4;

      result += "<TABLE WIDTH=144 BORDER=0 BORDERWIDTH=0 CELLSPACING=0 CELLPADDING=0>";
      result += '<TR>\n';
      result += '	<TD CLASS="'+this.cssPrefix+'cpYearNavigation" WIDTH="50%"><A CLASS="'+this.cssPrefix+'cpYearNavigation" HREF="javascript:'+windowref+'CP_refreshCalendar('+this.index+','+(year-(yearColumnSize*2))+');">&lt;&lt;</A></TD>\n';
      result += '	<TD CLASS="'+this.cssPrefix+'cpYearNavigation" WIDTH="50%"><A CLASS="'+this.cssPrefix+'cpYearNavigation" HREF="javascript:'+windowref+'CP_refreshCalendar('+this.index+','+(year+(yearColumnSize*2))+');">&gt;&gt;</A></TD>\n';
      result += '</TR></TABLE>\n';
      result += '<TABLE WIDTH=120 BORDER=0 CELLSPACING=1 CELLPADDING=0 ALIGN=CENTER>\n';

      for (var i=0; i<yearColumnSize; i++)
      {
	 for (var j=0; j<2; j++)
         {
	    var currentyear = year+(j*yearColumnSize)+i;
	    result += '<TD WIDTH=50% ALIGN=CENTER><A CLASS="'+this.cssPrefix+'cpText" HREF="javascript:'+windowref+this.returnYearFunction+'('+currentyear+');'+windowref+'CP_hideCalendar(\''+this.index+'\');" CLASS="'+date_class+'">'+currentyear+'</A></TD>';
	 }

	 result += '</TR>';
      }

      result += '</TABLE></CENTER></TD></TR></TABLE>\n';
   }

   return result;
}

/* End CalendarPopup-Functions */
/* --------------------------- */


/* --------------------- */
/* PopupWindow-Functions */

// CONSTRUCTOR for the PopupWindow object
// Pass it a DIV name to use a DHTML popup, otherwise will default to window popup
function PopupWindow(div)
{
   if (!window.popupWindowIndex)
      window.popupWindowIndex = 0;

   if (!window.popupWindowObjects)
      window.popupWindowObjects = new Array();

   if (!window.listenerAttached)
   {
      window.listenerAttached = true;
      PopupWindow_attachListener();
   }

   this.index = popupWindowIndex++;
   popupWindowObjects[this.index] = this;

   this.divName = null;
   this.popupWindow = null;
   this.width = 0;
   this.height = 0;
   this.populated = false;
   this.visible = false;
   this.autoHideEnabled = false;

   this.contents = "";
   this.url = "";
   this.windowProperties = "toolbar=no,location=no,status=no,menubar=no,scrollbars=auto,resizable,alwaysRaised,dependent,titlebar=no";

   this.type = "DIV";
   this.divName = arguments[0];

   this.use_gebi = false;
   this.use_css = false;
   this.use_layers = false;

   if (document.getElementById)
      this.use_gebi = true;
   else if (document.all)
      this.use_css = true;
   else if (document.layers)
      this.use_layers = true;
   else
      this.type = "DIV";

   // Method mappings
   this.populate = PopupWindow_populate;
   this.setUrl = PopupWindow_setUrl;
   this.setWindowProperties = PopupWindow_setWindowProperties;
   this.refresh = PopupWindow_refresh;
   this.showPopup = PopupWindow_showPopup;
   this.hidePopup = PopupWindow_hidePopup;
   this.isClicked = PopupWindow_isClicked;
   this.autoHide = PopupWindow_autoHide;
   this.hideIfNotClicked = PopupWindow_hideIfNotClicked;
}

// Fill the window with contents
function PopupWindow_populate(contents)
{
   this.contents = contents;
   this.populated = false;
}


// Set the URL to go to
function PopupWindow_setUrl(url)
{
   this.url = url;
}


// Set the window popup properties
function PopupWindow_setWindowProperties(props)
{
   this.windowProperties = props;
}


// Refresh the displayed contents of the popup
function PopupWindow_refresh()
{
   // refresh the DIV object
   if (this.use_gebi) {
      document.getElementById(this.divName).innerHTML = this.contents;
   }
   else if (this.use_css) {
      document.all[this.divName].innerHTML = this.contents;
   }
   else if (this.use_layers) {
      var d = document.layers[this.divName];
      d.document.open();
      d.document.writeln(this.contents);
      d.document.close();
   }
}


// Position and show the popup
function PopupWindow_showPopup()
{
   if (!this.populated && (this.contents != ""))
   {
      this.populated = true;
      this.refresh();
   }

   // Show the DIV object
   if (this.use_gebi)
      document.getElementById(this.divName).style.visibility = "visible";
   else if (this.use_css)
      document.all[this.divName].style.visibility = "visible";
   else if (this.use_layers)
      document.layers[this.divName].visibility = "visible";
}


// Hide the popup
function PopupWindow_hidePopup()
{
   if (this.use_gebi)
      document.getElementById(this.divName).style.visibility = "hidden";
   else if (this.use_css)
      document.all[this.divName].style.visibility = "hidden";
   else if (this.use_layers)
      document.layers[this.divName].visibility = "hidden";
}


// Pass an event and return whether or not it was the popup DIV that was clicked
function PopupWindow_isClicked(e)
{
   if (this.use_layers) {
      var clickX = e.pageX;
      var clickY = e.pageY;
      var t = document.layers[this.divName];
      if ((clickX > t.left) && (clickX < t.left+t.clip.width) && (clickY > t.top) && (clickY < t.top+t.clip.height)) {
	 return true;
      }
      else { return false; }
   }
   else if (document.all) { // Need to hard-code this to trap IE for error-handling
      var t = window.event.srcElement;
      while (t.parentElement != null) {
	 if (t.id==this.divName) {
	    return true;
	 }
	 t = t.parentElement;
      }
      return false;
   }
   else if (this.use_gebi && e) {
      var t = e.originalTarget;
      while (t.parentNode != null) {
	 if (t.id==this.divName) {
	    return true;
	 }
	 t = t.parentNode;
      }
      return false;
   }
   return false;
}



// Check an onMouseDown event to see if we should hide
function PopupWindow_hideIfNotClicked(e)
{
   if (this.autoHideEnabled && !this.isClicked(e)) {
      this.hidePopup();
   }
}


// Call this to make the DIV disable automatically when mouse is clicked outside it
function PopupWindow_autoHide()
{
   this.autoHideEnabled = true;
}


// This global function checks all PopupWindow objects onmouseup to see if they should be hidden
function PopupWindow_hidePopupWindows(e)
{
   for (var i=0; i<popupWindowObjects.length; i++) {
      if (popupWindowObjects[i] != null) {
	 var p = popupWindowObjects[i];
	 p.hideIfNotClicked(e);
      }
   }
}


// Run this immediately to attach the event listener
function PopupWindow_attachListener()
{
   if (document.layers) {
      document.captureEvents(Event.MOUSEUP);
   }
   window.popupWindowOldEventListener = document.onmouseup;
   if (window.popupWindowOldEventListener != null) {
      document.onmouseup = new Function("window.popupWindowOldEventListener(); PopupWindow_hidePopupWindows();");
   }
   else {
      document.onmouseup = PopupWindow_hidePopupWindows;
   }
}

/* End PopupWindow-Functions */
/* ------------------------- */


/* -------------- */
/* Date-Functions */

// ------------------------------------------------------------------
// These functions use the same 'format' strings as the
// java.text.SimpleDateFormat class, with minor exceptions.
// The format string consists of the following abbreviations:
//
// Field        | Full Form          | Short Form
// -------------+--------------------+-----------------------
// Year         | yyyy (4 digits)    | yy (2 digits), y (2 or 4 digits)
// Month        | MMM (name or abbr.)| MM (2 digits), M (1 or 2 digits)
//              | NNN (abbr.)        |
// Day of Month | dd (2 digits)      | d (1 or 2 digits)
// Day of Week  | EE (name)          | E (abbr)
// Hour (1-12)  | hh (2 digits)      | h (1 or 2 digits)
// Hour (0-23)  | HH (2 digits)      | H (1 or 2 digits)
// Hour (0-11)  | KK (2 digits)      | K (1 or 2 digits)
// Hour (1-24)  | kk (2 digits)      | k (1 or 2 digits)
// Minute       | mm (2 digits)      | m (1 or 2 digits)
// Second       | ss (2 digits)      | s (1 or 2 digits)
// AM/PM        | a                  |
//
// NOTE THE DIFFERENCE BETWEEN MM and mm! Month=MM, not mm!
// Examples:
//  "MMM d, y" matches: January 01, 2000
//                      Dec 1, 1900
//                      Nov 20, 00
//  "M/d/yy"   matches: 01/20/00
//                      9/2/00
//  "MMM dd, yyyy hh:mm:ssa" matches: "January 01, 2000 12:30:45AM"
// ------------------------------------------------------------------

var MONTH_NAMES = new Array('January','February','March','April','May','June','July','August','September','October','November','December','Jan','Feb','Mar','Apr','May','Jun','Jul','Aug','Sep','Oct','Nov','Dec');

var DAY_NAMES = new Array('Sunday','Monday','Tuesday','Wednesday','Thursday','Friday','Saturday','Sun','Mon','Tue','Wed','Thu','Fri','Sat');

function LZ(x)
{
   return(x<0||x>9?"":"0")+x
}

// ------------------------------------------------------------------
// isDate ( date_string, format_string )
// Returns true if date string matches format of format string and
// is a valid date. Else returns false.
// It is recommended that you trim whitespace around the value before
// passing it to this function, as whitespace is NOT ignored!
// ------------------------------------------------------------------
function isDate(val,format)
{
   var date=getDateFromFormat(val,format);

   if (date==0)
      return false;

   return true;
}

// -------------------------------------------------------------------
// compareDates(date1,date1format,date2,date2format)
//   Compare two date strings to see which is greater.
//   Returns:
//   1 if date1 is greater than date2
//   0 if date2 is greater than date1 of if they are the same
//  -1 if either of the dates is in an invalid format
// -------------------------------------------------------------------
function compareDates(date1,dateformat1,date2,dateformat2)
{
   var d1=getDateFromFormat(date1,dateformat1);
   var d2=getDateFromFormat(date2,dateformat2);

   if (d1==0 || d2==0)
      return -1;
   else if (d1 > d2)
      return 1;

   return 0;
}

// ------------------------------------------------------------------
// formatDate (date_object, format)
// Returns a date in the output format specified.
// The format string uses the same abbreviations as in getDateFromFormat()
// ------------------------------------------------------------------
function formatDate(date,format)
{
   format=format+"";

   var result="";
   var i_format=0;
   var c="";
   var token="";
   var y=date.getYear()+"";
   var M=date.getMonth()+1;
   var d=date.getDate();
   var E=date.getDay();
   var H=date.getHours();
   var m=date.getMinutes();
   var s=date.getSeconds();
   var yyyy,yy,MMM,MM,dd,hh,h,mm,ss,ampm,HH,H,KK,K,kk,k;

   // Convert real date parts into formatted versions
   var value=new Object();

   if (y.length < 4)
      y=""+(y-0+1900);

   value["y"]=""+y;
   value["yyyy"]=y;
   value["yy"]=y.substring(2,4);
   value["M"]=M;
   value["MM"]=LZ(M);
   value["MMM"]=MONTH_NAMES[M-1];
   value["NNN"]=MONTH_NAMES[M+11];
   value["d"]=d;
   value["dd"]=LZ(d);
   value["E"]=DAY_NAMES[E+7];
   value["EE"]=DAY_NAMES[E];
   value["H"]=H;
   value["HH"]=LZ(H);

   if (H==0)
      value["h"]=12;
   else if (H>12)
      value["h"]=H-12;
   else
      value["h"]=H;

   value["hh"]=LZ(value["h"]);

   if (H>11)
      value["K"]=H-12;
   else
      value["K"]=H;

   value["k"]=H+1;
   value["KK"]=LZ(value["K"]);
   value["kk"]=LZ(value["k"]);

   if (H > 11)
      value["a"]="PM";
   else
      value["a"]="AM";

   value["m"]=m;
   value["mm"]=LZ(m);
   value["s"]=s;
   value["ss"]=LZ(s);

   while (i_format < format.length)
   {
      c=format.charAt(i_format);
      token="";

      while ((format.charAt(i_format)==c) && (i_format < format.length))
	 token += format.charAt(i_format++);

      if (value[token] != null)
         result=result + value[token];
      else
         result=result + token;
   }

   return result;
}

// ------------------------------------------------------------------
// Utility functions for parsing in getDateFromFormat()
// ------------------------------------------------------------------
function _isInteger(val)
{
   var digits="1234567890";

   for (var i=0; i < val.length; i++)
   {
      if (digits.indexOf(val.charAt(i))==-1)
         return false;
   }

   return true;
}


function _getInt(str,i,minlength,maxlength)
{
   for (var x=maxlength; x>=minlength; x--)
   {
      var token=str.substring(i,i+x);

      if (token.length < minlength)
         return null;

      if (_isInteger(token))
         return token;
   }

   return null;
}

// ------------------------------------------------------------------
// getDateFromFormat( date_string , format_string )
//
// This function takes a date string and a format string. It matches
// If the date string matches the format string, it returns the
// getTime() of the date. If it does not match, it returns 0.
// ------------------------------------------------------------------
function getDateFromFormat(val,format)
{
   val=val+"";
   format=format+"";

   var i_val=0;
   var i_format=0;
   var c="";
   var token="";
   var token2="";
   var x,y;
   var now=new Date();
   var year=now.getYear();
   var month=now.getMonth()+1;
   var date=1;
   var hh=now.getHours();
   var mm=now.getMinutes();
   var ss=now.getSeconds();
   var ampm="";

   while (i_format < format.length)
   {
      // Get next token from format string
      c=format.charAt(i_format);
      token="";

      while ((format.charAt(i_format)==c) && (i_format < format.length))
	 token += format.charAt(i_format++);

      // Extract contents of value based on format token
      if (token=="yyyy" || token=="yy" || token=="y")
      {
	 if (token=="yyyy")
         {
            x=4;
            y=4;
         }

	 if (token=="yy")
         {
            x=2;
            y=2;
         }

	 if (token=="y")
         {
            x=2;
            y=4;
         }

	 year=_getInt(val,i_val,x,y);

	 if (year==null)
            return 0;

	 i_val += year.length;

	 if (year.length==2)
         {
	    if (year > 70)
               year=1900+(year-0);
	    else
               year=2000+(year-0);
	 }
      }
      else if (token=="MMM"||token=="NNN")
      {
	 month=0;

	 for (var i=0; i<MONTH_NAMES.length; i++)
         {
	    var month_name=MONTH_NAMES[i];

	    if (val.substring(i_val,i_val+month_name.length).toLowerCase()==month_name.toLowerCase())
            {
	       if (token=="MMM"||(token=="NNN"&&i>11))
               {
		  month=i+1;

		  if (month>12)
                     month -= 12;

		  i_val += month_name.length;

		  break;
	       }
	    }
	 }

	 if ((month < 1)||(month>12))
            return 0;
      }
      else if (token=="EE"||token=="E")
      {
	 for (var i=0; i<DAY_NAMES.length; i++)
         {
	    var day_name=DAY_NAMES[i];

	    if (val.substring(i_val,i_val+day_name.length).toLowerCase()==day_name.toLowerCase())
            {
	       i_val += day_name.length;
	       break;
	    }
	 }
      }
      else if (token=="MM"||token=="M")
      {
	 month=_getInt(val,i_val,token.length,2);

	 if(month==null||(month<1)||(month>12))
            return 0;

	 i_val+=month.length;
      }
      else if (token=="dd"||token=="d")
      {
	 date=_getInt(val,i_val,token.length,2);

	 if(date==null||(date<1)||(date>31))
            return 0;

	 i_val+=date.length;
      }
      else if (token=="hh"||token=="h")
      {
	 hh=_getInt(val,i_val,token.length,2);

	 if(hh==null||(hh<1)||(hh>12))
            return 0;

	 i_val+=hh.length;
      }
      else if (token=="HH"||token=="H")
      {
	 hh=_getInt(val,i_val,token.length,2);

	 if(hh==null||(hh<0)||(hh>23))
            return 0;

	 i_val+=hh.length;
      }
      else if (token=="KK"||token=="K")
      {
	 hh=_getInt(val,i_val,token.length,2);

	 if(hh==null||(hh<0)||(hh>11))
            return 0;

	 i_val+=hh.length;
      }
      else if (token=="kk"||token=="k")
      {
	 hh=_getInt(val,i_val,token.length,2);

	 if(hh==null||(hh<1)||(hh>24))
            return 0;

	 i_val+=hh.length;hh--;
      }
      else if (token=="mm"||token=="m")
      {
	 mm=_getInt(val,i_val,token.length,2);

	 if(mm==null||(mm<0)||(mm>59))
            return 0;

	 i_val+=mm.length;
      }
      else if (token=="ss"||token=="s")
      {
	 ss=_getInt(val,i_val,token.length,2);

	 if(ss==null||(ss<0)||(ss>59))
            return 0;

	 i_val+=ss.length;
      }
      else if (token=="a")
      {
	 if (val.substring(i_val,i_val+2).toLowerCase()=="am")
            ampm="AM";
	 else if (val.substring(i_val,i_val+2).toLowerCase()=="pm")
            ampm="PM";
	 else
            return 0;

	 i_val+=2;
      }
      else
      {
	 if (val.substring(i_val,i_val+token.length)!=token)
            return 0;
	 else
            i_val+=token.length;
      }
   }

   // If there are any trailing characters left in the value, it doesn't match
   if (i_val != val.length)
      return 0;

   // Is date valid for month?
   if (month==2)
   {
      // Check for leap year
      if ( ( (year%4==0)&&(year%100 != 0) ) || (year%400==0) )
      {
         // leap year
	 if (date > 29)
            return 0;
      }
      else
      {
         if (date > 28)
            return 0;
      }
   }

   if ((month==4)||(month==6)||(month==9)||(month==11))
   {
      if (date > 30)
         return 0;
   }

   // Correct hours value
   if (hh<12 && ampm=="PM")
      hh=hh-0+12;
   else if (hh>11 && ampm=="AM")
      hh-=12;

   var newdate = new Date(year,month-1,date,hh,mm,ss);

   return newdate.getTime();
}


// ------------------------------------------------------------------
// parseDate( date_string [, prefer_euro_format] )
//
// This function takes a date string and tries to match it to a
// number of possible date formats to get the value. It will try to
// match against the following international formats, in this order:
// y-M-d   MMM d, y   MMM d,y   y-MMM-d   d-MMM-y  MMM d
// M/d/y   M-d-y      M.d.y     MMM-d     M/d      M-d
// d/M/y   d-M-y      d.M.y     d-MMM     d/M      d-M
// A second argument may be passed to instruct the method to search
// for formats like d/M/y (european format) before M/d/y (American).
// Returns a Date object or null if no patterns match.
// ------------------------------------------------------------------
function parseDate(val)
{
   var preferEuro=(arguments.length==2)?arguments[1]:false;

   generalFormats = new Array('y-M-d','MMM d, y','MMM d,y','y-MMM-d','d-MMM-y','MMM d');
   monthFirst = new Array('M/d/y','M-d-y','M.d.y','MMM-d','M/d','M-d');
   dateFirst = new Array('d/M/y','d-M-y','d.M.y','d-MMM','d/M','d-M');

   var checkList = new Array('generalFormats',preferEuro?'dateFirst':'monthFirst',preferEuro?'monthFirst':'dateFirst');
   var d = null;

   for (var i=0; i<checkList.length; i++)
   {
      var l=window[checkList[i]];

      for (var j=0; j<l.length; j++)
      {
	 d=getDateFromFormat(val,l[j]);

	 if (d!=0)
            return new Date(d);
      }
   }

   return null;
}