use C4::Images;
use Koha::DateUtils;
use C4::HTML5Media;
+use C4::CourseReserves qw(GetItemCourseReservesInfo);
+use C4::Acquisition qw(GetOrdersByBiblionumber);
# use Smart::Comments;
my $analyze = $query->param('analyze');
-my ( $template, $borrowernumber, $cookie ) = get_template_and_user(
+my ( $template, $borrowernumber, $cookie, $flags ) = get_template_and_user(
{
template_name => 'catalogue/detail.tmpl',
query => $query,
$materials_flag = 1;
}
+ if ( C4::Context->preference('UseCourseReserves') ) {
+ $item->{'course_reserves'} = GetItemCourseReservesInfo( itemnumber => $item->{'itemnumber'} );
+ }
+
if ($currentbranch and $currentbranch ne "NO_LIBRARY_SET"
and C4::Context->preference('SeparateHoldings')) {
if ($itembranchcode and $itembranchcode eq $currentbranch) {
}
}
+# Display only one tab if one items list is empty
+if (scalar(@itemloop) == 0 || scalar(@otheritemloop) == 0) {
+ $template->param(SeparateHoldings => 0);
+ if (scalar(@itemloop) == 0) {
+ @itemloop = @otheritemloop;
+ }
+}
+
$template->param( norequests => $norequests );
$template->param(
MARCNOTES => $marcnotesarray,
subscriptions => \@subs,
subscriptionsnumber => $subscriptionsnumber,
subscriptiontitle => $dat->{title},
+ searchid => $query->param('searchid'),
);
# $debug and $template->param(debug_display => 1);
my ( $holdcount, $holds ) = C4::Reserves::GetReservesFromBiblionumber($biblionumber,1);
$template->param( holdcount => $holdcount, holds => $holds );
+my $StaffDetailItemSelection = C4::Context->preference('StaffDetailItemSelection');
+if ($StaffDetailItemSelection) {
+ # Only enable item selection if user can execute at least one action
+ if (
+ $flags->{superlibrarian}
+ || (
+ ref $flags->{tools} eq 'HASH' && (
+ $flags->{tools}->{items_batchmod} # Modify selected items
+ || $flags->{tools}->{items_batchdel} # Delete selected items
+ )
+ )
+ || ( ref $flags->{tools} eq '' && $flags->{tools} )
+ )
+ {
+ $template->param(
+ StaffDetailItemSelection => $StaffDetailItemSelection );
+ }
+}
+
+my @allorders_using_biblio = GetOrdersByBiblionumber ($biblionumber);
+my @deletedorders_using_biblio;
+my @orders_using_biblio;
+my @baskets_orders;
+my @baskets_deletedorders;
+
+foreach my $myorder (@allorders_using_biblio) {
+ my $basket = $myorder->{'basketno'};
+ if ((defined $myorder->{'datecancellationprinted'}) and ($myorder->{'datecancellationprinted'} ne '0000-00-00') ){
+ push @deletedorders_using_biblio, $myorder;
+ unless (grep(/^$basket$/, @baskets_deletedorders)){
+ push @baskets_deletedorders,$myorder->{'basketno'};
+ }
+ }
+ else {
+ push @orders_using_biblio, $myorder;
+ unless (grep(/^$basket$/, @baskets_orders)){
+ push @baskets_orders,$myorder->{'basketno'};
+ }
+ }
+}
+
+my $count_orders_using_biblio = scalar @orders_using_biblio ;
+$template->param (countorders => $count_orders_using_biblio);
+
+my $count_deletedorders_using_biblio = scalar @deletedorders_using_biblio ;
+$template->param (countdeletedorders => $count_deletedorders_using_biblio);
+
+$template->param (basketsorders => \@baskets_orders);
+$template->param (basketsdeletedorders => \@baskets_deletedorders);
output_html_with_http_headers $query, $cookie, $template->output;