Bugfix 2443: Löschen von neu angelegten Konten, aufgrund von Constraint taxkeys nicht...
authorJan Büren <jan@kivitendo-premium.de>
Thu, 30 Jan 2014 09:28:09 +0000 (10:28 +0100)
committerJan Büren <jan@kivitendo-premium.de>
Thu, 30 Jan 2014 09:28:09 +0000 (10:28 +0100)
fixt #2443

SL/AM.pm

index ed896e1..29be070 100644 (file)
--- a/SL/AM.pm
+++ b/SL/AM.pm
@@ -482,16 +482,18 @@ sub delete_account {
               WHERE chart_id = ?|;
   do_query($form, $dbh, $query, $form->{id});
 
-  # delete chart of account record
-  $query = qq|DELETE FROM chart
-              WHERE id = ?|;
-  do_query($form, $dbh, $query, $form->{id});
-
   # delete account taxkeys
   $query = qq|DELETE FROM taxkeys
               WHERE chart_id = ?|;
   do_query($form, $dbh, $query, $form->{id});
 
+  # delete chart of account record
+  # last step delete chart, because we have a constraint
+  # to taxkeys
+  $query = qq|DELETE FROM chart
+              WHERE id = ?|;
+  do_query($form, $dbh, $query, $form->{id});
+
   # commit and redirect
   my $rc = $dbh->commit;
   $dbh->disconnect;