|
Lines 210-215
sub AddReserve {
Link Here
|
| 210 |
waitingdate => $waitingdate, |
210 |
waitingdate => $waitingdate, |
| 211 |
expirationdate => $expdate, |
211 |
expirationdate => $expdate, |
| 212 |
itemtype => $itemtype, |
212 |
itemtype => $itemtype, |
|
|
213 |
item_level_hold => $checkitem ? 1 : 0, |
| 213 |
} |
214 |
} |
| 214 |
)->store(); |
215 |
)->store(); |
| 215 |
$hold->set_waiting() if $found eq 'W'; |
216 |
$hold->set_waiting() if $found eq 'W'; |
|
Lines 1894-1899
sub RevertWaitingStatus {
Link Here
|
| 1894 |
$sth->execute( $itemnumber ); |
1895 |
$sth->execute( $itemnumber ); |
| 1895 |
my $reserve = $sth->fetchrow_hashref(); |
1896 |
my $reserve = $sth->fetchrow_hashref(); |
| 1896 |
|
1897 |
|
|
|
1898 |
my $hold = Koha::Holds->find( $reserve->{reserve_id} ); # TODO Remove the next raw SQL statements and use this instead |
| 1899 |
|
| 1897 |
## Increment the priority of all other non-waiting |
1900 |
## Increment the priority of all other non-waiting |
| 1898 |
## reserves for this bib record |
1901 |
## reserves for this bib record |
| 1899 |
$query = " |
1902 |
$query = " |
|
Lines 1920-1925
sub RevertWaitingStatus {
Link Here
|
| 1920 |
"; |
1923 |
"; |
| 1921 |
$sth = $dbh->prepare( $query ); |
1924 |
$sth = $dbh->prepare( $query ); |
| 1922 |
$sth->execute( $reserve->{'reserve_id'} ); |
1925 |
$sth->execute( $reserve->{'reserve_id'} ); |
|
|
1926 |
|
| 1927 |
unless ( $hold->item_level_hold ) { |
| 1928 |
$hold->itemnumber(undef)->store; |
| 1929 |
} |
| 1930 |
|
| 1923 |
_FixPriority( { biblionumber => $reserve->{biblionumber} } ); |
1931 |
_FixPriority( { biblionumber => $reserve->{biblionumber} } ); |
| 1924 |
} |
1932 |
} |
| 1925 |
|
1933 |
|
| 1926 |
- |
|
|