X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=bin%2Fmozilla%2Fgl.pl;h=189d1c48170627ed2ccbff9596038099ad166435;hb=4aa816112a8b9f2d2959c92cfaa2f2954bdeceb2;hp=f7810c76bc2ba41697b0bf394a97b7d7ba85d988;hpb=fa266e3d183d9d0bb4936fed0c8a0410531b1e91;p=kivitendo-erp.git diff --git a/bin/mozilla/gl.pl b/bin/mozilla/gl.pl index f7810c76b..189d1c481 100644 --- a/bin/mozilla/gl.pl +++ b/bin/mozilla/gl.pl @@ -31,6 +31,9 @@ # #====================================================================== +use utf8; +use strict; + use POSIX qw(strftime); use List::Util qw(sum); @@ -44,8 +47,6 @@ require "bin/mozilla/common.pl"; require "bin/mozilla/drafts.pl"; require "bin/mozilla/reportgenerator.pl"; -use strict; - # this is for our long dates # $locale->text('January') # $locale->text('February') @@ -241,7 +242,8 @@ sub search { | if $form->{selectdepartment}; $form->get_lists("projects" => { "key" => "ALL_PROJECTS", - "all" => 1 }); + "all" => 1}, + "employees" => "ALL_EMPLOYEES" ); my %project_labels = (); my @project_values = (""); @@ -255,6 +257,20 @@ sub search { '-values' => \@project_values, '-labels' => \%project_labels)); + my %employee_labels = (); + my @employee_values = (""); + foreach my $item (@{ $form->{"ALL_EMPLOYEES"} }) { + # value in Form "1234--Name" übergeben + my $id = "$item->{'id'}--$item->{'name'}"; + push(@employee_values, "$id"); + $employee_labels{$id} = $item->{"name"}; + } + + my $employeenumber = + NTI($cgi->popup_menu('-name' => "employee", + '-values' => \@employee_values, + '-labels' => \%employee_labels)); + # use JavaScript Calendar or not $form->{jsscript} = 1; my $jsscript = ""; @@ -295,7 +311,7 @@ sub search {