projekt kivitendo

  }

  my $q_item = <<SQL;

    UPDATE delivery_order_items SET

       sellprice = ?, discount = ?, unit = ?, reqdate = ?, project_id = ?, serialnumber = ?,

       ordnumber = ?, transdate = ?, cusordnumber = ?,

       lastcost = ? , price_factor_id = ?, price_factor = (SELECT factor FROM price_factors where id = ?),

  for my $i (1 .. $form->{rowcount}) {

    next if (!$form->{"id_$i"});

    if (!$form->{"delivery_order_items_id_$i"}) {

      # there is no persistent id, therefore create one with all necessary constraints

      my $q_item_id = qq|SELECT nextval('delivery_order_items_id')|;

      my $h_item_id = prepare_query($form, $dbh, $q_item_id);

      do_statement($form, $h_item_id, $q_item_id);

      $form->{"delivery_order_items_id_$i"}  = $h_item_id->fetchrow_array();

      do_query($form, $dbh, $query, conv_i($form->{"delivery_order_items_id_$i"}),

      $h_item_id->finish();

    }

    $form->{"qty_$i"} = $form->parse_amount($myconfig, $form->{"qty_$i"});

    $pricegroup_id    = undef if !$pricegroup_id;

    # save detail record in delivery_order_items table

               $form->{"description_$i"}, $restricter->process($form->{"longdescription_$i"}),

               $form->{"qty_$i"}, $baseqty,

               $form->{"sellprice_$i"}, $form->{"discount_$i"} / 100,

       LEFT JOIN project pr ON (doi.project_id = pr.id)

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

       WHERE doi.delivery_order_id IN ($do_ids_placeholders)

  $form->{form_details} = selectall_hashref_query($form, $dbh, $query, @do_ids);