|
Lines 598-614
sub get_transfers {
Link Here
|
| 598 |
|
598 |
|
| 599 |
=head3 last_returned_by |
599 |
=head3 last_returned_by |
| 600 |
|
600 |
|
| 601 |
Gets the last borrower to return an item. |
601 |
Gets and sets the last patron to return an item. |
| 602 |
|
602 |
|
| 603 |
$last_returned_by = $item->last_returned_by(); |
603 |
Accepts a patron's id (borrowernumber) and returns Koha::Patron objects |
|
|
604 |
|
| 605 |
$item->last_returned_by( $borrowernumber ); |
| 606 |
|
| 607 |
my $patron = $item->last_returned_by(); |
| 604 |
|
608 |
|
| 605 |
=cut |
609 |
=cut |
| 606 |
|
610 |
|
| 607 |
sub last_returned_by { |
611 |
sub last_returned_by { |
| 608 |
my ( $self ) = @_; |
612 |
my ( $self, $borrowernumber ) = @_; |
|
|
613 |
if ( $borrowernumber ) { |
| 614 |
$self->_result->update_or_create_related('last_returned_by', |
| 615 |
{ borrowernumber => $borrowernumber, itemnumber => $self->itemnumber } ); |
| 616 |
} |
| 609 |
my $rs = $self->_result->last_returned_by; |
617 |
my $rs = $self->_result->last_returned_by; |
| 610 |
return unless $rs; |
618 |
return unless $rs; |
| 611 |
return Koha::Patron->_new_from_dbic($rs); |
619 |
return Koha::Patron->_new_from_dbic($rs->borrowernumber); |
| 612 |
} |
620 |
} |
| 613 |
|
621 |
|
| 614 |
=head3 can_article_request |
622 |
=head3 can_article_request |