@@ -, +, @@ -> This link should read "Add ..." if there is no existing note or "Edit ..." if there is. -> The three new columns and their values should appear in the export. --- acqui/lateorders-export.pl | 4 +- acqui/lateorders.pl | 22 ----- .../prog/en/modules/acqui/csv/lateorders.tt | 5 +- .../prog/en/modules/acqui/lateorders.tt | 104 ++++++++++++++------- 4 files changed, 78 insertions(+), 57 deletions(-) --- a/acqui/lateorders-export.pl +++ a/acqui/lateorders-export.pl @@ -53,8 +53,8 @@ for my $ordernumber ( @ordernumbers ) { basketno => $order->{basketno}, claims_count => $order->{claims_count}, claimed_date => $order->{claimed_date}, - internalnote => $order->{internalnote}, - vendornote => $order->{vendornote}, + internalnote => $order->{order_internalnote}, + vendornote => $order->{order_vendornote}, isbn => $order->{isbn}, } ; --- a/acqui/lateorders.pl +++ a/acqui/lateorders.pl @@ -123,28 +123,6 @@ if ($op and $op eq "send_alert"){ } } -if ($op && $op eq "save"){ - my $listorders; - my @orders = $input->param; - - foreach my $order (@orders){ - if ( $order ne "op"){ - my @split = split (/_/,$order); - $listorders->{$split[0]}->{$split[1]} = $input->param($order); - } - } - - my $orders_rs = Koha::Acquisition::Orders->search({ ordernumber => [ keys %$listorders ] }); - while ( my $order = $orders_rs->next ) { - my $internalnote = $listorders->{$order->ordernumber}->{i}; - my $vendornote = $listorders->{$order->ordernumber}->{v}; - - $order->order_internalnote($internalnote) if defined $internalnote; - $order->order_vendornote($vendornote) if defined $vendornote; - $order->store; - } -} - my @parameters = ( $delay ); push @parameters, $estimateddeliverydatefrom_dt ? $estimateddeliverydatefrom_dt->ymd() --- a/koha-tmpl/intranet-tmpl/prog/en/modules/acqui/csv/lateorders.tt +++ a/koha-tmpl/intranet-tmpl/prog/en/modules/acqui/csv/lateorders.tt @@ -13,7 +13,10 @@ "[% o.unitpricesupplier | html %] x [% o.quantity_to_receive | html %] = [% o.subtotal | html %] ([% o.budget | html %])"[%- delimiter | html -%] "[% o.basketname | html %] ([% o.basketno | html %])"[%- delimiter | html -%] "[% o.claims_count | html %]"[%- delimiter | html -%] -"[% o.claimed_date | html %]" +"[% o.claimed_date | html %]"[%- delimiter | html -%] +"[% o.internalnote | html %]"[%- delimiter | html -%] +"[% o.vendornote | html %]"[%- delimiter | html -%] +"[% o.isbn | html %]" [%- INCLUDE empty_line.inc -%] [%- END -%] [%- delimiter | html -%] --- a/koha-tmpl/intranet-tmpl/prog/en/modules/acqui/lateorders.tt +++ a/koha-tmpl/intranet-tmpl/prog/en/modules/acqui/lateorders.tt @@ -138,8 +138,34 @@ [% END %] -
+ [% lateorder.internalnote | html %] + + Edit internal note + +
+ [% ELSE %] + + Add internal note + + [% END %] ++ [% lateorder.vendornote | html %] + + Edit vendor note + +
+ [% ELSE %] + + Add vendor note + + [% END %] +