Debugcode entfernt.

diff --git a/sql/Pg-upgrade/Pg-upgrade-2.2.0.33-2.2.0.34.pl b/sql/Pg-upgrade/Pg-upgrade-2.2.0.33-2.2.0.34.pl
index 8c3e9d28f6d1ce1e10e0e021b08a13b44c3295c3..9387b0e1d70e5a26e1ee7e343d6afec17205b6b7 100644 (file)
--- a/sql/Pg-upgrade/Pg-upgrade-2.2.0.33-2.2.0.34.pl
+++ b/sql/Pg-upgrade/Pg-upgrade-2.2.0.33-2.2.0.34.pl
@@ -280,7 +280,6 @@ sub display_create_bgs_dialog {
 sub create_buchungsgruppen {
   my $form = $main::form;
 
 sub create_buchungsgruppen {
   my $form = $main::form;
 

-  $main::lxdebug->dump(0, "gaby", $form);

   for (my $i = 1; $i <= $form->{"rowcount"}; $i++) {
     next unless ($form->{"description_$i"} &&
                  $form->{"inventory_accno_id_$i"} &&
   for (my $i = 1; $i <= $form->{"rowcount"}; $i++) {
     next unless ($form->{"description_$i"} &&
                  $form->{"inventory_accno_id_$i"} &&


@@ -311,14 +310,10 @@ sub create_buchungsgruppen {
       push(@values, (split(/--/, $form->{"${acc}_${i}"}))[0]);
     }
 
       push(@values, (split(/--/, $form->{"${acc}_${i}"}))[0]);
     }
 

-    $main::lxdebug->dump(0, "klaus$i", \@values);
-

     mydoquery($query, @values);
     mydoquery($query, @values);

-    $main::lxdebug->message(0, "nachklausi$i");

   }
 
   }
 

-  $main::lxdebug->message(0, "commit: " . $dbh->commit());
-  $main::lxdebug->message(0, "errstr: " . $dbh->errstr);
+  $dbh->commit();

   $dbh->begin_work();
 }
 
   $dbh->begin_work();
 }