Revision 2725c98d
Von G. Richardson vor etwa 12 Jahren hinzugefügt
| SL/BackgroundJob/SelfTest.pm | ||
|---|---|---|
| 173 | 173 |
|
| 174 | 174 |
=head1 NAME |
| 175 | 175 |
|
| 176 |
SL::BackgroundJob::TelfTests - pluggable self testing
|
|
| 176 |
SL::BackgroundJob::SelfTest - pluggable self testing
|
|
| 177 | 177 |
|
| 178 | 178 |
=head1 SYNOPSIS |
| 179 | 179 |
|
| 180 |
use SL::BackgroundJob::SelfTests;
|
|
| 181 |
SL::BackgroundJob::SelfTests->new->run;;
|
|
| 180 |
use SL::BackgroundJob::SelfTest; |
|
| 181 |
SL::BackgroundJob::SelfTest->new->run;; |
|
| 182 | 182 |
|
| 183 | 183 |
=head1 DESCRIPTION |
| 184 | 184 |
|
| SL/BackgroundJob/SelfTest/Transactions.pm | ||
|---|---|---|
| 167 | 167 |
AND a.transdate >= ? and a.transdate <= ?|; |
| 168 | 168 |
my ($summe_stornobuchungen_ap) = selectfirst_array_query($::form, $self->dbh, $query, $self->fromdate, $self->todate); |
| 169 | 169 |
|
| 170 |
$self->tester->ok($summe_stornobuchungen_ap == 0, 'Summe aller Einkaufsrechnungen (stornos + stronierte) soll 0 sein');
|
|
| 171 |
$self->tester->ok($summe_stornobuchungen_ar == 0, 'Summe aller Verkaufsrechnungen (stornos + stronierte) soll 0 sein');
|
|
| 170 |
$self->tester->ok($summe_stornobuchungen_ap == 0, 'Summe aller Einkaufsrechnungen (stornos + stornierte) soll 0 sein');
|
|
| 171 |
$self->tester->ok($summe_stornobuchungen_ar == 0, 'Summe aller Verkaufsrechnungen (stornos + stornierte) soll 0 sein');
|
|
| 172 | 172 |
$self->tester->diag("Summe Einkaufsrechnungen (ar): $summe_stornobuchungen_ar") if $summe_stornobuchungen_ar;
|
| 173 | 173 |
$self->tester->diag("Summe Einkaufsrechnungen (ap): $summe_stornobuchungen_ap") if $summe_stornobuchungen_ap;
|
| 174 | 174 |
} |
| ... | ... | |
| 391 | 391 |
|
| 392 | 392 |
=head1 AUTHOR |
| 393 | 393 |
|
| 394 |
Geoffrey Richardsom E<lt>information@richardsonbueren.deE<gt>
|
|
| 395 |
Jan Büren E<lt>information@richardsonbueren.deE<gt> |
|
| 394 |
G. Richardson E<lt>information@richardson-bueren.deE<gt>
|
|
| 395 |
Jan Büren E<lt>information@richardson-bueren.deE<gt>
|
|
| 396 | 396 |
Sven Schoeling E<lt>s.schoeling@linet-services.deE<gt> |
| 397 | 397 |
|
| 398 | 398 |
=cut |
Auch abrufbar als: Unified diff
Diverse Typos in SelfTest korrigiert