Lines 569-587
we still expect the item to end up at a final location eventually.
Link Here
|
569 |
|
569 |
|
570 |
sub get_transfer { |
570 |
sub get_transfer { |
571 |
my ($self) = @_; |
571 |
my ($self) = @_; |
572 |
my $transfer_rs = $self->_result->branchtransfers->search( |
572 |
|
573 |
{ |
573 |
my $transfers_rs = Koha::Item::Transfers |
574 |
datearrived => undef, |
574 |
->_new_from_dbic(scalar $self->_result->branchtransfers) |
575 |
datecancelled => undef |
575 |
->filter_by_current |
576 |
}, |
576 |
->search( {}, { order_by => [ { -desc => 'datesent' }, { -asc => 'daterequested' } ], rows => 1 } ); |
577 |
{ |
577 |
|
578 |
order_by => |
578 |
return $transfers_rs->next; |
579 |
[ { -desc => 'datesent' }, { -asc => 'daterequested' } ], |
|
|
580 |
rows => 1 |
581 |
} |
582 |
)->first; |
583 |
return unless $transfer_rs; |
584 |
return Koha::Item::Transfer->_new_from_dbic($transfer_rs); |
585 |
} |
579 |
} |
586 |
|
580 |
|
587 |
=head3 get_transfers |
581 |
=head3 get_transfers |
Lines 603-619
we still expect the item to end up at a final location eventually.
Link Here
|
603 |
|
597 |
|
604 |
sub get_transfers { |
598 |
sub get_transfers { |
605 |
my ($self) = @_; |
599 |
my ($self) = @_; |
606 |
my $transfer_rs = $self->_result->branchtransfers->search( |
600 |
|
607 |
{ |
601 |
my $transfer_rs = $self->_result->branchtransfers; |
608 |
datearrived => undef, |
602 |
|
609 |
datecancelled => undef |
603 |
return Koha::Item::Transfers |
610 |
}, |
604 |
->_new_from_dbic($transfer_rs) |
611 |
{ |
605 |
->filter_by_current |
612 |
order_by => |
606 |
->search( {}, { order_by => [ { -desc => 'datesent' }, { -asc => 'daterequested' } ], } ); |
613 |
[ { -desc => 'datesent' }, { -asc => 'daterequested' } ], |
|
|
614 |
} |
615 |
); |
616 |
return Koha::Item::Transfers->_new_from_dbic($transfer_rs); |
617 |
} |
607 |
} |
618 |
|
608 |
|
619 |
=head3 last_returned_by |
609 |
=head3 last_returned_by |
620 |
- |
|
|