projekt kivitendo

  $form->{title} = $locale->text('Sales Report');

  @columns =

  my @includeable_custom_variables = grep { $_->{includeable} } @{ $cvar_configs_ic }, @{ $cvar_configs_ct };

  my @searchable_custom_variables  = grep { $_->{searchable} }  @{ $cvar_configs_ic }, @{ $cvar_configs_ct };

    'transdate'               => { 'text' => $locale->text('Invoice Date'), },

    'qty'                     => { 'text' => $locale->text('Quantity'), },

    'parts_unit'              => { 'text' => $locale->text('Base unit'), },

    'sellprice'               => { 'text' => $locale->text('Sales price'), },

    'sellprice_total'         => { 'text' => $locale->text('Sales net amount'), },

    'lastcost_total'          => { 'text' => $locale->text('Purchase net amount'), },

  map { $column_defs{$_}->{visible} = $form->{"l_$_"} eq 'Y' } @columns;

  # so now the check-box "Description" is only used as switch for part description in invoice-mode

  # escape callback for href

  $callback = $form->escape($href);

  # Gesamtsumme:

  # Summe von sellprice_total, lastcost_total und marge_total

  # Durchschnitt von marge_percent

    #qty wurde bisher noch für andere Berechnungen benötigt und daher erst am Schluss überschrieben

    $ar->{qty} *= $basefactor;

    map { $ar->{$_} = $form->format_amount(\%myconfig, $ar->{$_}, 2) } qw(marge_total marge_percent);

    map { $ar->{$_} = $form->format_amount(\%myconfig, $ar->{$_}, $form->{"decimalplaces"} )} qw(lastcost sellprice sellprice_total lastcost_total);

    $row->{description}->{data} = $locale->text('Total') . ' ' . $name;

  };

  map { $row->{$_}->{data} = $form->format_amount(\%myconfig, $totals->{$_}, 0) } qw(qty);

  map { $row->{$_}->{data} = $form->format_amount(\%myconfig, $totals->{$_}, $form->{decimalplaces}) } qw(lastcost sellprice sellprice_total lastcost_total);