From 8a264a1ecb751a8451bd2f26c5791a4db3f9c60b Mon Sep 17 00:00:00 2001 From: Martin Renvoize Date: Tue, 16 Mar 2021 17:12:07 +0000 Subject: [PATCH] Bug 22435: Use 'CREATE' offset type in Koha::Account This patch updates the Koha::Account methods for adding debits and credits to use the 'CREATE' offset type for the creation record. Signed-off-by: Victor Grousset/tuxayo Signed-off-by: Nick Clemens Signed-off-by: Tomas Cohen Arazi --- Koha/Account.pm | 35 +++-------------------------------- 1 file changed, 3 insertions(+), 32 deletions(-) diff --git a/Koha/Account.pm b/Koha/Account.pm index 23252c7332..f175d53ef9 100644 --- a/Koha/Account.pm +++ b/Koha/Account.pm @@ -62,7 +62,6 @@ Koha::Account->new( { patron_id => $borrowernumber } )->pay( library_id => $branchcode, lines => $lines, # Arrayref of Koha::Account::Line objects to pay credit_type => $type, # credit_type_code code - offset_type => $offset_type, # offset type code item_id => $itemnumber, # pass the itemnumber if this is a credit pertianing to a specific item (i.e LOST_FOUND) } ); @@ -242,8 +241,8 @@ sub add_credit { my $account_offset = Koha::Account::Offset->new( { credit_id => $line->id, - type => $Koha::Account::offset_type->{$credit_type} // $Koha::Account::offset_type->{CREDIT}, - amount => $amount + type => 'CREATE', + amount => $amount } )->store(); @@ -459,7 +458,6 @@ sub add_debit { my $transaction_type = $params->{transaction_type}; my $item_id = $params->{item_id}; my $issue_id = $params->{issue_id}; - my $offset_type = $Koha::Account::offset_type->{$debit_type} // 'Manual Debit'; my $line; my $schema = Koha::Database->new->schema; @@ -496,7 +494,7 @@ sub add_debit { my $account_offset = Koha::Account::Offset->new( { debit_id => $line->id, - type => $offset_type, + type => 'CREATE', amount => $amount } )->store(); @@ -774,33 +772,6 @@ sub reconcile_balance { 1; -=head2 Name mappings - -=head3 $offset_type - -=cut - -our $offset_type = { - 'CREDIT' => 'Manual Credit', - 'FORGIVEN' => 'Writeoff', - 'LOST_FOUND' => 'Lost Item Found', - 'OVERPAYMENT' => 'Overpayment', - 'PAYMENT' => 'Payment', - 'WRITEOFF' => 'Writeoff', - 'ACCOUNT' => 'Account Fee', - 'ACCOUNT_RENEW' => 'Account Fee', - 'RESERVE' => 'Reserve Fee', - 'PROCESSING' => 'Processing Fee', - 'LOST' => 'Lost Item', - 'RENT' => 'Rental Fee', - 'RENT_DAILY' => 'Rental Fee', - 'RENT_RENEW' => 'Rental Fee', - 'RENT_DAILY_RENEW' => 'Rental Fee', - 'OVERDUE' => 'OVERDUE', - 'RESERVE_EXPIRED' => 'Hold Expired', - 'PAYOUT' => 'PAYOUT', -}; - =head1 AUTHORS =encoding utf8 -- 2.20.1