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('calender'))
                if (!isChild(CSE,getObj('calender')))
                        getObj('calender').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;
}

document.write('<table id="calender" cellpadding="3" cellspacing="0" border="0" style="position: absolute; border-collapse: collapse; background: #EDEBE7; display: none;">');
document.write('<tr style="border: 1px solid #CCCCCC;"><td id="tableleft" style="cursor: default;" onClick="csubm()"><img src="images/icons/buttons/pfeil_left_inactive.gif" id="buttonleft" width="20" height="20" border="0" alt="zur&uuml;ck" title="zur&uuml;ck" /></td><td colspan="5" id="mns" align="center" valign="center" style="font-weight: bold;"></td><td align="right" style="cursor: pointer" onClick="caddm()"><img src="images/icons/buttons/pfeil_right.gif" width="20" height="20" border="0" alt="weiter" title="weiter" /></td></tr>');
document.write('<tr style="border: 1px solid #CCCCCC; background: #CCCCCC;"><td align="center" valign="center" height="20">So</td><td align="center" valign="center" height="20">Mo</td><td align="center" valign="center" height="20">Di</td><td align="center" valign="center" height="20">Mi</td><td align="center" valign="center" height="20">Do</td><td align="center" valign="center" height="20">Fr</td><td align="center" valign="center" height="20">Sa</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: 20px; height: 20px;">&nbsp;</td>');
        }
        document.write('</tr>');
}
document.write('</table>');

document.all?document.attachEvent('onclick',checkClick):document.addEventListener('click',checkClick,false);


// Calendar script
var now = new Date;
var sccm=now.getMonth();
var sccy=now.getFullYear();
var ccm=now.getMonth();
var ccm1=now.getMonth();
var ccy=now.getFullYear();

var updobj;
function cal_datepicker(ielem) {
        updobj=ielem;
        getObj('calender').style.left=Left(ielem) + ielem.offsetWidth + 10 + 'px';
        getObj('calender').style.top=Top(ielem) + 'px';
        getObj('calender').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)) {
                ccm=curdtarr[1]-1;
                ccy=curdtarr[2];
                prepcalendar(curdtarr[0],curdtarr[1]-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='#309EE3';
        evtTgt(EvtObj(e)).style.color='#FFFFFF';
}
function cs_out(e) {
        evtTgt(EvtObj(e)).style.background='#EDEBE7';
        evtTgt(EvtObj(e)).style.color='#000000';
}
function cs_click(e) {
        updobj.value=calvalarr[evtTgt(EvtObj(e)).id.substring(1,evtTgt(EvtObj(e)).id.length)];
        getObj('calender').style.display='none';

}

var mn=new Array('Januar','Februar','M&auml;rz','April','Mai','Juni','Juli','August','September','Oktober','November','Dezember');
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='#EDEBE7';
        obj.style.fontSize='11px';
        obj.style.fontWeight='normal';
        obj.style.color='#000000';
        obj.style.textAlign='center';
        obj.style.textDecoration='none';
        obj.style.border='1px solid #CCCCCC';
        obj.style.cursor='pointer';
}

function f_cpps(obj) {
        obj.style.background='#EDEBE7';
        obj.style.fontSize='11px';
        obj.style.fontWeight='normal';
        obj.style.color='#CCCCCC';
        obj.style.textAlign='center';
        obj.style.textDecoration='none';
        obj.style.border='1px solid #CCCCCC';
        obj.style.cursor='default';
}

function f_hds(obj) {
        obj.style.background='#309EE3';
        obj.style.fontSize='11px';
        obj.style.fontWeight='bold';
        obj.style.color='#FFFFFF';
        obj.style.textAlign='center';
        obj.style.border='1px solid #CCCCCC';
        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();
        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));
                        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;

                        cm_month = (cm-(-1) < 10) ? '0' + (cm-(-1)) : (cm-(-1));
                        cd_day = ((d-cd) < 10) ? '0' + (d-cd) : (d-cd);

                        calvalarr[d]=cd_day+'.'+cm_month+'.'+cy;
                }
                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);

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

        ccm+=1;
        if (ccm>=12) {
                ccm=0;
                ccy++;
        }

        getObj('buttonleft').src = 'images/icons/buttons/pfeil_left.gif';
        getObj('tableleft').style.cursor = 'pointer';

        cdayf();
        prepcalendar('',ccm,ccy);
}

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

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

        if (ccm == ccm1) {
                getObj('buttonleft').src = 'images/icons/buttons/pfeil_left_inactive.gif';
                getObj('tableleft').style.cursor = 'default';
        }

        cdayf();
        prepcalendar('',ccm,ccy);
}

function cdayf() {
if ((ccy>sccy)|((ccy==sccy)&&(ccm>=sccm)))
        return;
else {
        ccy=sccy;
        ccm=sccm;
     }
}