function set_datum(vor_datum) {
if (browserOK) { adate = new Date();
wdays = new Array("Sonntag","Montag","Dienstag","Mittwoch","Donnerstag","Freitag","Sonnabend");
months = new Array("Januar","Februar","März","April","Mai","Juni","Juli","August","September","Oktober","November","Dezember");
var year = parseInt(adate.getYear()); if ((year>99)&&(year<2000)) { year += 1900; }
var wday = wdays[adate.getDay()] + ", ";
var rday = adate.getDate();
var month = ". " + months[adate.getMonth()] + " ";
var anzdate = wday + rday + month + year;
return (vor_datum + anzdate); }}

var PRINT_SCRIPT = "/cgi-kellner/print.pl";
var PRINT_BODY = "../print/print.html";
var PRINT_CSS = "/css/default.css";
var BEGIN_TAG = "beg-cont"; var END_TAG = "end-cont";
var BEGIN_SCRIPT = "beg-script"; var END_SCRIPT = "end-script";

function format(format_it) {
if (browserOK) { var len = format_it.length; var return_it = ""; var is_ok = true; for (x=0;x<len;x++) { is_ok = true;
if ((format_it.substring(x,x+1)=="/") || (format_it.substring(x,x+1)==".") || (format_it.substring(x,x+1)==" ") || (format_it.substring(x,x+1)=="&") || (format_it.substring(x,x+1)=="?") || (format_it.substring(x,x+1)==";") || (format_it.substring(x,x+1)=="!")) { is_ok = false; }
if (is_ok) { return_it = return_it + format_it.substring(x,x+1); } else {
if (format_it.substring(x,x+1)=="/") { return_it = return_it + "%2F"; }
if (format_it.substring(x,x+1)==".") { return_it = return_it + "%2E"; }
if (format_it.substring(x,x+1)==" ") { return_it = return_it + "%20"; }
if (format_it.substring(x,x+1)=="&") { return_it = return_it + "%26"; }
if (format_it.substring(x,x+1)=="?") { return_it = return_it + "%3F"; }
if (format_it.substring(x,x+1)==";") { return_it = return_it + "%3B"; }
if (format_it.substring(x,x+1)=="!") { return_it = return_it + "%21"; }
}} return return_it; }}

function print_ver() { if (browserOK) {	
var PRINT_FILE = document.URL; var PRINT_TITLE = prttitle;
var PRINT_PFAD = prtpfad; var PRINT_WIDTH = prtwidth;
var PRINT_WIDTH_10 = parseInt(PRINT_WIDTH)-10; var PRINT_WIDTH_20 = parseInt(PRINT_WIDTH)-20;
if (PRINT_FILE.indexOf("#")!=-1) { PRINT_FILE = PRINT_FILE.slice(0,PRINT_FILE.indexOf("#")); }
var print_marker = true;
if ((PRINT_FILE.indexOf("html")==-1)&&(PRINT_FILE.indexOf(".pl")==-1)) { PRINT_FILE = PRINT_FILE + "index.shtml"; }
if (prttitle=="-1" && print_marker) {
print_marker = false; var my_print_alert = "Bitte nutzen Sie die Druckfunktion Ihres Browsers";
if (ret_plattform()==0) { var my_print_alert = my_print_alert + " oder dr"+"\u00FC"+"cken Strg-P!"; } 
else { var my_print_alert = my_print_alert + "!"; }
alert (my_print_alert);
}

var PRINT_CALL   = PRINT_SCRIPT + "?";
PRINT_CALL = PRINT_CALL + "prt_css=" + format(PRINT_CSS) + "!";
PRINT_CALL = PRINT_CALL + "prt_file=" + format(PRINT_FILE) + "!";
PRINT_CALL = PRINT_CALL + "prt_body=" + format(PRINT_BODY) + "!";
PRINT_CALL = PRINT_CALL + "prt_time=" + format(MY_TIME_TAG) + "!";
PRINT_CALL = PRINT_CALL + "prt_btag=" + format(BEGIN_TAG) + "!";
PRINT_CALL = PRINT_CALL + "prt_etag=" + format(END_TAG) + "!";
PRINT_CALL = PRINT_CALL + "prt_bscript=" + format(BEGIN_SCRIPT) + "!";
PRINT_CALL = PRINT_CALL + "prt_escript=" + format(END_SCRIPT) + "!";
PRINT_CALL = PRINT_CALL + "prt_title=" + format(PRINT_TITLE) + "!";
PRINT_CALL = PRINT_CALL + "prt_pfad=" + format(PRINT_PFAD) + "!";
PRINT_CALL = PRINT_CALL + "prt_width=" + PRINT_WIDTH + "!";
PRINT_CALL = PRINT_CALL + "prt_width_10=" + PRINT_WIDTH_10 + "!";
PRINT_CALL = PRINT_CALL + "prt_width_20=" + PRINT_WIDTH_20;
if (print_marker) { mywin(true,PRINT_CALL,'printver',PRINT_WIDTH+50,400,'yes','yes',40); }
}}