X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;ds=sidebyside;f=SL%2FCT.pm;h=ad92d4c34a90387e43ab2f66e8ec31d9ceb5ccb4;hb=7c3117b50d46f04f589aae322525f0797c4146e9;hp=82e360cc70a6e82318d77a1114abc67be12ced8d;hpb=c7bffefd26718a316f989fefa780a7edd95444f9;p=kivitendo-erp.git

diff --git a/SL/CT.pm b/SL/CT.pm
index 82e360cc7..ad92d4c34 100644
--- a/SL/CT.pm
+++ b/SL/CT.pm
@@ -630,6 +630,11 @@ sub search {
     $where .= qq| AND NOT obsolete|;
   }
 
+  if ($form->{business_id}) {
+    $where .= qq| AND (business_id = ?)|;
+    push(@values, conv_i($form->{business_id}));
+  }
+
   my $query =
     qq|SELECT ct.*, b.description AS business | .
     qq|FROM $cv ct | .