Attachment #125454 for bug #20058

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

Lines 85-91 sub new { Link Here

(-)a/C4/SIP/ILS/Item.pm (-1 / +5 lines)
85	my $self = $item->unblessed;	85	my $self = $item->unblessed;
86	$self->{_object} = $item;	86	$self->{_object} = $item;
87	$self->{id} = $item->barcode; # to SIP, the barcode IS the id.	87	$self->{id} = $item->barcode; # to SIP, the barcode IS the id.
88	$self->{permanent_location} = $item->homebranch;	88	if (C4::Context->preference('UseLocationAsAQInSIP')) {
		89	$self->{permanent_location} = $item->permanent_location;
		90	} else {
		91	$self->{permanent_location} = $item->homebranch;
		92	}
89	$self->{collection_code} = $item->ccode;	93	$self->{collection_code} = $item->ccode;
90	$self->{call_number} = $item->itemcallnumber;	94	$self->{call_number} = $item->itemcallnumber;
91	$self->{'shelving_location'} = $item->location;	95	$self->{'shelving_location'} = $item->location;




use Modern::Perl;

return {
    bug_number => "20058",
    description => "Option to use shelving location instead of homebranch for sorting",
    up => sub {
        my ($args) = @_;
        my ($dbh, $out) = @$args{qw(dbh out)};
        $dbh->do(q{INSERT IGNORE INTO systempreferences (`variable`, `value`, `options`, `explanation`, `type`) VALUES
('UseLocationAsAQInSIP', '0', '', 'Use permanent_location instead of homebranch for AQ in SIP response', 'YesNo')});
        say $out "Syspref UseLocationAsAQInSIP has been added";
    },
}

Lines 719-724 INSERT INTO systempreferences ( `variable`, `value`, `options`, `explanation`, ` Link Here

(-)a/installer/data/mysql/mandatory/sysprefs.sql (+1 lines)
719	('useDischarge','0','','Allows librarians to discharge borrowers and borrowers to request a discharge','YesNo'),	719	('useDischarge','0','','Allows librarians to discharge borrowers and borrowers to request a discharge','YesNo'),
720	('UseEmailReceipts','0','','Send email receipts for payments and write-offs','YesNo'),	720	('UseEmailReceipts','0','','Send email receipts for payments and write-offs','YesNo'),
721	('UseICUStyleQuotes','0','1','Tell Koha whether to use ICU style quotes ({) or default (") when tracing subjects .','YesNo'),	721	('UseICUStyleQuotes','0','1','Tell Koha whether to use ICU style quotes ({) or default (") when tracing subjects .','YesNo'),
		722	('UseLocationAsAQInSIP', '0', '', 'Use permanent_location instead of homebranch for AQ in SIP response', 'YesNo'),
722	('UseTransportCostMatrix','0','','Use Transport Cost Matrix when filling holds','YesNo'),	723	('UseTransportCostMatrix','0','','Use Transport Cost Matrix when filling holds','YesNo'),
723	('UseWYSIWYGinSystemPreferences','0','','Show WYSIWYG editor when editing certain HTML system preferences.','YesNo'),	724	('UseWYSIWYGinSystemPreferences','0','','Show WYSIWYG editor when editing certain HTML system preferences.','YesNo'),
724	('viewISBD','1','','Allow display of ISBD view of bibiographic records','YesNo'),	725	('viewISBD','1','','Allow display of ISBD view of bibiographic records','YesNo'),

Lines 659-664 Circulation: Link Here

(-)a/koha-tmpl/intranet-tmpl/prog/en/modules/admin/preferences/circulation.pref (-1 / +7 lines)
659	0: "Don't store"	659	0: "Don't store"
660	- 'the last patron to return an item. This setting is independent of the <a href="/cgi-bin/koha/admin/preferences.pl?op=search&searchfield=opacreadinghistory">opacreadinghistory</a> and <a href="/cgi-bin/koha/admin/preferences.pl?op=search&searchfield=AnonymousPatron">AnonymousPatron</a> system preferences.'	660	- 'the last patron to return an item. This setting is independent of the <a href="/cgi-bin/koha/admin/preferences.pl?op=search&searchfield=opacreadinghistory">opacreadinghistory</a> and <a href="/cgi-bin/koha/admin/preferences.pl?op=search&searchfield=AnonymousPatron">AnonymousPatron</a> system preferences.'
661	Holds policy:	661	Holds policy:
		662	-
		663	- Use
		664	- pref: UseLocationAsAQInSIP
		665	choices:
		666	yes: permanent_location
		667	no: homebranch
		668	- for AQ field in SIP protocol.
662	-	669	-
663	- In the staff interface, split the holds queue into separate tables by	670	- In the staff interface, split the holds queue into separate tables by
664	- pref: HoldsSplitQueue	671	- pref: HoldsSplitQueue
665	-

Return to bug 20058

Line 0 Link Here

(-)a/installer/data/mysql/atomicupdate/bug_20058_add_UseLocationAsAQInSIP_syspref.pl (+13 lines)
	1	use Modern::Perl;
	2
	3	return {
	4	bug_number => "20058",
	5	description => "Option to use shelving location instead of homebranch for sorting",
	6	up => sub {
	7	my ($args) = @_;
	8	my ($dbh, $out) = @$args{qw(dbh out)};
	9	$dbh->do(q{INSERT IGNORE INTO systempreferences (`variable`, `value`, `options`, `explanation`, `type`) VALUES
	10	('UseLocationAsAQInSIP', '0', '', 'Use permanent_location instead of homebranch for AQ in SIP response', 'YesNo')});
	11	say $out "Syspref UseLocationAsAQInSIP has been added";
	12	},
	13	}