|
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) { |