/* Adopted from existing calendar code:
	By Oliver Bryant
	http://calendar.swazz.org
*/

function checkClick(e) {
	// Get the object where the user clicked
	e?evt=e:evt=event;
	CSE=evt.target?evt.target:evt.srcElement;
	
	var calObj = $('fc');
	if (calObj.visible()){
		if (!Element.descendantOf(CSE,calObj)){
			calObj.hide();
		}
	}
}

function lcs(ielem) {
	updobj=ielem;
	
	var ePos = Position.cumulativeOffset(updobj);

	$('fc').setStyle({left: ePos[0]+"px",top: (ePos[1]+20)+"px",display: "block"});

	// First check date is valid
	curdt=ielem.value;
	curdtarr=curdt.split('/');
	isdt=true;
	for(var k=0;k<curdtarr.length;k++) {
		if (isNaN(curdtarr[k]))
			isdt=false;
	}
	if (isdt&(curdtarr.length==3)) {
		cm=curdtarr[0]-1;
		cy=curdtarr[2];
		prepcalendar(curdtarr[0]-1,curdtarr[2]);
	}
	
}

function evtTgt(e)
{
	var el;
	if(e.target)el=e.target;
	else if(e.srcElement)el=e.srcElement;
	if(el.nodeType==3)el=el.parentNode; // defeat Safari bug
	return el;
}
function EvtObj(e){if(!e)e=window.event;return e;}
function cs_over(e) {
	evtTgt(EvtObj(e)).style.background='#77A558';
}
function cs_out(e) {
	evtTgt(EvtObj(e)).style.background='#014268';
}
function cs_click(e) {
	updobj.value=calvalarr[evtTgt(EvtObj(e)).id.substring(1,evtTgt(EvtObj(e)).id.length)];
	$('fc').hide();	
}
function cs_cancel(e) {
	$('fc').hide();	
}

// day selected
function prepcalendar() {
	if(typeof(cm) == 'undefined' && typeof(cy) == 'undefined'){
		now = new Date(dataEnd);
		sccm=now.getMonth();
		sccy=now.getFullYear();
		
		cm=now.getMonth();
		cy=now.getFullYear();
	}
	var sd=now.getDate();
	var td=new Date();
	td.setDate(1);
	td.setFullYear(cy);
	td.setMonth(cm);
	var cd=td.getDay();
	$('mns').innerHTML=mn[cm]+ ' ' + cy;
	marr=((cy%4)===0)?mnl:mnn;
	for(var d=1;d<=42;d++) {
		var tdCell = $('v'+parseInt(d));
		if ((d >= (cd -(-1))) && (d<=cd-(-marr[cm]))) {
			dip=((d-cd < sd)&&(cm==sccm)&&(cy==sccy));
			Event.observe(tdCell,'mouseover',cs_over);
			Event.observe(tdCell,'mouseout',cs_out);
			Event.observe(tdCell,'click',cs_click);

			tdCell.innerHTML=d-cd;	
			var calDate = (d-cd) < 10 ? "0"+(d-cd).toString() : (d-cd);
			var calMonth = (cm-(-1)) < 10 ? "0"+(cm-(-1)).toString() : (cm-(-1));
			calvalarr[d]=''+calMonth+'/'+calDate+'/'+cy;
		}
		else {
			tdCell.innerHTML='&nbsp;';
			tdCell.style.cursor='default';
		}
	}
}

function caddm() {
	marr=((cy%4)===0)?mnl:mnn;
	cm++;
	if (cm>=12) {
		cm=0;
		cy++;
	}
	prepcalendar();
}

function csubm() {
	marr=((cy%4)===0)?mnl:mnn;
	cm--;
	if (cm<0) {
		cm=11;
		cy--;
	}
	prepcalendar();
}

// Create default calendar when page loads
function initCal(){
	document.write('<table id="fc" style="display:none" cellpadding=2>');
	document.write('<tr><td class="cal_arrow" onclick="csubm()">&laquo;</td><td colspan=5 id="mns" class="cal_month"></td><td align="right" class="cal_arrow" onclick="caddm()">&raquo;</td></tr>');
	document.write('<tr class="cal_heading"><td>S</td><td>M</td><td>T</td><td>W</td><td>T</td><td>F</td><td>S</td></tr>');
	for(var kk=1;kk<=6;kk++) {
		document.write('<tr>');
		for(var tt=1;tt<=7;tt++) {
			num=7 * (kk-1) - (-tt);
			document.write('<td class="cal_cell" id="v' + num + '">&nbsp;</td>');
		}
		document.write('</tr>');
	}
	document.write("<tr><td colspan=7><a href='javascript: cs_cancel()' class='cal_cancel'>Close<img src='../../../../sentalis-framework/lib/jslib/greybox/cross.png' align='absmiddle' /></a></td></tr>");
	document.write('</table>');	
	
	Event.observe(document,'click',checkClick);
}

// global calendar variables
var mn=new Array('JAN','FEB','MAR','APR','MAY','JUN','JUL','AUG','SEP','OCT','NOV','DEC');
var mnn=new Array('31','28','31','30','31','30','31','31','30','31','30','31');
var mnl=new Array('31','29','31','30','31','30','31','31','30','31','30','31');
var calvalarr=new Array(42);

// When page loads, initialize calendar
initCal();