X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/f7d51d3e6c5e9b16f688e2e9417f54aee64ed23a..e14cb525c640cb15bb6b2dfb62ccebbe78cb45cd:/SL/BackgroundJob/SelfTest/Transactions.pm diff --git a/SL/BackgroundJob/SelfTest/Transactions.pm b/SL/BackgroundJob/SelfTest/Transactions.pm index a3000c239..d635fd4b5 100644 --- a/SL/BackgroundJob/SelfTest/Transactions.pm +++ b/SL/BackgroundJob/SelfTest/Transactions.pm @@ -167,8 +167,8 @@ sub check_summe_stornobuchungen { AND a.transdate >= ? and a.transdate <= ?|; my ($summe_stornobuchungen_ap) = selectfirst_array_query($::form, $self->dbh, $query, $self->fromdate, $self->todate); - $self->tester->ok($summe_stornobuchungen_ap == 0, 'Summe aller Einkaufsrechnungen (stornos + stronierte) soll 0 sein'); - $self->tester->ok($summe_stornobuchungen_ar == 0, 'Summe aller Verkaufsrechnungen (stornos + stronierte) soll 0 sein'); + $self->tester->ok($summe_stornobuchungen_ap == 0, 'Summe aller Einkaufsrechnungen (stornos + stornierte) soll 0 sein'); + $self->tester->ok($summe_stornobuchungen_ar == 0, 'Summe aller Verkaufsrechnungen (stornos + stornierte) soll 0 sein'); $self->tester->diag("Summe Einkaufsrechnungen (ar): $summe_stornobuchungen_ar") if $summe_stornobuchungen_ar; $self->tester->diag("Summe Einkaufsrechnungen (ap): $summe_stornobuchungen_ap") if $summe_stornobuchungen_ap; } @@ -391,8 +391,8 @@ Several tests for data integrity. =head1 AUTHOR -Geoffrey Richardsom Einformation@richardsonbueren.deE -Jan Büren Einformation@richardsonbueren.deE +G. Richardson Einformation@richardson-bueren.deE +Jan Büren Einformation@richardson-bueren.deE Sven Schoeling Es.schoeling@linet-services.deE =cut