Bug 22518: Remove references to 'O' accounttype

I went back over 12 years to and still only found "FIXME: What are these
accounttypes" concerning the 'O' type and I couldn't find anywhere where
it was being set.

Signed-off-by: Martin Renvoize <martin.renvoize@ptfs-europe.com>

Signed-off-by: Josef Moravec <josef.moravec@gmail.com>

Signed-off-by: Marcel de Rooy <m.de.rooy@rijksmuseum.nl>

Signed-off-by: Nick Clemens <nick@bywatersolutions.com>
This commit is contained in:
Martin Renvoize 2019-03-15 13:29:00 +00:00 committed by Nick Clemens
parent 7aaa10e092
commit e8eb0cf0f2
4 changed files with 3 additions and 9 deletions

View File

@ -2329,10 +2329,7 @@ sub _FixOverduesOnReturn {
{
borrowernumber => $borrowernumber,
itemnumber => $item,
-or => [
accounttype => 'FU',
accounttype => 'O',
],
accounttype => 'FU'
}
)->next();
return 0 unless $accountline; # no warning, there's just nothing to fix

View File

@ -530,7 +530,6 @@ sub UpdateFine {
# "A" is Account Management Fee
# "N" is New Card
# "M" is Sundry
# "O" is Overdue ??
# "F" is Fine ??
# "FU" is Fine UPDATE??
# "Pay" is Payment
@ -538,7 +537,7 @@ sub UpdateFine {
my $sth = $dbh->prepare(
"SELECT * FROM accountlines
WHERE borrowernumber=? AND
(( accounttype IN ('O','F','M') AND amountoutstanding<>0 ) OR
(( accounttype IN ('F','M') AND amountoutstanding<>0 ) OR
accounttype = 'FU' )"
);
$sth->execute( $borrowernumber );

View File

@ -416,7 +416,6 @@ $debit_type can be any of:
- processing
- rent
- reserve
- overdue
- manual
=cut
@ -701,7 +700,6 @@ our $account_type_debit = {
'processing' => 'PF',
'rent' => 'Rent',
'reserve' => 'Res',
'overdue' => 'O',
'manual_debit' => 'M',
'hold_expired' => 'HE'
};

View File

@ -129,7 +129,7 @@ $dbh->{AutoCommit} = 0;
my $sth = $dbh->prepare("
SELECT accountlines_id, description
FROM accountlines
WHERE accounttype in ('FU', 'F', 'O', 'M')
WHERE accounttype in ('FU', 'F', 'M')
;");
$sth->execute();