projekt kivitendo

        i.description, i.longdescription, i.qty, i.fxsellprice AS sellprice, i.parts_id AS id, i.unit, i.deliverydate, i.project_id, i.serialnumber,

        i.price_factor_id, i.price_factor, i.marge_price_factor, i.discount, i.active_price_source, i.active_discount_source,

        p.partnumber, p.part_type, pr.projectnumber, pg.partsgroup

        FROM invoice i

        JOIN parts p ON (i.parts_id = p.id)

         p.notes AS partnotes, p.notes AS longdescription, p.not_discountable,

         p.inventory_accno_id, p.price_factor_id,

         p.ean,

         pfac.factor AS price_factor,

         c3.new_chart_id                  AS expense_new_chart,

         date($transdate) - c3.valid_from AS expense_valid,

         pg.partsgroup

       FROM parts p

           FROM taxzone_charts tc

           WHERE tc.taxzone_id = '$taxzone_id' and tc.buchungsgruppen_id = p.buchungsgruppen_id) = c3.id)

       LEFT JOIN partsgroup pg ON (pg.id = p.partsgroup_id)

       LEFT JOIN price_factors pfac ON (pfac.id = p.price_factor_id)

       WHERE $where|;

  my $sth = prepare_execute_query($form, $dbh, $query, @values);

  map { push @{ $_ }, prepare_query($form, $dbh, $_->[0]) } @translation_queries;

  $form->{item_list} = [];

  while (my $ref = $sth->fetchrow_hashref("NAME_lc")) {

    if ($mm_by_id{$ref->{id}}) {

    if (($::form->{"partnumber_$i"} ne '') && ($ref->{ean} eq $::form->{"partnumber_$i"})) {

      push @{ $ref->{matches} ||= [] }, $::locale->text('EAN') . ': ' . $ref->{ean};

    }

    # In der Buchungsgruppe ist immer ein Bestandskonto verknuepft, auch wenn

    # es sich um eine Dienstleistung handelt. Bei Dienstleistungen muss das

    # Buchungskonto also aus dem Ergebnis rausgenommen werden.

  $sth->finish();

  $_->[1]->finish for @translation_queries;

  foreach my $item (@{ $form->{item_list} }) {

    my $custom_variables = CVar->get_custom_variables(module   => 'IC',

                                                      trans_id => $item->{id},

                                                      dbh      => $dbh,

                                                     );

    map { $item->{"ic_cvar_" . $_->{name} } = $_->{value} } @{ $custom_variables };

  }