Preisquellen: Fehlerbehandlung in MakeModel

[mfinanz.git] / SL / VK.pm

diff --git a/SL/VK.pm b/SL/VK.pm
index cc49cb412395093570261b56cc9b5ba50f30fb8a..f20414c7fbfa387cc5c03125aaecdb6ffa426f6d 100644 (file)
--- a/SL/VK.pm
+++ b/SL/VK.pm
@@ -72,7 +72,7 @@ sub invoice_transactions {
   # limits by employees (Bearbeiter), not salesmen!
   if (!$main::auth->assert('sales_all_edit', 1)) {
     $where .= " AND ar.employee_id = (select id from employee where login= ?)";
-    push (@values, $form->{login});
+    push (@values, $::myconfig{login});
   }
 
   # Stornierte Rechnungen und Stornorechnungen in invoice rausfiltern
@@ -110,7 +110,10 @@ sub invoice_transactions {
   if ($form->{customer_id}) {
     $where .= " AND ar.customer_id = ?";
     push(@values, $form->{customer_id});
-  };
+  } elsif ($form->{customer}) {
+    $where .= " AND ct.name ILIKE ?";
+    push(@values, $form->like($form->{customer}));
+  }
   if ($form->{customernumber}) {
     $where .= qq| AND ct.customernumber = ? |;
     push(@values, $form->{customernumber});