my @results = SearchOrder( $search, $supplierid, $biblionumber, $catview );
my $count = scalar @results;
-my @booksellers = GetBookSeller( $results[0]->{'booksellerid'} );
+my $bookseller = GetBookSellerFromId( $results[0]->{'booksellerid'} );
my $date = $results[0]->{'entrydate'};
freight => $freight,
gst => $gst,
catview => ( $catview ne 'yes' ? 1 : 0 ),
- name => $booksellers[0]->{'name'},
+ name => $bookseller->{'name'},
date => format_date($date),
title => $results[0]->{'title'},
author => $results[0]->{'author'},
loop => \@loop,
date => format_date($date),
datereceived => $datereceived->output(),
- name => $booksellers[0]->{'name'},
+ name => $bookseller->{'name'},
supplierid => $supplierid,
invoice => $invoice,
);
my $dateto=$input->param('dateto');
my $resultsperpage = $input->param('resultsperpage');
-my @booksellers=GetBookSeller($supplierid);
-my $count = scalar @booksellers;
my ($template, $loggedinuser, $cookie)
= get_template_and_user({template_name => "acqui/parcels.tmpl",
});
+my $bookseller=GetBookSellerFromId($supplierid);
$resultsperpage = 20 unless ($resultsperpage);
my @results =GetParcels($supplierid, $order, $code,$datefrom,$dateto);
-$count = scalar @results;
+my $count = scalar @results;
# multi page display gestion
$startfrom=0 unless ($startfrom);
my $hilighted=0;
for (my $i=$startfrom;$i<=($startfrom+$resultsperpage-1<$count-1?$startfrom+$resultsperpage-1:$count-1);$i++){
-### startfrom: $startfrom
-### resultsperpage: $resultsperpage
-### count: $count
-### code: $results[$i]->{booksellerinvoicenumber}
-### datereceived: $results[$i]->{datereceived}
my %cell;
$cell{number}=$i+1;
$template->param(searchresults=>\@loopres, count=>$count) if ($count);
$template->param(orderby=>$order, filter=>$code, datefrom=>$datefrom,dateto=>$dateto, resultsperpage=>$resultsperpage);
$template->param(
- name => $booksellers[0]->{'name'},
+ name => $bookseller->{'name'},
DHTMLcalendar_dateformat => C4::Dates->DHTMLcalendar(),
supplierid => $supplierid,
GST => C4::Context->preference("gist"),