projekt kivitendo

  my $query =

    qq|SELECT ct.*, cp.*, ct.notes as customernotes,

         ct.phone AS customerphone, ct.fax AS customerfax, ct.email AS customeremail,

       FROM customer ct

       LEFT JOIN contacts cp on ct.id = cp.cp_cv_id

       WHERE (ct.id = ?) $where

       ORDER BY cp.cp_id

       LIMIT 1|;

         c.id AS customer_id, c.name AS customer, c.discount as customer_discount, c.creditlimit, c.terms,

         c.email, c.cc, c.bcc, c.language_id, c.payment_id,

         c.street, c.zipcode, c.city, c.country,

         c.taxincluded_checked, c.direct_debit,

         $duedate + COALESCE(pt.terms_netto, 0) AS duedate,

         b.discount AS tradediscount, b.description AS business

       FROM customer c

       LEFT JOIN business b ON (b.id = c.business_id)

       LEFT JOIN payment_terms pt ON ($payment_id (c.payment_id = pt.id))

       WHERE c.id = ?|;

  push @values, $cid;

  $ref = selectfirst_hashref_query($form, $dbh, $query, @values);