Mandanten-Spalten in Mandanten-DBs erzeugen, die nicht zum Umstellungszeitpunkt konfi...

diff --git a/sql/Pg-upgrade2/clients.pl b/sql/Pg-upgrade2/clients.pl
new file mode 100644 (file)
index 0000000..744909d
--- /dev/null
+++ b/sql/Pg-upgrade2/clients.pl
@@ -0,0 +1,29 @@
+# @tag: clients
+# @description: Mandanten
+# @depends: release_3_0_0
+package SL::DBUpgrade2::clients;
+
+use strict;
+use utf8;
+
+use parent qw(SL::DBUpgrade2::Base);
+
+sub run {
+  my ($self) = @_;
+
+  my @queries = (
+    qq|ALTER TABLE defaults ADD COLUMN company          TEXT|,
+    qq|ALTER TABLE defaults ADD COLUMN address          TEXT|,
+    qq|ALTER TABLE defaults ADD COLUMN taxnumber        TEXT|,
+    qq|ALTER TABLE defaults ADD COLUMN co_ustid         TEXT|,
+    qq|ALTER TABLE defaults ADD COLUMN duns             TEXT|,
+    qq|ALTER TABLE defaults ADD COLUMN sepa_creditor_id TEXT|,
+    qq|ALTER TABLE defaults ADD COLUMN templates        TEXT|,
+  );
+
+  $self->db_query($_) for @queries;
+
+  return 1;
+}
+
+1;