Attachment #172166 for bug #31391

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




use Modern::Perl;

return {
    bug_number => "31391",
    description => "Add new system preference RecallsInterface",
    up => sub {
        my ($args) = @_;
        my ($dbh, $out) = @$args{qw(dbh out)};

        $dbh->do(q{INSERT IGNORE INTO systempreferences (variable,value,options,explanation,type) VALUES ('RecallsInterface','opac','opac|staff|both','The interface that recalls can be placed through','Choice') });
    },
};

Lines 640-645 INSERT INTO systempreferences ( `variable`, `value`, `options`, `explanation`, ` Link Here

(-)a/installer/data/mysql/mandatory/sysprefs.sql (+1 lines)
640	('QuoteOfTheDay','','intranet,opac','Enable or disable display of Quote of the Day on the OPAC and staff interface home page','multiple'),	640	('QuoteOfTheDay','','intranet,opac','Enable or disable display of Quote of the Day on the OPAC and staff interface home page','multiple'),
641	('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'),	641	('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'),
642	('RealTimeHoldsQueue', '0', NULL, 'Enable updating the holds queue in real time', 'YesNo'),	642	('RealTimeHoldsQueue', '0', NULL, 'Enable updating the holds queue in real time', 'YesNo'),
		643	('RecallsInterface','opac','opac\|staff\|both','The interface that recalls can be placed through','Choice'),
643	('RecallsLog','1',NULL,'If ON, log create/cancel/expire/fulfill actions on recalls','YesNo'),	644	('RecallsLog','1',NULL,'If ON, log create/cancel/expire/fulfill actions on recalls','YesNo'),
644	('RecallsMaxPickUpDelay','7',NULL,'Define the maximum time a recall can be awaiting pickup','Integer'),	645	('RecallsMaxPickUpDelay','7',NULL,'Define the maximum time a recall can be awaiting pickup','Integer'),
645	('RecordLocalUseOnReturn','0',NULL,'If ON, statistically record returns of unissued items as local use, instead of return','YesNo'),	646	('RecordLocalUseOnReturn','0',NULL,'If ON, statistically record returns of unissued items as local use, instead of return','YesNo'),




            - days.
        -
            - pref: UseRecalls
              type: boolean
              choices:
                  1: Use
                  0: "Don't use"

                  1: Enable
                  0: Disable
            - "the curbside pickup module."
        -
            - Recalls can be placed through
            - pref: RecallsInterface
              default: opac
              choices:
                  opac: the OPAC only
                  staff: the staff interface only
                  both: both the OPAC and the staff interface
            - . (Requires <a href="/cgi-bin/koha/admin/preferences.pl?op=search&searchfield=UseRecalls">UseRecalls</a>.)

Return to bug 31391

Lines 1445-1450 Circulation: Link Here

(-)a/koha-tmpl/intranet-tmpl/prog/en/modules/admin/preferences/circulation.pref (-1 / +10 lines)
1445	- days.	1445	- days.
1446	-	1446	-
1447	- pref: UseRecalls	1447	- pref: UseRecalls
		1448	type: boolean
1448	choices:	1449	choices:
1449	1: Use	1450	1: Use
1450	0: "Don't use"	1451	0: "Don't use"
Lines 1491-1493 Circulation: Link Here
1491	1: Enable	1492	1: Enable
1492	0: Disable	1493	0: Disable
1493	- "the curbside pickup module."	1494	- "the curbside pickup module."
1494	-	1495	-
		1496	- Recalls can be placed through
		1497	- pref: RecallsInterface
		1498	default: opac
		1499	choices:
		1500	opac: the OPAC only
		1501	staff: the staff interface only
		1502	both: both the OPAC and the staff interface
		1503	- . (Requires <a href="/cgi-bin/koha/admin/preferences.pl?op=search&searchfield=UseRecalls">UseRecalls</a>.)

Line 0 Link Here

(-)a/installer/data/mysql/atomicupdate/bug_31391_-_add_RecallsInterface_syspref.pl (+12 lines)
	1	use Modern::Perl;
	2
	3	return {
	4	bug_number => "31391",
	5	description => "Add new system preference RecallsInterface",
	6	up => sub {
	7	my ($args) = @_;
	8	my ($dbh, $out) = @$args{qw(dbh out)};
	9
	10	$dbh->do(q{INSERT IGNORE INTO systempreferences (variable,value,options,explanation,type) VALUES ('RecallsInterface','opac','opac\|staff\|both','The interface that recalls can be placed through','Choice') });
	11	},
	12	};