From da413cb1223e7cb62fdffee70bdd2845d9b30d66 Mon Sep 17 00:00:00 2001 From: Moritz Bunkus Date: Fri, 20 Jan 2017 17:34:01 +0100 Subject: [PATCH] =?utf8?q?Einkaufsrechnungen:=20Abteilungs-=20&=20Projekta?= =?utf8?q?uswahl=20nicht=20=C3=BCber=20Multibox?= MIME-Version: 1.0 Content-Type: text/plain; charset=utf8 Content-Transfer-Encoding: 8bit --- SL/IS.pm | 3 --- bin/mozilla/ir.pl | 22 ++++------------------ templates/webpages/ir/form_header.html | 24 ++++-------------------- 3 files changed, 8 insertions(+), 41 deletions(-) diff --git a/SL/IS.pm b/SL/IS.pm index 6d1e843cd..6018634dd 100644 --- a/SL/IS.pm +++ b/SL/IS.pm @@ -1339,9 +1339,6 @@ SQL # need the current dbh to get the not yet committed mtime $form->new_lastmtime('ar', $provided_dbh); - $form->{name} = $form->{customer}; - $form->{name} =~ s/--\Q$form->{customer_id}\E//; - # add shipto if (!$form->{shipto_id}) { $form->add_shipto($dbh, $form->{id}, "AR"); diff --git a/bin/mozilla/ir.pl b/bin/mozilla/ir.pl index 593d290ab..71d7d7369 100644 --- a/bin/mozilla/ir.pl +++ b/bin/mozilla/ir.pl @@ -36,6 +36,7 @@ use SL::FU; use SL::IR; use SL::IS; use SL::DB::Default; +use SL::DB::Department; use SL::DB::PurchaseInvoice; use List::Util qw(max sum); use List::UtilsBy qw(sort_by); @@ -140,17 +141,6 @@ sub invoice_links { $form->{vendor} = qq|$form->{vendor}--$form->{vendor_id}|; } - # departments - if ($form->{all_departments}) { - $form->{selectdepartment} = "