From: G. Richardson Date: Thu, 1 Dec 2016 14:20:06 +0000 (+0100) Subject: Ungenutzte Funktion parts_subtotal in ic.pl entfernt X-Git-Tag: release-3.5.4~1842 X-Git-Url: http://wagnertech.de/git?a=commitdiff_plain;h=14562379bf33cf4b4388c6cf594ee8fc56ae3f87;p=kivitendo-erp.git Ungenutzte Funktion parts_subtotal in ic.pl entfernt --- diff --git a/bin/mozilla/ic.pl b/bin/mozilla/ic.pl index 47a19830d..b6153a6bc 100644 --- a/bin/mozilla/ic.pl +++ b/bin/mozilla/ic.pl @@ -670,51 +670,6 @@ sub generate_report { $lxdebug->leave_sub(); } #end generate_report -sub parts_subtotal { - $lxdebug->enter_sub(); - - $auth->assert('part_service_assembly_edit'); - - my (%column_data); - my ($column_index, $subtotalonhand, $subtotalsellprice, $subtotallastcost, $subtotallistprice) = @_; - - map { $column_data{$_} = " " } @{ $column_index }; - $$subtotalonhand = 0 if ($form->{searchitems} eq 'assembly' && $form->{bom}); - - $column_data{onhand} = - "" - . $form->format_amount(\%myconfig, $$subtotalonhand) - . ""; - - $column_data{linetotalsellprice} = - "" - . $form->format_amount(\%myconfig, $$subtotalsellprice, 2) - . ""; - $column_data{linetotallistprice} = - "" - . $form->format_amount(\%myconfig, $$subtotallistprice, 2) - . ""; - $column_data{linetotallastcost} = - "" - . $form->format_amount(\%myconfig, $$subtotallastcost, 2) - . ""; - - $$subtotalonhand = 0; - $$subtotalsellprice = 0; - $$subtotallistprice = 0; - $$subtotallastcost = 0; - - print ""; - - map { print "\n$column_data{$_}" } @{ $column_index }; - - print qq| - -|; - - $lxdebug->leave_sub(); -} - sub ajax_autocomplete { $main::lxdebug->enter_sub();