projekt kivitendo

                 $form->{"serialnumber_$i"}, conv_i($pricegroup_id),

                 $form->{"ordnumber_$i"}, conv_date($form->{"transdate_$i"}),

                 $form->{"cusordnumber_$i"}, $baseqty, $form->{"subtotal_$i"} ? 't' : 'f',

                 $form->{"lastcost_$i"},

                 conv_i($form->{"price_factor_id_$i"}), conv_i($form->{"price_factor_id_$i"}),

                 conv_i($form->{"marge_price_factor_$i"}));

  my ($self, $myconfig, $form) = @_;

  # connect to database

  my ($sth, $ref, $query);

  }

  my $rc = $dbh->commit;

  $main::lxdebug->leave_sub();

  my ($self, $myconfig, $form) = @_;

  # connect to database

  my $dateformat = $myconfig->{dateformat};

  $dateformat .= "yy" if $myconfig->{dateformat} !~ /^y/;

    $form->{rowcount} = $i if ($i && !$form->{type});

  }

  $main::lxdebug->leave_sub();

}