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

(-)a/opac/opac-reserve.pl (-7 / +5 lines)
Lines 537-548 foreach my $biblioNum (@biblionumbers) { Link Here
537
        }
537
        }
538
538
539
        # Check of the transferred documents
539
        # Check of the transferred documents
540
        my ( $transfertwhen, $transfertfrom, $transfertto ) =
540
        my $transfer = $item->get_transfer;
541
          GetTransfers($itemNum);
541
        if ( $transfer->in_transit ) {
542
        if ( $transfertwhen && ($transfertwhen ne '') ) {
542
            $itemLoopIter->{transfertwhen} = output_pref({ dt => dt_from_string($transfer->datesent), dateonly => 1 });
543
            $itemLoopIter->{transfertwhen} = output_pref({ dt => dt_from_string($transfertwhen), dateonly => 1 });
543
            $itemLoopIter->{transfertfrom} = $transfer->frombranch;
544
            $itemLoopIter->{transfertfrom} = $transfertfrom;
544
            $itemLoopIter->{transfertto} = $transfer->tobranch;
545
            $itemLoopIter->{transfertto} = $transfertto;
546
            $itemLoopIter->{nocancel} = 1;
545
            $itemLoopIter->{nocancel} = 1;
547
        }
546
        }
548
547
549
- 

Return to bug 24295