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

(-)a/circ/pendingreserves.pl (-7 / +5 lines)
Lines 1-6 Link Here
1
#!/usr/bin/perl
1
#!/usr/bin/perl
2
2
3
4
# Copyright 2000-2002 Katipo Communications
3
# Copyright 2000-2002 Katipo Communications
5
#
4
#
6
# This file is part of Koha.
5
# This file is part of Koha.
Lines 26-32 Link Here
26
use strict;
25
use strict;
27
#use warnings; FIXME - Bug 2505
26
#use warnings; FIXME - Bug 2505
28
27
29
use constant TWO_DAYS => 2;
28
use constant PULL_INTERVAL => 2;
30
29
31
use C4::Context;
30
use C4::Context;
32
use C4::Output;
31
use C4::Output;
Lines 79-85 if ( $startdate ) { Link Here
79
unless ( $startdate ){
78
unless ( $startdate ){
80
    # changed from delivered range of 10 years-yesterday to 2 days ago-today
79
    # changed from delivered range of 10 years-yesterday to 2 days ago-today
81
    # Find two days ago for the default shelf pull start date, unless HoldsToPullStartDate sys pref is set.
80
    # Find two days ago for the default shelf pull start date, unless HoldsToPullStartDate sys pref is set.
82
    $startdate = $today - DateTime::Duration->new( days => C4::Context->preference('HoldsToPullStartDate') || 2 );
81
    $startdate = $today - DateTime::Duration->new( days => C4::Context->preference('HoldsToPullStartDate') || PULL_INTERVAL );
83
}
82
}
84
83
85
if ( $enddate ) {
84
if ( $enddate ) {
Lines 87-93 if ( $enddate ) { Link Here
87
}
86
}
88
unless ( $enddate ) {
87
unless ( $enddate ) {
89
    #similarly: calculate end date with ConfirmFutureHolds (days)
88
    #similarly: calculate end date with ConfirmFutureHolds (days)
90
    $enddate = $today - DateTime::Duration->new( days => C4::Context->preference('ConfirmFutureHolds') || 0 );
89
    $enddate = $today + DateTime::Duration->new( days => C4::Context->preference('ConfirmFutureHolds') || 0 );
91
}
90
}
92
91
93
my @reservedata;
92
my @reservedata;
Lines 206-213 $template->param( Link Here
206
    run_report          => $run_report,
205
    run_report          => $run_report,
207
    reserveloop         => \@reservedata,
206
    reserveloop         => \@reservedata,
208
    "BiblioDefaultView".C4::Context->preference("BiblioDefaultView") => 1,
207
    "BiblioDefaultView".C4::Context->preference("BiblioDefaultView") => 1,
209
    HoldsToPullStartDate=> C4::Context->preference('HoldsToPullStartDate')||TWO_DAYS,
208
    HoldsToPullStartDate => C4::Context->preference('HoldsToPullStartDate') || PULL_INTERVAL,
210
    HoldsToPullEndDate  => C4::Context->preference('ConfirmFutureHolds')||0,
209
    HoldsToPullEndDate  => C4::Context->preference('ConfirmFutureHolds') || 0,
211
);
210
);
212
211
213
output_html_with_http_headers $input, $cookie, $template->output;
212
output_html_with_http_headers $input, $cookie, $template->output;
214
- 

Return to bug 14918