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

(-)a/installer/data/mysql/atomicupdate/bug_28575-no-refund-lost-age.pl (+20 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
};
(-)a/installer/data/mysql/mandatory/sysprefs.sql (+1 lines)
Lines 419-424 INSERT INTO systempreferences ( `variable`, `value`, `options`, `explanation`, ` Link Here
419
('NoIssuesChargeGuarantees','','','Define maximum amount withstanding before checkouts are blocked','Integer'),
419
('NoIssuesChargeGuarantees','','','Define maximum amount withstanding before checkouts are blocked','Integer'),
420
('NoIssuesChargeGuarantorsWithGuarantees','','','Define maximum amount withstanding before checkouts are blocked including guarantors and their other guarantees','Integer'),
420
('NoIssuesChargeGuarantorsWithGuarantees','','','Define maximum amount withstanding before checkouts are blocked including guarantors and their other guarantees','Integer'),
421
('noItemTypeImages','0',NULL,'If ON, disables itemtype images in the staff interface','YesNo'),
421
('noItemTypeImages','0',NULL,'If ON, disables itemtype images in the staff interface','YesNo'),
422
('NoRefundOnLostFinesPaidAge','','','Do not refund lost item fees if the fee was paid off more than this number of days ago','Integer'),
422
('NoRefundOnLostReturnedItemsAge','','','Do not refund lost item fees if item is lost for more than this number of days','Integer'),
423
('NoRefundOnLostReturnedItemsAge','','','Do not refund lost item fees if item is lost for more than this number of days','Integer'),
423
('NoRenewalBeforePrecision','exact_time','date|exact_time','Calculate "No renewal before" based on date only or exact time of due date','Choice'),
424
('NoRenewalBeforePrecision','exact_time','date|exact_time','Calculate "No renewal before" based on date only or exact time of due date','Choice'),
424
('NotesToHide','',NULL,'List of notes fields that should not appear in the title notes/description separator of details','free'),
425
('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 1164-1169 Circulation: Link Here
1164
            - pref: NoRefundOnLostReturnedItemsAge
1164
            - pref: NoRefundOnLostReturnedItemsAge
1165
              class: integer
1165
              class: integer
1166
            - days after it was marked lost.
1166
            - days after it was marked lost.
1167
        -
1168
            - "Don't refund lost fees if the fee was paid in full or if the balance of the fee was paid more than"
1169
            - pref: NoRefundOnLostFinesPaidAge
1170
              class: integer
1171
            - days ago.
1167
        -
1172
        -
1168
            - pref: WhenLostChargeReplacementFee
1173
            - pref: WhenLostChargeReplacementFee
1169
              choices:
1174
              choices:
1170
- 

Return to bug 28575