View | Details | Raw Unified | Return to bug 12868
Collapse All | Expand All

(-)a/t/db_dependent/Members.t (-4 / +23 lines)
Lines 293-309 is( Check_Userid( C4::Context->config('user'), '' ), 0, Link Here
293
293
294
subtest 'GetMemberAccountBalance' => sub {
294
subtest 'GetMemberAccountBalance' => sub {
295
295
296
    plan tests => 6;
296
    plan tests => 10;
297
297
298
    my $members_mock = new Test::MockModule('C4::Members');
298
    my $members_mock = new Test::MockModule('C4::Members');
299
    $members_mock->mock( 'GetMemberAccountRecords', sub {
299
    $members_mock->mock( 'GetMemberAccountRecords', sub {
300
        my @accountlines = (
300
        my ($borrowernumber) = @_;
301
        if ($borrowernumber) {
302
            my @accountlines = (
301
            { amountoutstanding => '7', accounttype => 'Rent' },
303
            { amountoutstanding => '7', accounttype => 'Rent' },
302
            { amountoutstanding => '5', accounttype => 'Res' },
304
            { amountoutstanding => '5', accounttype => 'Res' },
303
            { amountoutstanding => '3', accounttype => 'Pay' } );
305
            { amountoutstanding => '3', accounttype => 'Pay' } );
304
        return ( 15, \@accountlines );
306
            return ( 15, \@accountlines );
307
        }
308
        else {
309
            my @accountlines;
310
            return ( 0, \@accountlines );
311
        }
305
    });
312
    });
306
313
314
    my $person = GetMemberDetails(undef,undef);
315
    ok( !$person , 'Expected no member details from undef,undef' );
316
    $person = GetMemberDetails(undef,'987654321');
317
    is( $person->{amountoutstanding}, 15,
318
        'Expected 15 outstanding for cardnumber.');
319
    $borrowernumber = $person->{borrowernumber};
320
    $person = GetMemberDetails($borrowernumber,undef);
321
    is( $person->{amountoutstanding}, 15,
322
        'Expected 15 outstanding for borrowernumber.');
323
    $person = GetMemberDetails($borrowernumber,'987654321');
324
    is( $person->{amountoutstanding}, 15,
325
        'Expected 15 outstanding for both borrowernumber and cardnumber.');
326
307
    # do not count holds charges
327
    # do not count holds charges
308
    C4::Context->set_preference( 'HoldsInNoissuesCharge', '1' );
328
    C4::Context->set_preference( 'HoldsInNoissuesCharge', '1' );
309
    C4::Context->set_preference( 'ManInvInNoissuesCharge', '0' );
329
    C4::Context->set_preference( 'ManInvInNoissuesCharge', '0' );
310
- 

Return to bug 12868