Lines 516-525
Returns the related Koha::Biblio object for this hold
Link Here
|
516 |
|
516 |
|
517 |
sub biblio { |
517 |
sub biblio { |
518 |
my ($self) = @_; |
518 |
my ($self) = @_; |
519 |
|
519 |
my $rs = $self->_result->biblionumber; |
520 |
$self->{_biblio} ||= Koha::Biblios->find( $self->biblionumber() ); |
520 |
return Koha::Biblio->_new_from_dbic($rs); |
521 |
|
|
|
522 |
return $self->{_biblio}; |
523 |
} |
521 |
} |
524 |
|
522 |
|
525 |
=head3 patron |
523 |
=head3 patron |
Lines 530-538
Returns the related Koha::Patron object for this hold
Link Here
|
530 |
|
528 |
|
531 |
sub patron { |
529 |
sub patron { |
532 |
my ($self) = @_; |
530 |
my ($self) = @_; |
533 |
|
531 |
my $rs = $self->_result->patron; |
534 |
my $patron_rs = $self->_result->patron; |
532 |
return Koha::Patron->_new_from_dbic($rs); |
535 |
return Koha::Patron->_new_from_dbic($patron_rs); |
|
|
536 |
} |
533 |
} |
537 |
|
534 |
|
538 |
=head3 item |
535 |
=head3 item |
Lines 543-552
Returns the related Koha::Item object for this Hold
Link Here
|
543 |
|
540 |
|
544 |
sub item { |
541 |
sub item { |
545 |
my ($self) = @_; |
542 |
my ($self) = @_; |
546 |
|
543 |
my $rs = $self->_result->itemnumber; |
547 |
$self->{_item} ||= Koha::Items->find( $self->itemnumber() ); |
544 |
return unless $rs; |
548 |
|
545 |
return Koha::Item->_new_from_dbic($rs); |
549 |
return $self->{_item}; |
|
|
550 |
} |
546 |
} |
551 |
|
547 |
|
552 |
=head3 item_group |
548 |
=head3 item_group |
Lines 557-566
Returns the related Koha::Biblio::ItemGroup object for this Hold
Link Here
|
557 |
|
553 |
|
558 |
sub item_group { |
554 |
sub item_group { |
559 |
my ($self) = @_; |
555 |
my ($self) = @_; |
560 |
|
556 |
my $rs = $self->_result->item_group; |
561 |
my $item_group_rs = $self->_result->item_group; |
557 |
return unless $rs; |
562 |
return unless $item_group_rs; |
558 |
return Koha::Biblio::ItemGroup->_new_from_dbic($rs); |
563 |
return Koha::Biblio::ItemGroup->_new_from_dbic($item_group_rs); |
|
|
564 |
} |
559 |
} |
565 |
|
560 |
|
566 |
=head3 branch |
561 |
=head3 branch |
Lines 571-580
Returns the related Koha::Library object for this Hold
Link Here
|
571 |
|
566 |
|
572 |
sub branch { |
567 |
sub branch { |
573 |
my ($self) = @_; |
568 |
my ($self) = @_; |
574 |
|
569 |
my $rs = $self->_result->branchcode; |
575 |
$self->{_branch} ||= Koha::Libraries->find( $self->branchcode() ); |
570 |
return Koha::Library->_new_from_dbic($rs); |
576 |
|
|
|
577 |
return $self->{_branch}; |
578 |
} |
571 |
} |
579 |
|
572 |
|
580 |
=head3 desk |
573 |
=head3 desk |
Lines 599-608
Returns the related Koha::Patron object for this Hold
Link Here
|
599 |
# FIXME Should be renamed with ->patron |
592 |
# FIXME Should be renamed with ->patron |
600 |
sub borrower { |
593 |
sub borrower { |
601 |
my ($self) = @_; |
594 |
my ($self) = @_; |
602 |
|
595 |
my $rs = $self->_result->borrowernumber; |
603 |
$self->{_borrower} ||= Koha::Patrons->find( $self->borrowernumber() ); |
596 |
return Koha::Patron->_new_from_dbic($rs); |
604 |
|
|
|
605 |
return $self->{_borrower}; |
606 |
} |
597 |
} |
607 |
|
598 |
|
608 |
=head3 is_suspended |
599 |
=head3 is_suspended |