var ppcDF = "d.m.Y";var ppcMN = new Array("Januar","Februar","März","April","Mai","Juni","Juli","August","September","Oktober","November","Dezember");var ppcWN = new Array("Sonntag","Montag","Dienstag","Mittwoch","Donnerstag","Freitag","Sonnabend");var ppcER = new Array(4);ppcER[0] = "Dieser Browser unterstützt kein DHTML!";ppcER[1] = "Ziel Feld nicht erreichbar!";ppcER[2] = "Sorry, ausgewähltes Datum ist nicht korrekt!";
ppcER[3] = "Unbekannter Fehler beim Ausführen des Scriptes!";var ppcUC = false; var ppcUX = 4; var ppcUY = 4;var ppcIE=(navigator.appName == "Microsoft Internet Explorer");var ppcNN=((navigator.appName == "Netscape")&&(document.layers));var ppcTT="\n";
var ppcCD=ppcTT;var ppcFT="";var ppcFC=true;var ppcTI=false;var ppcSV=null;var ppcRL=null;var ppcXC=null;var ppcYC=null;var ppcML=new Array(31,28,31,30,31,30,31,31,30,31,30,31);var ppcWE=new Array("Sonntag","Montag","Dienstag","Mittwoch","Donnerstag","Freitag","Sonnabend");var ppcNow=new Date();var ppcPtr=new Date();if (ppcNN) { window.captureEvents(Event.RESIZE); window.onresize = restoreLayers; document.captureEvents(Event.MOUSEDOWN|Event.MOUSEUP);
document.onmousedown = recordXY; document.onmouseup = confirmXY;}function restoreLayers(e) { if (ppcNN) { with (window.document) { open("text/html"); write("Restoring the layer structure..."); write(""); write(""); close();}}}function recordXY(e) { if (ppcNN) { ppcXC = e.x; ppcYC = e.y; document.routeEvent(e);}}function confirmXY(e) {
if (ppcNN) { ppcXC = (ppcXC == e.x) ? e.x : null; ppcYC = (ppcYC == e.y) ? e.y : null; document.routeEvent(e);}}function getCalendarFor(target,rules) { ppcSV = target; ppcRL = rules; if (ppcFC) {setCalendar();ppcFC = false;} if ((ppcSV != null)&&(ppcSV)) { if (ppcIE) { var obj = document.all['PopUpCalendar']; obj.style.left = document.body.scrollLeft+event.clientX; obj.style.top = document.body.scrollTop+event.clientY; obj.style.visibility = "visible";} else if (ppcNN) {
var obj = document.layers['PopUpCalendar']; obj.left = ppcXC; obj.top = ppcYC; obj.visibility = "show";} else {showError(ppcER[0]);}} else {showError(ppcER[1]);}}function switchMonth(param) { var tmp = param.split(":"); setCalendar(tmp[0],tmp[1]);}function moveMonth(dir) { var obj = null; var limit = false; var tmp,dptrYear,dptrMonth; if (ppcIE) {obj = document.kalender.sItem;} else if (ppcNN) {obj = document.layers['PopUpCalendar'].document.layers['monthSelector'].document.kalender.sItem;}
else {showError(ppcER[0]);} if (obj != null) { if ((dir.toLowerCase() == "back")&&(obj.selectedIndex > 0)) {obj.selectedIndex--;} else if ((dir.toLowerCase() == "forward")&&(obj.selectedIndex < 12)) {obj.selectedIndex++;} else {limit = true;}} if (!limit) { tmp = obj.options[obj.selectedIndex].value.split(":"); dptrYear = tmp[0]; dptrMonth = tmp[1]; setCalendar(dptrYear,dptrMonth);} else { if (ppcIE) { obj.style.backgroundColor = "#FF0000";
window.setTimeout("document.kalender.sItem.style.backgroundColor = '#FFFFFF'",50);}}}function selectDate(param) { var arr = param.split(":"); var year = arr[0]; var month = arr[1]; var date = arr[2]; var ptr = parseInt(date); ppcPtr.setDate(ptr); if ((ppcSV != null)&&(ppcSV)) { if (validDate(date)) {ppcSV.value = dateFormat(year,month,date);hideCalendar();} else {showError(ppcER[2]);if (ppcTI) {clearTimeout(ppcTI);ppcTI = false;}}} else { showError(ppcER[1]); hideCalendar();}}function setCalendar(year,month) {
if (year == null) {year = getFullYear(ppcNow);} if (month == null) {month = ppcNow.getMonth();setSelectList(year,month);} if (month == 1) {ppcML[1] = (isLeap(year)) ? 29 : 28;} ppcPtr.setYear(year); ppcPtr.setMonth(month); ppcPtr.setDate(1); updateContent();}function updateContent() { generateContent(); if (ppcIE) {document.all['monthDays'].innerHTML = ppcCD;} else if (ppcNN) { with (document.layers['PopUpCalendar'].document.layers['monthDays'].document) {
open("text/html"); write("\n\nDynDoc\n\n\n"); write(ppcCD); write("\n"); close();}} else {showError(ppcER[0]);} ppcCD = ppcTT;}function generateContent() { var year = getFullYear(ppcPtr); var month = ppcPtr.getMonth(); var date = 1; var day = ppcPtr.getDay(); var len = ppcML[month]; var bgr,cnt,tmp = ""; var j,i = 0; for (j = 0; j < 7; ++j) { if (date > len) {break;} for (i = 0; i < 7; ++i) {
bgr = ((i == 0)||(i == 6)) ? "#FFFFCC" : "#FFFFFF"; if (((j == 0)&&(i < day))||(date > len)) {tmp += makeCell(bgr,year,month,0);} else {tmp += makeCell(bgr,year,month,date);++date;}} ppcCD += "\n" + tmp + "
\n";tmp = "";} ppcCD += "
\n";}function makeCell(bgr,year,month,date) { var param = "\'"+year+":"+month+":"+date+"\'"; var td1 = " | \n" : "\n"; var evt = "onMouseOver=\"this.style.backgroundColor=\'#FF0000\'\" onMouseOut=\"this.style.backgroundColor=\'"+bgr+"\'\" onMouseUp=\"selectDate("+param+")\" "; var ext = ""; var lck = ""; var lnk = "";
var cellValue = (date != 0) ? date+"" : " "; if ((ppcNow.getDate() == date)&&(ppcNow.getMonth() == month)&&(getFullYear(ppcNow) == year)) { cellValue = ""+cellValue+"";} var cellCode = ""; if (date == 0) { if (ppcIE) {cellCode = td1+"Style=\"cursor: default\">"+lck+ppcFT+cellValue+td2;}
else {cellCode = td1+">"+ppcFT+cellValue+td2;}} else { if (ppcIE) {cellCode = td1+evt+"Style=\"cursor: hand\">"+ext+ppcFT+cellValue+td2;} else { if (date < 10) {cellValue = " " + cellValue + " ";} cellCode = td1+">"+lnk+ppcFT+cellValue+td2;}} return cellCode;}function setSelectList(year,month) { var i = 0; var obj = null; if (ppcIE) {obj = document.kalender.sItem;} else if (ppcNN) {obj = document.layers['PopUpCalendar'].document.layers['monthSelector'].document.kalender.sItem;}
else {/* NOP */} while (i < 13) { obj.options[i].value = year + ":" + month; obj.options[i].text = year + " • " + ppcMN[month]; i++; month++; if (month == 12) {year++;month = 0;}}}function hideCalendar() { if (ppcIE) {document.all['PopUpCalendar'].style.visibility = "hidden";} else if (ppcNN) {document.layers['PopUpCalendar'].visibility = "hide";window.status = " ";} else {/* NOP */} ppcTI = false; setCalendar(); ppcSV = null; if (ppcIE) {var obj = document.kalender.sItem;} else if (ppcNN) {var obj = document.layers['PopUpCalendar'].document.layers['monthSelector'].document.kalender.sItem;}
else {/* NOP */} obj.selectedIndex = 0;}function showError(message) { window.alert("[ PopUp Calendar ]\n\n" + message);}function isLeap(year) { if ((year%400==0)||((year%4==0)&&(year%100!=0))) {return true;} else {return false;}}function getFullYear(obj) { if (ppcNN) {return obj.getYear() + 1900;} else {return obj.getYear();}}function validDate(date) { var reply = true; if (ppcRL == null) {/* NOP */} else { var arr = ppcRL.split(":"); var mode = arr[0]; var arg = arr[1]; var key = arr[2].charAt(0).toLowerCase();
if (key != "d") { var day = ppcPtr.getDay(); var orn = isEvenOrOdd(date); reply = (mode == "[^]") ? !((day == arg)&&((orn == key)||(key == "a"))) : ((day == arg)&&((orn == key)||(key == "a")));} else {reply = (mode == "[^]") ? (date != arg) : (date == arg);}} return reply;}function isEvenOrOdd(date) { if (date - 21 > 0) {return "e";} else if (date - 14 > 0) {return "o";} else if (date - 7 > 0) {return "e";} else {return "o";}}
function dateFormat(year,month,date) { if (ppcDF == null) {ppcDF = "d.m.Y";} var day = ppcPtr.getDay(); var crt = ""; var str = ""; var chars = ppcDF.length; for (var i = 0; i < chars; ++i) { crt = ppcDF.charAt(i); switch (crt) { case "M": str += ppcMN[month]; break; case "m": str += (month<9) ? ("0"+(++month)) : ++month; break; case "Y": str += year; break; case "y": str += year.substring(2); break; case "d": str += ((ppcDF.indexOf("m")!=-1)&&(date<10)) ? ("0"+date) : date; break; case "W": str += ppcWN[day]; break;
default: str += crt;}} return unescape(str);}