projekt kivitendo

       partnotes serialnumber reqdate sellprice listprice netprice

       discount p_discount discount_sub nodiscount_sub

       linetotal  nodiscount_linetotal tax_rate projectnumber

  my @tax_arrays =

    qw(taxbase tax taxdescription taxrate taxnumber);

      push @{ $form->{invdate} },           $form->{"invdate"};

      push @{ $form->{price_factor} },      $price_factor->{formatted_factor};

      push @{ $form->{price_factor_name} }, $price_factor->{description};

      if ($form->{lizenzen}) {

        if ($form->{"licensenumber_$i"}) {

       partnotes serialnumber reqdate sellprice listprice netprice

       discount p_discount discount_sub nodiscount_sub

       linetotal  nodiscount_linetotal tax_rate projectnumber

  my $sameitem = "";

  foreach $item (sort { $a->[1] cmp $b->[1] } @partsgroup) {

      push @{ $form->{listprice} },         $form->{"listprice_$i"};

      push @{ $form->{price_factor} },      $price_factor->{formatted_factor};

      push @{ $form->{price_factor_name} }, $price_factor->{description};

      my $sellprice     = $form->parse_amount($myconfig, $form->{"sellprice_$i"});

      my ($dec)         = ($sellprice =~ /\.(\d+)/);