projekt kivitendo

         WHERE $where $dpt_where

           AND ac.trans_id IN ( SELECT trans_id FROM acc_trans JOIN chart ON (chart_id = id) WHERE (link LIKE '%AR_paid%') $subwhere)

           $project

         UNION

         WHERE $where $dpt_where

           AND ac.trans_id IN ( SELECT trans_id FROM acc_trans JOIN chart ON (chart_id = id) WHERE (link LIKE '%AP_paid%') $subwhere)

           $project

         UNION

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

         JOIN gl a ON (a.id = ac.trans_id)

         $dpt_join

           AND NOT ((c.link = 'AR') OR (c.link = 'AP'))

           $project

         GROUP BY c.$category

         WHERE (c.category = 'I') $prwhere $dpt_where

           AND ac.trans_id IN ( SELECT trans_id FROM acc_trans JOIN chart ON (chart_id = id) WHERE (link LIKE '%AR_paid%') $subwhere)

           $project

         UNION

         WHERE (c.category = 'E') $prwhere $dpt_where

           AND ac.trans_id IN ( SELECT trans_id FROM acc_trans JOIN chart ON (chart_id = id) WHERE (link LIKE '%AP_paid%') $subwhere)

         $project

         |;

    }

    if ($ref->{amount} != 0 || $form->{all_accounts}) {

      $trb{ $ref->{accno} }{description} = $ref->{description};

      $trb{ $ref->{accno} }{charttype}   = 'A';

      if ($ref->{amount} > 0) {

        $trb{ $ref->{accno} }{haben_eb}   = $ref->{amount};

      } else {

               (ac.trans_id in (SELECT id from gl)

                $glwhere)

              )|;

qq| AND ((ac.trans_id IN (SELECT id from ar) AND

                ac.trans_id IN

                  (

               (ac.trans_id in (SELECT id from gl)

                $glsaldowhere)

              )|;

qq| AND ((ac.trans_id IN (SELECT id from ar) AND

                ac.trans_id IN

                  (

         <th align=right colspan=4>| . $locale->text('Decimalplaces') . qq|</th>

             <td><input name=decimalplaces size=3 value="2"></td>

         </tr>

$jsscript

|;

  }

         <th align=right colspan=4>| . $locale->text('Decimalplaces') . qq|</th>

             <td><input name=decimalplaces size=3 value="2"></td>

         </tr>

$jsscript

|;

  }

  my $edit_url = build_std_url('action=edit', 'type', 'vc');

#   foreach $accno (@{ $form->{TB} }) {

#     $accno->{soll} = $accno->{debit};

#     $accno->{haben} = $accno->{credit};

#     map { $totals{$_}    += $accno->{$_} } @subtotal_columns;

#     map { $accno->{$_} = $form->format_amount(\%myconfig, $accno->{$_}, 2) } qw(soll_eb haben_eb soll haben soll_kumuliert haben_kumuliert soll_saldo haben_saldo);

#     map { $accno->{$_} = ($accno->{$_} == 0) ? '' : $accno->{$_} } qw(soll_eb haben_eb soll haben soll_kumuliert haben_kumuliert soll_saldo haben_saldo);

#     my $row = { };

#     foreach my $column (@columns) {

#       $row->{$column} = {

#         'data'  => $accno->{$column},

#         'align' => $column_alignment{$column},

#       };

#     }

#     $row->{$ordnumber}->{link} = $edit_url . "&id=" . E($oe->{id}) . "&callback=${callback}";

#     my $row_set = [ $row ];

#     $report->add_data($row_set);

#     $idx++;

#   }

#   $report->add_separator();

#   $report->add_data(create_subtotal_row(\%totals, \@columns, \%column_alignment, \@subtotal_columns, 'listtotal'));

  $report->generate_with_headers();

  	$form->{what_done} = $form->{type};

  	$form->save_history($form->dbconnect(\%myconfig));

  }

  $lxdebug->leave_sub();

}