6 #use CGI::Carp qw(fatalsToBrowser);
11 my $session_result = shift;
13 my $form = $main::form;
14 my $locale = $main::locale;
17 my $paramstring = $ENV{"QUERY_STRING"};
18 my @felder = split "&", $paramstring;
21 ($name, $wert) = split "=", $_;
27 . " - <a href=\"login.pl?action=logout\" target=\"_top\">"
28 . $locale->text('Logout')
30 my ($Sekunden, $Minuten, $Stunden, $Monatstag, $Monat,
31 $Jahr, $Wochentag, $Jahrestag, $Sommerzeit)
33 my $CTIME_String = localtime(time);
36 $Monat = $Monat < 10 ? $Monat = "0" . $Monat : $Monat;
37 $Monatstag = $Monatstag < 10 ? $Monatstag = "0" . $Monatstag : $Monatstag;
39 my @Wochentage = ("Sonntag", "Montag", "Dienstag", "Mittwoch",
40 "Donnerstag", "Freitag", "Samstag");
41 my @Monatsnamen = ("", "Januar", "Februar", "März",
42 "April", "Mai", "Juni", "Juli",
43 "August", "September", "Oktober", "November",
46 $Wochentage[$Wochentag] . ", der "
51 #$zeit="<div id='Uhr'>".$Stunden.":".$Minuten.":".$Sekunden."</div>";
52 my $zeit = "<div id='Uhr'>" . $Stunden . ":" . $Minuten . "</div>";
55 <script type="text/javascript">
57 var clockid=new Array()
58 var clockidoutside=new Array()
60 var thistime= new Date()
61 var hours= | . $Stunden . qq|;
62 var minutes= | . $Minuten . qq|;
63 var seconds= | . $Sekunden . qq|;
64 if (eval(hours) <10) {hours="0"+hours}
65 if (eval(minutes) < 10) {minutes="0"+minutes}
66 if (seconds < 10) {seconds="0"+seconds}
67 //var thistime = hours+":"+minutes+":"+seconds
68 var thistime = hours+":"+minutes
70 function writeclock() {
72 if (document.all \|\| document.getElementById \|\| document.layers) {
73 clockid[i_clock]="clock"+i_clock
74 document.write("<font family=arial size=2><span id='"+clockid[i_clock]+"' style='position:relative'>"+thistime+"</span></font>")
80 hours=thistime.getHours()
81 minutes=thistime.getMinutes()
82 seconds=thistime.getSeconds()
83 if (eval(hours) <10) {hours="0"+hours}
84 if (eval(minutes) < 10) {minutes="0"+minutes}
85 if (seconds < 10) {seconds="0"+seconds}
86 //thistime = hours+":"+minutes+":"+seconds
87 thistime = hours+":"+minutes
90 for (i=0;i<=clockid.length-1;i++) {
91 var thisclock=eval(clockid[i])
92 thisclock.innerHTML=thistime
96 if (document.getElementById) {
97 for (i=0;i<=clockid.length-1;i++) {
98 document.getElementById(clockid[i]).innerHTML=thistime
101 var timer=setTimeout("clockon()",60000)
103 window.onload=clockon
110 <body bgcolor="#ffffff" text="#ffffff" link="#ffffff" vlink="#ffffff" alink="#ffffff" topmargin="0" leftmargin="0" marginwidth="0" marginheight="0" style="background-image: url('image/fade.png'); background-repeat:repeat-x;">
112 <table border="0" width="100%" background="image/bg_titel.gif" cellpadding="0" cellspacing="0">
114 <td style="color:white; font-family:verdana,arial,sans-serif; font-size: 12px;">
115 [<a href="JavaScript:top.main_window.print();" title="| . $locale->text('Hardcopy') . qq|">| . $locale->text('Print') . qq|</a>]
116 [<a HREF="login.pl" target="_blank" "title="| . $locale->text('Open a further Lx-Office Window or Tab') . qq|">| . $locale->text('New Win/Tab') . qq|</a>]
117 [<a href="Javascript:top.main_window.history.back();" title="| . $locale->text('Go one step back') . qq|">| . $locale->text('Back') . qq|</a>]
118 <!-- is there a better solution for Back? Possibly with the callback variable? -->
120 <td align="right" style="vertical-align:middle; color:white; font-family:verdana,arial,sans-serif; font-size: 12px;" nowrap>|
121 . $login . $datum . qq| <script>writeclock()</script>