Revision e9c2de7f
Von Moritz Bunkus vor mehr als 11 Jahren hinzugefügt
sql/Pg-upgrade2/clients.pl | ||
---|---|---|
1 |
# @tag: clients |
|
2 |
# @description: Mandanten |
|
3 |
# @depends: release_3_0_0 |
|
4 |
package SL::DBUpgrade2::clients; |
|
5 |
|
|
6 |
use strict; |
|
7 |
use utf8; |
|
8 |
|
|
9 |
use parent qw(SL::DBUpgrade2::Base); |
|
10 |
|
|
11 |
sub run { |
|
12 |
my ($self) = @_; |
|
13 |
|
|
14 |
my @queries = ( |
|
15 |
qq|ALTER TABLE defaults ADD COLUMN company TEXT|, |
|
16 |
qq|ALTER TABLE defaults ADD COLUMN address TEXT|, |
|
17 |
qq|ALTER TABLE defaults ADD COLUMN taxnumber TEXT|, |
|
18 |
qq|ALTER TABLE defaults ADD COLUMN co_ustid TEXT|, |
|
19 |
qq|ALTER TABLE defaults ADD COLUMN duns TEXT|, |
|
20 |
qq|ALTER TABLE defaults ADD COLUMN sepa_creditor_id TEXT|, |
|
21 |
qq|ALTER TABLE defaults ADD COLUMN templates TEXT|, |
|
22 |
); |
|
23 |
|
|
24 |
$self->db_query($_) for @queries; |
|
25 |
|
|
26 |
return 1; |
|
27 |
} |
|
28 |
|
|
29 |
1; |
Auch abrufbar als: Unified diff
Mandanten-Spalten in Mandanten-DBs erzeugen, die nicht zum Umstellungszeitpunkt konfiguriert war