|
Lines 560-566
if ($StaffDetailItemSelection) {
Link Here
|
| 560 |
my @allorders_using_biblio = GetOrdersByBiblionumber ($biblionumber); |
560 |
my @allorders_using_biblio = GetOrdersByBiblionumber ($biblionumber); |
| 561 |
my @deletedorders_using_biblio; |
561 |
my @deletedorders_using_biblio; |
| 562 |
my @orders_using_biblio; |
562 |
my @orders_using_biblio; |
| 563 |
my @baskets_orders; |
|
|
| 564 |
my @baskets_deletedorders; |
563 |
my @baskets_deletedorders; |
| 565 |
|
564 |
|
| 566 |
foreach my $myorder (@allorders_using_biblio) { |
565 |
foreach my $myorder (@allorders_using_biblio) { |
|
Lines 573-581
foreach my $myorder (@allorders_using_biblio) {
Link Here
|
| 573 |
} |
572 |
} |
| 574 |
else { |
573 |
else { |
| 575 |
push @orders_using_biblio, $myorder; |
574 |
push @orders_using_biblio, $myorder; |
| 576 |
unless (grep{ $_ eq $basket } @baskets_orders){ |
|
|
| 577 |
push @baskets_orders,$myorder->{'basketno'}; |
| 578 |
} |
| 579 |
} |
575 |
} |
| 580 |
} |
576 |
} |
| 581 |
|
577 |
|
|
Lines 587-593
$template->param (countorders => $count_orders_using_biblio);
Link Here
|
| 587 |
my $count_deletedorders_using_biblio = scalar @deletedorders_using_biblio ; |
583 |
my $count_deletedorders_using_biblio = scalar @deletedorders_using_biblio ; |
| 588 |
$template->param (countdeletedorders => $count_deletedorders_using_biblio); |
584 |
$template->param (countdeletedorders => $count_deletedorders_using_biblio); |
| 589 |
|
585 |
|
| 590 |
$template->param (basketsorders => \@baskets_orders); |
|
|
| 591 |
$template->param (basketsdeletedorders => \@baskets_deletedorders); |
586 |
$template->param (basketsdeletedorders => \@baskets_deletedorders); |
| 592 |
|
587 |
|
| 593 |
output_html_with_http_headers $query, $cookie, $template->output; |
588 |
output_html_with_http_headers $query, $cookie, $template->output; |