/ - Diff - projekt kivitendo - wissen

     sub header {
       $main::lxdebug->enter_sub();
       my ($self) = @_;
       my ($self, $extra_code) = @_;
       if ($self->{header}) {
         $main::lxdebug->leave_sub();
-...
       </script>
       $extra_code
     </head>
     |;

       # add other params
       foreach my $key (keys %{ $self->{$item} }) {
         $str .= "&" . $form->escape($key, 1) . "=";
         ($value, $conf) = split /=/, $self->{$item}{$key}, 2;
         ($value, $conf) = split(/=/, $self->{$item}{$key}, 2);
         $value = $myconfig->{$value} . "/$conf" if ($conf);
         $str .= $form->escape($value, 1);
+      }
-...
       return $str;
+    }
     sub menuitem_v3 {
       $main::lxdebug->enter_sub();
       my ($self, $myconfig, $form, $item, $other) = @_;
       my $module = $form->{script};
       my $action = "section_menu";
       my $target = "";
       if ($self->{$item}{module}) {
         $module = $self->{$item}{module};
+      }
       if ($self->{$item}{action}) {
         $action = $self->{$item}{action};
+      }
       if ($self->{$item}{target}) {
         $target = $self->{$item}{target};
+      }
       my $level = $form->escape($item);
       my $str = qq|<a href="$module?action=| . $form->escape($action) .
         qq|&level=| . $form->escape($level);
       map({ $str .= "&${_}=" . $form->escape($form->{$_}); } qw(path login password));
       my @vars = qw(module action target href);
       if ($self->{$item}{href}) {
         $str  = qq|<a href=$self->{$item}{href}|;
         @vars = qw(module target href);
+      }
       map { delete $self->{$item}{$_} } @vars;
       # add other params
       foreach my $key (keys %{ $self->{$item} }) {
         $str .= "&" . $form->escape($key, 1) . "=";
         ($value, $conf) = split(/=/, $self->{$item}{$key}, 2);
         $value = $myconfig->{$value} . "/$conf" if ($conf);
         $str .= $form->escape($value, 1);
+      }
       $str .= '"';
       if ($target) {
         $str .= qq| target="| . $form->quote($target) . qq|"|;
+      }
       if ($other) {
         foreach my $key (keys(%{$other})) {
           $str .= qq| ${key}="| . $form->quote($other->{$key}) . qq|"|;
+        }
+      }
       $str .= ">";
       $main::lxdebug->leave_sub();
       return $str;
+    }
     sub menuitemNew {
       my ($self, $myconfig, $form, $item) = @_;
-...
       # add other params
       foreach my $key (keys %{ $self->{$item} }) {
         $str .= "&" . $form->escape($key, 1) . "=";
         ($value, $conf) = split /=/, $self->{$item}{$key}, 2;
         ($value, $conf) = split(/=/, $self->{$item}{$key}, 2);
         $value = $myconfig->{$value} . "/$conf" if ($conf);
         $str .= $form->escape($value, 1);
+      }
-...
         @menu = grep { /^${menulevel}--/ } @{ $self->{ORDER} };
+      }
       my @a    = split /;/, $myconfig->{acs};
       my @a    = split(/;/, $myconfig->{acs});
       my $excl = ();
       # remove --AR, --AP from array

     	</tr>
            <tr>
                <th align=right>| . $locale->text('Setup Menu') . qq|</th>
                <td><input name=menustyle type=radio class=radio value=neu $menustyle_neu>&nbsp;| .
                <td><input name=menustyle type=radio class=radio value=v3 $menustyle_v3>&nbsp;| .
                $locale->text("Top (CSS)") . qq|
                <input name=menustyle type=radio class=radio value=neu $menustyle_neu>&nbsp;| .
                $locale->text("Top (Javascript)") . qq|
                <input name=menustyle type=radio class=radio value=old $menustyle_old>&nbsp;| .
                $locale->text("Old (on the side)") . qq|

     	</tr>
     	<tr>
     	  <th align=right>| . $locale->text('Setup Menu') . qq|</th>
     	  <td><input name=menustyle type=radio class=radio value=neu $menustyle_neu>&nbsp;| .
     	  <td><input name=menustyle type=radio class=radio value=v3 $menustyle_v3>&nbsp;| .
         $locale->text("Top (CSS)") . qq|
     	  <input name=menustyle type=radio class=radio value=neu $menustyle_neu>&nbsp;| .
         $locale->text("Top (Javascript)") . qq|
         <input name=menustyle type=radio class=radio value=old $menustyle_old>&nbsp;| .
         $locale->text("Old (on the side)") . qq|</td>

+      }
       # made it this far, execute the menu
       if ($user->{menustyle} eq "neu") {
       if ($user->{menustyle} eq "v3") {
         $form->{callback} =
           "menuv3.pl?login=$form->{login}&password=$form->{password}&path=$form->{path}&action=display";
       } elsif ($user->{menustyle} eq "neu") {
         $form->{callback} =
           "menunew.pl?login=$form->{login}&password=$form->{password}&path=$form->{path}&action=display";
       } else {

     #=====================================================================
     # LX-Office ERP
     # Copyright (C) 2004
     # Based on SQL-Ledger Version 2.1.9
     # Web http://www.lx-office.org
+    #
     ######################################################################
     # SQL-Ledger Accounting
     # Copyright (c) 1998-2002
+    #
     #  Author: Dieter Simader
     #   Email: dsimader@sql-ledger.org
     #     Web: http://www.sql-ledger.org
+    #
     #  Contributors: Christopher Browne
+    #
     # This program is free software; you can redistribute it and/or modify
     # it under the terms of the GNU General Public License as published by
     # the Free Software Foundation; either version 2 of the License, or
     # (at your option) any later version.
+    #
     # This program is distributed in the hope that it will be useful,
     # but WITHOUT ANY WARRANTY; without even the implied warranty of
     # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
     # GNU General Public License for more details.
     # You should have received a copy of the GNU General Public License
     # along with this program; if not, write to the Free Software
     # Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
     #######################################################################
+    #
     # thre frame layout with refractured menu
+    #
     #######################################################################
     $menufile = "menu.ini";
     use SL::Menu;
 ;
     # end of main
     sub display {
       $form->header(qq|<link rel="stylesheet" href="css/menuv3.css?id=| .
                     int(rand(100000)) . qq|" type="text/css">|);
       print(qq|<body>\n|);
       clock_line();
       print qq|
     <div id="menu">
     | . acc_menu() . qq|
     </div>
     <div style="clear: both;"></div>
     <iframe id="win1" src="login.pl?login=$form->{login}&password=$form->{password}&action=company_logo&path=$form->{path}" width="100%" height="93%" name="main_window" style="position: absolute; border: 0px; z-index: 99; ">
     <p>Ihr Browser kann leider keine eingebetteten Frames anzeigen.
     </p>
     </iframe>
     </body>
     </html>
     |;
+    }
     sub clock_line {
       $login = "["
         . $form->{login}
         . " - <a href=\"login.pl?path="
         . $form->{"path"}
         . "&password="
         . $form->{"password"}
         . "&action=logout\" target=\"_top\">"
         . $locale->text('Logout')
         . "</a>] ";
       my ($Sekunden, $Minuten,   $Stunden,   $Monatstag, $Monat,
           $Jahr,     $Wochentag, $Jahrestag, $Sommerzeit)
         = localtime(time);
       my $CTIME_String = localtime(time);
       $Monat     += 1;
       $Jahrestag += 1;
       $Monat     = $Monat < 10     ? $Monat     = "0" . $Monat     : $Monat;
       $Monatstag = $Monatstag < 10 ? $Monatstag = "0" . $Monatstag : $Monatstag;
       $Jahr += 1900;
       my @Wochentage = ("Sonntag",    "Montag",  "Dienstag", "Mittwoch",
                         "Donnerstag", "Freitag", "Samstag");
       my @Monatsnamen = ("",       "Januar",    "Februar", "M&auml;rz",
                          "April",  "Mai",       "Juni",    "Juli",
                          "August", "September", "Oktober", "November",
                          "Dezember");
       $datum =
           $Wochentage[$Wochentag] . ", der "
         . $Monatstag . "."
         . $Monat . "."
         . $Jahr . " - ";
       #$zeit="<div id='Uhr'>".$Stunden.":".$Minuten.":".$Sekunden."</div>";
       $zeit = "<div id='Uhr'>" . $Stunden . ":" . $Minuten . "</div>";
       print qq|
     <script type="text/javascript">
     <!--
     var clockid=new Array()
     var clockidoutside=new Array()
     var i_clock=-1
     var thistime= new Date()
     var hours= | . $Stunden . qq|;
     var minutes= | . $Minuten . qq|;
     var seconds= | . $Sekunden . qq|;
     if (eval(hours) <10) {hours="0"+hours}
     if (eval(minutes) < 10) {minutes="0"+minutes}
     if (seconds < 10) {seconds="0"+seconds}
     //var thistime = hours+":"+minutes+":"+seconds
     var thistime = hours+":"+minutes
     function writeclock() {
     	i_clock++
     	if (document.all \|\| document.getElementById \|\| document.layers) {
     		clockid[i_clock]="clock"+i_clock
     		document.write("<font family=arial size=2><span id='"+clockid[i_clock]+"' style='position:relative'>"+thistime+"</span></font>")
+    	}
+    }
     function clockon() {
     	thistime= new Date()
     	hours=thistime.getHours()
     	minutes=thistime.getMinutes()
     	seconds=thistime.getSeconds()
     	if (eval(hours) <10) {hours="0"+hours}
     	if (eval(minutes) < 10) {minutes="0"+minutes}
     	if (seconds < 10) {seconds="0"+seconds}
     	//thistime = hours+":"+minutes+":"+seconds
     	thistime = hours+":"+minutes
     	if (document.all) {
     		for (i=0;i<=clockid.length-1;i++) {
     			var thisclock=eval(clockid[i])
     			thisclock.innerHTML=thistime
+    		}
+    	}
     	if (document.getElementById) {
     		for (i=0;i<=clockid.length-1;i++) {
     			document.getElementById(clockid[i]).innerHTML=thistime
+    		}
+    	}
     	var timer=setTimeout("clockon()",60000)
+    }
     //window.onload=clockon
     //-->
     </script>
     <table border="0" width="100%" background="image/bg_titel.gif" cellpadding="0" cellspacing="0">
     	<tr>
     		<td  style="color:white; font-family:verdana,arial,sans-serif; font-size: 12px;"> &nbsp; [<a href="JavaScript:top.main_window.print()">drucken</a>]</td>
     		<td align="right" style="vertical-align:middle; color:white; font-family:verdana,arial,sans-serif; font-size: 12px;" nowrap>|
         . $login . $datum . qq| <script>writeclock()</script>&nbsp;
     		</td>
     	</tr>
     </table>
     |;
+    }
     sub acc_menu {
       $locale = Locale->new($language, "menu");
       $mainlevel = $form->{level};
       $mainlevel =~ s/$mainlevel--//g;
       my $menu = new Menu "$menufile";
       $menu = new Menu "custom_$menufile" if (-f "custom_$menufile");
       $menu = new Menu "$form->{login}_$menufile"
         if (-f "$form->{login}_$menufile");
       $| = 1;
       return print_menu($menu);
+    }
     sub my_length {
       my ($s) = @_;
       my $len = 0;
       my $i;
       my $skip = 0;
       for ($i = 0; $i < length($s); $i++) {
         my $c = substr($s, $i, 1);
         if ($skip && ($c eq ";")) {
           $skip = 0;
         } elsif ($skip) {
           next;
         } elsif ($c eq "&") {
           $skip = 1;
           $len++;
         } else {
           $len++;
+        }
+      }
       return $len;
+    }
     sub print_menu {
       my ($menu, $parent, $depth) = @_;
       my $html;
       die if ($depth * 1 > 5);
       my @menuorder;
       @menuorder = $menu->access_control(\%myconfig, $parent);
       $parent .= "--" if ($parent);
       foreach my $item (@menuorder) {
         substr($item, 0, length($parent)) = "";
         next if (($item eq "") || ($item =~ /--/));
         my $menu_item = $menu->{"${parent}${item}"};
         my $menu_title = $locale->text($item);
         my $menu_text = $menu_title;
         $menu_text =~ s/ /<br>/ if ($parent && (my_length($menu_text) >= 17));
         my $target = "main_window";
         $target = $menu_item->{"target"} if ($menu_item->{"target"});
         if ($menu_item->{"submenu"} || !defined($menu_item->{"module"}) ||
             ($menu_item->{"module"} eq "menu.pl")) {
           my $h = print_menu($menu, "${parent}${item}", $depth * 1 + 1);
           if (!$parent) {
             $html .= qq|<ul><li><h2>${menu_text}</h2><ul>${h}</ul></li></ul>|;
           } else {
             $html .= qq|<li><div class="x">${menu_text}</div><ul>${h}</ul></li>|;
+          }
         } else {
           $html .= qq|<li>|;
           $html .= $menu->menuitem_v3(\%myconfig, $form, "${parent}$item",
                                       { "title" => $menu_title,
                                         "target" => $target });
           $html .= qq|${menu_text}</a></li>|;
+        }
+      }
       return $html;
+    }

     <attach event="ondocumentready" handler="parseStylesheets" />
     <script>
     /**
      *	Whatever:hover - V2.02.060206 - hover, active & focus
      *	------------------------------------------------------------
      *	(c) 2005 - Peter Nederlof
      *	Peterned - http://www.xs4all.nl/~peterned/
      *	License  - http://creativecommons.org/licenses/LGPL/2.1/
+     *
      *	Whatever:hover is free software; you can redistribute it and/or
      *	modify it under the terms of the GNU Lesser General Public
      *	License as published by the Free Software Foundation; either
      *	version 2.1 of the License, or (at your option) any later version.
+     *
      *	Whatever:hover is distributed in the hope that it will be useful,
      *	but WITHOUT ANY WARRANTY; without even the implied warranty of
      *	MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
      *	Lesser General Public License for more details.
+     *
      *	Credits and thanks to:
      *	Arnoud Berendsen, Martin Reurings, Robert Hanson
+     *
      *	howto: body { behavior:url("csshover.htc"); }
      *	------------------------------------------------------------
      */
     var csshoverReg = /(^|\s)((([^a]([^ ]+)?)|(a([^#.][^ ]+)+)):(hover|active))|((a|input|textarea)([#.][^ ]+)?:unknown)/i,
     currentSheet, doc = window.document, hoverEvents = [], activators = {
     	onhover:{on:'onmouseover', off:'onmouseout'},
     	onactive:{on:'onmousedown', off:'onmouseup'},
     	onunknown:{on:'onfocus', off:'onblur'}
+    }
     function parseStylesheets() {
     	if(!/MSIE (5|6)/.test(navigator.userAgent)) return;
     	window.attachEvent('onunload', unhookHoverEvents);
     	var sheets = doc.styleSheets, l = sheets.length;
     	for(var i=0; i<l; i++)
     		parseStylesheet(sheets[i]);
+    }
     	function parseStylesheet(sheet) {
     		if(sheet.imports) {
     			try {
     				var imports = sheet.imports, l = imports.length;
     				for(var i=0; i<l; i++) parseStylesheet(sheet.imports[i]);
     			} catch(securityException){}
+    		}
     		try {
     			var rules = (currentSheet = sheet).rules, l = rules.length;
     			for(var j=0; j<l; j++) parseCSSRule(rules[j]);
     		} catch(securityException){}
+    	}
     	function parseCSSRule(rule) {
     		var select = rule.selectorText, style = rule.style.cssText;
     		if(!csshoverReg.test(select) || !style) return;
     		var pseudo = select.replace(/[^:]+:([a-z-]+).*/i, 'on$1');
     		var newSelect = select.replace(/(\.([a-z0-9_-]+):[a-z]+)|(:[a-z]+)/gi, '.$2' + pseudo);
     		var className = (/\.([a-z0-9_-]*on(hover|active|unknown))/i).exec(newSelect)[1];
     		var affected = select.replace(/:(hover|active|unknown).*$/, '');
     		var elements = getElementsBySelect(affected);
     		if(elements.length == 0) return;
     		currentSheet.addRule(newSelect, style);
     		for(var i=0; i<elements.length; i++)
     			new HoverElement(elements[i], className, activators[pseudo]);
+    	}
     function HoverElement(node, className, events) {
     	if(!node.hovers) node.hovers = {};
     	if(node.hovers[className]) return;
     	node.hovers[className] = true;
     	hookHoverEvent(node, events.on, function() { node.className += ' ' + className; });
     	hookHoverEvent(node, events.off, function() { node.className = node.className.replace(new RegExp('\\s+'+className, 'g'),''); });
+    }
     	function hookHoverEvent(node, type, handler) {
     		node.attachEvent(type, handler);
     		hoverEvents[hoverEvents.length] = {
     			node:node, type:type, handler:handler
     		};
+    	}
     	function unhookHoverEvents() {
     		for(var e,i=0; i<hoverEvents.length; i++) {
     			e = hoverEvents[i];
     			e.node.detachEvent(e.type, e.handler);
+    		}
+    	}
     function getElementsBySelect(rule) {
     	var parts, nodes = [doc];
     	parts = rule.split(' ');
     	for(var i=0; i<parts.length; i++) {
     		nodes = getSelectedNodes(parts[i], nodes);
     	}	return nodes;
+    }
     	function getSelectedNodes(select, elements) {
     		var result, node, nodes = [];
     		var identify = (/\#([a-z0-9_-]+)/i).exec(select);
     		if(identify) {
     			var element = doc.getElementById(identify[1]);
     			return element? [element]:nodes;
+    		}
     		var classname = (/\.([a-z0-9_-]+)/i).exec(select);
     		var tagName = select.replace(/(\.|\#|\:)[a-z0-9_-]+/i, '');
     		var classReg = classname? new RegExp('\\b' + classname[1] + '\\b'):false;
     		for(var i=0; i<elements.length; i++) {
     			result = tagName? elements[i].all.tags(tagName):elements[i].all;
     			for(var j=0; j<result.length; j++) {
     				node = result[j];
     				if(classReg && !classReg.test(node.className)) continue;
     				nodes[nodes.length] = node;
+    			}
+    		}
     		return nodes;
+    	}
     </script>

     body {
     behavior:url("css/csshover.htc");
+    }
     #menu{
     width:100%;
     float:left;
+    }
     #menu a, #menu h2, #menu div.x {
     font:11px/16px arial,helvetica,sans-serif;
     display:block;
     border-width:1px;
     border-style:solid;
     border-color:#ccc #888 #555 #bbb;
     white-space:nowrap;
     margin:0;
     padding:1px 0 1px 3px;
+    }
     #menu h2{
     color:#fff;
     background:#000 url(../image/expand3.gif) no-repeat 100% 100%;
+    }
     #menu a{
     background:#eee;
     text-decoration:none;
+    }
     #menu a, #menu a:visited{
     color:#000;
+    }
     #menu a:hover{
     color:#a00;
     background:#ddd;
+    }
     #menu a:active{
     color:#060;
     background:#ccc;
+    }
     #menu ul{
     list-style:none;
     margin:0;
     padding:0;
     float:left;
     width:9em;
+    }
     #menu li{
     position:relative;
+    }
     #menu ul ul{
     position:absolute;
     z-index:500;
     top:auto;
     display:none;
+    }
     #menu ul ul ul{
     top:0;
     left:100%;
+    }
     /* Begin non-anchor hover selectors */
     /* Enter the more specific element (div) selector
     on non-anchor hovers for IE5.x to comply with the
     older version of csshover.htc - V1.21.041022. It
     improves IE's performance speed to use the older
     file and this method */
     div#menu h2:hover{
     background:#000 url(../image/expand3.gif) no-repeat -999px -9999px;
