X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/kivitendo-erp.git/blobdiff_plain/3d967be3d2f32e2b00f5f55769edcbf5be866ce6..df601bd3fcca2c121c54f489e504dd676da75876:/SL/PE.pm diff --git a/SL/PE.pm b/SL/PE.pm index 31a8bd507..28f3ba5c1 100644 --- a/SL/PE.pm +++ b/SL/PE.pm @@ -96,7 +96,7 @@ sub save_partsgroup { if ($form->{id}) { $query = qq|UPDATE partsgroup SET partsgroup = ? WHERE id = ?|; - push(@values, $form->{id}); + push(@values, $form->{id}); } else { $query = qq|INSERT INTO partsgroup (partsgroup) VALUES (?)|; } @@ -172,7 +172,7 @@ sub pricegroups { my $first = 1; $where .= qq| AND id NOT IN (|; - foreach my $table (qw(invoice orderitems prices rmaitems)) { + foreach my $table (qw(invoice orderitems prices)) { $where .= "UNION " unless ($first); $first = 0; $where .= @@ -219,7 +219,7 @@ sub save_pricegroup { if ($form->{id}) { $query = qq|UPDATE pricegroup SET pricegroup = ? WHERE id = ? |; - push(@values, $form->{id}); + push(@values, $form->{id}); } else { $query = qq|INSERT INTO pricegroup (pricegroup) VALUES (?)|; } @@ -253,7 +253,7 @@ sub get_pricegroup { my @values = (); $query = qq|SELECT |; - foreach my $table (qw(invoice orderitems prices rmaitems)) { + foreach my $table (qw(invoice orderitems prices)) { $query .= " + " unless ($first); $first = 0; $query .= qq|(SELECT COUNT(*) FROM $table WHERE pricegroup_id = ?) |;