use C4::Items;
use C4::Circulation;
use C4::Tags qw(get_tags);
-use C4::XISBN qw(get_xisbns get_biblionumber_from_isbn);
+use C4::XISBN qw(get_xisbns);
use C4::External::Amazon;
use C4::External::Syndetics qw(get_syndetics_index get_syndetics_summary get_syndetics_toc get_syndetics_excerpt get_syndetics_reviews get_syndetics_anotes );
use C4::Members;
use Koha::Biblios;
use Koha::RecordProcessor;
use Koha::AuthorisedValues;
-use Koha::Biblios;
+use Koha::IssuingRules;
+use Koha::Items;
use Koha::ItemTypes;
+use Koha::Acquisition::Orders;
use Koha::Virtualshelves;
use Koha::Patrons;
use Koha::Ratings;
print $query->redirect("/cgi-bin/koha/errors/404.pl"); # escape early
exit;
}
+
+my $biblio = Koha::Biblios->find( $biblionumber );
my $framework = &GetFrameworkCode( $biblionumber );
my $record_processor = Koha::RecordProcessor->new({
filters => 'ViewPolicy',
}
}
-$template->param( biblionumber => $biblionumber );
+$template->param( biblio => $biblio );
# get biblionumbers stored in the cart
my @cart_list;
}
} else {
for my $value (@{$arrParamsBusc->{$_}}) {
+ next if !defined($value);
$pasarParams .= '&' if ($j);
$pasarParams .= $_ . '=' . Encode::decode('UTF-8', uri_escape_utf8($value));
$j++;
}
}
-
-$template->param( 'ItemsIssued' => CountItemsIssued( $biblionumber ) );
-$template->param('OPACShowCheckoutName' => C4::Context->preference("OPACShowCheckoutName") );
-$template->param('OPACShowBarcode' => C4::Context->preference("OPACShowBarcode") );
+$template->param(
+ OPACShowCheckoutName => C4::Context->preference("OPACShowCheckoutName"),
+);
# adding items linked via host biblios
$cell{latestserials} =
GetLatestSerials( $subscription->{subscriptionid}, $serials_to_display );
if ( $borrowernumber ) {
- my $sub = getalert($borrowernumber,'issue',$subscription->{subscriptionid});
- if (@$sub[0]) {
- $cell{hasalert} = 1;
- }
+ my $subscription_object = Koha::Subscriptions->find( $subscription->{subscriptionid} );
+ my $subscriber = $subscription_object->subscribers->find( $borrowernumber );
+ $cell{hasalert} = 1 if $subscriber;
}
push @subs, \%cell;
}
}
my $has_hold;
if ( $show_holds_count || $show_priority) {
- my $biblio = Koha::Biblios->find( $biblionumber );
my $holds = $biblio->holds;
$template->param( holds_count => $holds->count );
while ( my $hold = $holds->next ) {
});
my $total_quantity = 0;
for my $order ( @$orders ) {
- if ( C4::Context->preference('AcqCreateItem') eq 'ordering' ) {
+ my $basket = Koha::Acquisition::Orders->find( $order->{ordernumber} )->basket;
+ if ( $basket->effective_create_items eq 'ordering' ) {
for my $itemnumber ( C4::Acquisition::GetItemnumbersFromOrder( $order->{ordernumber} ) ) {
push @itemnumbers_on_order, $itemnumber;
}
};
}
+my $allow_onshelf_holds;
if ( not $viewallitems and @items > $max_items_to_display ) {
$template->param(
too_many_items => 1,
items_count => scalar( @items ),
);
} else {
- my $allow_onshelf_holds;
my $patron = Koha::Patrons->find( $borrowernumber );
for my $itm (@items) {
+ my $item = Koha::Items->find( $itm->{itemnumber} );
$itm->{holds_count} = $item_reserves{ $itm->{itemnumber} };
$itm->{priority} = $priority{ $itm->{itemnumber} };
$norequests = 0
&& !$itemtypes->{$itm->{'itype'}}->{notforloan}
&& $itm->{'itemnumber'};
- $allow_onshelf_holds = C4::Reserves::OnShelfHoldsAllowed( $itm, ( $patron ? $patron->unblessed : {} ) )
+ $allow_onshelf_holds = Koha::IssuingRules->get_onshelfholds_policy( { item => $item, patron => $patron } )
unless $allow_onshelf_holds;
# get collection code description, too
$itm->{'imageurl'} = getitemtypeimagelocation( 'opac', $itemtypes->{ $itm->{itype} }->{'imageurl'} );
$itm->{'description'} = $itemtypes->{ $itm->{itype} }->{translated_description};
}
- foreach (qw(ccode enumchron copynumber itemnotes uri)) {
+ foreach (qw(ccode enumchron copynumber itemnotes location_description uri)) {
$itemfields{$_} = 1 if ($itm->{$_});
}
$itm->{transfertto} = $transfertto;
}
- if ( C4::Context->preference('OPACAcquisitionDetails')
- and C4::Context->preference('AcqCreateItem') eq 'ordering' )
- {
+ if ( C4::Context->preference('OPACAcquisitionDetails') ) {
$itm->{on_order} = 1
if grep /^$itm->{itemnumber}$/, @itemnumbers_on_order;
}
push @itemloop, $itm;
}
}
- $template->param( 'AllowOnShelfHolds' => $allow_onshelf_holds );
+}
+
+if( $allow_onshelf_holds || CountItemsIssued($biblionumber) || $biblio->has_items_waiting_or_intransit ) {
+ $template->param( ReservableItems => 1 );
}
# Display only one tab if one items list is empty
itemdata_enumchron => $itemfields{enumchron},
itemdata_uri => $itemfields{uri},
itemdata_copynumber => $itemfields{copynumber},
- itemdata_itemnotes => $itemfields{itemnotes},
+ itemdata_itemnotes => $itemfields{itemnotes},
+ itemdata_location => $itemfields{location_description},
subtitle => $subtitle,
OpacStarRatings => C4::Context->preference("OpacStarRatings"),
);
}
}
for my $review (@$reviews) {
- my $patron = Koha::Patrons->find( $review->{borrowernumber} );
+ my $patron = Koha::Patrons->find( $review->{borrowernumber} ); # FIXME Should be Koha::Review->reviewer or similar
# setting some borrower info into this hash
- $review->{title} = $patron->title;
- $review->{surname} = $patron->surname;
- $review->{firstname} = $patron->firstname;
- if ( $libravatar_enabled and $patron->email ) {
- $review->{avatarurl} = libravatar_url( email => $patron->email, https => $ENV{HTTPS} );
- }
- $review->{userid} = $patron->userid;
- $review->{cardnumber} = $patron->cardnumber;
+ if ( $patron ) {
+ $review->{patron} = $patron;
+ if ( $libravatar_enabled and $patron->email ) {
+ $review->{avatarurl} = libravatar_url( email => $patron->email, https => $ENV{HTTPS} );
+ }
- if ( $patron->borrowernumber eq $borrowernumber ) {
- $review->{your_comment} = 1;
- $loggedincommenter = 1;
+ if ( $patron->borrowernumber eq $borrowernumber ) {
+ $loggedincommenter = 1;
+ }
}
}
}
{
$template->param(
BakerTaylorContentURL =>
- sprintf("http://contentcafe2.btol.com/ContentCafeClient/ContentCafe.aspx?UserID=%s&Password=%s&ItemKey=%s&Options=Y",
+ sprintf("https://contentcafe2.btol.com/ContentCafeClient/ContentCafe.aspx?UserID=%s&Password=%s&ItemKey=%s&Options=Y",
$bt_user,$bt_pass,$isbn)
);
}
$template->param(covernewwindow => 'false');
}
+$template->param(borrowernumber => $borrowernumber);
+
if ( C4::Context->preference('OpacStarRatings') !~ /disable/ ) {
my $ratings = Koha::Ratings->search({ biblionumber => $biblionumber });
my $my_rating = $borrowernumber ? $ratings->search({ borrowernumber => $borrowernumber })->next : undef;
$template->param(
ratings => $ratings,
my_rating => $my_rating,
- borrowernumber => $borrowernumber
);
}
}
$template->param(
- 'OpacLocationBranchToDisplay' => C4::Context->preference('OpacLocationBranchToDisplay') ,
- 'OpacLocationBranchToDisplayShelving' => C4::Context->preference('OpacLocationBranchToDisplayShelving'),
+ 'OpacLocationBranchToDisplay' => C4::Context->preference('OpacLocationBranchToDisplay'),
);
output_html_with_http_headers $query, $cookie, $template->output;