(bug 3536) fix homeorholdingbranch on return
this patch create a new systempreference "homeorholdingbranch"-like used only for returns. Signed-off-by: Galen Charlton <gmcharlt@gmail.com> An additional edit was made to circ/returns.pl by Ian Walls of ByWater Solutions to force the dialog message for the return to use the branch specified by the new HomeOrHoldingBranchReturn system preference, rather than always Homebranch. Signed-off-by: Ian Walls <ian.walls@bywatersolutions.com> Signed-off-by: Galen Charlton <gmcharlt@gmail.com>
This commit is contained in:
parent
4a7bb77e4f
commit
45604b8d17
7 changed files with 16 additions and 5 deletions
|
@ -1439,7 +1439,8 @@ sub AddReturn {
|
|||
my $item = GetItem($itemnumber) or die "GetItem($itemnumber) failed";
|
||||
# full item data, but no borrowernumber or checkout info (no issue)
|
||||
# we know GetItem should work because GetItemnumberFromBarcode worked
|
||||
my $hbr = $item->{C4::Context->preference("HomeOrHoldingBranch")} || '';
|
||||
my $hbr = C4::Context->preference("HomeOrHoldingBranchReturn") || "homebranch";
|
||||
$hbr = $item->{$hbr} || '';
|
||||
# item must be from items table -- issues table has branchcode and issuingbranch, not homebranch nor holdingbranch
|
||||
|
||||
my $borrowernumber = $borrower->{'borrowernumber'} || undef; # we don't know if we had a borrower or not
|
||||
|
|
|
@ -193,6 +193,7 @@ $tabsysprefs{finesCalendar} = "Circulation";
|
|||
$tabsysprefs{previousIssuesDefaultSortOrder} = "Circulation";
|
||||
$tabsysprefs{todaysIssuesDefaultSortOrder} = "Circulation";
|
||||
$tabsysprefs{HomeOrHoldingBranch} = "Circulation";
|
||||
$tabsysprefs{HomeOrHoldingBranchReturn} = "Circulation";
|
||||
$tabsysprefs{RandomizeHoldsQueueWeight} = "Circulation";
|
||||
$tabsysprefs{StaticHoldsQueueWeight} = "Circulation";
|
||||
$tabsysprefs{AllowOnShelfHolds} = "Circulation";
|
||||
|
|
|
@ -208,6 +208,7 @@ if ($barcode) {
|
|||
#
|
||||
( $returned, $messages, $issueinformation, $borrower ) =
|
||||
AddReturn( $barcode, $userenv_branch, $exemptfine, $dropboxmode); # do the return
|
||||
my $homeorholdingbranchreturn = C4::Context->preference('HomeOrHoldingBranchReturn') or 'homebranch';
|
||||
|
||||
# get biblio description
|
||||
my $biblio = GetBiblioFromItemNumber($itemnumber);
|
||||
|
@ -217,7 +218,7 @@ if ($barcode) {
|
|||
$template->param(
|
||||
title => $biblio->{'title'},
|
||||
homebranch => $biblio->{'homebranch'},
|
||||
homebranchname => GetBranchName( $biblio->{'homebranch'} ),
|
||||
homebranchname => GetBranchName( $biblio->{$homeorholdingbranchreturn} ),
|
||||
author => $biblio->{'author'},
|
||||
itembarcode => $biblio->{'barcode'},
|
||||
itemtype => $biblio->{'itemtype'},
|
||||
|
|
|
@ -175,6 +175,7 @@ INSERT INTO `systempreferences` (variable,value,explanation,options,type) VALUES
|
|||
INSERT INTO `systempreferences` (variable,value,explanation,options,type) VALUES('OpacRenewalAllowed',0,'If ON, users can renew their issues directly from their OPAC account',NULL,'YesNo');
|
||||
INSERT INTO `systempreferences` (variable,value,explanation,options,type) VALUES('PatronsPerPage','20','Number of Patrons Per Page displayed by default','20','Integer');
|
||||
INSERT INTO `systempreferences` (variable,value,explanation,options,type) VALUES('HomeOrHoldingBranch','holdingbranch','Used by Circulation to determine which branch of an item to check with independent branches on, and by search to determine which branch to choose for availability ','holdingbranch|homebranch','Choice');
|
||||
INSERT INTO `systempreferences` (variable,value,explanation,options,type) VALUES('HomeOrHoldingBranchReturn','homebranch','Used by Circulation to determine which branch of an item to check checking-in items','holdingbranch|homebranch','Choice');
|
||||
INSERT INTO `systempreferences` (variable,value,explanation,options,type) VALUES('OpacHighlightedWords','1','If Set, then queried words are higlighted in OPAC','','YesNo');
|
||||
|
||||
INSERT INTO `systempreferences` (variable,value,explanation,options,type) VALUES('OAI-PMH','0','if ON, OAI-PMH server is enabled',NULL,'YesNo');
|
||||
|
|
|
@ -174,6 +174,7 @@ INSERT INTO `systempreferences` (variable,value,explanation,options,type) VALUES
|
|||
INSERT INTO `systempreferences` (variable,value,explanation,options,type) VALUES('OPACBaseURL',NULL,'Définit l''adresse de base de l''OPAC, par exemple :opac.mylibrary.com, le http:// sera automatiquement ajouté par Koha',NULL,'Free');
|
||||
INSERT INTO `systempreferences` (variable,value,explanation,options,type) VALUES('OpacRenewalAllowed',0,'Si activé, les utilisateurs peuvent renouveller leurs prêts directement depuis leur compte à l''OPAC',NULL,'YesNo');
|
||||
INSERT INTO `systempreferences` (variable,value,explanation,options,type) VALUES('HomeOrHoldingBranch','holdingbranch','Détermine si l''on utilise le site propriétaire ou le site dépositaire dans les opérations de circulation ou d''affichage de la disponibilité','holdingbranch|homebranch','Choice');
|
||||
INSERT INTO `systempreferences` (variable,value,explanation,options,type) VALUES('HomeOrHoldingBranchReturn','holdingbranch','Détermine si l''on utilise le site propriétaire ou le site dépositaire dans les opérations de retour','holdingbranch|homebranch','Choice');
|
||||
INSERT INTO `systempreferences` (variable,value,explanation,options,type) VALUES('OpacHighlightedWords','0','Si activé, les mots recherchés dans la notices sont affichés dans l''OPAC','','YesNo');
|
||||
INSERT INTO `systempreferences` (variable,value,explanation,options,type) VALUES('OAI-PMH','0','Si activé, le service OAI-PMH est disponible',NULL,'YesNo');
|
||||
INSERT INTO `systempreferences` (variable,value,explanation,options,type) VALUES('OAI-PMH:archiveID','KOHA-OAI-TEST','Identification de l''archive OAI-PMH',NULL,'Free');
|
||||
|
|
|
@ -3744,6 +3744,14 @@ if (C4::Context->preference("Version") < TransformToNum($DBversion)) {
|
|||
SetVersion ($DBversion);
|
||||
}
|
||||
|
||||
$DBversion = "3.02.00.000";
|
||||
if (C4::Context->preference("Version") < TransformToNum($DBversion)) {
|
||||
my $value = $dbh->selectrow_array("SELECT value FROM systempreferences WHERE variable = 'HomeOrHoldingBranch'");
|
||||
$dbh->do("INSERT INTO `systempreferences` (variable,value,explanation,options,type) VALUES('HomeOrHoldingBranchReturn','$value','Used by Circulation to determine which branch of an item to check checking-in items','holdingbranch|homebranch','Choice');");
|
||||
print "Upgrade to $DBversion done (Add HomeOrHoldingBranchReturn system preference)\n";
|
||||
SetVersion ($DBversion);
|
||||
}
|
||||
|
||||
|
||||
=item DropAllForeignKeys($table)
|
||||
|
||||
|
|
|
@ -10,9 +10,7 @@
|
|||
use strict;
|
||||
|
||||
sub kohaversion {
|
||||
|
||||
our $VERSION = '3.01.00.999';
|
||||
|
||||
our $VERSION = '3.02.00.000';
|
||||
# version needs to be set this way
|
||||
# so that it can be picked up by Makefile.PL
|
||||
# during install
|
||||
|
|
Loading…
Reference in a new issue