/**
 * Simple Date Selector Calendar
 * Modified version of http://calendar.swazz.org/
 * <script type="text/javascript" src="/js/swazzcalendar.js"></script>
 * <input id="date" type="text" value="yyyy-mm-dd" onfocus="this.select(); lcs(this)" onclick="event.cancelBubble=true; this.select(); lcs(this)">
 *
 */
function getObj(objID) {
	if (document.getElementById) {return document.getElementById(objID);}
  else if (document.all) {return document.all[objID];}
  else if (document.layers) {return document.layers[objID];}
}

function checkClick(e) {
	e?evt=e:evt=event;
	CSE=evt.target?evt.target:evt.srcElement;
	if (getObj('fc')) if (!isChild(CSE,getObj('fc'))) getObj('fc').style.display='none';
}

function isChild(s,d) {
	while(s) {
		if (s==d) return true;
		s=s.parentNode;
	}
	return false;
}

function xLeft(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;
}

/*
document.write('<table id="fc" style="z-index: 20000; position:absolute;border-collapse:collapse;background:#FFFFFF;border:1px solid #ABABAB; display:none" cellpadding="2">');
document.write('<tr><td style="cursor:pointer" onclick="csubm()"><!--img src="arrowleftmonth.gif"--><span style="font-size: 0.8em;"><b>&lt;</b></span></td><td colspan=5 id="mns" align="center" style="font:bold 13px Arial"></td><td align="right" style="cursor:pointer" onclick="caddm()"><!--img src="arrowrightmonth.gif"--><span style="font-size: 0.8em;"><b>&gt;</b></span></td></tr>');
document.write('<tr><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">O</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">L</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="v' + num + '" style="width:18px;height:18px">&nbsp;</td>');
	}
	document.write('</tr>');
}
document.write('</table>');
*/

var swcalbuff = '';
swcalbuff += '<table id="fc" style="z-index: 20000; position:absolute; border-collapse:collapse;background:#FFFFFF;border:1px solid #ABABAB; display:none" cellpadding="2">';
swcalbuff += '<tr><td style="cursor:pointer" onclick="csubm()"><!--img src="arrowleftmonth.gif"--><span style="font-size: 0.8em;"><b>&lt;</b></span></td><td colspan=5 id="mns" align="center" style="font:bold 13px Arial"></td><td align="right" style="cursor:pointer" onclick="caddm()"><!--img src="arrowrightmonth.gif"--><span style="font-size: 0.8em;"><b>&gt;</b></span></td></tr>';
swcalbuff += '<tr><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">O</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">L</td><td align=center style="background:#ABABAB;font:12px Arial">S</td></tr>';
for(var kk=1;kk<=6;kk++) {
	swcalbuff += '<tr>';
	for(var tt=1;tt<=7;tt++) {
		num=7 * (kk-1) - (-tt);
		swcalbuff += '<td id="v' + num + '" style="width:18px;height:18px">&nbsp;</td>';
	}
	swcalbuff += '</tr>';
}
swcalbuff += '</table>';

if (document.all) {
	if (document.getElementById('page')) {
		var ndiv = document.createElement("div");
		ndiv.innerHTML = swcalbuff;
		document.body.insertBefore(ndiv, document.getElementById('page'));
	} else {
		document.write(swcalbuff);
	}
	document.attachEvent('onclick',checkClick);
} else {
	document.write(swcalbuff);
	document.addEventListener('click',checkClick,false);
}


// Calendar script
var now = new Date;
var sccm=now.getMonth();
var sccy=now.getFullYear();
var ccm=now.getMonth();
var ccy=now.getFullYear();

var updobj;
function lcs(ielem) {
	updobj=ielem;
	getObj('fc').style.left=xLeft(ielem);
	getObj('fc').style.top=Top(ielem)+ielem.offsetHeight;
	getObj('fc').style.display='';
	// 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)) {
		ccy=curdtarr[0];
		ccm=curdtarr[1]-2;
		// ccm=curdtarr[1]-1;
		// ccy=curdtarr[2];
		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) {
	updobj.value=calvalarr[evtTgt(EvtObj(e)).id.substring(1,evtTgt(EvtObj(e)).id.length)];
	getObj('fc').style.display='none';
	
}

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) {
	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) {
	now=new Date();
	sd=now.getDate();
	td=new Date();
	td.setDate(1);
	td.setFullYear(cy);
	td.setMonth(cm);
	cd=td.getDay()-1;
	// Fix by Svein - missing first week if 1'st get on sunday
	if (cd==-1) cd = 6;
	//alert(cd);
	getObj('mns').innerHTML=mn[cm]+ ' ' + cy;
	marr=((cy%4)==0) ? mnl:mnn;
	for (var d=1;d<=42;d++) {
		f_cps(getObj('v'+parseInt(d)));
		if ((d >= (cd -(-1))) && (d<=cd-(-marr[cm]))) {
			dip = ((d-cd < sd)&&(cm==sccm)&&(cy==sccy));
			htd = ((hd!='')&&(d-cd==hd));
			dip = false;
			if (dip) f_cpps(getObj('v'+parseInt(d)));
			else if (htd) f_hds(getObj('v'+parseInt(d)));
			else f_cps(getObj('v'+parseInt(d)));
			getObj('v'+parseInt(d)).onmouseover=(dip)?null:cs_over;
			getObj('v'+parseInt(d)).onmouseout=(dip)?null:cs_out;
			getObj('v'+parseInt(d)).onclick=(dip)?null:cs_click;
			getObj('v'+parseInt(d)).innerHTML= d-cd + '';	
			// calvalarr[d]=''+(d-cd)+'/'+(cm-(-1))+'/'+cy; // us style
			
			tmpm = ((cm-(-1))<10) ? '0'+(cm-(-1)) : (cm-(-1));
			tmpd = ((d-cd)<10) ? '0'+(d-cd) : (d-cd);
			
			calvalarr[d] = cy+'-'+tmpm+'-'+tmpd;
			
		} else {
			getObj('v'+d).innerHTML='&nbsp;';
			getObj('v'+parseInt(d)).onmouseover=null;
			getObj('v'+parseInt(d)).onmouseout=null;
			getObj('v'+parseInt(d)).style.cursor='default';
		}
	}
}

prepcalendar('',ccm,ccy);
//getObj('fc'+cc).style.visibility='hidden';

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 {
		return;
		ccy=sccy;
		ccm=sccm;
		alert(ccy);
		//alert(scfd);
		//cfd=scfd;
	}
}

