Lines 3052-3058
subtest 'Incremented fee tests' => sub {
Link Here
|
3052 |
$accountline->delete(); |
3052 |
$accountline->delete(); |
3053 |
AddRenewal( $patron->id, $item->id, $library->id, $dt_to_renew, $dt_to ); |
3053 |
AddRenewal( $patron->id, $item->id, $library->id, $dt_to_renew, $dt_to ); |
3054 |
$accountline = Koha::Account::Lines->find({ itemnumber => $item->id }); |
3054 |
$accountline = Koha::Account::Lines->find({ itemnumber => $item->id }); |
3055 |
is( $accountline->amount, '13.000000', "Daily rental charge calculated correctly with finesCalendar = ignoreCalendar, for renewal" ); |
3055 |
is( $accountline->amount, '6.000000', "Daily rental charge calculated correctly with finesCalendar = ignoreCalendar, for renewal" ); |
3056 |
$accountline->delete(); |
3056 |
$accountline->delete(); |
3057 |
$issue->delete(); |
3057 |
$issue->delete(); |
3058 |
|
3058 |
|
Lines 3063-3069
subtest 'Incremented fee tests' => sub {
Link Here
|
3063 |
$accountline->delete(); |
3063 |
$accountline->delete(); |
3064 |
AddRenewal( $patron->id, $item->id, $library->id, $dt_to_renew, $dt_to ); |
3064 |
AddRenewal( $patron->id, $item->id, $library->id, $dt_to_renew, $dt_to ); |
3065 |
$accountline = Koha::Account::Lines->find({ itemnumber => $item->id }); |
3065 |
$accountline = Koha::Account::Lines->find({ itemnumber => $item->id }); |
3066 |
is( $accountline->amount, '13.000000', "Daily rental charge calculated correctly with finesCalendar = noFinesWhenClosed, for renewal" ); |
3066 |
is( $accountline->amount, '6.000000', "Daily rental charge calculated correctly with finesCalendar = noFinesWhenClosed, for renewal" ); |
3067 |
$accountline->delete(); |
3067 |
$accountline->delete(); |
3068 |
$issue->delete(); |
3068 |
$issue->delete(); |
3069 |
|
3069 |
|
Lines 3079-3085
subtest 'Incremented fee tests' => sub {
Link Here
|
3079 |
$accountline->delete(); |
3079 |
$accountline->delete(); |
3080 |
AddRenewal( $patron->id, $item->id, $library->id, $dt_to_renew, $dt_to ); |
3080 |
AddRenewal( $patron->id, $item->id, $library->id, $dt_to_renew, $dt_to ); |
3081 |
$accountline = Koha::Account::Lines->find({ itemnumber => $item->id }); |
3081 |
$accountline = Koha::Account::Lines->find({ itemnumber => $item->id }); |
3082 |
is( $accountline->amount, '11.000000', "Daily rental charge calculated correctly with finesCalendar = noFinesWhenClosed and closed Wednesdays, for renewal" ); |
3082 |
is( $accountline->amount, '5.000000', "Daily rental charge calculated correctly with finesCalendar = noFinesWhenClosed and closed Wednesdays, for renewal" ); |
3083 |
$accountline->delete(); |
3083 |
$accountline->delete(); |
3084 |
$issue->delete(); |
3084 |
$issue->delete(); |
3085 |
|
3085 |
|
3086 |
- |
|
|