@@ -, +, @@
---
C4/Accounts.pm | 2 +-
C4/Circulation.pm | 2 +-
Koha/Account.pm | 4 +-
.../prog/en/includes/accounts.inc | 2 +-
.../prog/en/modules/members/maninvoice.tt | 2 +-
.../bootstrap/en/modules/opac-account.tt | 2 +-
opac/opac-user.pl | 2 +-
t/db_dependent/Accounts.t | 40 +++++++++----------
t/db_dependent/Circulation.t | 10 ++---
9 files changed, 33 insertions(+), 33 deletions(-)
--- a/C4/Accounts.pm
+++ a/C4/Accounts.pm
@@ -91,7 +91,7 @@ sub chargelostitem{
my $existing_charges = $account->lines->search(
{
itemnumber => $itemnumber,
- accounttype => 'L',
+ accounttype => 'LOST',
}
)->count();
--- a/C4/Circulation.pm
+++ a/C4/Circulation.pm
@@ -2380,7 +2380,7 @@ sub _FixAccountForLostAndReturned {
my $accountlines = Koha::Account::Lines->search(
{
itemnumber => $itemnumber,
- accounttype => { -in => [ 'L', 'W' ] },
+ accounttype => { -in => [ 'LOST', 'W' ] },
},
{
order_by => { -desc => [ 'date', 'accountlines_id' ] }
--- a/Koha/Account.pm
+++ a/Koha/Account.pm
@@ -106,7 +106,7 @@ sub pay {
$fine->amountoutstanding($new_amountoutstanding)->store();
$balance_remaining = $balance_remaining - $amount_to_pay;
- if ( $fine->itemnumber && $fine->accounttype && ( $fine->accounttype eq 'L' ) )
+ if ( $fine->itemnumber && $fine->accounttype && ( $fine->accounttype eq 'LOST' ) )
{
C4::Circulation::ReturnLostItem( $self->{patron_id}, $fine->itemnumber );
}
@@ -697,7 +697,7 @@ our $account_type_credit = {
our $account_type_debit = {
'account' => 'A',
'overdue' => 'OVERDUE',
- 'lost_item' => 'L',
+ 'lost_item' => 'LOST',
'new_card' => 'N',
'sundry' => 'M',
'processing' => 'PF',
--- a/koha-tmpl/intranet-tmpl/prog/en/includes/accounts.inc
+++ a/koha-tmpl/intranet-tmpl/prog/en/includes/accounts.inc
@@ -8,7 +8,7 @@
[%- CASE 'OVERDUE' -%]Fine[%- PROCESS account_status_description account=account -%]
[%- CASE 'A' -%]Account management fee
[%- CASE 'M' -%]Sundry
- [%- CASE 'L' -%]Lost item
+ [%- CASE 'LOST' -%]Lost item
[%- CASE 'W' -%]Writeoff[%- PROCESS account_status_description account=account -%]
[%- CASE 'HE' -%]Hold waiting too long
[%- CASE 'Rent' -%]Rental fee
--- a/koha-tmpl/intranet-tmpl/prog/en/modules/members/maninvoice.tt
+++ a/koha-tmpl/intranet-tmpl/prog/en/modules/members/maninvoice.tt
@@ -79,7 +79,7 @@
[% INCLUDE 'str/members-menu.inc' %]
[% Asset.js("js/members-menu.js") | $raw %]