From 5c473b0fb792bf861c395f83ee5efc2f9c217098 Mon Sep 17 00:00:00 2001 From: Tomas Cohen Arazi Date: Wed, 10 Feb 2021 13:34:55 -0300 Subject: [PATCH] Bug 26693: Add option to update dateaccessioned when receiving an order This patchset adds: - A new syspref: AcqItemSetDateAccessionedsWhenReceived - A new column on the receive page when items are created on ordering, with a checkbox for choosing if they want the date updated - The checkbox default value honours the global syspref. To test: Signed-off-by: Tomas Cohen Arazi --- acqui/finishreceive.pl | 5 ++++- .../prog/en/modules/acqui/orderreceive.tt | 15 ++++++++++++++- 2 files changed, 18 insertions(+), 2 deletions(-) diff --git a/acqui/finishreceive.pl b/acqui/finishreceive.pl index 961e3d566f0..fabf0dc5cd2 100755 --- a/acqui/finishreceive.pl +++ b/acqui/finishreceive.pl @@ -79,7 +79,8 @@ my $basket = $order_obj->basket; if ($quantityrec > $origquantityrec ) { my @received_items = (); if ($basket->effective_create_items eq 'ordering') { - @received_items = $input->param('items_to_receive'); + @received_items = $input->multi_param('items_to_receive'); + my @items_to_update_dateaccessioned = $input->multi_param('items_to_update_dateaccessioned'); my @affects = split q{\|}, C4::Context->preference("AcqItemSetSubfieldsWhenReceived"); if ( @affects ) { my $frameworkcode = GetFrameworkCode($biblionumber); @@ -93,6 +94,8 @@ if ($quantityrec > $origquantityrec ) { } } C4::Items::ModItemFromMarc( $item, $biblionumber, $in ); + Koha::Items->find($in)->set({ dateaccessioned => \'NOW()' })->store + if any { $in eq $_ } @items_to_update_dateaccessioned; } } } diff --git a/koha-tmpl/intranet-tmpl/prog/en/modules/acqui/orderreceive.tt b/koha-tmpl/intranet-tmpl/prog/en/modules/acqui/orderreceive.tt index 185e2f835d6..f0ccb55781e 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/modules/acqui/orderreceive.tt +++ b/koha-tmpl/intranet-tmpl/prog/en/modules/acqui/orderreceive.tt @@ -193,6 +193,7 @@ Receive? + Update cataloguing date   Barcode Home library @@ -212,7 +213,14 @@ [% FOREACH item IN order.items %] - + + + [% IF Koha.Preference('AcqItemSetDateAccessionedsWhenReceived') == 1 %] + + [% ELSE %] + + [% END %] + Edit [% item.barcode | html %] [% Branches.GetName( item.homebranch ) | html %] @@ -541,6 +549,11 @@ $("#other_reason").hide(); }); + $('.items_to_receive').change(function() { + var val = $(this).val(); + + $('#item_update_date_'+val).prop('disabled', !$(this).prop('checked')); + }); }); [% END %] -- 2.30.1