From 23dd922421054c25ae73c8b99458a4c7bf9f5d8b Mon Sep 17 00:00:00 2001 From: Kyle M Hall Date: Thu, 9 Apr 2020 13:22:01 -0400 Subject: [PATCH] Bug 25101: Add ability to skip previewing results when batch extending due dates For sites with very large amounts of due dates to extend ( tens of thousands ), it can take a very long time of the results to load ( if at all ). It would be good to have a way to bypass the confirmation screen, instead directly updating the due dates before displaying the results. Test Plan: 1) Apply this patch 2) Browse to tools/batch_extend_due_dates.pl 3) Note the new "Preview results" checkbox 4) Submit form with the checkbox unchecked, due dates should be updated without previewing the checkouts 5) Submit form with the checkbox checked, tool should function as it did previously Signed-off-by: Kelly McElligott --- .../en/modules/tools/batch_extend_due_dates.tt | 9 ++++ tools/batch_extend_due_dates.pl | 60 +++++++++++++++------- 2 files changed, 50 insertions(+), 19 deletions(-) diff --git a/koha-tmpl/intranet-tmpl/prog/en/modules/tools/batch_extend_due_dates.tt b/koha-tmpl/intranet-tmpl/prog/en/modules/tools/batch_extend_due_dates.tt index e572b2b3d7..623108a21c 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/modules/tools/batch_extend_due_dates.tt +++ b/koha-tmpl/intranet-tmpl/prog/en/modules/tools/batch_extend_due_dates.tt @@ -97,6 +97,15 @@ +
+ Options: +
    +
  1. + + +
  2. +
+
diff --git a/tools/batch_extend_due_dates.pl b/tools/batch_extend_due_dates.pl index 572e57bdc9..4cf4cfbf63 100755 --- a/tools/batch_extend_due_dates.pl +++ b/tools/batch_extend_due_dates.pl @@ -29,6 +29,7 @@ use Koha::DateUtils qw( dt_from_string output_pref ); my $input = new CGI; my $op = $input->param('op') // q|form|; +my $preview_results = $input->param('preview_results'); my ( $template, $loggedinuser, $cookie ) = get_template_and_user( { @@ -40,6 +41,8 @@ my ( $template, $loggedinuser, $cookie ) = get_template_and_user( } ); +my @issue_ids; + if ( $op eq 'form' ) { $template->param( view => 'form', ); } @@ -102,33 +105,52 @@ elsif ( $op eq 'list' ) { my @new_due_dates; while ( my $checkout = $checkouts->next ) { - push @new_due_dates, - output_pref({ dt => calc_new_due_date( - { - due_date => dt_from_string($checkout->date_due), - new_hard_due_date => $new_hard_due_date, - add_days => $due_date_days - } - ), dateformat => 'iso' }); + if ($preview_results) { + push( + @new_due_dates, + output_pref( + { + dt => calc_new_due_date( + { + due_date => + dt_from_string( $checkout->date_due ), + new_hard_due_date => $new_hard_due_date, + add_days => $due_date_days + } + ), + dateformat => 'iso' + } + ) + ); + } else { + push( @issue_ids, $checkout->id ); + } } - $template->param( - checkouts => $checkouts, - new_hard_due_date => $new_hard_due_date - ? dt_from_string($new_hard_due_date) - : undef, - due_date_days => $due_date_days, - new_due_dates => \@new_due_dates, - view => 'list', - ); + if ( $preview_results ) { + $template->param( + checkouts => $checkouts, + new_hard_due_date => $new_hard_due_date + ? dt_from_string($new_hard_due_date) + : undef, + due_date_days => $due_date_days, + new_due_dates => \@new_due_dates, + view => 'list', + ); + } else { + $op = 'modify'; + } } -elsif ( $op eq 'modify' ) { + +if ( $op eq 'modify' ) { # We want to modify selected checkouts! - my @issue_ids = $input->multi_param('issue_id'); my $new_hard_due_date = $input->param('new_hard_due_date'); my $due_date_days = $input->param('due_date_days'); + # @issue_ids will already be populated if we are skipping the results display + @issue_ids = $input->multi_param('issue_id') unless @issue_ids; + $new_hard_due_date &&= dt_from_string($new_hard_due_date); my $checkouts = Koha::Checkouts->search( { issue_id => { -in => \@issue_ids } } ); -- 2.11.0