Lines 61-66
use C4::Debug;
Link Here
|
61 |
my $input = new CGI; |
61 |
my $input = new CGI; |
62 |
my $title = $input->param( 'title'); |
62 |
my $title = $input->param( 'title'); |
63 |
my $author = $input->param('author'); |
63 |
my $author = $input->param('author'); |
|
|
64 |
my $isbn = $input->param('isbn'); |
64 |
my $name = $input->param( 'name' ); |
65 |
my $name = $input->param( 'name' ); |
65 |
my $basket = $input->param( 'basket' ); |
66 |
my $basket = $input->param( 'basket' ); |
66 |
my $booksellerinvoicenumber = $input->param( 'booksellerinvoicenumber' ); |
67 |
my $booksellerinvoicenumber = $input->param( 'booksellerinvoicenumber' ); |
Lines 89-100
if ( $d = $input->param('iso') ) {
Link Here
|
89 |
|
90 |
|
90 |
my ( $order_loop, $total_qty, $total_price, $total_qtyreceived ); |
91 |
my ( $order_loop, $total_qty, $total_price, $total_qtyreceived ); |
91 |
# If we're supplied any value then we do a search. Otherwise we don't. |
92 |
# If we're supplied any value then we do a search. Otherwise we don't. |
92 |
my $do_search = $title || $author || $name || $basket || $booksellerinvoicenumber || |
93 |
my $do_search = $title || $author || $isbn || $name || $basket || $booksellerinvoicenumber || |
93 |
$from_placed_on || $to_placed_on; |
94 |
$from_placed_on || $to_placed_on; |
94 |
if ($do_search) { |
95 |
if ($do_search) { |
95 |
( $order_loop, $total_qty, $total_price, $total_qtyreceived ) = GetHistory( |
96 |
( $order_loop, $total_qty, $total_price, $total_qtyreceived ) = GetHistory( |
96 |
title => $title, |
97 |
title => $title, |
97 |
author => $author, |
98 |
author => $author, |
|
|
99 |
isbn => $isbn, |
98 |
name => $name, |
100 |
name => $name, |
99 |
from_placed_on => $from_iso, |
101 |
from_placed_on => $from_iso, |
100 |
to_placed_on => $to_iso, |
102 |
to_placed_on => $to_iso, |
Lines 114-119
$template->param(
Link Here
|
114 |
numresults => $order_loop ? scalar(@$order_loop) : undef, |
116 |
numresults => $order_loop ? scalar(@$order_loop) : undef, |
115 |
title => $title, |
117 |
title => $title, |
116 |
author => $author, |
118 |
author => $author, |
|
|
119 |
isbn => $isbn, |
117 |
name => $name, |
120 |
name => $name, |
118 |
basket => $basket, |
121 |
basket => $basket, |
119 |
booksellerinvoicenumber => $booksellerinvoicenumber, |
122 |
booksellerinvoicenumber => $booksellerinvoicenumber, |