X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FAR.pm;h=95aba2680e906805620991afa94d773f2a172586;hb=9e561023f96c1b6fa8a3f5148522a53a874aabd6;hp=a842b9da5a99e2c1a20765f9b87cb89d0f36444f;hpb=85b0c4abbd467480f39106241e9cbe037710a157;p=kivitendo-erp.git diff --git a/SL/AR.pm b/SL/AR.pm index a842b9da5..95aba2680 100644 --- a/SL/AR.pm +++ b/SL/AR.pm @@ -135,8 +135,8 @@ sub post_transaction { } else { $query = qq|SELECT nextval('glid')|; ($form->{id}) = selectrow_query($form, $dbh, $query); - $query = qq|INSERT INTO ar (id, invnumber, employee_id, currency_id) VALUES (?, 'dummy', ?, (SELECT id FROM currencies WHERE name=?))|; - do_query($form, $dbh, $query, $form->{id}, $form->{employee_id}, $form->{currency}); + $query = qq|INSERT INTO ar (id, invnumber, employee_id, currency_id, taxzone_id) VALUES (?, 'dummy', ?, (SELECT id FROM currencies WHERE name=?), (SELECT taxzone_id FROM customer WHERE id = ?))|; + do_query($form, $dbh, $query, $form->{id}, $form->{employee_id}, $form->{currency}, $form->{customer_id}); if (!$form->{invnumber}) { my $trans_number = SL::TransNumber->new(type => 'invoice', dbh => $dbh, number => $form->{partnumber}, id => $form->{id}); $form->{invnumber} = $trans_number->create_unique;