X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;ds=sidebyside;f=bin%2Fmozilla%2Fct.pl;h=706860a1f983bdcf30dfe99c11018fd46aceb692;hb=637be9d46084bc19a08b91bc13ae541a6c36f9ef;hp=0534895119a04ea5f13abc4bc1ed2fc18c667d63;hpb=69da19a7739b94fa368cec6092a83e37542dac9d;p=kivitendo-erp.git diff --git a/bin/mozilla/ct.pl b/bin/mozilla/ct.pl index 053489511..706860a1f 100644 --- a/bin/mozilla/ct.pl +++ b/bin/mozilla/ct.pl @@ -68,6 +68,31 @@ sub add { sub search { $lxdebug->enter_sub(); + my $vc_business_type = $form->{db} eq "customer" ? + $locale->text("Customer type") : $locale->text("Vendor type"); + + $form->get_lists("business_types" => "ALL_BUSINESS_TYPES"); + my (%labels, @values); + + my $business_types; + if (scalar(@{ $form->{ALL_BUSINESS_TYPES} }) != 0) { + push(@values, undef); + foreach my $item (@{ $form->{ALL_BUSINESS_TYPES} }) { + push(@values, $item->{id}); + $labels{$item->{id}} = $item->{description}; + } + + $business_types = + qq|