Lines 56-77
output_and_exit_if_error(
Link Here
|
56 |
); |
56 |
); |
57 |
|
57 |
|
58 |
my $letter = C4::Letters::GetPreparedLetter( |
58 |
my $letter = C4::Letters::GetPreparedLetter( |
59 |
module => 'circulation', |
|
|
60 |
letter_code => 'CREDIT_' . $credit->credit_type_code, |
61 |
branchcode => C4::Context::mybranch, |
62 |
message_transport_type => 'print', |
63 |
lang => $patron->lang, |
64 |
tables => { |
65 |
credits => $credit_id, |
66 |
borrowers => $patron->borrowernumber |
67 |
}, |
68 |
substitute => { |
69 |
tendered => scalar $input->param('tendered'), |
70 |
change => scalar $input->param('change') |
71 |
} |
72 |
); |
73 |
|
74 |
$letter //= C4::Letters::GetPreparedLetter( |
75 |
module => 'circulation', |
59 |
module => 'circulation', |
76 |
letter_code => 'ACCOUNT_CREDIT', |
60 |
letter_code => 'ACCOUNT_CREDIT', |
77 |
branchcode => C4::Context::mybranch, |
61 |
branchcode => C4::Context::mybranch, |
Lines 88-96
$letter //= C4::Letters::GetPreparedLetter(
Link Here
|
88 |
); |
72 |
); |
89 |
|
73 |
|
90 |
$template->param( |
74 |
$template->param( |
91 |
slip => $letter->{content}, |
75 |
slip => $letter->{content}, |
92 |
plain => !$letter->{is_html}, |
76 |
plain => !$letter->{is_html} |
93 |
patron => $patron, |
|
|
94 |
); |
77 |
); |
95 |
|
78 |
|
96 |
output_html_with_http_headers $input, $cookie, $template->output; |
79 |
output_html_with_http_headers $input, $cookie, $template->output; |
97 |
- |
|
|