Beim jedem Speichern von Kunden/Lieferanten prüfen, ob der Name angegeben ist.

[mfinanz.git] / SL / DB / Vendor.pm

diff --git a/SL/DB/Vendor.pm b/SL/DB/Vendor.pm
index ebbe8125fae8a200e5d6361cffd361a2d9a526f5..b1458efc34bfd9481f0266080587b9f439738e0d 100644 (file)
--- a/SL/DB/Vendor.pm
+++ b/SL/DB/Vendor.pm
@@ -41,6 +41,15 @@ sub _before_save_set_vendornumber {
   return 1;
 }
 
+sub validate {
+  my ($self) = @_;
+
+  my @errors;
+  push @errors, $::locale->text('The vendor name is missing.') if !$self->name;
+
+  return @errors;
+}
+
 sub displayable_name {
   my $self = shift;