gitea
/
Koha-clms
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Bug 24380: Unit Test 

Signed-off-by: Martin Renvoize <martin.renvoize@ptfs-europe.com>
Signed-off-by: Jonathan Druart <jonathan.druart@bugs.koha-community.org>
Signed-off-by: Martin Renvoize <martin.renvoize@ptfs-europe.com>
This commit is contained in:
Kyle M Hall 2020-01-22 14:01:14 -05:00 committed by Martin Renvoize
parent b0e930aad8
commit 4b60a9f2bc
No known key found for this signature in database
GPG Key ID: 422B469130441A0F
1 changed files with 41 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

42
t/db_dependent/Circulation/Returns.t
View File

@ -17,7 +17,7 @@
use Modern::Perl;
use Test::More tests => 6;
use Test::More tests => 7;
use Test::MockModule;
use Test::Warn;
@ -399,4 +399,44 @@ subtest 'BranchTransferLimitsType' => sub {
is( $doreturn, 1, 'AddReturn should have checkin the item if BranchTransferLimitsType=itemtype');
};
subtest 'Backdated returns should reduce fine if needed' => sub {
plan tests => 1;
t::lib::Mocks::mock_preference( "CalculateFinesOnReturn", 0 );
my $biblio = $builder->build_object( { class => 'Koha::Biblios' } );
my $item = $builder->build_object(
{
class => 'Koha::Items',
value => {
biblionumber => $biblio->biblionumber,
notforloan => 0,
itemlost => 0,
withdrawn => 0,
}
}
);
my $patron = $builder->build_object({class => 'Koha::Patrons'});
my $checkout = AddIssue( $patron->unblessed, $item->barcode );
my $fine = Koha::Account::Line->new({
issue_id => $checkout->id,
borrowernumber => $patron->id,
itemnumber => $item->id,
date => dt_from_string(),
amount => 100,
amountoutstanding => 100,
debit_type_code => 'OVERDUE',
status => 'UNRETURNED',
timestamp => dt_from_string(),
manager_id => undef,
interface => 'cli',
branchcode => $patron->branchcode,
})->store();
my ( $doreturn, $messages, $issue ) = AddReturn($item->barcode, undef, undef, dt_from_string('1999-01-01') );
$fine->discard_changes;
is( $fine->amountoutstanding, '0.000000', "Fine was reduced correctly with a backdated return" );
};
$schema->storage->txn_rollback;