Benutzerverwaltung im Bereich Verkauf -> Ansicht nur auf eigene Verkaufsdokumente...

[mfinanz.git] / SL / DO.pm

diff --git a/SL/DO.pm b/SL/DO.pm
index 092fd0bc3cb706fefb83de5e62b22689cc4816ff..73314bc2e1275586fb46d58c9b29a1b440b44380 100644 (file)
--- a/SL/DO.pm
+++ b/SL/DO.pm
@@ -104,6 +104,10 @@ sub transactions {
     push @where, "dord.$item = ?";
     push @values, conv_i($form->{$item});
   }
+  if (!$main::auth->assert('sales_all_edit', 1)) {
+    push @where, qq|dord.employee_id = (select id from employee where login= ?)|;
+    push @values, $form->{login};
+  }
 
   foreach my $item (qw(donumber ordnumber cusordnumber transaction_description)) {
     next unless ($form->{$item});