From be47ce7f0ee15e692ade53804c8b4682dc89d627 Mon Sep 17 00:00:00 2001 From: Moritz Bunkus Date: Wed, 21 Feb 2007 12:21:35 +0000 Subject: [PATCH] =?utf8?q?Falsche=20Funktionsaufrufe.=20Fix=20f=C3=BCr=20B?= =?utf8?q?ugzilla=20ID=20560.?= MIME-Version: 1.0 Content-Type: text/plain; charset=utf8 Content-Transfer-Encoding: 8bit --- SL/AM.pm | 5 ++--- 1 file changed, 2 insertions(+), 3 deletions(-) diff --git a/SL/AM.pm b/SL/AM.pm index be5d8a431..91a334bde 100644 --- a/SL/AM.pm +++ b/SL/AM.pm @@ -825,14 +825,13 @@ sub get_buchungsgruppe { qq|SELECT count(id) = 0 AS orphaned FROM parts WHERE buchungsgruppen_id = ?|; - ($form->{orphaned}) = selectrow_arra($query, undef, $form->{id}); - $form->dberror($query . " ($form->{id})") if ($dbh->err); + ($form->{orphaned}) = selectrow_query($form, $dbh, $query, $form->{id}); } $query = "SELECT inventory_accno_id, income_accno_id, expense_accno_id ". "FROM defaults"; ($form->{"std_inventory_accno_id"}, $form->{"std_income_accno_id"}, - $form->{"std_expense_accno_id"}) = $dbh->selectrow_array($query); + $form->{"std_expense_accno_id"}) = selectrow_query($form, $dbh, $query); my $module = "IC"; $query = qq|SELECT c.accno, c.description, c.link, c.id, -- 2.20.1