X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FIC.pm;h=8782aae8d2085d98ca9766b2ed68900f58624c67;hb=02f6397dc6de7fde86420fd12d02c88b7c2f533e;hp=cf137928b3488a854feeb43572340ee121dab555;hpb=bce08af4ca2b6a160505dedd3a28edb455e1de7a;p=kivitendo-erp.git diff --git a/SL/IC.pm b/SL/IC.pm index cf137928b..8782aae8d 100644 --- a/SL/IC.pm +++ b/SL/IC.pm @@ -762,7 +762,7 @@ sub retrieve_accounts { p.id IN ($in) SQL - my $sth_tax = prepare_query($::form, $dbh, < $part_id) = each %args) { my $ref = $accno_by_part{$part_id} or next; @@ -787,7 +788,7 @@ SQL $form->{"${_}_accno_$index"} = $accounts{"${_}_accno"} for qw(inventory income expense); - $sth_tax->execute($accounts{$inc_exp}, quote_db_date($transdate)); + $sth_tax->execute($accounts{$inc_exp}, quote_db_date($transdate)) || $::form->dberror($query_tax); $ref = $sth_tax->fetchrow_hashref or next; $form->{"taxaccounts_$index"} = $ref->{"accno"}; @@ -915,8 +916,9 @@ sub prepare_parts_for_printing { next unless $id; my $prt = $parts_by_id{$id}; my $type_abbr = $::request->presenter->type_abbreviation($prt->part_type); - push @{ $template_arrays{part_type} }, $type_abbr; - push @{ $template_arrays{type_and_classific}}, $type_abbr.$::request->presenter->classification_abbreviation($prt->classification_id); + push @{ $template_arrays{part_type} }, $prt->part_type; + push @{ $template_arrays{part_abbreviation} }, $type_abbr; + push @{ $template_arrays{type_and_classific}}, $type_abbr.$::request->presenter->classification_abbreviation($prt->classification_id); push @{ $template_arrays{separate} }, $::request->presenter->separate_abbreviation($prt->classification_id); }