@@ -, +, @@ patron update request management by branch --- installer/data/mysql/sysprefs.sql | 1 + installer/data/mysql/updatedatabase.pl | 10 ++++++++++ .../intranet-tmpl/prog/en/modules/admin/preferences/admin.pref | 7 +++++++ mainpage.pl | 8 +++++--- members/members-update.pl | 7 ++++--- 5 files changed, 27 insertions(+), 6 deletions(-) --- a/installer/data/mysql/sysprefs.sql +++ a/installer/data/mysql/sysprefs.sql @@ -137,6 +137,7 @@ INSERT INTO systempreferences ( `variable`, `value`, `options`, `explanation`, ` ('ImageLimit','5','','Limit images stored in the database by the Patron Card image manager to this number.','Integer'), ('IncludeSeeFromInSearches','0','','Include see-from references in searches.','YesNo'), ('IndependentBranches','0',NULL,'If ON, increases security between libraries','YesNo'), +('IndependentBranchesPatronModifications',0, NULL, 'Show only modification request for the logged in branch','YesNo'), ('InProcessingToShelvingCart','0','','If set, when any item with a location code of PROC is \'checked in\', it\'s location code will be changed to CART.','YesNo'), ('INTRAdidyoumean',NULL,NULL,'Did you mean? configuration for the Intranet. Do not change, as this is controlled by /cgi-bin/koha/admin/didyoumean.pl.','Free'), ('IntranetBiblioDefaultView','normal','normal|marc|isbd|labeled_marc','Choose the default detail view in the staff interface; choose between normal, labeled_marc, marc or isbd','Choice'), --- a/installer/data/mysql/updatedatabase.pl +++ a/installer/data/mysql/updatedatabase.pl @@ -8129,6 +8129,16 @@ if(CheckVersion($DBversion)) { SetVersion($DBversion); } +$DBversion = "3.15.00.XXX"; +if(CheckVersion($DBversion)) { + $dbh->do(q{ + INSERT IGNORE INTO systempreferences (variable,value,explanation,options,type) + VALUES ('IndependentBranchesPatronModifications',0,'Show only modification request for the logged in branch','','YesNo') + }); + print "Upgrade to $DBversion done (Bug 10904 - would like to limit patron update request management by branch)\n"; + SetVersion($DBversion); +} + =head1 FUNCTIONS =head2 TableExists($table) --- a/koha-tmpl/intranet-tmpl/prog/en/modules/admin/preferences/admin.pref +++ a/koha-tmpl/intranet-tmpl/prog/en/modules/admin/preferences/admin.pref @@ -70,6 +70,13 @@ Administration: yes: Prevent no: "Don't prevent" - staff (but not superlibrarians) from modifying objects (holds, items, patrons, etc.) belonging to other libraries. + - + - pref: IndependentBranchesPatronModifications + default: 0 + choices: + yes: Prevent + no: "Don't prevent" + - staff (but not superlibrarians) from viewing and approving/denying patron modification requests for patrons belonging to other libraries. CAS Authentication: - - pref: casAuthentication --- a/mainpage.pl +++ a/mainpage.pl @@ -54,9 +54,11 @@ $template->param( koha_news_count => $koha_news_count ); -my $branch = $flags->{'superlibrarian'} - ? undef - : C4::Context->userenv()->{'branch'}; +my $branch = + C4::Context->preference("IndependentBranchesPatronModifications") + && !$flags->{'superlibrarian'} + ? C4::Context->userenv()->{'branch'} + : undef; my $pendingcomments = numberofreviews(0); my $pendingtags = get_count_by_tag_status(0); --- a/members/members-update.pl +++ a/members/members-update.pl @@ -42,9 +42,10 @@ my ( $template, $loggedinuser, $cookie, $flags ) = get_template_and_user( ); my $branch = - $flags->{'superlibrarian'} - ? undef - : C4::Context->userenv()->{'branch'}; + C4::Context->preference("IndependentBranchesPatronModifications") + && !$flags->{'superlibrarian'} + ? C4::Context->userenv()->{'branch'} + : undef; my $pending_modifications = Koha::Borrower::Modifications->GetPendingModifications($branch); --