kivitendo/sql/Pg-upgrade2/clients.pl @ bf5e6c6a
| e9c2de7f | Moritz Bunkus | # @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; |