+    }
     div#menu li:hover{
     cursor:pointer;
     z-index:100;
+    }
     div#menu li:hover ul ul,
     div#menu li li:hover ul ul,
     div#menu li li li:hover ul ul,
     div#menu li li li li:hover ul ul
     {display:none;}
     div#menu li:hover ul,
     div#menu li li:hover ul,
     div#menu li li li:hover ul,
     div#menu li li li li:hover ul
     {display:block;}
     /* End of non-anchor hover selectors */
     /* Styling for Expand */
     #menu a.x, #menu a.x:visited{
     /*font-weight:bold;*/
     color:#000;
     background:#eee url(../image/expand3.gif) no-repeat 100% 100%;
+    }
     #menu a.x:hover{
     color:#fff;
     background:#000;
+    }
     #menu a.x:active{
     color:#060;
     background:#ccc;
+    }
     #menu div.x, #menu div.x:visited{
     /*font-weight:bold;*/
     color:#000;
     background:#eee url(../image/expand3.gif) no-repeat 100% 100%;
+    }
     #menu div.x:hover{
     color:#fff;
     background:#000;
+    }
     #menu div.x:active{
     color:#060;
     background:#ccc;
+    }

locale/de/admin
84	84	'The passwords do not match.' => 'Die Passwörter stimmen nicht überein.',
85	85	'This is a preliminary check for existing sources. Nothing will be created or deleted at this stage!' => 'In diesem Schritt werden bestehende Datenbanken gesucht. Es werden noch keine ?nderungen vorgenommen!',
86	86	'To add a user to a group edit a name, change the login name and save. A new user with the same variables will then be saved under the new login name.' => 'Um einer Gruppe einen neuen Benutzer hinzuzuf?gen, ?ndern und speichern Sie am einfachsten einen bestehen den Zugriffsnamen. Unter dem neuen Namen wird dann ein Benutzer mit denselben Einstellungen angelegt.',
	87	'Top (CSS)' => 'Oben (mit CSS)',
