X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/532b0d4cc8ceb1af4489c0233d7bbad10739b5d6..d7f060429e809653d45e93e86b3c5c8d7129e0a9:/SL/IS.pm diff --git a/SL/IS.pm b/SL/IS.pm index 205cbcbaf..c37b1aa82 100644 --- a/SL/IS.pm +++ b/SL/IS.pm @@ -974,7 +974,8 @@ Message: $form->{message}\r| if $form->{message}; salesman_id = ?, storno = ?, globalproject_id = ?, - cp_id = ? + cp_id = ?, + transaction_description = ? WHERE id = ?|; @values = ($form->{"invnumber"}, $form->{"ordnumber"}, $form->{"quonumber"}, $form->{"cusordnumber"}, conv_date($form->{"invdate"}), conv_date($form->{"orddate"}), conv_date($form->{"quodate"}), @@ -988,7 +989,7 @@ Message: $form->{message}\r| if $form->{message}; conv_i($form->{"delivery_customer_id"}), conv_i($form->{"delivery_vendor_id"}), conv_i($form->{"employee_id"}), conv_i($form->{"salesman_id"}), $form->{"storno"} ? 't' : 'f', conv_i($form->{"globalproject_id"}), - conv_i($form->{"cp_id"}), + conv_i($form->{"cp_id"}), $form->{transaction_description}, conv_i($form->{"id"})); do_query($form, $dbh, $query, @values); @@ -1369,16 +1370,11 @@ sub retrieve_invoice { $query = qq|SELECT - (SELECT c.accno FROM chart c - WHERE d.inventory_accno_id = c.id) AS inventory_accno, - (SELECT c.accno FROM chart c - WHERE d.income_accno_id = c.id) AS income_accno, - (SELECT c.accno FROM chart c - WHERE d.expense_accno_id = c.id) AS expense_accno, - (SELECT c.accno FROM chart c - WHERE d.fxgain_accno_id = c.id) AS fxgain_accno, - (SELECT c.accno FROM chart c - WHERE d.fxloss_accno_id = c.id) AS fxloss_accno, + (SELECT c.accno FROM chart c WHERE d.inventory_accno_id = c.id) AS inventory_accno, + (SELECT c.accno FROM chart c WHERE d.income_accno_id = c.id) AS income_accno, + (SELECT c.accno FROM chart c WHERE d.expense_accno_id = c.id) AS expense_accno, + (SELECT c.accno FROM chart c WHERE d.fxgain_accno_id = c.id) AS fxgain_accno, + (SELECT c.accno FROM chart c WHERE d.fxloss_accno_id = c.id) AS fxloss_accno, d.curr AS currencies ${query_transdate} FROM defaults d|; @@ -1399,6 +1395,7 @@ sub retrieve_invoice { a.duedate, a.taxincluded, a.curr AS currency, a.shipto_id, a.cp_id, a.employee_id, a.salesman_id, a.payment_id, a.language_id, a.delivery_customer_id, a.delivery_vendor_id, a.type, + a.transaction_description, e.name AS employee FROM ar a LEFT JOIN employee e ON (e.id = a.employee_id)