Lines 1173-1179
subtest "Payment notice tests" => sub {
Link Here
|
1173 |
)->store(); |
1173 |
)->store(); |
1174 |
|
1174 |
|
1175 |
my $letter = Koha::Notice::Templates->find( { code => 'ACCOUNT_PAYMENT' } ); |
1175 |
my $letter = Koha::Notice::Templates->find( { code => 'ACCOUNT_PAYMENT' } ); |
1176 |
$letter->content('[%- USE Price -%]A payment of [% credit.amount * -1 | $Price %] has been applied to your account.'); |
1176 |
$letter->content('[%- USE Price -%]A payment of [% credit.amount * -1 | $Price %] has been applied to your account. Your [% branch.branchcode %]'); |
1177 |
$letter->store(); |
1177 |
$letter->store(); |
1178 |
|
1178 |
|
1179 |
t::lib::Mocks::mock_preference('UseEmailReceipts', '0'); |
1179 |
t::lib::Mocks::mock_preference('UseEmailReceipts', '0'); |
Lines 1185-1206
subtest "Payment notice tests" => sub {
Link Here
|
1185 |
|
1185 |
|
1186 |
t::lib::Mocks::mock_preference('UseEmailReceipts', '1'); |
1186 |
t::lib::Mocks::mock_preference('UseEmailReceipts', '1'); |
1187 |
|
1187 |
|
1188 |
$id = $account->pay( { amount => 12 } ); |
1188 |
$id = $account->pay( { amount => 12, library_id => $branchcode } ); |
1189 |
my $notice = Koha::Notice::Messages->search()->next(); |
1189 |
my $notice = Koha::Notice::Messages->search()->next(); |
1190 |
is( $notice->subject, 'Account payment', 'Notice subject is correct for payment' ); |
1190 |
is( $notice->subject, 'Account payment', 'Notice subject is correct for payment' ); |
1191 |
is( $notice->letter_code, 'ACCOUNT_PAYMENT', 'Notice letter code is correct for payment' ); |
1191 |
is( $notice->letter_code, 'ACCOUNT_PAYMENT', 'Notice letter code is correct for payment' ); |
1192 |
is( $notice->content, 'A payment of 12.00 has been applied to your account.', 'Notice content is correct for payment' ); |
1192 |
is( $notice->content, "A payment of 12.00 has been applied to your account. Your $branchcode", 'Notice content is correct for payment' ); |
1193 |
$notice->delete(); |
1193 |
$notice->delete(); |
1194 |
|
1194 |
|
1195 |
$letter = Koha::Notice::Templates->find( { code => 'ACCOUNT_WRITEOFF' } ); |
1195 |
$letter = Koha::Notice::Templates->find( { code => 'ACCOUNT_WRITEOFF' } ); |
1196 |
$letter->content('[%- USE Price -%]A writeoff of [% credit.amount * -1 | $Price %] has been applied to your account.'); |
1196 |
$letter->content('[%- USE Price -%]A writeoff of [% credit.amount * -1 | $Price %] has been applied to your account. Your [% branch.branchcode %]'); |
1197 |
$letter->store(); |
1197 |
$letter->store(); |
1198 |
|
1198 |
|
1199 |
$id = $account->pay( { amount => 13, type => 'WRITEOFF' } ); |
1199 |
$id = $account->pay( { amount => 13, type => 'WRITEOFF', library_id => $branchcode } ); |
1200 |
$notice = Koha::Notice::Messages->search()->next(); |
1200 |
$notice = Koha::Notice::Messages->search()->next(); |
1201 |
is( $notice->subject, 'Account writeoff', 'Notice subject is correct for payment' ); |
1201 |
is( $notice->subject, 'Account writeoff', 'Notice subject is correct for payment' ); |
1202 |
is( $notice->letter_code, 'ACCOUNT_WRITEOFF', 'Notice letter code is correct for writeoff' ); |
1202 |
is( $notice->letter_code, 'ACCOUNT_WRITEOFF', 'Notice letter code is correct for writeoff' ); |
1203 |
is( $notice->content, 'A writeoff of 13.00 has been applied to your account.', 'Notice content is correct for writeoff' ); |
1203 |
is( $notice->content, "A writeoff of 13.00 has been applied to your account. Your $branchcode", 'Notice content is correct for writeoff' ); |
1204 |
}; |
1204 |
}; |
1205 |
|
1205 |
|
1206 |
1; |
1206 |
1; |
1207 |
- |
|
|