From 6bc1591dacd70aa61f0f0e71e3d3fd1a19501ed1 Mon Sep 17 00:00:00 2001 From: Marcel de Rooy Date: Wed, 16 May 2018 15:39:04 +0200 Subject: [PATCH] Bug 20773: (bug 20724 follow-up) Add a simple db revision We should correct bad data too. This is a trivial, pragmatic approach. Instead of doing a complex calculation with holidays etc. (as was done on 12063), we just add MaxPickupDelay or 7 days to today probably resulting in a little bonus time. Only for waiting holds. When the ReservesNeedReturns pref was not Automatic, there should be no changes. Signed-off-by: Marcel de Rooy Signed-off-by: Victor Grousset --- installer/data/mysql/atomicupdate/bug_20724.perl | 8 ++++++++ 1 file changed, 8 insertions(+) create mode 100644 installer/data/mysql/atomicupdate/bug_20724.perl diff --git a/installer/data/mysql/atomicupdate/bug_20724.perl b/installer/data/mysql/atomicupdate/bug_20724.perl new file mode 100644 index 0000000..ffdb1dc --- /dev/null +++ b/installer/data/mysql/atomicupdate/bug_20724.perl @@ -0,0 +1,8 @@ +$DBversion = 'XXX'; # will be replaced by the RM +if( CheckVersion( $DBversion ) ) { + my $sql = q|UPDATE reserves SET expirationdate = DATE_ADD( NOW(), INTERVAL ? DAY) WHERE expirationdate IS NULL AND waitingdate IS NOT NULL|; + $dbh->do( $sql, undef, C4::Context->preference('MaxPickupDelay') || 7 ); + + SetVersion( $DBversion ); + print "Upgrade to $DBversion done (Bug 20724 - expirationdate filled for waiting holds)\n"; +} -- 2.7.4