From d296876626d30f89fc92e66804ad9fe8270001ad Mon Sep 17 00:00:00 2001 From: =?utf8?q?Nazl=C4=B1=20=C3=87etin?= Date: Fri, 21 Feb 2020 14:33:42 +0000 Subject: [PATCH] Bug 21879: Code cleaning in printinvoice.pl Coming from commit 51aa6db46c604aa202a3d8f8e5028557480efbd5 Bug 12001: Move GetMemberAccountRecords to the Koha namespace Signed-off-by: Jonathan Druart Signed-off-by: Martin Renvoize --- members/printinvoice.pl | 12 ------------ 1 file changed, 12 deletions(-) diff --git a/members/printinvoice.pl b/members/printinvoice.pl index 79b8673f3f..38950e3647 100755 --- a/members/printinvoice.pl +++ b/members/printinvoice.pl @@ -74,18 +74,6 @@ if ( $accountline->{'amountoutstanding'} <= 0 ) { $accountline->{'amountoutstandingcredit'} = 1; } -my %row = ( - 'date' => dt_from_string( $accountline->{'date'} ), - 'amountcredit' => $accountline->{'amountcredit'}, - 'amountoutstandingcredit' => $accountline->{'amountoutstandingcredit'}, - 'description' => $accountline->{'description'}, - 'amount' => sprintf( "%.2f", $accountline->{'amount'} ), - 'amountoutstanding' => - sprintf( "%.2f", $accountline->{'amountoutstanding'} ), - 'debit_type_code' => $accountline->{'debit_type_code'}, - 'note' => $accountline->{'note'}, -); - my @account_offsets = Koha::Account::Offsets->search( { debit_id => $accountline_object->id } ); my $letter = C4::Letters::getletter( 'circulation', 'ACCOUNT_DEBIT', C4::Context::mybranch, 'print', $patron->lang ); -- 2.39.5