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

(-)a/t/db_dependent/Circulation/transferbook.t (-8 / +7 lines)
Lines 21-27 use Test::More tests => 6; Link Here
21
use t::lib::TestBuilder;
21
use t::lib::TestBuilder;
22
use t::lib::Mocks;
22
use t::lib::Mocks;
23
23
24
use C4::Circulation qw( transferbook AddIssue GetTransfers );
24
use C4::Circulation qw( transferbook AddIssue );
25
use C4::Reserves qw( AddReserve );
25
use C4::Reserves qw( AddReserve );
26
use Koha::DateUtils qw( dt_from_string );
26
use Koha::DateUtils qw( dt_from_string );
27
use Koha::Item::Transfers;
27
use Koha::Item::Transfers;
Lines 317-334 subtest 'transferbook test from branch' => sub { Link Here
317
        barcode   => $item->barcode,
317
        barcode   => $item->barcode,
318
        trigger => "Manual"
318
        trigger => "Manual"
319
    });
319
    });
320
    my ($datesent,$from_branch,$to_branch) = GetTransfers($item->itemnumber);
320
    my $transfer = $item->get_transfer;
321
    is( $from_branch, $library->branchcode, 'The transfer is initiated from the specified branch, not the items home or holdingbranch');
321
    is( $transfer->frombranch, $library->branchcode, 'The transfer is initiated from the specified branch, not the items home or holdingbranch');
322
    is( $to_branch, $item->homebranch, 'The transfer is initiated to the specified branch');
322
    is( $transfer->tobranch, $item->homebranch, 'The transfer is initiated to the specified branch');
323
    C4::Circulation::transferbook({
323
    C4::Circulation::transferbook({
324
        from_branch => $item->homebranch,
324
        from_branch => $item->homebranch,
325
        to_branch => $library->branchcode,
325
        to_branch => $library->branchcode,
326
        barcode   => $item->barcode,
326
        barcode   => $item->barcode,
327
        trigger => "Manual"
327
        trigger => "Manual"
328
    });
328
    });
329
    ($datesent,$from_branch,$to_branch) = GetTransfers($item->itemnumber);
329
    $transfer = $item->get_transfer;
330
    is( $from_branch, $item->homebranch, 'The transfer is initiated from the specified branch');
330
    is( $transfer->frombranch, $item->homebranch, 'The transfer is initiated from the specified branch');
331
    is( $to_branch, $library->branchcode, 'The transfer is initiated to the specified branch');
331
    is( $transfer->tobranch, $library->branchcode, 'The transfer is initiated to the specified branch');
332
332
333
};
333
};
334
$schema->storage->txn_rollback;
334
$schema->storage->txn_rollback;
335
- 

Return to bug 24295