From 944d0062121dbbf3058fc307df411899f766b377 Mon Sep 17 00:00:00 2001 From: =?utf8?q?Jan=20B=C3=BCren?= Date: Tue, 5 Sep 2017 09:08:20 +0200 Subject: [PATCH] bank_transaction Testfall erweitert Sowohl negative Kreditorenbelege als auch negative Einkaufsrechnungen testen. --- t/bank/bank_transactions.t | 9 +++++---- 1 file changed, 5 insertions(+), 4 deletions(-) diff --git a/t/bank/bank_transactions.t b/t/bank/bank_transactions.t index 69028b143..a85a72f3f 100644 --- a/t/bank/bank_transactions.t +++ b/t/bank/bank_transactions.t @@ -1,4 +1,4 @@ -use Test::More tests => 130; +use Test::More tests => 137; use strict; @@ -76,7 +76,8 @@ test_two_invoices(); test_partial_payment(); test_credit_note(); test_ap_transaction(); -test_neg_ap_transaction(); +test_neg_ap_transaction(invoice => 0); +test_neg_ap_transaction(invoice => 1); test_ap_payment_transaction(); test_ap_payment_part_transaction(); test_neg_sales_invoice(); @@ -448,11 +449,11 @@ sub test_credit_note { sub test_neg_ap_transaction { my (%params) = @_; - my $testname = 'test_neg_ap_transaction'; + my $testname = 'test_neg_ap_transaction' . $params{invoice} ? ' invoice booking' : ' credit booking'; my $netamount = -20; my $amount = $::form->round_amount($netamount * 1.19,2); my $invoice = SL::DB::PurchaseInvoice->new( - invoice => 0, + invoice => $params{invoice} // 0, invnumber => $params{invnumber} || 'test_neg_ap_transaction', amount => $amount, netamount => $netamount, -- 2.20.1