/* --- Swazz Javascript Calendar ---
/* --- v 1.0 3rd November 2006
By Oliver Bryant
http://calendar.swazz.org 

Optimized for Spitfire
*/



function Calendar (ielem, suffix)
{
	var ielem = ielem;
	var suffix = suffix ? suffix : "";
	
	var now = new Date;
	var sccm=now.getMonth();
	var sccy=now.getFullYear();
	var ccm=now.getMonth();
	var ccy=now.getFullYear();
	
	
	function checkClick(e) {
		var fcobj = document.getElementById (ielem+'_fc');
		e?evt=e:evt=event;
		CSE=evt.target?evt.target:evt.srcElement;
		if (fcobj && !isChild(CSE,fcobj))
			fcobj.style.display='none';
	}
	
	function isChild(s,d) {
		while(s) {
			if (s==d) 
				return true;
			s=s.parentNode;
		}
		return false;
	}
	
	function Left(obj)
	{
		var curleft = 0;
		if (obj.offsetParent)
		{
			while (obj.offsetParent)
			{
				curleft += obj.offsetLeft
				obj = obj.offsetParent;
			}
		}
		else if (obj.x)
			curleft += obj.x;
		return curleft;
	}
	
	function Top(obj)
	{
		var curtop = 0;
		if (obj.offsetParent)
		{
			while (obj.offsetParent)
			{
				curtop += obj.offsetTop
				obj = obj.offsetParent;
			}
		}
		else if (obj.y)
			curtop += obj.y;
		return curtop;
	}
		
	
	// Calendar script
	this.lcs = function (event) {
		var fcobj = document.getElementById (ielem+'_fc');
		var updobj = document.getElementById (ielem);
		
		event.cancelBubble=true;
		fcobj.style.left=Left(updobj);
		fcobj.style.top=Top(updobj);
		fcobj.style.display='';
		fcobj.style.left=Left(updobj) + updobj.offsetWidth - fcobj.offsetWidth;
		
		// First check date is valid
		curdt=updobj.value;
		curdt=curdt.split(' ')[0];
		curdtarr=curdt.split('-');
		isdt=true;
		for(var k=0;k<curdtarr.length;k++) {
			if (isNaN(curdtarr[k]))
				isdt=false;
		}
		if (isdt&(curdtarr.length==3)) {
			ccm=curdtarr[1]-1;
			ccy=curdtarr[0];
			prepcalendar(curdtarr[2],curdtarr[1]-1,curdtarr[0]);
		}
	}
	
	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='#FFCC66';
	}
	function cs_out(e) {
		evtTgt(EvtObj(e)).style.background='#C4D3EA';
	}
	function cs_click(e) {
		var updobj = document.getElementById (ielem);
		var fcobj = document.getElementById (ielem+'_fc');
		updobj.value=calvalarr[evtTgt(EvtObj(e)).id.replace(/.*_v/, "")] + suffix;
		fcobj.style.display='none';
		
		var event = document.createEvent('KeyEvents');
		event.initKeyEvent('keyup', true, true, null, false, false, false, false, null, 0);
		updobj.dispatchEvent(event);
	}
	
	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);
	
	function f_cps(obj) {
		obj.style.background='#C4D3EA';
		obj.style.font='10px Arial';
		obj.style.color='#333333';
		obj.style.textAlign='center';
		obj.style.textDecoration='none';
		obj.style.border='1px solid #6487AE';
		obj.style.cursor='pointer';
	}
	
	function f_cpps(obj) {2008-05-24
		obj.style.background='#C4D3EA';
		obj.style.font='10px Arial';
		obj.style.color='#ABABAB';
		obj.style.textAlign='center';
		obj.style.textDecoration='line-through';
		obj.style.border='1px solid #6487AE';
		obj.style.cursor='default';
	}
	
	function f_hds(obj) {
		obj.style.background='#FFF799';
		obj.style.font='bold 10px Arial';
		obj.style.color='#333333';
		obj.style.textAlign='center';
		obj.style.border='1px solid #6487AE';
		obj.style.cursor='pointer';
	}
	
	// day selected
	function prepcalendar(hd,cm,cy) {
		var mnsobj = document.getElementById (ielem+'_mns');
		
		now=new Date();
		sd=now.getDate();
		td=new Date();
		td.setDate(1);
		td.setFullYear(cy);
		td.setMonth(cm);
		cd=td.getDay();
		mnsobj.innerHTML=mn[cm]+ ' ' + cy;
		marr=((cy%4)==0)?mnl:mnn;
		for(var d=1;d<=42;d++) {
			var v = document.getElementById(ielem+'_v'+d);
			f_cps(v);
			if ((d >= (cd -(-1))) && (d<=cd-(-marr[cm]))) {
				dip=((d-cd < sd)&&(cm==sccm)&&(cy==sccy));
				htd=((hd!='')&&(d-cd==hd));
				if (dip)
					f_cpps(v);
				else if (htd)
					f_hds(v);
				else
					f_cps(v);
	
				v.onmouseover=(dip)?null:cs_over;
				v.onmouseout=(dip)?null:cs_out;
				v.onclick=(dip)?null:cs_click;
				
				v.innerHTML=d-cd;	
				calvalarr[d]=''+cy+'-'+((cm-(-1))<=9 ? '0' : '')+(cm-(-1))+'-'+((d-cd)<=9 ? '0' : '')+(d-cd);
			}
			else {
				v.innerHTML='&nbsp;';
				v.onmouseover=null;
				v.onmouseout=null;
				v.style.cursor='default';
				}
		}
	}
	
	function caddm() {
		marr=((ccy%4)==0)?mnl:mnn;
		
		ccm+=1;
		if (ccm>=12) {
			ccm=0;
			ccy++;
		}
		cdayf();
		prepcalendar('',ccm,ccy);
	}
	
	function csubm() {
		marr=((ccy%4)==0)?mnl:mnn;
		
		ccm-=1;
		if (ccm<0) {
			ccm=11;
			ccy--;
		}
		cdayf();
		prepcalendar('',ccm,ccy);
	}
	
	function cdayf() {
		if ((ccy>sccy)|((ccy==sccy)&&(ccm>=sccm)))
			return;
		else {
			ccy=sccy;
			ccm=sccm;
		}
	}

	
	document.write('<table id="'+ielem+'_fc" style="position:absolute;border-collapse:collapse;background:#FFFFFF;border:1px solid #ABABAB;display:none" cellpadding=2>');
	document.write('<tr><td id="'+ielem+'_csubm"  style="cursor:pointer"><img src="lib/calendar/arrowleftmonth.png"></td><td colspan=5 id="'+ielem+'_mns" align="center" style="font:bold 13px Arial"></td><td id="'+ielem+'_caddm"  align="right" style="cursor:pointer"><img src="lib/calendar/arrowrightmonth.png"></td></tr>');
	document.write('<tr><td align=center style="background:#ABABAB;font:12px Arial">S</td><td align=center style="background:#ABABAB;font:12px Arial">M</td><td align=center style="background:#ABABAB;font:12px Arial">T</td><td align=center style="background:#ABABAB;font:12px Arial">W</td><td align=center style="background:#ABABAB;font:12px Arial">T</td><td align=center style="background:#ABABAB;font:12px Arial">F</td><td align=center style="background:#ABABAB;font:12px Arial">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 id="'+ielem+'_v' + num + '" style="width:18px;height:18px">&nbsp;</td>');
		}
		document.write('</tr>');
	}
	document.write('</table>');
	
	document.addEventListener('click',checkClick,false);
	document.getElementById (ielem+'_csubm').addEventListener('click',csubm,false);
	document.getElementById (ielem+'_caddm').addEventListener('click',caddm,false);
	
	prepcalendar('',ccm,ccy);
}