Lines 2352-2357
sub PrepareItemrecordDisplay {
Link Here
|
2352 |
} |
2352 |
} |
2353 |
my @loop_data; |
2353 |
my @loop_data; |
2354 |
|
2354 |
|
|
|
2355 |
my $unitprice; |
2356 |
my $replacementprice; |
2357 |
my @orders = C4::Acquisition::GetOrdersByBiblionumber($bibnum); |
2358 |
foreach my $order (@orders) { |
2359 |
$unitprice = $order->{'unitprice'}; |
2360 |
$replacementprice = $order->{'replacementprice'}; |
2361 |
} |
2362 |
|
2355 |
my $branch_limit = C4::Context->userenv ? C4::Context->userenv->{"branch"} : ""; |
2363 |
my $branch_limit = C4::Context->userenv ? C4::Context->userenv->{"branch"} : ""; |
2356 |
my $query = qq{ |
2364 |
my $query = qq{ |
2357 |
SELECT authorised_value,lib FROM authorised_values |
2365 |
SELECT authorised_value,lib FROM authorised_values |
Lines 2441-2446
sub PrepareItemrecordDisplay {
Link Here
|
2441 |
$defaultvalue = $defaultvalues->{location}; |
2449 |
$defaultvalue = $defaultvalues->{location}; |
2442 |
} |
2450 |
} |
2443 |
} |
2451 |
} |
|
|
2452 |
if ( $unitprice && $tagslib->{$tag}->{$subfield}->{kohafield} eq 'items.price' ) { |
2453 |
$defaultvalue = $unitprice; |
2454 |
} |
2455 |
if ( $replacementprice && $tagslib->{$tag}->{$subfield}->{kohafield} eq 'items.replacementprice' ) { |
2456 |
$defaultvalue = $replacementprice; |
2457 |
} |
2444 |
if ( $tagslib->{$tag}->{$subfield}->{authorised_value} ) { |
2458 |
if ( $tagslib->{$tag}->{$subfield}->{authorised_value} ) { |
2445 |
my @authorised_values; |
2459 |
my @authorised_values; |
2446 |
my %authorised_lib; |
2460 |
my %authorised_lib; |
2447 |
- |
|
|