@@ -, +, @@ by default in serials/serials-edit.pl --- C4/Items.pm | 14 ++++++++++++++ 1 file changed, 14 insertions(+) --- a/C4/Items.pm +++ a/C4/Items.pm @@ -2352,6 +2352,14 @@ sub PrepareItemrecordDisplay { } my @loop_data; + my $unitprice; + my $replacementprice; + my @orders = C4::Acquisition::GetOrdersByBiblionumber($bibnum); + foreach my $order (@orders) { + $unitprice = $order->{'unitprice'}; + $replacementprice = $order->{'replacementprice'}; + } + my $branch_limit = C4::Context->userenv ? C4::Context->userenv->{"branch"} : ""; my $query = qq{ SELECT authorised_value,lib FROM authorised_values @@ -2441,6 +2449,12 @@ sub PrepareItemrecordDisplay { $defaultvalue = $defaultvalues->{location}; } } + if ( $unitprice && $tagslib->{$tag}->{$subfield}->{kohafield} eq 'items.price' ) { + $defaultvalue = $unitprice; + } + if ( $replacementprice && $tagslib->{$tag}->{$subfield}->{kohafield} eq 'items.replacementprice' ) { + $defaultvalue = $replacementprice; + } if ( $tagslib->{$tag}->{$subfield}->{authorised_value} ) { my @authorised_values; my %authorised_lib; --