|
Lines 55-62
output_and_exit_if_error(
Link Here
|
| 55 |
} |
55 |
} |
| 56 |
); |
56 |
); |
| 57 |
|
57 |
|
| 58 |
my $letter = C4::Letters::getletter( 'circulation', 'ACCOUNT_CREDIT', |
58 |
my $letter = C4::Letters::GetPreparedLetter( |
| 59 |
C4::Context::mybranch, 'print', $patron->lang ); |
59 |
module => 'circulation', |
|
|
60 |
letter_code => $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', |
| 76 |
letter_code => 'ACCOUNT_CREDIT', |
| 77 |
branchcode => C4::Context::mybranch, |
| 78 |
message_transport_type => 'print', |
| 79 |
lang => $patron->lang, |
| 80 |
tables => { |
| 81 |
credits => $credit_id, |
| 82 |
borrowers => $patron->borrowernumber |
| 83 |
}, |
| 84 |
substitute => { |
| 85 |
tendered => scalar $input->param('tendered'), |
| 86 |
change => scalar $input->param('change') |
| 87 |
} |
| 88 |
); |
| 60 |
|
89 |
|
| 61 |
$template->param( |
90 |
$template->param( |
| 62 |
letter => $letter, |
91 |
letter => $letter, |
| 63 |
- |
|
|