View | Details | Raw Unified | Return to bug 29800
Collapse All | Expand All

(-)a/installer/data/mysql/atomicupdate/bz_29800.pl (+20 lines)
Line 0 Link Here
1
use Modern::Perl;
2
use Koha::Installer::Output qw(say_warning say_success say_info);
3
4
return {
5
    bug_number  => "29800",
6
    description => "Add option to calculate and update fines when marking an item lost",
7
    up          => sub {
8
        my ($args) = @_;
9
        my ( $dbh, $out ) = @$args{qw(dbh out)};
10
11
        $dbh->do(
12
            q{
13
            INSERT IGNORE INTO systempreferences ( `variable`, `value`, `options`, `explanation`, `type` ) VALUES
14
            ('WhenLostUpdateFine','0',NULL,'If ON, calculate and update fines when a patron loses an item.','YesNo')
15
        }
16
        );
17
18
        say $out "Added new system preference 'WhenLostUpdateFine'";
19
    },
20
};
(-)a/installer/data/mysql/mandatory/sysprefs.sql (+1 lines)
Lines 889-894 INSERT INTO systempreferences ( `variable`, `value`, `options`, `explanation`, ` Link Here
889
('WaitingNotifyAtCheckout','0',NULL,'If ON, notify librarians of waiting holds for the patron whose items they are checking out.','YesNo'),
889
('WaitingNotifyAtCheckout','0',NULL,'If ON, notify librarians of waiting holds for the patron whose items they are checking out.','YesNo'),
890
('WebBasedSelfCheck','0',NULL,'If ON, enables the web-based self-check system','YesNo'),
890
('WebBasedSelfCheck','0',NULL,'If ON, enables the web-based self-check system','YesNo'),
891
('WhenLostChargeReplacementFee','1',NULL,'If ON, Charge the replacement price when a patron loses an item.','YesNo'),
891
('WhenLostChargeReplacementFee','1',NULL,'If ON, Charge the replacement price when a patron loses an item.','YesNo'),
892
('WhenLostUpdateFine','0',NULL,'If ON, calculate and update fines when a patron loses an item.','YesNo'),
892
('WhenLostForgiveFine','0',NULL,'If ON, Forgives the fines on an item when it is lost.','YesNo'),
893
('WhenLostForgiveFine','0',NULL,'If ON, Forgives the fines on an item when it is lost.','YesNo'),
893
('XSLTDetailsDisplay','default','','Enable XSL stylesheet control over details page display on intranet','Free'),
894
('XSLTDetailsDisplay','default','','Enable XSL stylesheet control over details page display on intranet','Free'),
894
('XSLTListsDisplay','default','','Enable XSLT stylesheet control over lists pages display on intranet','Free'),
895
('XSLTListsDisplay','default','','Enable XSLT stylesheet control over lists pages display on intranet','Free'),
(-)a/koha-tmpl/intranet-tmpl/prog/en/modules/admin/preferences/circulation.pref (-1 / +6 lines)
Lines 1204-1209 Circulation: Link Here
1204
                  1: Forgive
1204
                  1: Forgive
1205
                  0: "Don't forgive"
1205
                  0: "Don't forgive"
1206
            - the fines on an item when it is marked as lost.
1206
            - the fines on an item when it is marked as lost.
1207
        -
1208
            - pref: WhenLostUpdateFine
1209
              choices:
1210
                  1: Update
1211
                  0: "Don't update"
1212
            - the fines on an item when it is marked as lost.
1207
        -
1213
        -
1208
            - "Don't refund lost fees if a lost item is checked in more than"
1214
            - "Don't refund lost fees if a lost item is checked in more than"
1209
            - pref: NoRefundOnLostReturnedItemsAge
1215
            - pref: NoRefundOnLostReturnedItemsAge
1210
- 

Return to bug 29800