Pflichtenhefte: Datenbankschema und Rose-DB-Models

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

diff --git a/SL/DB/RequirementSpecStatus.pm b/SL/DB/RequirementSpecStatus.pm
new file mode 100644 (file)
index 0000000..1fc6f99
--- /dev/null
+++ b/SL/DB/RequirementSpecStatus.pm
@@ -0,0 +1,23 @@
+package SL::DB::RequirementSpecStatus;
+
+use strict;
+
+use SL::DB::MetaSetup::RequirementSpecStatus;
+use SL::DB::Helper::ActsAsList;
+use SL::Locale::String;
+
+# Creates get_all, get_all_count, get_all_iterator, delete_all and update_all.
+__PACKAGE__->meta->make_manager_class;
+
+sub validate {
+  my ($self) = @_;
+
+  my @errors;
+
+  push @errors, t8('The name is missing.')        if !$self->name;
+  push @errors, t8('The description is missing.') if !$self->description;
+
+  return @errors;
+}
+
+1;