X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/3af5e2e0647403c1e6ee9b860d6a56d393e6e6f5..3f4f01dcd306d7ebb51a1186d722e6aecd237003:/SL/GL.pm diff --git a/SL/GL.pm b/SL/GL.pm index fb7b534e5..1fc1f3a42 100644 --- a/SL/GL.pm +++ b/SL/GL.pm @@ -284,10 +284,8 @@ sub all_transactions { push(@arvalues, '%' . $form->{description} . '%'); push(@apvalues, '%' . $form->{description} . '%'); } - - if ($form->{employee} =~ /--/) { - ($form->{employee_id},$form->{employee_name}) = split(/--/,$form->{employee}); - #if ($form->{employee_id}) { + + if ($form->{employee_id}) { $glwhere .= " AND g.employee_id = ? "; $arwhere .= " AND a.employee_id = ? "; $apwhere .= " AND a.employee_id = ? "; @@ -370,7 +368,7 @@ sub all_transactions { 'source' => { 'gl' => 'ac.source', 'arap' => 'ac.source', }, 'description' => { 'gl' => 'g.description', 'arap' => 'ct.name', }, ); - + # sortdir = sort direction (ascending or descending) my $sortdir = !defined $form->{sortdir} ? 'ASC' : $form->{sortdir} ? 'ASC' : 'DESC'; my $sortkey = $sort_columns{$form->{sort}} ? $form->{sort} : $form->{datesort}; # default used to be transdate