X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/9c0d1e30a155039c87395f83429a269344449846..b638b6a13dea5935637b3c38b1a3252053fa1a46:/SL/OE.pm

diff --git a/SL/OE.pm b/SL/OE.pm
index 49681bd8e..1887d94f9 100644
--- a/SL/OE.pm
+++ b/SL/OE.pm
@@ -183,7 +183,7 @@ SQL
     push(@values, (like($form->{"cp_name"}))x2);
   }
 
-  if (!$main::auth->assert('sales_all_edit', 1)) {
+  if ( !(($vc eq 'customer' && $main::auth->assert('sales_all_edit', 1)) || ($vc eq 'vendor' && $main::auth->assert('purchase_all_edit', 1))) ) {
     $query .= " AND o.employee_id = (select id from employee where login= ?)";
     push @values, $::myconfig{login};
   }