]> wagnertech.de Git - mfinanz.git/blobdiff - sql/Pg-upgrade2/USTVA_abstraction.pl
S:C:CustomerVendorTurnover: unnütze Zeile weg
[mfinanz.git] / sql / Pg-upgrade2 / USTVA_abstraction.pl
index a1b4a9caa39773c6096cb40fcebc1dde0c7c13e8..fe64a9224a9ce4185ac90a9ee9440bb143ba9fe9 100644 (file)
@@ -47,8 +47,8 @@ sub create_tables {
       },
   );
 
-  $self->db_query("DROP SCHEMA tax CASCADE;", 1);
-  map({ $self->db_query($_, 0); } @queries);
+  $self->db_query("DROP SCHEMA tax CASCADE;", may_fail => 1);
+  $self->db_query($_) for @queries;
 
   return 1;
 
@@ -147,7 +147,7 @@ sub do_copy {
 
 sub run {
   my ($self) = @_;
-  return $self->create_tables && $self->do_copy;
+  return $self->create_tables && $self->do_copy ? 1 : undef;
 }
 
 1;