Koha-community/Koha
13
7
Fork 0
Code Issues Releases Wiki Activity

Bug 29757: Unit tests

Browse source 
Signed-off-by: Tomas Cohen Arazi <tomascohen@theke.io>
Signed-off-by: Kyle M Hall <kyle@bywatersolutions.com>
Signed-off-by: Martin Renvoize <martin.renvoize@ptfs-europe.com>
Signed-off-by: Fridolin Somers <fridolin.somers@biblibre.com>
This commit is contained in:
Tomás Cohen Arazi 2021-12-22 16:06:35 -03:00 committed by Fridolin Somers
parent d8f527667f
commit 3eca78a316
1 changed files with 32 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

34
t/db_dependent/Koha/Account/Offsets.t
View file

@ -19,8 +19,7 @@
use Modern::Perl;
use Test::More tests => 1;
use Test::Exception;
use Test::More tests => 2;
use Koha::Account::Offsets;
@ -73,3 +72,34 @@ subtest 'total() tests' => sub {
$schema->storage->txn_rollback;
};
subtest 'filter_by_non_reversable() and filter_by_reversable() tests' => sub {
plan tests => 4;
$schema->storage->txn_begin;
my $patron = $builder->build_object( { class => 'Koha::Patrons' } );
my $account = $patron->account;
my $manual_fee = $account->add_debit({ amount => 11, interface => 'intranet', type => 'MANUAL' });
$account->pay( { amount => 1, type => 'WRITEOFF' } );
$account->pay( { amount => 2, type => 'DISCOUNT' } );
$account->pay( { amount => 3, type => 'CANCELLATION' } );
$account->pay( { amount => 4, type => 'PAYMENT' } );
$account->pay( { amount => 5, type => 'CREDIT' } );
# non-reversable offsets
is( $manual_fee->debit_offsets->filter_by_non_reversable->count,
3, '3 non-reversable offsets' );
is( $manual_fee->debit_offsets->filter_by_non_reversable->total,
-6, '-6 the total amount of the non-reversable offsets' );
# reversable offsets
is( $manual_fee->debit_offsets->filter_by_reversable->count,
2, 'The right reversable offsets count' );
is( $manual_fee->debit_offsets->filter_by_reversable->total,
-5, 'The right total amount of the reversable offsets' );
$schema->storage->txn_rollback;
};