Projekt

Allgemein

Profil

« Zurück | Weiter » 

Revision ca8c7f1b

Von Jan Büren vor mehr als 1 Jahr hinzugefügt

  • ID ca8c7f1bacafe6dbd34b508e951943db25b93627
  • Vorgänger f8d6fccc
  • Nachfolger 12b546a8

novoclon: Titel für NovoclonStrict etwas angepasst

Unterschiede anzeigen:

SL/BackgroundJob/SelfTest/NovoclonStrict.pm
sub check_purchase_invoices_sums_against_purchase_orders {
my ($self) = @_;
my $title = "Die Summe der Einkaufsrechnungen ist kleiner als die Summe der Lieferantenaufträge.";
my $title = "Die Netto-Summe der Einkaufsrechnungen ist kleiner oder gleich der Netto-Summe der Lieferantenaufträge.";
my $purchase_invoices = SL::DB::Manager::PurchaseInvoice->get_all_sorted(where => ['!storno' => 1,
invoice => 1,
......
if (@purchase_invoices_with_wrong_sums) {
$self->tester->ok(0, $title);
$self->tester->diag("Folgende " . scalar @purchase_invoices_with_wrong_sums . " Einkaufsrechnungen haben eine zu hohe Summe:");
$self->tester->diag("Folgende " . scalar @purchase_invoices_with_wrong_sums . " Einkaufsrechnungen ergeben eine viel höhere Netto-Summe alsergeben eine viel höhere Netto-Summe als ursprüngliche beauftragt:");
$self->tester->diag("Einkaufsrechnungs-Nummer vom " . $_->transdate_as_date . ": " . $_->record_number) for @purchase_invoices_with_wrong_sums;
} else {
......
sub check_purchase_invoices_sums_against_sales_orders {
my ($self) = @_;
my $title = "Die Summe der Einkaufsrechnungen ist kleiner als die Summe der Auftragsbestätigungen.";
my $title = "Die Summe der Einkaufsrechnungen ist kleiner oder gleich der Summe der Auftragsbestätigungen.";
my $purchase_invoices = SL::DB::Manager::PurchaseInvoice->get_all_sorted(where => ['!storno' => 1,
invoice => 1,

Auch abrufbar als: Unified diff