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

(-)a/installer/data/mysql/atomicupdate/bug_28575-no-refund-lost-age.pl (+21 lines)
Line 0 Link Here
1
use Modern::Perl;
2
use Koha::Installer::Output qw(say_warning say_failure say_success say_info);
3
4
return {
5
    bug_number  => "28575",
6
    description =>
7
        "Add a syspref to prevent refunds on lost items if the fee was paid more than a set number of days ago",
8
    up => sub {
9
        my ($args) = @_;
10
        my ( $dbh, $out ) = @$args{qw(dbh out)};
11
12
        # Do you stuffs here
13
        $dbh->do(
14
            q{
15
                INSERT IGNORE INTO systempreferences ( `variable`, `value`, `options`, `explanation`, `type` ) VALUES ('NoRefundOnLostFinesPaidAge','','','Do not refund lost item fees if the fee was paid off more than this number of days ago','Integer')
16
            }
17
        );
18
        say_success( $out, "Successfully added new system preference: NoRefundOnLostFinesPaidAge" );
19
    },
20
};
21
(-)a/installer/data/mysql/mandatory/sysprefs.sql (+1 lines)
Lines 418-423 INSERT INTO systempreferences ( `variable`, `value`, `options`, `explanation`, ` Link Here
418
('NoIssuesChargeGuarantees','','','Define maximum amount withstanding before checkouts are blocked','Integer'),
418
('NoIssuesChargeGuarantees','','','Define maximum amount withstanding before checkouts are blocked','Integer'),
419
('NoIssuesChargeGuarantorsWithGuarantees','','','Define maximum amount withstanding before checkouts are blocked including guarantors and their other guarantees','Integer'),
419
('NoIssuesChargeGuarantorsWithGuarantees','','','Define maximum amount withstanding before checkouts are blocked including guarantors and their other guarantees','Integer'),
420
('noItemTypeImages','0',NULL,'If ON, disables itemtype images in the staff interface','YesNo'),
420
('noItemTypeImages','0',NULL,'If ON, disables itemtype images in the staff interface','YesNo'),
421
('NoRefundOnLostFinesPaidAge','','','Do not refund lost item fees if the fee was paid off more than this number of days ago','Integer'),
421
('NoRefundOnLostReturnedItemsAge','','','Do not refund lost item fees if item is lost for more than this number of days','Integer'),
422
('NoRefundOnLostReturnedItemsAge','','','Do not refund lost item fees if item is lost for more than this number of days','Integer'),
422
('NoRenewalBeforePrecision','exact_time','date|exact_time','Calculate "No renewal before" based on date only or exact time of due date','Choice'),
423
('NoRenewalBeforePrecision','exact_time','date|exact_time','Calculate "No renewal before" based on date only or exact time of due date','Choice'),
423
('NotesToHide','',NULL,'List of notes fields that should not appear in the title notes/description separator of details','free'),
424
('NotesToHide','',NULL,'List of notes fields that should not appear in the title notes/description separator of details','free'),
(-)a/koha-tmpl/intranet-tmpl/prog/en/modules/admin/preferences/circulation.pref (-1 / +5 lines)
Lines 1151-1156 Circulation: Link Here
1151
            - pref: NoRefundOnLostReturnedItemsAge
1151
            - pref: NoRefundOnLostReturnedItemsAge
1152
              class: integer
1152
              class: integer
1153
            - days after it was marked lost.
1153
            - days after it was marked lost.
1154
        -
1155
            - "Don't refund lost fees if the fee was paid in full more than"
1156
            - pref: NoRefundOnLostFinesPaidAge
1157
              class: integer
1158
            - days ago.
1154
        -
1159
        -
1155
            - pref: WhenLostChargeReplacementFee
1160
            - pref: WhenLostChargeReplacementFee
1156
              choices:
1161
              choices:
1157
- 

Return to bug 28575