From: Moritz Bunkus <m.bunkus@linet-services.de>
Date: Thu, 13 Jan 2011 14:38:45 +0000 (+0100)
Subject: Kunden-/Lieferantensuche: Eingestellter Filter nach Kunden-/Lieferantentyp in Kopftex... 
X-Git-Tag: release-2.6.2beta2~18
X-Git-Url: http://wagnertech.de/git?a=commitdiff_plain;h=864977c68b9507ca48c895c91530dcb21a65f936;p=kivitendo-erp.git

Kunden-/Lieferantensuche: Eingestellter Filter nach Kunden-/Lieferantentyp in Kopftexte anzeigen

Teil eines Fixes für Bug 1552.
---

diff --git a/bin/mozilla/ct.pl b/bin/mozilla/ct.pl
index ea830e5d1..b6e8c7b78 100644
--- a/bin/mozilla/ct.pl
+++ b/bin/mozilla/ct.pl
@@ -50,6 +50,7 @@ use POSIX qw(strftime);
 
 use SL::CT;
 use SL::CVar;
+use SL::DB::Business;
 use SL::ReportGenerator;
 
 require "bin/mozilla/common.pl";
@@ -141,6 +142,14 @@ sub list_names {
   push @options, $locale->text('Billing/shipping address (zipcode)') . " : $form->{zipcode}"   if $form->{addr_zipcode};
   push @options, $locale->text('Billing/shipping address (street)')  . " : $form->{street}"    if $form->{addr_street};
 
+  if ($form->{business_id}) {
+    my $business = SL::DB::Manager::Business->find_by(id => $form->{business_id});
+    if ($business) {
+      my $label = $form->{IS_CUSTOMER} ? $::locale->text('Customer type') : $::locale->text('Vendor type');
+      push @options, $label . " : " . $business->description;
+    }
+  }
+
   my @columns = (
     'id',        'name',      "$form->{db}number",   'contact',  'phone',
     'fax',       'email',     'taxnumber',           'street',   'zipcode' , 'city',