gstrmauw=0;

function finnerterminkal () {
vtermin_akt_tag = daktzeit.getDate();
vtermin_akt_mon = daktzeit.getMonth();
var vaktmon = daktzeit.getMonth()-1;
var vaktjah = daktzeit.getFullYear();
if (vaktmon<0) {vaktmon=11; vaktjah=vaktjah-1;}
document.write("<select id='selekt' size='1' onchange='ftage_einfuegen();' style='text-align: center; background-color: rgb("+vp_bgrandl+"); color: #006; width: 120px; font-size: 8pt; font-family: Times New Roman,Times,serif; border: 1px solid rgb("+vp_bgrandr+");'><option>"+amonate[vaktmon]+" "+vaktjah+"<\/option><option selected='selected'>"+amonate[daktzeit.getMonth()]+" "+daktzeit.getFullYear()+"<\/option>");
vaktjah = daktzeit.getFullYear();
for (i=1;i<11;i++) {
	var vaktmon = daktzeit.getMonth()+i;
	if (vaktmon>11) {vaktmon=vaktmon-12; vaktjah=daktzeit.getFullYear()+1;}
	document.write("<option>"+amonate[vaktmon]+" "+vaktjah+"<\/option>");
}
document.write("<\/select><br><table style='cursor: default; color:#339; border-style: none; text-align: center; font-family: Arial,Helvetica,sans-serif; font-size: 8pt; margin-top: 7px;' border='0' cellpadding='0' cellspacing='0'><tbody><tr id='kal_tr'>");
var aw_t = new Array("KW", "Mo", "Di", "Mi", "Do", "Fr", "Sa", "So");
var vtdbg = "<td style='color:#339; width: ";
document.write(vtdbg+"23px;'>"+aw_t[0]+"<\/td>"+vtdbg+"3px; font-size: 1px;'>&nbsp;<\/td>");
for (i=1;i<8;i++) {
	document.write(vtdbg+"18px;' id='aw_t"+i+"'>"+aw_t[i]+"<\/td>");
}
document.write("<\/tr><tr><td colspan='9' rowspan='1'><img style='width: 152px; height: 1px;' alt='' src='bg/kaltopstr.png'><\/td>");
for (j=0;j<6;j++) {
	document.write("<\/tr><tr><td style='line-height: 4px;'>&nbsp;<\/td><td><\/td><td colspan='7' rowspan='1'><\/td>");
	document.write("<\/tr><tr><td id='kw"+(j+1)+"' style='height: 18px; text-align: left; padding-left: 2px; color:#007'>&nbsp;<\/td><td id='kalstr"+j+"'><\/td>");
	for (i=1;i<8;i++) {
		document.write("<td id='w_t"+(j*7+i)+"' onmousedown='if (this.firstChild.nodeValue!=\" \") ftermintagauswahl(this);' onmouseover='if (this.firstChild.nodeValue!=\" \") this.style.border=\"1px solid rgb(172,167,204)\";' onmouseout='if (this.firstChild.nodeValue!=\" \") this.style.border=\"none\";' style=''>&nbsp;<\/td>");
	}
}
document.write("<\/tr><\/tbody><\/table>");
ftage_einfuegen();
}
function ftage_einfuegen () {

// -- KAL löschen run

for (i=1;i<7;i++) {
	document.getElementById("kw"+i).style.backgroundImage="";
	document.getElementById("kalstr"+(i-1)).style.backgroundImage="";
}
var ow_t;
for (i=1;i<43;i++) {
	ow_t=document.getElementById("w_t"+i);
	ow_t.firstChild.nodeValue=" ";
	ow_t.style.backgroundImage="";
	ow_t.style.fontWeight="";
	ow_t.style.cursor="default";
	ow_t.style.color="";
}

// -- KAL löschen end

var num = document.getElementById("selekt").selectedIndex;
var vselect_mon = daktzeit.getMonth()+num-1;
var vselect_jah = daktzeit.getFullYear();
if (vselect_mon<0) {vselect_mon=vselect_mon+12; vselect_jah=vselect_jah-1;}
if (vselect_mon>11) {vselect_mon=vselect_mon-12; vselect_jah=vselect_jah+1;}
vtrm_sel_mon = vselect_mon+1;
vtrm_sel_jah = vselect_jah;
var dselect = new Date(vselect_jah, vselect_mon, 1);

// -- Wochenzahl run

var vrunjahr=new Date(dselect.getFullYear(),0,4);
var vrunwtag=vrunjahr.getDay();
if (!vrunwtag) vrunwtag=7;
var vendwtag=dselect.getDay();
if (!vendwtag) vendwtag=7;
var vtage=Math.floor((dselect-vrunjahr)/86400000);
var vvolletage=vtage+vrunwtag-vendwtag;
var vwochen=Math.round(vvolletage/7+1);
if (!vwochen) {var vrueckjahr=1;} else {var vrueckjahr=0;}
var vrunjahrerst=new Date(dselect.getFullYear()-vrueckjahr,0,1);
var vrunwtagerst=vrunjahrerst.getDay();
var vrunjahrletzt=new Date(dselect.getFullYear(),11,31);
var vrunwtagletzt=vrunjahrletzt.getDay();
if (vrunwtagerst==4||vrunwtagletzt==4) {var vwochen_ok=0;} else {var vwochen_ok=1;}
var vletztewzahl=0;

// -- wochenzahl end

// -- Tageszahl run

var vstartwochentag = dselect.getDay();
if (vstartwochentag==0) vstartwochentag=7;
for (j=31;j>27;j--) {
	dselect.setDate(j);
	if (dselect.getMonth()==vselect_mon) break;
	dselect.setMonth(vselect_mon);
}

// -- Tageszahl end

// -- Zahlen schreiben run

var okw6=document.getElementById("kw6");
for (i=1;i<7;i++) { // KW write
	if (i==6) {
		if ((vstartwochentag+j)<37) { // KW6 fehlt
			okw6.firstChild.nodeValue=" ";
			break;
		}
	}
	if (vwochen==0&&i==1&&vwochen_ok) vletztewzahl=52;
	if (vwochen==0&&i==1&&!vwochen_ok) vletztewzahl=53;
	if ((i+vwochen-1)>52&&vwochen_ok) vwochen=vwochen-52;
	if ((i+vwochen-1)>53&&!vwochen_ok) vwochen=vwochen-53;
	document.getElementById("kw"+i).firstChild.nodeValue = i+vwochen-1+vletztewzahl;
	vletztewzahl=0;
}
var objnum;
var atrm_anzahl = vtrm_anzahl.split(",");
for (i=1;i<=j;i++) { // WT write
	objnum = document.getElementById("w_t"+(i+vstartwochentag-1));
	objnum.firstChild.nodeValue = i;
	objnum.style.cursor="pointer";
	for (k=0;k<atrm_anzahl.length;k++) { // TRM markieren
		if (atrm_anzahl[k]==(vtrm_sel_mon+"_"+i)) {
			objnum.style.fontWeight= "bold";
			objnum.style.color= "#E03";
			break;
		}
	}
}
vtrm_str_tag = vstartwochentag;
var akt_tag_pos = vstartwochentag+vtermin_akt_tag-1;
var vaw_t = daktzeit.getDay();
if (!vaw_t) vaw_t=7;
var oaw_t = document.getElementById("aw_t"+vaw_t);
if (vtermin_akt_mon==vselect_mon) {
	fakt_wo_mark(akt_tag_pos,0);
	otrm_kal_sp = document.getElementById("w_t"+akt_tag_pos);
	otrm_kal_sp.style.fontWeight= "bold";
	otrm_kal_sp.style.backgroundImage="url(bg/kalstr2.png)";
	oaw_t.style.color = "#006";
} else {
	if (otrm_kal_sp) {
		fakt_wo_mark(akt_tag_pos,1);
		oaw_t.style.fontWeight = "";
	}
}

// -- Zahlen schreiben end

}

