From: Moritz Bunkus Date: Mon, 12 Feb 2007 12:08:47 +0000 (+0000) Subject: Debugmeldungen... X-Git-Tag: release-2.4.2~118 X-Git-Url: http://wagnertech.de/git?a=commitdiff_plain;h=7e073dcdadf65ee98b683b7dd6461fb6fb69a039;p=kivitendo-erp.git Debugmeldungen... --- diff --git a/bin/mozilla/io.pl b/bin/mozilla/io.pl index e7e8b1337..9a1e3ab72 100644 --- a/bin/mozilla/io.pl +++ b/bin/mozilla/io.pl @@ -981,10 +981,8 @@ sub check_form { # remove any makes or model rows if ($form->{item} eq 'part') { - $lxdebug->message(0, "a1 $form->{sellprice}"); map { $form->{$_} = $form->parse_amount(\%myconfig, $form->{$_}) } qw(listprice sellprice lastcost weight rop); - $lxdebug->message(0, "a2 $form->{sellprice}"); @flds = (make, model); for my $i (1 .. ($form->{makemodel_rows})) { @@ -997,9 +995,7 @@ sub check_form { } } - $lxdebug->message(0, "a3 $form->{sellprice}"); $form->redo_rows(\@flds, \@a, $count, $form->{makemodel_rows}); - $lxdebug->message(0, "a4 $form->{sellprice}"); $form->{makemodel_rows} = $count; } elsif ($form->{item} eq 'assembly') { @@ -1080,7 +1076,6 @@ sub check_form { } } - $lxdebug->message(0, "a5 $form->{sellprice}"); #sk # if pricegroups if ( $form->{type} =~ (/sales_quotation/) @@ -1095,10 +1090,8 @@ sub check_form { set_pricegroup($form->{rowcount}); } - $lxdebug->message(0, "a6 $form->{sellprice}"); &display_form; - $lxdebug->message(0, "a7 $form->{sellprice}"); $lxdebug->leave_sub(); }