X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/fc55beb40ba99c736562d815bbe60f36883904bc..c2796317373c0c0006ce9b99d1aad4bad21a3631:/SL/GL.pm diff --git a/SL/GL.pm b/SL/GL.pm index 5783fbfd3..cb7f346d1 100644 --- a/SL/GL.pm +++ b/SL/GL.pm @@ -280,7 +280,7 @@ 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}) { @@ -366,7 +366,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