+my $input_gst = ($input->param('gst') eq '' ? undef : $input->param('gst'));
+my $gst= $input_gst // $bookseller->{gstrate} // C4::Context->preference("gist") // 0;
+my $datereceived = ($input->param('op') eq 'new') ? C4::Dates->new($input->param('datereceived'))
+ : C4::Dates->new($input->param('datereceived'), 'iso') ;
+$datereceived = C4::Dates->new() unless $datereceived;
+my $code = $input->param('code');
+my @rcv_err = $input->param('error');
+my @rcv_err_barcode = $input->param('error_bc');
+
+my $startfrom=$input->param('startfrom');
+my $resultsperpage = $input->param('resultsperpage');
+$resultsperpage = 20 unless ($resultsperpage);
+$startfrom=0 unless ($startfrom);
+
+if($input->param('format') eq "json"){
+ my ($template, $loggedinuser, $cookie)
+ = get_template_and_user({template_name => "acqui/ajax.tmpl",
+ query => $input,
+ type => "intranet",
+ authnotrequired => 0,
+ flagsrequired => {acquisition => 'order_receive'},
+ debug => 1,
+ });
+
+ my @datas;
+ my $search = $input->param('search') || '';
+ my $supplier = $input->param('booksellerid') || '';
+ my $basketno = $input->param('basketno') || '';
+ my $orderno = $input->param('orderno') || '';
+
+ my $orders = SearchOrder($orderno, $search, $supplier, $basketno);
+ foreach my $order (@$orders){
+ if($order->{quantityreceived} < $order->{quantity}){
+ my $data = {};
+
+ $data->{basketno} = $order->{basketno};
+ $data->{ordernumber} = $order->{ordernumber};
+ $data->{title} = $order->{title};
+ $data->{author} = $order->{author};
+ $data->{isbn} = $order->{isbn};
+ $data->{booksellerid} = $order->{booksellerid};
+ $data->{biblionumber} = $order->{biblionumber};
+ $data->{freight} = $order->{freight};
+ $data->{quantity} = $order->{quantity};
+ $data->{ecost} = $order->{ecost};
+ $data->{ordertotal} = sprintf("%.2f",$order->{ecost}*$order->{quantity});
+ push @datas, $data;
+ }
+ }
+
+ my $json_text = to_json(\@datas);
+ $template->param(return => $json_text);
+ output_html_with_http_headers $input, $cookie, $template->output;
+ exit;
+}