kivitendo/sql/Pg-upgrade/Pg-upgrade-2.2.0.36-2.2.0.37.pl @ a0d77095
| 9550f6dd | Moritz Bunkus | #!/usr/bin/perl
|
|
# Datenbankupgrade: Potenziell existierenden Prim?rschl?ssel von orderitems
|
|||
die("This script cannot be run from the command line.") unless ($main::form);
|
|||
sub do_update {
|
|||
my $query = "ALTER TABLE orderitems DROP CONSTRAINT orderitems_pkey";
|
|||
if (!$dbh->do($query)) {
|
|||
$dbh->rollback();
|
|||
$dbh->begin_work();
|
|||
}
|
|||
return 1;
|
|||
}
|
|||
return do_update();
|