From 64b31bd6167cae4dec96ed4c2216640bae7bbd6d Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Holger=20Mei=C3=9Fner?= Date: Fri, 16 May 2014 13:14:32 +0200 Subject: [PATCH] Bug 11577: Add an automatic renewal cronjob MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit This patch adds a new cron script automatic_renewals.pl and a new entry in crontab.example. To test: 1) You need a few issues, some with automatic renewal and some without. 2) Confirm that each time you run misc/cronjobs/automatic_renewals.pl those issues are renewed that meet all of the following criteria: - automatic renewal has been sheduled either by issuing rule or by checkbox on the checkout page - the number of allowed renewals isn't exceeded - renewal isn't premature (No renewal before) 3) Confirm that all other issues are not affected. Sponsored-by: Hochschule für Gesundheit (hsg), Germany --- misc/cronjobs/automatic_renewals.pl | 60 +++++++++++++++++++++++++++++++++++ misc/cronjobs/crontab.example | 3 ++ 2 files changed, 63 insertions(+) create mode 100644 misc/cronjobs/automatic_renewals.pl diff --git a/misc/cronjobs/automatic_renewals.pl b/misc/cronjobs/automatic_renewals.pl new file mode 100644 index 0000000..33b5bf0 --- /dev/null +++ b/misc/cronjobs/automatic_renewals.pl @@ -0,0 +1,60 @@ +# This file is part of Koha. +# +# Copyright (C) 2014 Hochschule für Gesundheit (hsg), Germany +# +# Koha is free software; you can redistribute it and/or modify it +# under the terms of the GNU General Public License as published by +# the Free Software Foundation; either version 3 of the License, or +# (at your option) any later version. +# +# Koha is distributed in the hope that it will be useful, but +# WITHOUT ANY WARRANTY; without even the implied warranty of +# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +# GNU General Public License for more details. +# +# You should have received a copy of the GNU General Public License +# along with Koha; if not, see . + +=head1 NAME + +automatic_renewals.pl - cron script to renew loans + +=head1 SYNOPSIS + +./automatic_renewals.pl + +or, in crontab: +0 3 * * * automatic_renewals.pl + +=head1 DESCRIPTION + +This script searches for issues sheduled for automatic renewal +(issues.auto_renew). If there are still renews left (Renewals allowed) +and the renewal isn't premature (No Renewal before) the issue is renewed. + +=head1 OPTIONS + +No options. + +=cut + +use Modern::Perl; + +use C4::Circulation; +use C4::Context; + +my $dbh = C4::Context->dbh; +my ( $borrowernumber, $itemnumber, $branch, $ok, $error ); + +my $query = +"SELECT borrowernumber, itemnumber, branchcode FROM issues WHERE auto_renew = 1"; +my $sth = $dbh->prepare($query); +$sth->execute(); + +while ( ( $borrowernumber, $itemnumber, $branch ) = $sth->fetchrow_array ) { + +# CanBookBeRenewed returns 'auto_renew' when the renewal should be done by this script + ( $ok, $error ) = CanBookBeRenewed( $borrowernumber, $itemnumber ); + AddRenewal( $borrowernumber, $itemnumber, $branch ) + if ( $error eq "auto_renew" ); +} diff --git a/misc/cronjobs/crontab.example b/misc/cronjobs/crontab.example index a937bf0..73ecf70 100644 --- a/misc/cronjobs/crontab.example +++ b/misc/cronjobs/crontab.example @@ -85,3 +85,6 @@ KOHA_CRON_PATH = /usr/share/koha/bin/cronjobs # delete old purchase suggestions weekly. Replace XX with a number to define the age of suggestions to delete. @weekly __KOHA_USER__ $KOHA_CRON_PATH/purge_suggestions.pl --days XX > /dev/null 2>&1 + +# every day at 3AM renew all issues sheduled for automatic renewal +0 3 * * * __KOHA_USER__ $KOHA_CRON_PATH/automatic_renewals.pl \ No newline at end of file -- 1.7.10.4