Line 0
Link Here
|
0 |
- |
1 |
$DBversion = 'XXX'; # will be replaced by the RM |
|
|
2 |
if( CheckVersion( $DBversion ) ) { |
3 |
my $sql = q|UPDATE reserves SET expirationdate = DATE_ADD( NOW(), INTERVAL ? DAY) WHERE expirationdate IS NULL AND waitingdate IS NOT NULL|; |
4 |
$dbh->do( $sql, undef, C4::Context->preference('MaxPickupDelay') || 7 ); |
5 |
|
6 |
SetVersion( $DBversion ); |
7 |
print "Upgrade to $DBversion done (Bug 20724 - expirationdate filled for waiting holds)\n"; |
8 |
} |