87	88	'Top (Javascript)' => 'Oben (mit Javascript)',
88	89	'Unknown dependency \'%s\'.' => 'Unbekannte Abhängigkeit \'%s\'.',
89	90	'Unlock System' => 'System entsperren',

locale/de/all
993	993	'Title' => 'Titel',
994	994	'To' => 'An',
995	995	'To add a user to a group edit a name, change the login name and save. A new user with the same variables will then be saved under the new login name.' => 'Um einer Gruppe einen neuen Benutzer hinzuzuf?gen, ?ndern und speichern Sie am einfachsten einen bestehen den Zugriffsnamen. Unter dem neuen Namen wird dann ein Benutzer mit denselben Einstellungen angelegt.',
	996	'Top (CSS)' => 'Oben (mit CSS)',
996	997	'Top (Javascript)' => 'Oben (mit Javascript)',
997	998	'Top 100' => 'Top 100',
998	999	'Top 100 hinzufuegen' => 'Top 100 hinzuf?gen',

locale/de/am
224	224	'The unit in row %d has been deleted in the meantime.' => 'Die Einheit in Zeile %d ist in der Zwischentzeit gelöscht worden.',
225	225	'The unit in row %d has been used in the meantime and cannot be changed anymore.' => 'Die Einheit in Zeile %d wurde in der Zwischenzeit benutzt und kann nicht mehr geändert werden.',
226	226	'The units have been saved.' => 'Die Einheiten wurden gespeichert.',
	227	'Top (CSS)' => 'Oben (mit CSS)',
