Pflichtenheftmodels: Manager für alle sortierbaren angelegt

diff --git a/SL/DB/Manager/RequirementSpecAcceptanceStatus.pm b/SL/DB/Manager/RequirementSpecAcceptanceStatus.pm
new file mode 100644 (file)
index 0000000..d3211d8
--- /dev/null
+++ b/SL/DB/Manager/RequirementSpecAcceptanceStatus.pm
@@ -0,0 +1,23 @@
+package SL::DB::Manager::RequirementSpecAcceptanceStatus;
+
+use strict;
+
+use SL::DB::Helper::Manager;
+use base qw(SL::DB::Helper::Manager);
+
+use SL::DB::Helper::Sorted;
+
+sub object_class { 'SL::DB::RequirementSpecAcceptanceStatus' }
+
+__PACKAGE__->make_manager_methods;
+
+sub _sort_spec {
+  return (
+    default => [ 'position', 1 ],
+    columns => {
+      SIMPLE => 'ALL',
+      map { ( $_ => "lower(requirement_spec_acceptance_statuses.${_})" ) } qw(name description),
+    });
+}
+
+1;

diff --git a/SL/DB/Manager/RequirementSpecComplexity.pm b/SL/DB/Manager/RequirementSpecComplexity.pm
new file mode 100644 (file)
index 0000000..7ad8f41
--- /dev/null
+++ b/SL/DB/Manager/RequirementSpecComplexity.pm
@@ -0,0 +1,23 @@
+package SL::DB::Manager::RequirementSpecComplexity;
+
+use strict;
+
+use SL::DB::Helper::Manager;
+use base qw(SL::DB::Helper::Manager);
+
+use SL::DB::Helper::Sorted;
+
+sub object_class { 'SL::DB::RequirementSpecComplexity' }
+
+__PACKAGE__->make_manager_methods;
+
+sub _sort_spec {
+  return (
+    default => [ 'position', 1 ],
+    columns => {
+      SIMPLE => 'ALL',
+      map { ( $_ => "lower(requirement_spec_complexities.${_})" ) } qw(description),
+    });
+}
+
+1;

diff --git a/SL/DB/Manager/RequirementSpecItem.pm b/SL/DB/Manager/RequirementSpecItem.pm
new file mode 100644 (file)
index 0000000..e515ee4
--- /dev/null
+++ b/SL/DB/Manager/RequirementSpecItem.pm
@@ -0,0 +1,23 @@
+package SL::DB::Manager::RequirementSpecItem;
+
+use strict;
+
+use SL::DB::Helper::Manager;
+use base qw(SL::DB::Helper::Manager);
+
+use SL::DB::Helper::Sorted;
+
+sub object_class { 'SL::DB::RequirementSpecItem' }
+
+__PACKAGE__->make_manager_methods;
+
+sub _sort_spec {
+  return (
+    default => [ 'position', 1 ],
+    columns => {
+      SIMPLE => 'ALL',
+      map { ( $_ => "lower(requirement_spec_items.${_})" ) } qw(fb_number title description acceptance_text),
+    });
+}
+
+1;

diff --git a/SL/DB/Manager/RequirementSpecPredefinedText.pm b/SL/DB/Manager/RequirementSpecPredefinedText.pm
new file mode 100644 (file)
index 0000000..65b0e14
--- /dev/null
+++ b/SL/DB/Manager/RequirementSpecPredefinedText.pm
@@ -0,0 +1,23 @@
+package SL::DB::Manager::RequirementSpecPredefinedText;
+
+use strict;
+
+use SL::DB::Helper::Manager;
+use base qw(SL::DB::Helper::Manager);
+
+use SL::DB::Helper::Sorted;
+
+sub object_class { 'SL::DB::RequirementSpecPredefinedText' }
+
+__PACKAGE__->make_manager_methods;
+
+sub _sort_spec {
+  return (
+    default => [ 'position', 1 ],
+    columns => {
+      SIMPLE => 'ALL',
+      map { ( $_ => "lower(requirement_spec_predefined_texts.${_})" ) } qw(description title),
+    });
+}
+
+1;

