From 14562379bf33cf4b4388c6cf594ee8fc56ae3f87 Mon Sep 17 00:00:00 2001 From: "G. Richardson" Date: Thu, 1 Dec 2016 15:20:06 +0100 Subject: [PATCH] Ungenutzte Funktion parts_subtotal in ic.pl entfernt --- bin/mozilla/ic.pl | 45 --------------------------------------------- 1 file changed, 45 deletions(-) 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(); -- 2.20.1