227	228	'Top (Javascript)' => 'Oben (mit Javascript)',
228	229	'Transaction reversal enforced for all dates' => 'Fehleintragungen m?ssen f?r jeden Zeitraum mit einer Kontraeintragung ausgebessert werden',
229	230	'Transaction reversal enforced up to' => 'Fehleintragungen k?nnen bis zu dem angegebenen Zeitraum nur mit einer Kontraeintragung ausgebessert werden!',

     $self->{texts} = {
       'Logout'                      => 'Abmeldung',
     };
     $self->{subs} = {
       'acc_menu'                    => 'acc_menu',
       'clock_line'                  => 'clock_line',
       'display'                     => 'display',
       'section_menu'                => 'section_menu',
     };
 ;

     # Erstellt die benotigten Symlinks
     ln -vsf login.pl admin.pl
     for i in ap ar bp ca cp ct cn dn gl ic ir is menu oe pe rc rp datev licenses fa ustva menunew common; do
     for i in ap ar bp ca cp ct cn dn gl ic ir is menu oe pe rc rp datev licenses fa ustva menunew common menuv3; do
       ln -vsf am.pl $i.pl
     done

Projekt

Allgemein

Profil

projekt kivitendo

Revision e98e2094

Von Moritz Bunkus vor mehr als 17 Jahren hinzugefügt