Lines 2008-2014
sub MoveReserve {
Link Here
|
2008 |
} |
2008 |
} |
2009 |
|
2009 |
|
2010 |
if ( $cancelreserve eq 'revert' ) { ## Revert waiting reserve to priority 1 |
2010 |
if ( $cancelreserve eq 'revert' ) { ## Revert waiting reserve to priority 1 |
2011 |
RevertWaitingStatus( itemnumber => $itemnumber ); |
2011 |
RevertWaitingStatus({ itemnumber => $itemnumber }); |
2012 |
} |
2012 |
} |
2013 |
elsif ( $cancelreserve eq 'cancel' || $cancelreserve ) { # cancel reserves on this item |
2013 |
elsif ( $cancelreserve eq 'cancel' || $cancelreserve ) { # cancel reserves on this item |
2014 |
CancelReserve(0, $res->{'itemnumber'}, $res->{'borrowernumber'}); |
2014 |
CancelReserve(0, $res->{'itemnumber'}, $res->{'borrowernumber'}); |
Lines 2063-2069
sub MergeHolds {
Link Here
|
2063 |
|
2063 |
|
2064 |
=head2 RevertWaitingStatus |
2064 |
=head2 RevertWaitingStatus |
2065 |
|
2065 |
|
2066 |
$success = RevertWaitingStatus( itemnumber => $itemnumber ); |
2066 |
$success = RevertWaitingStatus({ itemnumber => $itemnumber }); |
2067 |
|
2067 |
|
2068 |
Reverts a 'waiting' hold back to a regular hold with a priority of 1. |
2068 |
Reverts a 'waiting' hold back to a regular hold with a priority of 1. |
2069 |
|
2069 |
|
Lines 2076-2083
sub MergeHolds {
Link Here
|
2076 |
=cut |
2076 |
=cut |
2077 |
|
2077 |
|
2078 |
sub RevertWaitingStatus { |
2078 |
sub RevertWaitingStatus { |
2079 |
my ( %params ) = @_; |
2079 |
my ( $params ) = @_; |
2080 |
my $itemnumber = $params{'itemnumber'}; |
2080 |
my $itemnumber = $params->{'itemnumber'}; |
2081 |
|
2081 |
|
2082 |
return unless ( $itemnumber ); |
2082 |
return unless ( $itemnumber ); |
2083 |
|
2083 |
|
2084 |
- |
|
|