diff --git a/SL/DB/Manager/RequirementSpecRisk.pm b/SL/DB/Manager/RequirementSpecRisk.pm
new file mode 100644 (file)
index 0000000..340c6e3
--- /dev/null
+++ b/SL/DB/Manager/RequirementSpecRisk.pm
@@ -0,0 +1,23 @@
+package SL::DB::Manager::RequirementSpecRisk;
+
+use strict;
+
+use SL::DB::Helper::Manager;
+use base qw(SL::DB::Helper::Manager);
+
+use SL::DB::Helper::Sorted;
+
+sub object_class { 'SL::DB::RequirementSpecRisk' }
+
+__PACKAGE__->make_manager_methods;
+
+sub _sort_spec {
+  return (
+    default => [ 'position', 1 ],
+    columns => {
+      SIMPLE => 'ALL',
+      map { ( $_ => "lower(requirement_spec_risks.${_})" ) } qw(description),
+    });
+}
+
+1;

diff --git a/SL/DB/Manager/RequirementSpecStatus.pm b/SL/DB/Manager/RequirementSpecStatus.pm
new file mode 100644 (file)
index 0000000..c59de05
--- /dev/null
+++ b/SL/DB/Manager/RequirementSpecStatus.pm
@@ -0,0 +1,23 @@
+package SL::DB::Manager::RequirementSpecStatus;
+
+use strict;
+
+use SL::DB::Helper::Manager;
+use base qw(SL::DB::Helper::Manager);
+
+use SL::DB::Helper::Sorted;
+
+sub object_class { 'SL::DB::RequirementSpecStatus' }
+
+__PACKAGE__->make_manager_methods;
+
+sub _sort_spec {
+  return (
+    default => [ 'position', 1 ],
+    columns => {
+      SIMPLE => 'ALL',
+      map { ( $_ => "lower(requirement_spec_statuses.${_})" ) } qw(name description),
+    });
+}
+
+1;

diff --git a/SL/DB/Manager/RequirementSpecTextBlock.pm b/SL/DB/Manager/RequirementSpecTextBlock.pm
new file mode 100644 (file)
index 0000000..cc192b3
--- /dev/null
+++ b/SL/DB/Manager/RequirementSpecTextBlock.pm
@@ -0,0 +1,23 @@
+package SL::DB::Manager::RequirementSpecTextBlock;
+
+use strict;
+
+use SL::DB::Helper::Manager;
+use base qw(SL::DB::Helper::Manager);
+
+use SL::DB::Helper::Sorted;
+
+sub object_class { 'SL::DB::RequirementSpecTextBlock' }
+
+__PACKAGE__->make_manager_methods;
+
+sub _sort_spec {
+  return (
+    default => [ 'position', 1 ],
+    columns => {
+      SIMPLE => 'ALL',
+      map { ( $_ => "lower(requirement_spec_text_blocks.${_})" ) } qw(title text),
+    });
+}
+
+1;

diff --git a/SL/DB/Manager/RequirementSpecType.pm b/SL/DB/Manager/RequirementSpecType.pm
new file mode 100644 (file)
index 0000000..623e59d
--- /dev/null
+++ b/SL/DB/Manager/RequirementSpecType.pm
@@ -0,0 +1,23 @@
+package SL::DB::Manager::RequirementSpecType;
+
+use strict;
+
+use SL::DB::Helper::Manager;
+use base qw(SL::DB::Helper::Manager);
+
+use SL::DB::Helper::Sorted;
+
+sub object_class { 'SL::DB::RequirementSpecType' }
+
+__PACKAGE__->make_manager_methods;
+
+sub _sort_spec {
+  return (
+    default => [ 'position', 1 ],
+    columns => {
+      SIMPLE => 'ALL',
+      map { ( $_ => "lower(requirement_spec_types.${_})" ) } qw(description),
+    });
+}
+
+1;

