Lines 29-34
use C4::Csv;
Link Here
|
29 |
use C4::Koha; # GetItemTypes |
29 |
use C4::Koha; # GetItemTypes |
30 |
use C4::Output; |
30 |
use C4::Output; |
31 |
use C4::Record; |
31 |
use C4::Record; |
|
|
32 |
use Koha::DateUtils; |
32 |
|
33 |
|
33 |
my $query = new CGI; |
34 |
my $query = new CGI; |
34 |
|
35 |
|
Lines 198-212
if ( $op eq "export" ) {
Link Here
|
198 |
my $itemtype = $query->param("itemtype"); |
199 |
my $itemtype = $query->param("itemtype"); |
199 |
my $start_callnumber = $query->param("start_callnumber"); |
200 |
my $start_callnumber = $query->param("start_callnumber"); |
200 |
my $end_callnumber = $query->param("end_callnumber"); |
201 |
my $end_callnumber = $query->param("end_callnumber"); |
201 |
$timestamp = ($timestamp) ? C4::Dates->new($timestamp) : '' |
202 |
if ( $commandline ) { |
202 |
if ($commandline); |
203 |
$timestamp = eval { output_pref( { dt => dt_from_string( $timestamp ), dateonly => 1 }); }; |
|
|
204 |
$timestamp = '' unless ( $timestamp ); |
205 |
} |
206 |
|
203 |
my $start_accession = |
207 |
my $start_accession = |
204 |
( $query->param("start_accession") ) |
208 |
( $query->param("start_accession") ) |
205 |
? C4::Dates->new( $query->param("start_accession") ) |
209 |
? eval { output_pref( { dt => dt_from_string( $query->param("start_accession") ), dateonly => 1, dateformat => 'iso' } ); } |
206 |
: ''; |
210 |
: ''; |
207 |
my $end_accession = |
211 |
my $end_accession = |
208 |
( $query->param("end_accession") ) |
212 |
( $query->param("end_accession") ) |
209 |
? C4::Dates->new( $query->param("end_accession") ) |
213 |
? eval { output_pref( { dt => dt_from_string( $query->param("end_accession") ), dateonly => 1, dateformat => 'iso' } ); } |
210 |
: ''; |
214 |
: ''; |
211 |
$dont_export_items = $query->param("dont_export_item") |
215 |
$dont_export_items = $query->param("dont_export_item") |
212 |
unless ($commandline); |
216 |
unless ($commandline); |
Lines 565-571
sub construct_query {
Link Here
|
565 |
WHERE $biblioitemstable.timestamp >= ? |
569 |
WHERE $biblioitemstable.timestamp >= ? |
566 |
OR deleteditems.timestamp >= ? |
570 |
OR deleteditems.timestamp >= ? |
567 |
) "; |
571 |
) "; |
568 |
my $ts = $timestamp->output('iso'); |
572 |
my $ts = eval { output_pref( { dt => dt_from_string( $timestamp ), dateonly => 1, dateformat => 'iso' }); }; |
569 |
@sql_params = ( $ts, $ts, $ts, $ts ); |
573 |
@sql_params = ( $ts, $ts, $ts, $ts ); |
570 |
} |
574 |
} |
571 |
else { |
575 |
else { |
Lines 618-629
sub construct_query {
Link Here
|
618 |
} |
622 |
} |
619 |
if ($start_accession) { |
623 |
if ($start_accession) { |
620 |
$sql_query .= " AND dateaccessioned >= ? "; |
624 |
$sql_query .= " AND dateaccessioned >= ? "; |
621 |
push @sql_params, $start_accession->output('iso'); |
625 |
push @sql_params, $start_accession; |
622 |
} |
626 |
} |
623 |
|
627 |
|
624 |
if ($end_accession) { |
628 |
if ($end_accession) { |
625 |
$sql_query .= " AND dateaccessioned <= ? "; |
629 |
$sql_query .= " AND dateaccessioned <= ? "; |
626 |
push @sql_params, $end_accession->output('iso'); |
630 |
push @sql_params, $end_accession; |
627 |
} |
631 |
} |
628 |
|
632 |
|
629 |
if ($itemtype) { |
633 |
if ($itemtype) { |