@@ -, +, @@ --- Koha/Checkouts/ReturnClaim.pm | 18 +++++++++++++++--- Koha/Schema/Result/ReturnClaim.pm | 8 ++++---- 2 files changed, 19 insertions(+), 7 deletions(-) --- a/Koha/Checkouts/ReturnClaim.pm +++ a/Koha/Checkouts/ReturnClaim.pm @@ -66,6 +66,7 @@ sub store { return $self->SUPER::store; } + =head3 checkout =cut @@ -73,10 +74,21 @@ sub store { sub checkout { my ($self) = @_; - my $checkout = Koha::Checkouts->find( $self->issue_id ) - || Koha::Old::Checkouts->find( $self->issue_id ); + my $checkout_rs = $self->_result->issue; + return unless $checkout_rs; + return Koha::Checkout->new_from_dbic($checkout_rs); +} + +=head3 old_checkout + +=cut + +sub old_checkout { + my ($self) = @_; - return $checkout; + my $old_checkout_rs = $self->_result->old_issue; + return unless $old_checkout_rs; + return Koha::Old::Checkout->_new_from_dbic($old_checkout_rs); } =head3 patron --- a/Koha/Schema/Result/ReturnClaim.pm +++ a/Koha/Schema/Result/ReturnClaim.pm @@ -280,7 +280,7 @@ __PACKAGE__->belongs_to( # Created by DBIx::Class::Schema::Loader v0.07049 @ 2021-11-17 10:01:24 # DO NOT MODIFY THIS OR ANYTHING ABOVE! md5sum:Ik93SD3kLNecIyRgsBVKDQ -=head2 issue +=head2 checkout Type: belongs_to @@ -289,7 +289,7 @@ Related object: L =cut __PACKAGE__->belongs_to( - "issue", + "checkout", "Koha::Schema::Result::Issue", { issue_id => "issue_id" }, { @@ -298,7 +298,7 @@ __PACKAGE__->belongs_to( }, ); -=head2 old_issue +=head2 old_checkout Type: belongs_to @@ -307,7 +307,7 @@ Related object: L =cut __PACKAGE__->belongs_to( - "old_issue", + "old_checkout", "Koha::Schema::Result::OldIssue", { issue_id => "issue_id" }, { --