X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;ds=sidebyside;f=SL%2FCA.pm;h=91df43cace0a74b8d228875a231aa856bccfd818;hb=527617f281c24f7164b44b2ba0e389463f0571c8;hp=162a320f6e48764542deca63e1ffc56e2df0b68a;hpb=56041df395cc2d8971f822c54f4e48743cc4f22b;p=kivitendo-erp.git diff --git a/SL/CA.pm b/SL/CA.pm index 162a320f6..91df43cac 100644 --- a/SL/CA.pm +++ b/SL/CA.pm @@ -71,61 +71,36 @@ sub all_accounts { } $sth->finish; - $query = qq| - - SELECT c.id, + $query = qq{ + SELECT c.accno, + c.id, 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(taxdescription) - FROM tax tx - WHERE tx.id in ( - SELECT tk.tax_id from taxkeys tk - WHERE tk.chart_id = ( - SELECT id from chart - WHERE chart.accno='0027' -- Beispielkonto aus dem SKR03 - ) - ) - ORDER BY c.accno - ) AS taxdescription, - - ( 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, - + comma(tk.startdate) AS startdate, + comma(tk.taxkey_id) AS taxkey, + comma(tx.taxdescription || to_char (tx.rate, '99V99' ) || '%') AS taxdescription, + comma(tx.taxnumber) AS taxaccount, + comma(tk.pos_ustva) AS tk_ustva, ( SELECT accno - FROM chart c2 - WHERE c2.id = c.id + FROM chart c2 + WHERE c2.id = c.id ) AS new_account FROM chart c - ORDER BY accno - |; + LEFT JOIN taxkeys tk ON (c.id = tk.chart_id) + LEFT JOIN tax tx ON (tk.tax_id = tx.id) + GROUP BY c.accno, c.id, c.description, c.charttype, c.gifi_accno, + c.category, c.link, c.pos_bwa, c.pos_bilanz, c.pos_eur, c.valid_from, + c.datevautomatik + ORDER BY c.accno + }; $sth = $dbh->prepare($query); $sth->execute || $form->dberror($query);