Lines 163-169
sub AddReserve {
Link Here
|
163 |
} |
163 |
} |
164 |
if ( C4::Context->preference( 'AllowHoldDateInFuture' ) ) { |
164 |
if ( C4::Context->preference( 'AllowHoldDateInFuture' ) ) { |
165 |
# Make room in reserves for this before those of a later reserve date |
165 |
# Make room in reserves for this before those of a later reserve date |
166 |
$priority = _ShiftPriorityByDateAndPriority( $biblionumber, $priority ); |
166 |
$priority = _ShiftPriority( $biblionumber, $priority ); |
167 |
} |
167 |
} |
168 |
my $waitingdate; |
168 |
my $waitingdate; |
169 |
|
169 |
|
Lines 1956-1964
sub _koha_notify_reserve {
Link Here
|
1956 |
|
1956 |
|
1957 |
} |
1957 |
} |
1958 |
|
1958 |
|
1959 |
=head2 _ShiftPriorityByDateAndPriority |
1959 |
=head2 _ShiftPriority |
1960 |
|
1960 |
|
1961 |
$new_priority = _ShiftPriorityByDateAndPriority( $biblionumber, $reservedate, $priority ); |
1961 |
$new_priority = _ShiftPriority( $biblionumber, $priority ); |
1962 |
|
1962 |
|
1963 |
This increments the priority of all reserves after the one |
1963 |
This increments the priority of all reserves after the one |
1964 |
with either the lowest date after C<$reservedate> |
1964 |
with either the lowest date after C<$reservedate> |
Lines 1974-1980
the sub accounts for that too.
Link Here
|
1974 |
|
1974 |
|
1975 |
=cut |
1975 |
=cut |
1976 |
|
1976 |
|
1977 |
sub _ShiftPriorityByDateAndPriority { |
1977 |
sub _ShiftPriority { |
1978 |
my ( $biblio, $new_priority ) = @_; |
1978 |
my ( $biblio, $new_priority ) = @_; |
1979 |
|
1979 |
|
1980 |
my $dbh = C4::Context->dbh; |
1980 |
my $dbh = C4::Context->dbh; |
Lines 2271-2277
priority is based on the set of holds whose start date falls before
Link Here
|
2271 |
the parameter value. |
2271 |
the parameter value. |
2272 |
|
2272 |
|
2273 |
After calculation of this priority, it is recommended to call |
2273 |
After calculation of this priority, it is recommended to call |
2274 |
_ShiftPriorityByDateAndPriority. Note that this is currently done in |
2274 |
_ShiftPriority. Note that this is currently done in |
2275 |
AddReserves. |
2275 |
AddReserves. |
2276 |
|
2276 |
|
2277 |
=cut |
2277 |
=cut |
2278 |
- |
|
|