// Calendar Popup
// copyright 11Nov2001, 30Sep2006 by Stephen Chapman, Felgall Pty Ltd
var pagebg = '#add9f5'; // pop-up background colour
var headbg = '#cccccc'; // table heading background colour
var todaybg = '#9999cc'; // current day of month background colour
// valid range for yy is 1901 to 2100 inclusive or zero for current year
// valid range for mm is 1 to 12 or zero for current month
// permission is granted to use this javascript provided that the below code is not altered
function monthlength(month,year) {var dd = new Date(year, month, 0);return dd.getDate();}
function dispCal(yy,mm) {
var dow = ['Sun','Mon','Tue','Wed','Thu','Fri','Sat'];
var moy = ['January','February','March','April','May','June','July','August','September','October','November','December']; if (mm < 0 || mm > 12) {
alert('month must be between 1 and 12');
return false;
}
if (yy != 0 && (yy < 1901 || yy > 2100)) {
alert('year must be after 1900 and before 2101');
return false;
}
var calendar = new Date();
var today = calendar.getDate();
calendar.setDate(1);
if (yy > 1900)
calendar.setFullYear(yy);
if (mm > 0)
calendar.setMonth(mm - 1);
var yy = year = calendar.getFullYear();
var month = calendar.getMonth();
calendar.setDate(today);
var weekday = calendar.getDay();
var daysInMonth = monthlength(month+1,year);
var hilite_start = '| ';
var td_start = ' | ';
var cal = '| ' + moy[month] + ' ' + year + ' | ';
for(dex=0; dex < 7; dex++) {
if(weekday == dex)
cal += td_start + '' + dow[dex] + '';
else
cal += td_start + dow[dex] + '';
}
cal += ' ';
var day2 = today;
for (dex = today; dex > 6; dex -=7)
day2 = dex; weekday -= day2 - 1;
while (weekday < 0)
weekday += 7;
for(dex=0; dex < weekday; dex++)
cal += td_start + ' ';
for(dex=1; dex <= daysInMonth; dex++) {
if(weekday == 7) {
cal += ' ';
weekday = 0;
}
if(today==dex)
cal += hilite_start + dex + '';
else
cal += td_start + dex + '';
weekday += 1;
}
for(dex=weekday; dex < 7; dex++)
cal += td_start + ' ';
cal += '
';
if (document.getElementById) {
var mmb = month;
mm = month + 1;
var yya = yyb = yy;
if (mmb <1) {
mmb += 12; yyb--;
}
var mma = month + 2;
if (mma > 12) {
mma -= 12; yya++;
}
var yb = yy -1;
var ya = yy +1;
cal += ' ';} else {cal += ' ';} cal += ' |