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

(-)a/C4/RotatingCollections.pm (-2 / +2 lines)
Lines 447-454 sub TransferCollection { Link Here
447
    my @results;
447
    my @results;
448
    while ( my $item = $sth->fetchrow_hashref ) {
448
    while ( my $item = $sth->fetchrow_hashref ) {
449
        my ($status) = CheckReserves( $item->{itemnumber} );
449
        my ($status) = CheckReserves( $item->{itemnumber} );
450
        my @transfers = GetTransfers( $item->{itemnumber} );
450
        my @transfers = C4::Circulation::GetTransfers( $item->{itemnumber} );
451
        transferbook( $colBranchcode, $item->{barcode}, my $ignore_reserves = 1 ) unless ( $status eq 'Waiting' || @transfers );
451
        C4::Circulation::transferbook( $colBranchcode, $item->{barcode}, my $ignore_reserves = 1 ) unless ( $status eq 'Waiting' || @transfers );
452
    }
452
    }
453
453
454
    return 1;
454
    return 1;
(-)a/rotating_collections/transferCollection.pl (-2 / +2 lines)
Lines 72-78 foreach my $br ( keys %$branches ) { Link Here
72
@branchoptionloop = sort {$a->{name} cmp $b->{name}} @branchoptionloop;
72
@branchoptionloop = sort {$a->{name} cmp $b->{name}} @branchoptionloop;
73
73
74
## Get data about collection
74
## Get data about collection
75
my ( $colId, $colTitle, $colDesc, $colBranchcode ) = GetCollection($colId);
75
my ( $colTitle, $colDesc, $colBranchcode );
76
( $colId, $colTitle, $colDesc, $colBranchcode ) = GetCollection($colId);
76
$template->param(
77
$template->param(
77
    colId            => $colId,
78
    colId            => $colId,
78
    colTitle         => $colTitle,
79
    colTitle         => $colTitle,
79
- 

Return to bug 15066