X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FAM.pm;h=fc7bb7378a3e3f88f93f5cb201d42de255fe85dd;hb=60805cf20a495c1d408dbd5ed1e274ba21a71401;hp=a9179e65de60095d5e5c82f99db45a3734f481ba;hpb=ccf5652b98dc7ec6697aceaf821840287c61a583;p=kivitendo-erp.git diff --git a/SL/AM.pm b/SL/AM.pm index a9179e65d..fc7bb7378 100644 --- a/SL/AM.pm +++ b/SL/AM.pm @@ -1050,8 +1050,10 @@ sub get_buchungsgruppe { } - $query = "SELECT inventory_accno_id FROM defaults"; - ($form->{"std_inventory_accno_id"}) = $dbh->selectrow_array($query); + $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); my $module = "IC"; $query = qq|SELECT c.accno, c.description, c.link, c.id, @@ -1164,6 +1166,7 @@ sub printer { $sth = $dbh->prepare($query); $sth->execute || $form->dberror($query); + $form->{"ALL"} = []; while (my $ref = $sth->fetchrow_hashref(NAME_lc)) { push @{ $form->{ALL} }, $ref; } @@ -1535,7 +1538,6 @@ sub save_preferences { servicenumber = '$form->{servicenumber}', yearend = '$form->{yearend}', curr = '$form->{curr}', - weightunit = '$form->{weightunit}', businessnumber = '$form->{businessnumber}' |; $dbh->do($query) || $form->dberror($query);