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

Update:
Gene Bechtold
http://www.bechtold.biz
24/07/2008
 */


function getObj(objID)
{
    if (document.getElementById) {return document.getElementById(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 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
var now = new Date;
var sccd=now.getDate();
var sccm=now.getMonth();
var sccy=now.getFullYear();
var ccm=now.getMonth();
var ccy=now.getFullYear();
var searchUrl='';
document.write('<div id="fc" class="action-calendar">');	

document.write('<div  class="bg-top">');
document.write('<!-- ... --></div>');
document.write('<div  class="bg-bottom">');	
document.write('<div style="width:180px;overflow:hidden;margin-left:6px;">');	
document.write('<table id="calendar-table" "cellspacing=0">');
document.write('<tr class="days"><td>M</td><td>T</td><td>O</td><td>T</td><td>F</td><td>L</td><td>S</td></tr>');
for(var kk=1;kk<=6;kk++) {
    if(kk == 6)
        document.write('<tr class="numbers" id="trLastRow">');
    else
      if(kk == 5)
        document.write('<tr class="numbers" id="trSecLastRow">');
      else
    	  if(kk == 4)
    		  document.write('<tr class="numbers" id="trThirdLastRow">');
    	  else
    		  document.write('<tr class="numbers">');
	    
	for(var tt=1;tt<=7;tt++) {
		num=7 * (kk-1) - (-tt);
		document.write('<td id="v' + num + '"></td>');
	}
	document.write('</tr>');
}

document.write('<tr class="month_year"><td colspan="7"><div class="arrow_r" onclick="caddm()"></div><div class="arrow_l" onclick="csubm()"></div><span id="mns" class="bottom-month"></span></td></tr>');
document.write('</table>');
document.write('</div>');
document.write('</div>');
document.write('</div>');
document.all?document.attachEvent('onclick',checkClick):document.addEventListener('click',checkClick,false);

var updobj;
function lcs(ielem) {
	updobj=ielem;
	getObj('fc').style.left=Left(ielem) + 'px';
	getObj('fc').style.top=(Top(ielem)+ielem.offsetHeight) + 'px';
	getObj('fc').style.display='block';	
}

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='#cc3399';
	 evtTgt(EvtObj(e)).style.color='#fff';
}
function cs_out(e) {
	 evtTgt(EvtObj(e)).style.background='';
	 evtTgt(EvtObj(e)).style.color='#666';	 
}
function cs_click(e) {
	updobj.value=calvalarr[evtTgt(EvtObj(e)).id.substring(1,evtTgt(EvtObj(e)).id.length)];
	getObj('fc').style.display='none';
	location.href=searchUrl + '?type=arrangement&dag=' + updobj.value.substring(0,2) + updobj.value.substring(3,5) + updobj.value.substring(6,10) + 
												'#dag=' + updobj.value.substring(0,2) + updobj.value.substring(3,5) + updobj.value.substring(6,10);
}

var mn=new Array('Januar','Februar','Marts','April','Maj','Juni','Juli','August','September','October','November','December');
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='';
	obj.style.font='11px verdana';
	obj.style.color='#666';
	obj.style.textDecoration='none';
	//obj.style.border='1px solid #afafaf';
	obj.style.cursor='pointer';
}

function f_cpps(obj) {
	//obj.style.background='#F000';
	obj.style.font='10px Arial';
	obj.style.color='#FF9900';
	obj.style.textDecoration='line-through';
	//obj.style.border='1px solid #6487AE';
	obj.style.cursor='default';
}

function f_hds(obj) {
	//obj.style.background='#000';
	obj.style.font='bold 10px Arial';
	obj.style.color='#333';
	//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() ;
	cd = (cd == 0)? 6: --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])))
		{
			getObj('v'+parseInt(d)).onmouseover=cs_over;
			getObj('v'+parseInt(d)).onmouseout=cs_out;
			getObj('v'+parseInt(d)).onclick=cs_click;
			
			// if today
			if (sccm == cm && sccd == (d-cd) && sccy == cy)
			{
				getObj('v'+parseInt(d)).style.color='#fff', getObj('v'+parseInt(d)).style.background='#b83791',
				getObj('v'+parseInt(d)).style.font='bold 11px verdana';
				getObj('v'+parseInt(d)).onmouseover= null;
				getObj('v'+parseInt(d)).onmouseout= null;
			}
				
			getObj('v'+parseInt(d)).innerHTML=d-cd;
				
			calvalarr[d]=addnull(d-cd,cm-(-1),cy);
			if(d == 29) //show necessary row
				try{getObj('trSecLastRow').style.display = 'table-row';} catch(e){getObj('trSecLastRow').style.display = 'inline';}
			if(d == 36) //show necessary row
			    try{getObj('trLastRow').style.display = 'table-row';}catch(e){getObj('trLastRow').style.display = 'inline';}
		}
		else {
		    if(d == 29) //hide unnecessary row
		        document.getElementById('trSecLastRow').style.display = 'none';
		    if(d == 36) //hide unnecessary row
		        document.getElementById('trLastRow').style.display = 'none';
		    
			getObj('v'+d).innerHTML='&nbsp;';
			getObj('v'+parseInt(d)).onmouseover=null;
			getObj('v'+parseInt(d)).onmouseout=null;
			getObj('v'+parseInt(d)).onclick=null;
			getObj('v'+parseInt(d)).style.cursor='default';
			}
	}
}

prepcalendar('',ccm,ccy);

function caddm() {
	marr=((ccy%4)==0)?mnl:mnn;
	
	ccm+=1;
	if (ccm>=12) {
		ccm=0;
		ccy++;
	}
	prepcalendar('',ccm,ccy);
}

function csubm() {
	marr=((ccy%4)==0)?mnl:mnn;

	ccm-=1;
	if (ccm<0) {
		ccm=11;
		ccy--;
	}
	prepcalendar('',ccm,ccy);
}

function today() {
	updobj.value=addnull(now.getDate(),now.getMonth()+1,now.getFullYear());
	getObj('fc').style.display='none';
	prepcalendar('',sccm,sccy);
}

function addnull(d,m,y)
{
	var d0='',m0='';
	if (d<10)d0='0';
	if (m<10)m0='0';
	
	return ''+d0+d+'-'+m0+m+'-'+y;
}