Bankerweiterung - Zwischenstand, erster Entwurf

[kivitendo-erp.git] / SL / DB / Manager / ReconciliationLink.pm

diff --git a/SL/DB/Manager/ReconciliationLink.pm b/SL/DB/Manager/ReconciliationLink.pm
new file mode 100644 (file)
index 0000000..8f63a1c
--- /dev/null
+++ b/SL/DB/Manager/ReconciliationLink.pm
@@ -0,0 +1,27 @@
+# This file has been auto-generated only because it didn't exist.
+# Feel free to modify it at will; it will not be overwritten automatically.
+
+package SL::DB::Manager::ReconciliationLink;
+
+use strict;
+
+use SL::DBUtils;
+
+use SL::DB::Helper::Manager;
+use base qw(SL::DB::Helper::Manager);
+
+sub object_class { 'SL::DB::ReconciliationLink' }
+
+__PACKAGE__->make_manager_methods;
+
+sub get_new_rec_group {
+  my $class = shift;
+
+  my $query = qq|SELECT max(rec_group) FROM reconciliation_links|;
+
+  my ($max) = selectfirst_array_query($::form, $class->object_class->init_db->dbh, $query);
+
+  return $max + 1;
+}
+
+1;