Lines 226-232
sub AddReserve {
Link Here
|
226 |
} |
226 |
} |
227 |
if ( C4::Context->preference( 'AllowHoldDateInFuture' ) ) { |
227 |
if ( C4::Context->preference( 'AllowHoldDateInFuture' ) ) { |
228 |
# Make room in reserves for this before those of a later reserve date |
228 |
# Make room in reserves for this before those of a later reserve date |
229 |
$priority = _ShiftPriorityByDateAndPriority( $biblionumber, $priority ); |
229 |
$priority = _ShiftPriority( $biblionumber, $priority ); |
230 |
} |
230 |
} |
231 |
|
231 |
|
232 |
my $waitingdate; |
232 |
my $waitingdate; |
Lines 1941-1949
sub _koha_notify_reserve {
Link Here
|
1941 |
|
1941 |
|
1942 |
} |
1942 |
} |
1943 |
|
1943 |
|
1944 |
=head2 _ShiftPriorityByDateAndPriority |
1944 |
=head2 _ShiftPriority |
1945 |
|
1945 |
|
1946 |
$new_priority = _ShiftPriorityByDateAndPriority( $biblionumber, $reservedate, $priority ); |
1946 |
$new_priority = _ShiftPriority( $biblionumber, $priority ); |
1947 |
|
1947 |
|
1948 |
This increments the priority of all reserves after the one |
1948 |
This increments the priority of all reserves after the one |
1949 |
with either the lowest date after C<$reservedate> |
1949 |
with either the lowest date after C<$reservedate> |
Lines 1959-1965
the sub accounts for that too.
Link Here
|
1959 |
|
1959 |
|
1960 |
=cut |
1960 |
=cut |
1961 |
|
1961 |
|
1962 |
sub _ShiftPriorityByDateAndPriority { |
1962 |
sub _ShiftPriority { |
1963 |
my ( $biblio, $new_priority ) = @_; |
1963 |
my ( $biblio, $new_priority ) = @_; |
1964 |
|
1964 |
|
1965 |
my $dbh = C4::Context->dbh; |
1965 |
my $dbh = C4::Context->dbh; |
Lines 2236-2242
priority is based on the set of holds whose start date falls before
Link Here
|
2236 |
the parameter value. |
2236 |
the parameter value. |
2237 |
|
2237 |
|
2238 |
After calculation of this priority, it is recommended to call |
2238 |
After calculation of this priority, it is recommended to call |
2239 |
_ShiftPriorityByDateAndPriority. Note that this is currently done in |
2239 |
_ShiftPriority. Note that this is currently done in |
2240 |
AddReserves. |
2240 |
AddReserves. |
2241 |
|
2241 |
|
2242 |
=cut |
2242 |
=cut |
2243 |
- |
|
|