}
}
-my $query = new CGI;
+my $query = CGI->new();
+
+my $biblionumber = $query->param('biblionumber') || $query->param('bib') || 0;
+$biblionumber = int($biblionumber);
+
my ( $template, $borrowernumber, $cookie ) = get_template_and_user(
{
template_name => "opac-detail.tt",
}
);
-my $biblionumber = $query->param('biblionumber') || $query->param('bib') || 0;
-$biblionumber = int($biblionumber);
-
my @all_items = GetItemsInfo($biblionumber);
my @hiddenitems;
-if (scalar @all_items >= 1) {
- push @hiddenitems, GetHiddenItemnumbers(@all_items);
-
- if (scalar @hiddenitems == scalar @all_items ) {
- print $query->redirect("/cgi-bin/koha/errors/404.pl"); # escape early
- exit;
- }
+my $patron = Koha::Patrons->find( $borrowernumber );
+our $borcat= q{};
+if ( C4::Context->preference('OpacHiddenItemsExceptions') ) {
+ $borcat = $patron ? $patron->categorycode : q{};
}
-my $record = GetMarcBiblio({ biblionumber => $biblionumber });
+my $record = GetMarcBiblio({
+ biblionumber => $biblionumber,
+ opac => 1 });
if ( ! $record ) {
print $query->redirect("/cgi-bin/koha/errors/404.pl"); # escape early
exit;
}
+if ( scalar @all_items >= 1 ) {
+ push @hiddenitems,
+ GetHiddenItemnumbers( { items => \@all_items, borcat => $borcat } );
+
+ if (scalar @hiddenitems == scalar @all_items ) {
+ print $query->redirect("/cgi-bin/koha/errors/404.pl"); # escape early
+ exit;
+ }
+}
+
my $biblio = Koha::Biblios->find( $biblionumber );
-my $framework = &GetFrameworkCode( $biblionumber );
+my $framework = $biblio ? $biblio->frameworkcode : q{};
my $record_processor = Koha::RecordProcessor->new({
filters => 'ViewPolicy',
options => {
};
my $hits;
my @newresults;
+ my $search_context = {
+ 'interface' => 'opac',
+ 'category' => $borcat
+ };
for (my $i=0;$i<@servers;$i++) {
my $server = $servers[$i];
$hits = $results_hashref->{$server}->{"hits"};
- @newresults = searchResults('opac', '', $hits, $results_per_page, $offset, $arrParamsBusc->{'scan'}, $results_hashref->{$server}->{"RECORDS"});
+ @newresults = searchResults( $search_context, '', $hits, $results_per_page, $offset, $arrParamsBusc->{'scan'}, $results_hashref->{$server}->{"RECORDS"});
}
return \@newresults;
}#searchAgain
OPACShowCheckoutName => C4::Context->preference("OPACShowCheckoutName"),
);
-# adding items linked via host biblios
-
-my $analyticfield = '773';
-if ($marcflavour eq 'MARC21' || $marcflavour eq 'NORMARC'){
- $analyticfield = '773';
-} elsif ($marcflavour eq 'UNIMARC') {
- $analyticfield = '461';
-}
-foreach my $hostfield ( $record->field($analyticfield)) {
- my $hostbiblionumber = $hostfield->subfield("0");
- my $linkeditemnumber = $hostfield->subfield("9");
- my @hostitemInfos = GetItemsInfo($hostbiblionumber);
- foreach my $hostitemInfo (@hostitemInfos){
- if ($hostitemInfo->{itemnumber} eq $linkeditemnumber){
- push(@all_items, $hostitemInfo);
+if ( C4::Context->preference('EasyAnalyticalRecords') ) {
+ # adding items linked via host biblios
+ my $analyticfield = '773';
+ if ($marcflavour eq 'MARC21' || $marcflavour eq 'NORMARC'){
+ $analyticfield = '773';
+ } elsif ($marcflavour eq 'UNIMARC') {
+ $analyticfield = '461';
+ }
+ foreach my $hostfield ( $record->field($analyticfield)) {
+ my $hostbiblionumber = $hostfield->subfield("0");
+ my $linkeditemnumber = $hostfield->subfield("9");
+ my @hostitemInfos = GetItemsInfo($hostbiblionumber);
+ foreach my $hostitemInfo (@hostitemInfos){
+ if ($hostitemInfo->{itemnumber} eq $linkeditemnumber){
+ push(@all_items, $hostitemInfo);
+ }
}
}
}
$cell{histenddate} = $subscription->{histenddate};
$cell{branchcode} = $subscription->{branchcode};
$cell{callnumber} = $subscription->{callnumber};
+ $cell{location} = $subscription->{location};
$cell{closed} = $subscription->{closed};
$cell{letter} = $subscription->{letter};
$cell{biblionumber} = $subscription->{biblionumber};
});
my $total_quantity = 0;
for my $order ( @$orders ) {
- my $basket = Koha::Acquisition::Orders->find( $order->{ordernumber} )->basket;
+ my $order = Koha::Acquisition::Orders->find( $order->{ordernumber} );
+ my $basket = $order->basket;
if ( $basket->effective_create_items eq 'ordering' ) {
- for my $itemnumber ( C4::Acquisition::GetItemnumbersFromOrder( $order->{ordernumber} ) ) {
- push @itemnumbers_on_order, $itemnumber;
- }
+ @itemnumbers_on_order = $order->items->get_column('itemnumber');
}
- $total_quantity += $order->{quantity};
+ $total_quantity += $order->quantity;
}
$template->{VARS}->{acquisition_details} = {
total_quantity => $total_quantity,
items_count => scalar( @items ),
);
} else {
- my $patron = Koha::Patrons->find( $borrowernumber );
for my $itm (@items) {
my $item = Koha::Items->find( $itm->{itemnumber} );
$itm->{holds_count} = $item_reserves{ $itm->{itemnumber} };
if( C4::Context->preference('ArticleRequests') ) {
my $patron = $borrowernumber ? Koha::Patrons->find($borrowernumber) : undef;
+ my $itemtype = Koha::ItemTypes->find($biblio->itemtype);
my $artreqpossible = $patron
? $biblio->can_article_request( $patron )
- : Koha::ItemTypes->find($biblio->itemtype)->may_article_request;
+ : $itemtype
+ ? $itemtype->may_article_request
+ : q{};
$template->param( artreqpossible => $artreqpossible );
}
}
}
for my $review (@$reviews) {
- my $patron = Koha::Patrons->find( $review->{borrowernumber} ); # FIXME Should be Koha::Review->reviewer or similar
+ my $review_patron = Koha::Patrons->find( $review->{borrowernumber} ); # FIXME Should be Koha::Review->reviewer or similar
# setting some borrower info into this hash
- if ( $patron ) {
- $review->{patron} = $patron;
- if ( $libravatar_enabled and $patron->email ) {
- $review->{avatarurl} = libravatar_url( email => $patron->email, https => $ENV{HTTPS} );
+ if ( $review_patron ) {
+ $review->{patron} = $review_patron;
+ if ( $libravatar_enabled and $review_patron->email ) {
+ $review->{avatarurl} = libravatar_url( email => $review_patron->email, https => $ENV{HTTPS} );
}
- if ( $patron->borrowernumber eq $borrowernumber ) {
+ if ( $review_patron->borrowernumber eq $borrowernumber ) {
$loggedincommenter = 1;
}
}