X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FCA.pm;h=1a77102391f3db0662d554fd464c4bf2db4e9633;hb=f12fcb594dd079ca987edca36cd431a3a2ef155e;hp=8122b9d4eeecab9497b2176a93c533793c739565;hpb=8b7b226d73364f6bd8582df83f0346d6c668d58c;p=kivitendo-erp.git diff --git a/SL/CA.pm b/SL/CA.pm index 8122b9d4e..1a7710239 100644 --- a/SL/CA.pm +++ b/SL/CA.pm @@ -71,10 +71,77 @@ sub all_accounts { } $sth->finish; - $query = qq|SELECT c.id, c.accno, c.description, c.charttype, c.gifi_accno, - c.category, c.link - FROM chart c - ORDER BY accno|; + $query = qq| + + SELECT c.id, + c.accno, + c.description, + c.charttype, + c.gifi_accno, + c.category, + c.link, + c.pos_ustva, + c.pos_bwa, + c.pos_bilanz, + c.pos_eur, + c.valid_from, + c.datevautomatik, +-- ( SELECT comma(taxkey_id) +-- FROM taxkeys tk +-- WHERE tk.chart_id = c.id +-- AND c.taxkey_id = tk.taxkey_id +-- ORDER BY c.id +-- ) AS taxkey_id, + + ( SELECT comma(taxkey) + FROM tax tx + WHERE tx.id in ( + SELECT tk.tax_id from taxkeys tk + WHERE tk.chart_id = c.id + ) + ORDER BY c.accno + ) AS taxkey, + + ( SELECT comma(taxdescription) + FROM tax tx + WHERE tx.id in ( + SELECT tk.tax_id from taxkeys tk + WHERE tk.chart_id = c.id + ) + ORDER BY c.accno + ) AS taxdescription, + + ( SELECT comma(taxnumber) + FROM tax tx + WHERE tx.id in ( + SELECT tk.tax_id from taxkeys tk + WHERE tk.chart_id = c.id + ) + ORDER BY c.accno + ) AS taxaccount, + + ( SELECT comma(tk.pos_ustva) + FROM taxkeys tk + WHERE tk.chart_id = c.id + AND c.taxkey_id = tk.taxkey_id + ORDER BY c.id + ) AS tk_ustva, + + ( SELECT comma(startdate) + FROM taxkeys tk + WHERE tk.chart_id = c.id + AND c.taxkey_id = tk.taxkey_id + ORDER BY c.id + ) AS startdate, + + ( SELECT accno + FROM chart c2 + WHERE c2.id = c.id + ) AS new_account + FROM chart c + ORDER BY accno + |; + $sth = $dbh->prepare($query); $sth->execute || $form->dberror($query);