From 8b74179bbabd61a374ba84c1763ac5bef3422f03 Mon Sep 17 00:00:00 2001
From: Waldemar Toews <waldemar.toews@opendynamic.de>
Date: Tue, 18 Mar 2014 15:58:29 +0100
Subject: [PATCH] =?utf8?q?BUG-Fix:=20Rechnungsnummer=20in=20Kreditorenbuch?=
 =?utf8?q?ung=20nicht=20mehr=20=C3=A4nderbar?=
MIME-Version: 1.0
Content-Type: text/plain; charset=utf8
Content-Transfer-Encoding: 8bit

Ändert man bei einer bestehenden Kreditorenbuchung die Rechnungsnummer,
so wird nach dem Buchen diese Änderung nicht übernommen!
Update SQL-Statement für Kreditorenbuchungen erweitert.

fixt #2469
---
 SL/AP.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/SL/AP.pm b/SL/AP.pm
index eabf47112..cc7e06f94 100644
--- a/SL/AP.pm
+++ b/SL/AP.pm
@@ -174,13 +174,13 @@ sub post_transaction {
 
     }
 
-    $query = qq|UPDATE ap SET
+    $query = qq|UPDATE ap SET invnumber = ?,
                 transdate = ?, ordnumber = ?, vendor_id = ?, taxincluded = ?,
                 amount = ?, duedate = ?, paid = ?, netamount = ?,
                 currency_id = (SELECT id FROM currencies WHERE name = ?), notes = ?, department_id = ?, storno = ?, storno_id = ?,
                 globalproject_id = ?, direct_debit = ?
                WHERE id = ?|;
-    @values = (conv_date($form->{transdate}),
+    @values = ($form->{invnumber}, conv_date($form->{transdate}),
                   $form->{ordnumber}, conv_i($form->{vendor_id}),
                   $form->{taxincluded} ? 't' : 'f', $form->{invtotal},
                   conv_date($form->{duedate}), $form->{invpaid},
-- 
2.20.1