Bug 21879: Code cleaning in printinvoice.pl

Coming from
  commit 51aa6db46c604aa202a3d8f8e5028557480efbd5
  Bug 12001: Move GetMemberAccountRecords to the Koha namespace

Signed-off-by: Jonathan Druart <jonathan.druart@bugs.koha-community.org>
Signed-off-by: Martin Renvoize <martin.renvoize@ptfs-europe.com>

diff --git a/members/printinvoice.pl b/members/printinvoice.pl
index 79b8673..38950e3 100755 (executable)
--- 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 );