View | Details | Raw Unified | Return to bug 19014
Collapse All | Expand All

(-)a/misc/cronjobs/automatic_renewals.pl (-1 / +15 lines)
Lines 75-80 my $auto_renews = Koha::Checkouts->search({ auto_renew => 1 }); Link Here
75
my %report;
75
my %report;
76
while ( my $auto_renew = $auto_renews->next ) {
76
while ( my $auto_renew = $auto_renews->next ) {
77
77
78
    #If norenewalbefore is undef, $NoRenewalBeforeThisDate will equal $now.
79
    my $NoRenewalBeforeThisDate = C4::Circulation::GetSoonestRenewDate($auto_renew->borrowernumber, $auto_renew->itemnumber);
80
    my $now = Koha::DateUtils::dt_from_string;
81
    if ( $NoRenewalBeforeThisDate && $now ){
82
        if ( $NoRenewalBeforeThisDate > $now ){
83
            next;
84
        }
85
        else {
86
            #Fallback: if norenewalbefore is undef, don't renew before due date
87
            if ( Koha::DateUtils::dt_from_string( $auto_renew->date_due, 'sql' ) > $now ){
88
                next;
89
            }
90
        }
91
    }
92
78
    # CanBookBeRenewed returns 'auto_renew' when the renewal should be done by this script
93
    # CanBookBeRenewed returns 'auto_renew' when the renewal should be done by this script
79
    my ( $ok, $error ) = CanBookBeRenewed( $auto_renew->borrowernumber, $auto_renew->itemnumber );
94
    my ( $ok, $error ) = CanBookBeRenewed( $auto_renew->borrowernumber, $auto_renew->itemnumber );
80
    if ( $error eq 'auto_renew' ) {
95
    if ( $error eq 'auto_renew' ) {
81
- 

Return to bug 19014