var cal_months=new Array("January","February"," March"," April"," May"," June"," July"," August"," September"," October"," November"," December");
var cal_days=new Array("S","M","T","W","R","F","S");
var cal_cbf;
var cal_savedBody;
var cal_savedWinc;
var cal_savedDiv;
var cal_savedFrame;
var cal_calldoc;
var cal_currentSetting;
var cal_backgroundcolor='#b5c7e7';
var cal_firstDate;
var cal_lastDate;
var cal_setDate;
function showCalSelf(d, callback, fd, ld){
if (!cal_checkUserAgent()) return;
if (cal_savedBody){
cal_close();
return;
}
cal_setDate=d;
cal_cbf=callback;
cal_savedBody=document.body.innerHTML;
cal_calldoc=document;
document.body.innerHTML=cal_getHTML("");
cal_currentSetting=new Date(d);
cal_firstDate=fd;
cal_lastDate=ld;
cal_draw();
return;
}
function showCalPop(d, callback,e, fd, ld){
if (!cal_checkUserAgent()){
return;
}
if (cal_savedWinc){
cal_close();
return;
}
cal_cbf=callback;
cal_savedWinc = window.open('','cal'+(''+new Date()).replace(new RegExp('[^A-Za-z0-9]','g'),''),'toolbar=no,location=no,directories=no,status=no,menubar=no,scrollbars=no,resizable=yes,copyhistory=no,width=450,height=300,left='+cal_getScreenX(e)+',screenX='+cal_getScreenX(e)+',top='+cal_getScreenY(e)+',screenY='+cal_getScreenY(e)+'');
cal_calldoc = cal_savedWinc.document;
cal_calldoc.open();
cal_calldoc.write("Calendar"+cal_getHTML("window.opener.")+"");
cal_calldoc.close();
cal_currentSetting=new Date(d);
cal_firstDate=fd;
cal_lastDate=ld;
cal_draw();
return;
}
function showCalDiv(d, callback, e, fd, ld){
showCalDivOffset(d,callback,e,fd,ld,0,20);
}
function cal_checkUserAgent(){
var ua=navigator.userAgent.toLowerCase();
// Calendar can freeze IE 5.2 on the Mac, disable it.
if (ua.indexOf('msie')!=-1 && ua.indexOf('mac')!=-1 && ua.indexOf('5.')!=-1){
return false;
}
return true;
}
function showCalDivOffset(d, callback, e, fd, ld, xOff, yOff){
if (!cal_checkUserAgent()) return;
if (cal_savedDiv){
cal_close();
return;
}
cal_setDate=d;
cal_cbf=callback;
cal_calldoc=document;
cal_savedDiv=document.createElement('div');
cal_savedDiv.innerHTML=cal_getHTML("window.");
cal_savedDiv.style.position='absolute';
cal_savedDiv.style.top=cal_getMouseY(e)+yOff;
cal_savedDiv.style.left=cal_getMouseX(e)+xOff;
// Use an iframe to hide select form elements under the
// calendar in Internet Explorer
cal_savedFrame=document.createElement('iframe');
cal_savedFrame.style.border='none';
cal_savedFrame.style.position='absolute';
cal_savedFrame.style.top=cal_getMouseY(e)+yOff;
cal_savedFrame.style.left=cal_getMouseX(e)+xOff;
cal_savedFrame.style.width='150px';
cal_savedFrame.style.height='140px';
document.body.appendChild(cal_savedFrame);
document.body.appendChild(cal_savedDiv);
cal_currentSetting=new Date(d);
cal_firstDate=fd;
cal_lastDate=ld;
cal_draw();
return;
}
function cal_getHTML(wR){
var s = "";
s+="
";
s+="
";
s+=cal_getDF(wR);
s+="
";
s+="
";
s+=cal_getBody(wR);
s+="
";
s+="
";
s+="";
return s;
}
function cal_getDF(wR){
var s="";
s+="
";
s+="
";
s+="
";
s+="
";
s+="
";
s+="
";
return s;
}
function cal_getBody(wR){
var s="";
s+="
";
s+=cal_getWDayH(wR);
s+=cal_getDays(wR);
s+="
";
return s;
}
function cal_getWDayH(wR){
var s="";
s+="
";
for (var i=0;i";
s+="
";
return s;
}
function cal_getDays(wR){
var s="";
var k=1;
for (var j=0;j<6;j++){
s+="
";
for (var i=0;i";
s+="
";
}
return s;
}
function cal_getScreenX(e){
if (!e && window.event) e = window.event;
if (e && e.screenX) return e.screenX;
return 0;
}
function cal_getScreenY(e){
if (!e && window.event) e = window.event;
if (e && e.screenY) return e.screenY;
return 0;
}
function cal_getMouseX(e){
if (!e && window.event) e = window.event;
if (e && e.pageX) return e.pageX;
if (e && e.clientX) return e.clientX + document.body.scrollLeft;
return 50;
}
function cal_getMouseY(e){
if (!e && window.event) e = window.event;
if (e && e.pageY) return e.pageY;
if (e && e.clientY) return e.clientY + document.body.scrollTop;
return 50;
}
function cal_setToday(){
cal_currentSetting = new Date();
cal_draw();
}
function cal_dCb(dateIndex){
cal_currentSetting.setDate(1);
var subtract = cal_currentSetting.getDay();
if (subtract <= 2) subtract += 7;
var workingDate = new Date(cal_currentSetting);
var dateCorrection=dateIndex-subtract-1;
for (var i=0; idateCorrection; i1--){
workingDate.setMilliseconds(-86400000);
}
if (cal_dcomp(cal_firstDate,workingDate) <= 0 && cal_dcomp(cal_lastDate,workingDate) >= 0){
cal_close();
cal_cbf(workingDate);
}
}
function cal_close(){
if (cal_savedBody) cal_calldoc.body.innerHTML = cal_savedBody;
if (cal_savedWinc) cal_savedWinc.close();
if (cal_savedDiv) document.body.removeChild(cal_savedDiv);
if (cal_savedFrame) document.body.removeChild(cal_savedFrame);
cal_savedBody=cal_savedWinc=cal_savedDiv=null;
}
function cal_prevMonth(){
cal_currentSetting.setDate(1);
var month = cal_currentSetting.getMonth();
while (month == cal_currentSetting.getMonth()){
cal_currentSetting.setMilliseconds(-86400000);
}
cal_draw();
}
function cal_nextMonth(){
cal_currentSetting.setDate(28);
var month = cal_currentSetting.getMonth();
while (month == cal_currentSetting.getMonth()){
cal_currentSetting.setMilliseconds(86400000);
}
cal_draw();
}
function cal_dcomp(d1, d2){
if (!d1 || !d2) return 0;
if (d1.getYear() == d2.getYear()){
if (d1.getMonth() == d2.getMonth()){
return d1.getDate() - d2.getDate();
}
return d1.getMonth()-d2.getMonth();
}
return d1.getYear()-d2.getYear();
}
function cal_draw(){
var today = new Date();
cal_currentSetting.setDate(1);
var year = cal_currentSetting.getFullYear();
var month = cal_currentSetting.getMonth();
cal_calldoc.getElementById("cal_monthyear").innerHTML=cal_months[month]+" "+year;
var workingDate = new Date(cal_currentSetting);
var subtract = cal_currentSetting.getDay();
if (subtract <= 2) subtract += 7;
workingDate.setMilliseconds(-subtract*86400000);
for(var dayCount=1; dayCount <= 42; dayCount++){
var field = cal_calldoc.getElementById("cal_c"+dayCount);
field.innerHTML = workingDate.getDate();
var bgcolor = '#ffffff';
var bordcolor = '#ffffff';
var fgcolor = '#000000';
if (cal_dcomp(cal_firstDate,workingDate) > 0 || cal_dcomp(cal_lastDate,workingDate) < 0){
bgcolor = '#666666';
bordcolor = '#cccccc';
fgcolor = '#cccccc';
} else if (workingDate.getMonth() != month){
bgcolor = '#DAE4EA';
bordcolor = '#DAE4EA';
fgcolor = '#999999';
} else if (cal_dcomp(workingDate, cal_setDate) == 0){
bgcolor = '#FFCC66';
bordcolor = '#000000';
fgcolor = '#000000';
} else if (cal_dcomp(workingDate, today) == 0){
bordcolor = '#999999';
} else if (workingDate.getDay() == 0 || workingDate.getDay() == 6){
}
field.style.backgroundColor = bgcolor;
field.style.borderColor = bordcolor;
field.style.color = fgcolor;
workingDate.setMilliseconds(86400000);
}
}
