my $letter = C4::Letters::GetPreparedLetter(
module => 'members',
letter_code => 'DISCHARGE',
tables => { borrowers => $params->{borrowernumber}, },
tables => { borrowers => $params->{borrowernumber}, branches => $params->{'branchcode'}, },
);
my $today = output_pref( dt_from_string() );
}
eval {
my $pdf_path = Koha::Borrower::Discharge::generate_as_pdf(
{ borrowernumber => $borrowernumber, } );
{ borrowernumber => $borrowernumber, branchcode => $data->{'branchcode'} } );
binmode(STDOUT);
print $input->header(
elsif ( $op eq 'get' ) {
# Getting member data
my $data = GetMember( borrowernumber => $loggedinuser );
my $pdf_path = Koha::Borrower::Discharge::generate_as_pdf({
borrowernumber => $loggedinuser
borrowernumber => $loggedinuser,
branchcode => $data->{'branchcode'},
});
-