use C4::Koha;
use C4::Biblio;
use C4::Items;
-use C4::Members; # to use GetMember
use C4::Serials; # CountSubscriptionFromBiblionumber
use C4::Search; # enabled_staff_search_views
use C4::Acquisition qw(GetOrdersByBiblionumber);
use Koha::Biblios;
+use Koha::Patrons;
use Koha::RecordProcessor;
exit;
}
-my $record = GetMarcBiblio($biblionumber,1);
+my $record = GetMarcBiblio({
+ biblionumber => $biblionumber,
+ embed_items => 1 });
if ( not defined $record ) {
# biblionumber invalid -> report and exit
filters => 'ViewPolicy',
options => {
interface => 'intranet',
- frameworkcode => $framework
+ frameworkcode => 'ACQ'
},
});
$record_processor->process($record);
});
if($query->cookie("holdfor")){
- my $holdfor_patron = GetMember('borrowernumber' => $query->cookie("holdfor"));
+ my $holdfor_patron = Koha::Patrons->find( $query->cookie("holdfor") );
$template->param(
holdfor => $query->cookie("holdfor"),
- holdfor_surname => $holdfor_patron->{'surname'},
- holdfor_firstname => $holdfor_patron->{'firstname'},
- holdfor_cardnumber => $holdfor_patron->{'cardnumber'},
+ holdfor_surname => $holdfor_patron->surname,
+ holdfor_firstname => $holdfor_patron->firstname,
+ holdfor_cardnumber => $holdfor_patron->cardnumber,
);
}
my $count_deletedorders_using_biblio = scalar @deletedorders_using_biblio ;
$template->param (countdeletedorders => $count_deletedorders_using_biblio);
-my $biblio = Koha::Biblios->find( $biblionumber );
my $holds = $biblio->holds;
$template->param( holdcount => $holds->count );