Revision 1a3b9961
Von Kivitendo Admin vor mehr als 7 Jahren hinzugefügt
| SL/DATEV.pm | ||
|---|---|---|
| 383 | 383 |
$gl_department_id_filter = " AND gl.department_id = ? "; |
| 384 | 384 |
} |
| 385 | 385 |
|
| 386 |
my ($gl_itime_filter, $ar_itime_filter, $ap_itime_filter); |
|
| 387 |
if ( $form->{gldatefrom} ) {
|
|
| 388 |
$gl_itime_filter = " AND gl.itime >= ? "; |
|
| 389 |
$ar_itime_filter = " AND ar.itime >= ? "; |
|
| 390 |
$ap_itime_filter = " AND ap.itime >= ? "; |
|
| 391 |
} |
|
| 392 |
|
|
| 386 | 393 |
if ( $self->{trans_id} ) {
|
| 387 | 394 |
# ignore dates when trans_id is passed so that the entire transaction is |
| 388 | 395 |
# checked, not just either the initial bookings or the subsequent payments |
| ... | ... | |
| 419 | 426 |
WHERE (ar.id IS NOT NULL) |
| 420 | 427 |
AND $fromto |
| 421 | 428 |
$trans_id_filter |
| 429 |
$ar_itime_filter |
|
| 422 | 430 |
$ar_department_id_filter |
| 423 | 431 |
$filter |
| 424 | 432 |
|
| ... | ... | |
| 443 | 451 |
WHERE (ap.id IS NOT NULL) |
| 444 | 452 |
AND $fromto |
| 445 | 453 |
$trans_id_filter |
| 454 |
$ap_itime_filter |
|
| 446 | 455 |
$ap_department_id_filter |
| 447 | 456 |
$filter |
| 448 | 457 |
|
| ... | ... | |
| 466 | 475 |
WHERE (gl.id IS NOT NULL) |
| 467 | 476 |
AND $fromto |
| 468 | 477 |
$trans_id_filter |
| 478 |
$gl_itime_filter |
|
| 469 | 479 |
$gl_department_id_filter |
| 470 | 480 |
$filter |
| 471 | 481 |
|
| 472 | 482 |
ORDER BY trans_id, acc_trans_id|; |
| 473 | 483 |
|
| 474 | 484 |
my @query_args; |
| 475 |
if ( $form->{department_id} ) {
|
|
| 476 |
push(@query_args, ($form->{department_id}) x 3);
|
|
| 485 |
if ( $form->{gldatefrom} or $form->{department_id} ) {
|
|
| 486 |
|
|
| 487 |
for ( 1 .. 3 ) {
|
|
| 488 |
if ( $form->{gldatefrom} ) {
|
|
| 489 |
my $glfromdate = $::locale->parse_date_to_object($form->{gldatefrom});
|
|
| 490 |
die "illegal data" unless ref($glfromdate) eq 'DateTime'; |
|
| 491 |
push(@query_args, $glfromdate); |
|
| 492 |
} |
|
| 493 |
if ( $form->{department_id} ) {
|
|
| 494 |
push(@query_args, $form->{department_id});
|
|
| 495 |
} |
|
| 496 |
} |
|
| 477 | 497 |
} |
| 478 | 498 |
|
| 479 | 499 |
my $sth = prepare_execute_query($form, $self->dbh, $query, @query_args); |
Auch abrufbar als: Unified diff
DATEV-Export nach Erfassungsdatum filtern
Hat man einen DATEV-Export schon für einen bestimmten Zeitraum
exportiert, und muß nachträglich noch ein paar Buchungen in dem Zeitraum
tätigen, kann man diese nachträglichen Buchungen nun gesondert
exportieren, indem man ein Datum nach dem letzten Exportdatum
angibt.