From 233c00b160a769b46815ea7f8b45e9a52a1397bd Mon Sep 17 00:00:00 2001 From: Moritz Bunkus Date: Mon, 11 Feb 2013 10:53:07 +0100 Subject: [PATCH] =?utf8?q?SEPA-=C3=9Cberweisung:=20Rechnungen=20mit=20NICH?= =?utf8?q?T=20gesetztem=20"Lastschrifteinzug"=20vorausw=C3=A4hlen?= MIME-Version: 1.0 Content-Type: text/plain; charset=utf8 Content-Transfer-Encoding: 8bit Die Logik ist im Einkauf genau umgekehrt zum Verkauf. "Lastschrifteinzug" bedeutet im Verkauf, dass wir einziehen, also dass wir die Rechnung via SEPA anweisen müssen. Im Einkauf bedeutet es, dass der Lieferant direkt von uns einzieht und wir deshalb nichts manuell machen müssen. --- bin/mozilla/sepa.pl | 7 ++++++- 1 file changed, 6 insertions(+), 1 deletion(-) diff --git a/bin/mozilla/sepa.pl b/bin/mozilla/sepa.pl index 40d2dff79..518b9a8fc 100755 --- a/bin/mozilla/sepa.pl +++ b/bin/mozilla/sepa.pl @@ -40,7 +40,12 @@ sub bank_transfer_add { return; } - $_->{checked} = $_->{direct_debit} for @{ $invoices }; + # Only include those per default that require manual action from our + # side. For sales invoices these are the ones for which direct debit + # has been selected. For purchase invoices it's the other way + # around: if direct debit is active then the vendor will collect + # from us automatically and we don't have to send money manually. + $_->{checked} = ($vc eq 'customer' ? $_->{direct_debit} : !$_->{direct_debit}) for @{ $invoices }; my $bank_account_label_sub = sub { $locale->text('Account number #1, bank code #2, #3', $_[0]->{account_number}, $_[0]->{bank_code}, $_[0]->{bank}) }; -- 2.20.1