X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FOE.pm;h=5dc3128f51074df67b5d4d29094dc79b4075d75a;hb=250b57d48b9051c5c0496b761d94d84bfeb61b49;hp=7813f3350b7d6b8efcf37a0bd577e29186d96777;hpb=604959deb2d2d058a4c421468027e0d55066cffd;p=kivitendo-erp.git diff --git a/SL/OE.pm b/SL/OE.pm index 7813f3350..5dc3128f5 100644 --- a/SL/OE.pm +++ b/SL/OE.pm @@ -787,10 +787,9 @@ sub retrieve { my %oid = ('Pg' => 'oid', 'Oracle' => 'rowid'); - my $transdate = "'$form->{transdate}'"; - if (!$transdate) { - $transdate = "current_date"; - } + my $transdate = + $form->{transdate} ? $dbh->quote($form->{transdate}) : "current_date"; + if(!$form->{taxzone_id}) { $form->{taxzone_id} = 0; } @@ -806,7 +805,7 @@ sub retrieve { o.sellprice, o.parts_id AS id, o.unit, o.discount, p.bin, p.notes AS partnotes, p.inventory_accno_id AS part_inventory_accno_id, o.reqdate, o.project_id, o.serialnumber, o.ship, o.ordnumber, o.transdate, o.cusordnumber, o.subtotal, o.longdescription, - pr.projectnumber, p.alu, p.formel, + pr.projectnumber, p.formel, pg.partsgroup, o.pricegroup_id, (SELECT pricegroup FROM pricegroup WHERE id=o.pricegroup_id) as pricegroup FROM orderitems o JOIN parts p ON (o.parts_id = p.id) @@ -869,15 +868,9 @@ sub retrieve { # delete orderitems_id in collective orders, so that they get cloned no matter what delete $ref->{orderitems_id} if (@ids); - #set expense_accno=inventory_accno if they are different => bilanz - $vendor_accno = - ($ref->{expense_accno} != $ref->{inventory_accno}) - ? $ref->{inventory_accno} - : $ref->{expense_accno}; - # get tax rates and description $accno_id = - ($form->{vc} eq "customer") ? $ref->{income_accno} : $vendor_accno; + ($form->{vc} eq "customer") ? $ref->{income_accno} : $ref->{expense_accno}; $query = qq|SELECT c.accno, t.taxdescription, t.rate, t.taxnumber FROM tax t LEFT JOIN chart c ON (c.id=t.chart_id) WHERE t.taxkey in (SELECT taxkey_id from chart where accno = '$accno_id')