/**********************************************************************
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.getMonth() + 1) + "/" + DateVal.getDate() + "/" + 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('Janvier')
else if (theMonth == 2)
return('Fevrier')
else if (theMonth == 3)
return('Mars')
else if (theMonth == 4)
return('Avril')
else if (theMonth == 5)
return('Mai')
else if (theMonth == 6)
return('Juin')
else if (theMonth == 7)
return('Juillet')
else if (theMonth == 8)
return('Aout')
else if (theMonth == 9)
return('Septembre')
else if (theMonth == 10)
return('Octobre')
else if (theMonth == 11)
return('Novembre')
else if (theMonth == 12)
return('Decembre')
}
/*--------------------------------------------------------------
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[ReturnFn].elements[ReturnEl].value = theDate
CloseNWin()
}
var nWin = ""
function showCalendar(elName, formName)
{
Height = 190
Width = 245
Top = 100
Left = 100
if (nWin == "")
{
nWin = window.open("", "Calendar", "height=" + Height + ",width=" + Width
+ ",top=" + Top + ",left=" + Left + ",status=no,toolbar=no,menubar=no,"
+ "location=no,resizable=no,scrollbars=no")
nWin.opener = window
}
else
{
CloseNWin()
showCalendar(elName, formName)
}
ReturnEl = elName
ReturnFn = formName
el = document.forms[formName].elements[elName]
if (el.value.length==10)
UserDate = new Date(el.value.substr(6,4),el.value.substr(3,2)-1,el.value.substr(0,2))
else
UserDate = new Date()
datNow = new Date(UserDate)
doCalendar(datNow)
}
function CloseNWin()
{
if (nWin != "")
{
nWin.close()
nWin = ""
}
}