/**********************************************************************
HTML CALENDAR CONTROL
copyright (c) 2001 The Ashley Group, Ltd.
ALL RIGHTS RESERVED
**********************************************************************
Created By: Patrick Milliken
Creation Date: 5/15/2001
Purpose: The Calendar Control is a pop-up calendar that writes
a user-selected date back to a specified text box on
the calling form. The calling form opens a pop-up
window, then this code dynamically writes the calendar
HTML to the window. No separate Calendar.HTM exists
for this control.
Modified By: Patrick Milliken
Last Mod Date: 6/11/2001
**********************************************************************/
/*--------------------------------------------------------------
Declare and initialize global variables
----------------------------------------------------------------*/
var ActiveDate
var theMonth
var theDate
var theYear
var theFirst
var firstDay
/*--------------------------------------------------------------
Build the HTML for the calendar based on the date argument then
write the HTML to the pop-up window.
----------------------------------------------------------------*/
function doCalendar(ActiveDate)
{
Today = new Date()
theDate = ActiveDate.getDate()
theMonth = ActiveDate.getMonth() + 1
theYear = ActiveDate.getFullYear()
FOM = new Date(theMonth + '/1/' + theYear)
firstDay = FOM.getDay()
lastDay = getLastDay(theMonth, theYear)
ColWidth = 35
// Build the Header.
HTML = 'Calendar'
+ ''
+ ''
+ ''
+ ''
// Write the complete HTML to the pop-up window.
nWin.document.open("text/html")
nWin.document.write(HTML)
nWin.document.close()
}
/*--------------------------------------------------------------
Return a date formatted as MM/DD/YYYY.
----------------------------------------------------------------*/
function getDate(DateVal)
{
return(DateVal.getDate() + "/" + (DateVal.getMonth()+1) + "/" + DateVal.getFullYear())
}
/*--------------------------------------------------------------
Handle a click on the last or next month links.
----------------------------------------------------------------*/
function changeMonth(ActiveDate, offset)
{
ActiveDate = new Date(ActiveDate)
theMonth = ActiveDate.getMonth() + (1 + offset)
theYear = ActiveDate.getFullYear()
if (theMonth < 1)
{
theMonth = 12
theYear--
}
else if (theMonth > 12)
{
theMonth = 1
theYear++
}
ActiveDate = new Date(theMonth + '/' + ActiveDate.getDate() + '/' + theYear)
doCalendar(ActiveDate)
}
/*--------------------------------------------------------------
Handle a click on the last or next year links.
----------------------------------------------------------------*/
function changeYear(ActiveDate, offset)
{
ActiveDate = new Date(ActiveDate)
theMonth = ActiveDate.getMonth() + 1
theYear = ActiveDate.getFullYear() + (1 * offset)
ActiveDate = new Date(theMonth + '/' + ActiveDate.getDate() + '/' + theYear)
doCalendar(ActiveDate)
}
/*--------------------------------------------------------------
Handle a click on the Go To Today link.
----------------------------------------------------------------*/
function doToday()
{
ActiveDate = new Date()
doCalendar(ActiveDate)
}
/*--------------------------------------------------------------
Return the last day of the month for the specified month and
year (note the leap year calculation).
----------------------------------------------------------------*/
function getLastDay(theMonth, theYear)
{
if (theMonth != 2)
{
if (theMonth == 4 || theMonth == 6 || theMonth == 9 || theMonth == 11)
return(30)
else
return(31)
}
else
{
if (theYear % 4 > 0)
return(28)
else if (theYear % 100 > 0)
return(29)
else if (theYear % 4 == 0)
return(29)
else
return(28)
}
}
/*--------------------------------------------------------------
Return the name of the month based on the month's numeric
value.
----------------------------------------------------------------*/
function returnMonth(theMonth)
{
if (theMonth == 1)
return('January')
else if (theMonth == 2)
return('February')
else if (theMonth == 3)
return('March')
else if (theMonth == 4)
return('April')
else if (theMonth == 5)
return('May')
else if (theMonth == 6)
return('June')
else if (theMonth == 7)
return('July')
else if (theMonth == 8)
return('August')
else if (theMonth == 9)
return('September')
else if (theMonth == 10)
return('October')
else if (theMonth == 11)
return('November')
else if (theMonth == 12)
return('December')
}
/*--------------------------------------------------------------
When a user clicks on a day of the month, write the date value
back to the specified text box on the calling form.
----------------------------------------------------------------*/
function ReturnValue(theDate)
{
document.forms[0].elements[ReturnEl].value = theDate
CloseNWin()
}