Attachment #103428 for bug #24197

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

(-)a/installer/data/mysql/atomicupdate/bug_24197-new_RedirectAddressForFailedOverdueNotices_syspref.sql (+1 lines)

Line 0 Link Here

INSERT IGNORE INTO systempreferences (variable, value, options, explanation, type) VALUES ('RedirectAddressForFailedOverdueNotices', '', NULL, 'Destination email for failed overdue notices. If left empty then the branch email or KohaAdminEmailAddress syspref will be the email address that failed overdue notices are sent to', 'free');

Lines 524-529 INSERT INTO systempreferences ( `variable`, `value`, `options`, `explanation`, ` Link Here

(-)a/installer/data/mysql/sysprefs.sql (+1 lines)
524	('QuoteOfTheDay','0',NULL,'Enable or disable display of Quote of the Day on the OPAC home page','YesNo'),	524	('QuoteOfTheDay','0',NULL,'Enable or disable display of Quote of the Day on the OPAC home page','YesNo'),
525	('RandomizeHoldsQueueWeight','0',NULL,'if ON, the holds queue in circulation will be randomized, either based on all location codes, or by the location codes specified in StaticHoldsQueueWeight','YesNo'),	525	('RandomizeHoldsQueueWeight','0',NULL,'if ON, the holds queue in circulation will be randomized, either based on all location codes, or by the location codes specified in StaticHoldsQueueWeight','YesNo'),
526	('RecordLocalUseOnReturn','0',NULL,'If ON, statistically record returns of unissued items as local use, instead of return','YesNo'),	526	('RecordLocalUseOnReturn','0',NULL,'If ON, statistically record returns of unissued items as local use, instead of return','YesNo'),
		527	('RedirectAddressForFailedOverdueNotices', '', NULL, 'Destination email for failed overdue notices. If left empty then the branch email or KohaAdminEmailAddress syspref will be the email address that failed overdue notices are sent to', 'free'),
527	('RefundLostOnReturnControl','CheckinLibrary','CheckinLibrary\|ItemHomeBranch\|ItemHoldingBranch','If a lost item is returned, choose which branch to pick rules for refunding.','Choice'),	528	('RefundLostOnReturnControl','CheckinLibrary','CheckinLibrary\|ItemHomeBranch\|ItemHoldingBranch','If a lost item is returned, choose which branch to pick rules for refunding.','Choice'),
528	('RenewAccruingItemWhenPaid','0','','If enabled, when the fines on an item accruing is paid off, attempt to renew that item. If the syspref "RenewalPeriodBase" is set to "due date", renewed items may still be overdue','YesNo'),	529	('RenewAccruingItemWhenPaid','0','','If enabled, when the fines on an item accruing is paid off, attempt to renew that item. If the syspref "RenewalPeriodBase" is set to "due date", renewed items may still be overdue','YesNo'),
529	('RenewAccruingItemInOpac','0','','If enabled, when the fines on an item accruing is paid off in the OPAC via a payment plugin, attempt to renew that item. If the syspref "RenewalPeriodBase" is set to "due date", renewed items may still be overdue','YesNo'),	530	('RenewAccruingItemInOpac','0','','If enabled, when the fines on an item accruing is paid off in the OPAC via a payment plugin, attempt to renew that item. If the syspref "RenewalPeriodBase" is set to "due date", renewed items may still be overdue','YesNo'),

Lines 21-26 Administration: Link Here

(-)a/koha-tmpl/intranet-tmpl/prog/en/modules/admin/preferences/admin.pref (+6 lines)
21	class: email	21	class: email
22	- "(Leave this field empty to send messages to their normal recipient)"	22	- "(Leave this field empty to send messages to their normal recipient)"
23	-	23	-
		24	- "Email address failed overdue notices are sent to: "
		25	- pref: RedirectAddressForFailedOverdueNotices
		26	class: email
		27	- "If left empty then the branch email or KohaAdminEmailAddress will be set as the destination address for failed overdue notices"
		28	-
		29
24	- "How much debugging information to show in the browser when an internal error occurs: "	30	- "How much debugging information to show in the browser when an internal error occurs: "
25	- pref: DebugLevel	31	- pref: DebugLevel
26	default: 0	32	default: 0




    my $library             = Koha::Libraries->find($branchcode);
    my $admin_email_address = $library->branchemail
      || C4::Context->preference('KohaAdminEmailAddress');
    my $branch_email_address = C4::Context->preference('RedirectAddressForFailedOverdueNotices')
      || $library->inbound_email_address;
    my @output_chunks;    # may be sent to mail or stdout or csv file.

    $verbose and warn sprintf "branchcode : '%s' using %s\n", $branchcode, $branch_email_address;

            title   => 'Overdue Notices',
            content => 'These messages were not sent directly to the patrons.',
        };

        C4::Letters::EnqueueLetter(
            {   letter                 => $letter,
                borrowernumber         => undef,
- 

Return to bug 24197

Lines 455-461 foreach my $branchcode (@branches) { Link Here

(-)a/misc/cronjobs/overdue_notices.pl (-2 / +3 lines)
455	my $library = Koha::Libraries->find($branchcode);	455	my $library = Koha::Libraries->find($branchcode);
456	my $admin_email_address = $library->branchemail	456	my $admin_email_address = $library->branchemail
457	\|\| C4::Context->preference('KohaAdminEmailAddress');	457	\|\| C4::Context->preference('KohaAdminEmailAddress');
458	my $branch_email_address = $library->inbound_email_address;	458	my $branch_email_address = C4::Context->preference('RedirectAddressForFailedOverdueNotices')
		459	\|\| $library->inbound_email_address;
459	my @output_chunks; # may be sent to mail or stdout or csv file.	460	my @output_chunks; # may be sent to mail or stdout or csv file.
460		461
461	$verbose and warn sprintf "branchcode : '%s' using %s\n", $branchcode, $branch_email_address;	462	$verbose and warn sprintf "branchcode : '%s' using %s\n", $branchcode, $branch_email_address;
Lines 817-822 END_SQL Link Here
817	title => 'Overdue Notices',	818	title => 'Overdue Notices',
818	content => 'These messages were not sent directly to the patrons.',	819	content => 'These messages were not sent directly to the patrons.',
819	};	820	};
		821
820	C4::Letters::EnqueueLetter(	822	C4::Letters::EnqueueLetter(
821	{ letter => $letter,	823	{ letter => $letter,
822	borrowernumber => undef,	824	borrowernumber => undef,
823	-