diff --git a/SL/DB/RequirementSpecAcceptanceStatus.pm b/SL/DB/RequirementSpecAcceptanceStatus.pm
index c932e4713df08981ac0f5b8a51830384a8d2a102..ad50af83587f56d47a0dea9ad36d387ef83fac4d 100644 (file)
--- a/SL/DB/RequirementSpecAcceptanceStatus.pm
+++ b/SL/DB/RequirementSpecAcceptanceStatus.pm
@@ -3,12 +3,10 @@ package SL::DB::RequirementSpecAcceptanceStatus;
 use strict;
 
 use SL::DB::MetaSetup::RequirementSpecAcceptanceStatus;
 use strict;
 
 use SL::DB::MetaSetup::RequirementSpecAcceptanceStatus;

+use SL::DB::Manager::RequirementSpecAcceptanceStatus;

 use SL::DB::Helper::ActsAsList;
 use SL::Locale::String;
 
 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) = @_;
 
 sub validate {
   my ($self) = @_;
 

diff --git a/SL/DB/RequirementSpecComplexity.pm b/SL/DB/RequirementSpecComplexity.pm
index eaf74069bd04245660d8285c3b4968313363a2e7..279a9c9ec54fe5fe8976af66b50757fe275c01f4 100644 (file)
--- a/SL/DB/RequirementSpecComplexity.pm
+++ b/SL/DB/RequirementSpecComplexity.pm
@@ -3,12 +3,10 @@ package SL::DB::RequirementSpecComplexity;
 use strict;
 
 use SL::DB::MetaSetup::RequirementSpecComplexity;
 use strict;
 
 use SL::DB::MetaSetup::RequirementSpecComplexity;

+use SL::DB::Manager::RequirementSpecComplexity;

 use SL::DB::Helper::ActsAsList;
 use SL::Locale::String;
 
 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) = @_;
 
 sub validate {
   my ($self) = @_;
 

diff --git a/SL/DB/RequirementSpecItem.pm b/SL/DB/RequirementSpecItem.pm
index ee71d7c448f1f4c7516d24cb2226f1fe48235883..19f36a90e205d8258348819bc90ce658352ef87a 100644 (file)
--- a/SL/DB/RequirementSpecItem.pm
+++ b/SL/DB/RequirementSpecItem.pm
@@ -3,8 +3,6 @@ package SL::DB::RequirementSpecItem;
 use strict;
 
 use SL::DB::MetaSetup::RequirementSpecItem;
 use strict;
 
 use SL::DB::MetaSetup::RequirementSpecItem;

-
-# Creates get_all, get_all_count, get_all_iterator, delete_all and update_all.
-__PACKAGE__->meta->make_manager_class;
+use SL::DB::Manager::RequirementSpecItem;

 
 1;
 
 1;

diff --git a/SL/DB/RequirementSpecPredefinedText.pm b/SL/DB/RequirementSpecPredefinedText.pm
index 9faddcd1e684b33575fec33e7eeba895944dbddb..a63a903c8e25e087a34f9e013198d26c0ebbcd4a 100644 (file)
--- a/SL/DB/RequirementSpecPredefinedText.pm
+++ b/SL/DB/RequirementSpecPredefinedText.pm
@@ -3,12 +3,10 @@ package SL::DB::RequirementSpecPredefinedText;
 use strict;
 
 use SL::DB::MetaSetup::RequirementSpecPredefinedText;
 use strict;
 
 use SL::DB::MetaSetup::RequirementSpecPredefinedText;

+use SL::DB::Manager::RequirementSpecPredefinedText;

 use SL::DB::Helper::ActsAsList;
 use SL::Locale::String;
 
 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) = @_;
 
 sub validate {
   my ($self) = @_;
 

diff --git a/SL/DB/RequirementSpecRisk.pm b/SL/DB/RequirementSpecRisk.pm
index 60409ba2d61a89eaea11d968e1b96b30d4cd03e7..065b9adc1fa5370107d53b1d41ae1d7ef1397e84 100644 (file)
--- a/SL/DB/RequirementSpecRisk.pm
+++ b/SL/DB/RequirementSpecRisk.pm
@@ -3,12 +3,10 @@ package SL::DB::RequirementSpecRisk;
 use strict;
 
 use SL::DB::MetaSetup::RequirementSpecRisk;
 use strict;
 
 use SL::DB::MetaSetup::RequirementSpecRisk;

+use SL::DB::Manager::RequirementSpecRisk;

 use SL::DB::Helper::ActsAsList;
 use SL::Locale::String;
 
 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) = @_;
 
 sub validate {
   my ($self) = @_;
 

diff --git a/SL/DB/RequirementSpecStatus.pm b/SL/DB/RequirementSpecStatus.pm
index 1fc6f9961f7d1a705ccc9caca5688400aeacf1bb..fb808c64cfb4a99f48c42b9dd03e36ff49cef297 100644 (file)
--- a/SL/DB/RequirementSpecStatus.pm
+++ b/SL/DB/RequirementSpecStatus.pm
@@ -3,12 +3,10 @@ package SL::DB::RequirementSpecStatus;
 use strict;
 
 use SL::DB::MetaSetup::RequirementSpecStatus;
 use strict;
 
 use SL::DB::MetaSetup::RequirementSpecStatus;

+use SL::DB::Manager::RequirementSpecStatus;

 use SL::DB::Helper::ActsAsList;
 use SL::Locale::String;
 
 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) = @_;
 
 sub validate {
   my ($self) = @_;
 

diff --git a/SL/DB/RequirementSpecTextBlock.pm b/SL/DB/RequirementSpecTextBlock.pm
index e417be77b46efb4757f8bb04244e35d56d2efeac..b87166d3ee4b5f86fdc5142ba1e0f3516388e6a8 100644 (file)
--- a/SL/DB/RequirementSpecTextBlock.pm
+++ b/SL/DB/RequirementSpecTextBlock.pm
@@ -3,15 +3,13 @@ package SL::DB::RequirementSpecTextBlock;
 use strict;
 
 use SL::DB::MetaSetup::RequirementSpecTextBlock;
 use strict;
 
 use SL::DB::MetaSetup::RequirementSpecTextBlock;

+use SL::DB::Manager::RequirementSpecTextBlock;

 # ActsAsList does not support position arguments grouped by other
 # columns, e.g. by the requirement_spec_id in this case. So we cannot
 # use it yet.
 # use SL::DB::Helper::ActsAsList;
 use SL::Locale::String;
 
 # ActsAsList does not support position arguments grouped by other
 # columns, e.g. by the requirement_spec_id in this case. So we cannot
 # use it yet.
 # 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) = @_;
 
 sub validate {
   my ($self) = @_;
 

diff --git a/SL/DB/RequirementSpecType.pm b/SL/DB/RequirementSpecType.pm
index 7ff6b32fa4704d0482efae955d68629c8810fa4b..cf489542ff1e862a94507b74c19bc35898c0c4d9 100644 (file)
--- a/SL/DB/RequirementSpecType.pm
+++ b/SL/DB/RequirementSpecType.pm
@@ -3,12 +3,10 @@ package SL::DB::RequirementSpecType;
 use strict;
 
 use SL::DB::MetaSetup::RequirementSpecType;
 use strict;
 
 use SL::DB::MetaSetup::RequirementSpecType;

+use SL::DB::Manager::RequirementSpecType;

 use SL::DB::Helper::ActsAsList;
 use SL::Locale::String;
 
 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) = @_;
 
 sub validate {
   my ($self) = @_;