X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=bin%2Fmozilla%2Finvoice_io.pl;h=d947bae232fa29cfa709b18b63f84f77730aad72;hb=11461ccecbd3b4f054f52f979c26145642539e8c;hp=229927220fb4ca803cf991c31da7ef7a9854b7bd;hpb=8c7e44938a661e035f62840e1e177353240ace5d;p=kivitendo-erp.git diff --git a/bin/mozilla/invoice_io.pl b/bin/mozilla/invoice_io.pl index 229927220..d947bae23 100644 --- a/bin/mozilla/invoice_io.pl +++ b/bin/mozilla/invoice_io.pl @@ -117,9 +117,9 @@ use Data::Dumper; # } ############### ENDE Neueintrag ################## # -# my $dimension_units = AM->retrieve_units(\%myconfig, $form, "dimension"); -# my $service_units = AM->retrieve_units(\%myconfig, $form, "service"); # my $all_units = AM->retrieve_units(\%myconfig, $form); +# my $dimension_units = $all_units; +# my $service_units = $all_units; # # my %price_factors = map { $_->{id} => $_->{factor} } @{ $form->{ALL_PRICE_FACTORS} }; # @@ -323,7 +323,7 @@ use Data::Dumper; # $qty_dec = length $qty_dec; # # $column_data{qty} = -# qq||; # if ($form->{"formel_$i"}) { # $column_data{qty} .= qq|| @@ -596,8 +596,9 @@ sub set_pricegroup { sub display_form { $lxdebug->enter_sub(); - $auth->assert('part_service_assembly_edit | vendor_invoice_edit | sales_order_edit | invoice_edit |' . - 'request_quotation_edit | sales_quotation_edit | purchase_order_edit'); + $auth->assert('part_service_assembly_edit | vendor_invoice_edit | sales_order_edit | invoice_edit |' . + 'request_quotation_edit | sales_quotation_edit | purchase_order_edit | '. + 'purchase_delivery_order_edit | sales_delivery_order_edit'); relink_accounts(); retrieve_partunits() if ($form->{type} =~ /_delivery_order$/); @@ -661,7 +662,8 @@ sub display_form { &{$subroutine}($numrows); - $numrows = 0; + $numrows = ++$form->{makemodel_rows}; + $subroutine = "makemodel_row"; } if ($form->{item} eq 'assembly') { $numrows = $form->{price_rows};