projekt kivitendo

  my $where = "AND c.id = $chart_id" if ($chart_id ne '');

  $query = qq{

      c.accno,

      c.id,

      c.description,

    WHERE 1=1

    $where

    GROUP BY c.accno, c.id, c.description, c.charttype, c.gifi_accno,

      c.datevautomatik

    ORDER BY c.accno

  };

            FROM acc_trans ac

            JOIN chart c ON (ac.chart_id = c.id)

            $dpt_join

              $dpt_where

              $project

            AND c.accno = ? $acc_cash_where|;

      ($form->{beginning_balance}) = selectrow_query($form, $dbh, $query, $form->{fromdate}, $form->{accno});

      # get last transaction date

  @values = ();

  foreach my $id (@id) {

    # NOTE: Postgres is really picky about the order of implicit CROSS

    #  JOINs with ',' if you alias the tables and want to use the

    #  alias later in another JOIN.  the alias you want to use has to

      qq|SELECT a.id, a.invnumber, c.name, ac.transdate, ac.chart_id, | .

      qq|  a.invoice, ac.amount, 'ar' as module, | .

      qq|FROM acc_trans ac, customer c, ar a | .

      $dpt_join .

      qq|WHERE | . $where . $dpt_where . $project .

        } else {

          $trans->{credit} = $trans->{amount};

          $trans->{debit}  = 0;

        push(@{ $ca->{GEGENKONTO} }, $trans);

      } else {

        next;