Attachment #63703 for bug #15494

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




$DBversion = 'XXX';  # will be replaced by the RM
if( CheckVersion( $DBversion ) ) {
    # you can use $dbh here like:
    # $dbh->do( "ALTER TABLE biblio ADD COLUMN badtaste int" );

    $dbh->do( "INSERT IGNORE INTO systempreferences (variable,value,options,explanation,type) VALUES ('ItemsDeniedRenewal','','','This syspref allows to define custom rules for denying renewal of specific items.','Textarea')" );

    # or perform some test and warn
    # if( !column_exists( 'biblio', 'biblionumber' ) ) {
    #    warn "There is something wrong";
    # }

    # Always end with this (adjust the bug info)
    SetVersion( $DBversion );
    print "Upgrade to $DBversion done (Bug 15494 - Block renewals by arbitrary item values)\n";
}

Lines 229-234 INSERT INTO systempreferences ( `variable`, `value`, `options`, `explanation`, ` Link Here

(-)a/installer/data/mysql/sysprefs.sql (+1 lines)
229	('itemBarcodeFallbackSearch','',NULL,'If set, uses scanned item barcodes as a catalogue search if not found as barcodes','YesNo'),	229	('itemBarcodeFallbackSearch','',NULL,'If set, uses scanned item barcodes as a catalogue search if not found as barcodes','YesNo'),
230	('itemBarcodeInputFilter','','whitespace\|T-prefix\|cuecat\|libsuite8\|EAN13','If set, allows specification of a item barcode input filter','Choice'),	230	('itemBarcodeInputFilter','','whitespace\|T-prefix\|cuecat\|libsuite8\|EAN13','If set, allows specification of a item barcode input filter','Choice'),
231	('itemcallnumber','082ab',NULL,'The MARC field/subfield that is used to calculate the itemcallnumber (Dewey would be 082ab or 092ab; LOC would be 050ab or 090ab) could be 852hi from an item record','free'),	231	('itemcallnumber','082ab',NULL,'The MARC field/subfield that is used to calculate the itemcallnumber (Dewey would be 082ab or 092ab; LOC would be 050ab or 090ab) could be 852hi from an item record','free'),
		232	('ItemsDeniedRenewal','','','This syspref allows to define custom rules for denying renewal of specific items.','Textarea'),
232	('KohaAdminEmailAddress','root@localhost','','Define the email address where patron modification requests are sent','free'),	233	('KohaAdminEmailAddress','root@localhost','','Define the email address where patron modification requests are sent','free'),
233	('LabelMARCView','standard','standard\|economical','Define how a MARC record will display','Choice'),	234	('LabelMARCView','standard','standard\|economical','Define how a MARC record will display','Choice'),
234	('language','en',NULL,'Set the default language in the staff client.','Languages'),	235	('language','en',NULL,'Set the default language in the staff client.','Languages'),

Lines 459-464 Circulation: Link Here

(-)a/koha-tmpl/intranet-tmpl/prog/en/modules/admin/preferences/circulation.pref (-1 / +6 lines)
459	yes: Block	459	yes: Block
460	no: Allow	460	no: Allow
461	- his/her auto renewals.	461	- his/her auto renewals.
		462	-
		463	- pref: ItemsDeniedRenewal
		464	type: textarea
		465	class: code
		466	- Define custom rules to deny specific items from renewal. Uses same syntax as OpacHiddenItems.
		467	- How to write these rules is documented on the <a href="http://wiki.koha-community.org/wiki/OpacHiddenItems" target="_blank">Koha wiki</a>.
462	Checkin Policy:	468	Checkin Policy:
463	-	469	-
464	- pref: BlockReturnOfWithdrawnItems	470	- pref: BlockReturnOfWithdrawnItems
465	-

Return to bug 15494

Line 0 Link Here

(-)a/installer/data/mysql/atomicupdate/bug_15494.perl (+16 lines)
	1	$DBversion = 'XXX'; # will be replaced by the RM
	2	if( CheckVersion( $DBversion ) ) {
	3	# you can use $dbh here like:
	4	# $dbh->do( "ALTER TABLE biblio ADD COLUMN badtaste int" );
	5
	6	$dbh->do( "INSERT IGNORE INTO systempreferences (variable,value,options,explanation,type) VALUES ('ItemsDeniedRenewal','','','This syspref allows to define custom rules for denying renewal of specific items.','Textarea')" );
	7
	8	# or perform some test and warn
	9	# if( !column_exists( 'biblio', 'biblionumber' ) ) {
	10	# warn "There is something wrong";
	11	# }
	12
	13	# Always end with this (adjust the bug info)
	14	SetVersion( $DBversion );
	15	print "Upgrade to $DBversion done (Bug 15494 - Block renewals by arbitrary item values)\n";
	16	}