function fakt_wo_mark (id,cl) {
var vi=36, vj=5, vimg="url(bg/kalstr.png)";
if (cl) vimg="";
if (id<36) {vi=29; vj=4;}
if (id<29) {vi=22; vj=3;}
if (id<22) {vi=15; vj=2;}
if (id<15) {vi=8; vj=1;}
if (id<8) {vi=1; vj=0;}
for (i=0;i<7;i++) {
	document.getElementById("w_t"+(vi+i)).style.backgroundImage = vimg;
}
document.getElementById("kalstr"+vj).style.backgroundImage = vimg;
var okw=document.getElementById("kw"+(vj+1));
okw.style.backgroundImage = vimg;
}

function ftermintagauswahl (obj) {
vtrm_sel_tag = (parseInt(obj.id.slice(3))-vtrm_str_tag+1);
var dobj = new Date(vtrm_sel_jah, vtrm_sel_mon-1, vtrm_sel_tag);
vtrm_sel_wo = dobj.getDay();
atrm_load_daten[3] = vtrm_sel_wo+"_"+vtrm_sel_jah;
for (i=0;i<3;i++) {
	if (atrm_load_date[i]==vtrm_sel_mon+"_"+vtrm_sel_tag) {
		if (gstrmauw) return;
		gstrmauw=1;
		vtrm_i = document.getElementById("idtrm"+i);
		vi = vtrm_i.firstChild.nodeValue;

		vtrm_i.innerHTML = awotage[vtrm_sel_wo]+" "+vtrm_sel_tag+". "+amonate[vtrm_sel_mon-1]+" "+vtrm_sel_jah;
		setTimeout("document.getElementById('idtrm"+i+"').innerHTML='"+vi+"';gstrmauw=0",1000);
		document.getElementById("trm_next_time").style.visibility="hidden";
		document.getElementById("trm_next_value").innerHTML="";
		return;
	}
}
document.getElementById("trmnextiframe").innerHTML = "<iframe name='trmkaliframenext' src='./iframes/trmloadnext.html'></iframe>";
}

function fonscroll () {
var otk=document.getElementById("idtrmkal");
var vbsct=document.body.scrollTop;
if (vbsct>400&&(vbsct-230)<vtrm_kalscroll) otk.style.paddingTop=(vbsct-400)+"px";
if (vbsct<401) otk.style.paddingTop="0px";
if ((vbsct-230)>vtrm_kalscroll) otk.style.paddingTop=(vtrm_kalscroll-170)+"px";
}

finnerterminkal();
window.onscroll=fonscroll;