use C4::Context;
use C4::Auth;
use C4::Output;
-use C4::Members qw(GetOverduesForPatron);
use C4::Overdues qw(parse_overdues_letter);
+use Koha::Patrons;
+
my $input = new CGI;
my $flagsrequired = { circulate => "circulate_remaining_permissions" };
my $borrowernumber = $input->param('borrowernumber');
my $branchcode = C4::Context->userenv->{'branch'};
-my $overdues = GetOverduesForPatron($borrowernumber);
+my $logged_in_user = Koha::Patrons->find( $loggedinuser ) or die "Not logged in";
+my $patron = Koha::Patrons->find( $borrowernumber );
+output_and_exit_if_error( $input, $cookie, $template, { module => 'members', logged_in_user => $logged_in_user, current_patron => $patron } );
+
+my $overdues = [
+ map { $_->unblessed_all_relateds } $patron->get_overdues
+];
my $letter = parse_overdues_letter(
{