-
-my $input = new CGI;
-my $title = $input->param( 'title');
-my $author = $input->param('author');
-my $name = $input->param( 'name' );
-my $from_placed_on = C4::Dates->new($input->param('from'));
-my $to_placed_on = C4::Dates->new($input->param( 'to'));
+use C4::Koha;
+use Koha::DateUtils;
+
+my $input = new CGI;
+my $title = $input->param( 'title');
+my $author = $input->param('author');
+my $isbn = $input->param('isbn');
+my $name = $input->param( 'name' );
+my $ean = $input->param('ean');
+my $basket = $input->param( 'basket' );
+my $basketgroupname = $input->param('basketgroupname');
+my $booksellerinvoicenumber = $input->param( 'booksellerinvoicenumber' );
+my $do_search = $input->param('do_search') || 0;
+my $budget = $input->param( 'budget' );
+my $orderstatus = $input->param( 'orderstatus' );
+my $ordernumber = $input->param( 'ordernumber' );
+my $search_children_too = $input->param( 'search_children_too' );
+my @created_by = $input->multi_param('created_by');
+
+my $from_placed_on = eval { dt_from_string( scalar $input->param('from') ) } || dt_from_string;
+my $to_placed_on = eval { dt_from_string( scalar $input->param('to') ) } || dt_from_string;
+unless ( $input->param('from') ) {
+ # Fill the form with year-1
+ $from_placed_on->subtract( years => 1 );
+}