From: G. Richardson Date: Thu, 1 Dec 2016 14:19:33 +0000 (+0100) Subject: Ungenutzte Funktion retrieve_assemblies in IC.pm entfernt X-Git-Tag: release-3.5.4~1843 X-Git-Url: http://wagnertech.de/git?a=commitdiff_plain;h=667cfdce6bf2a06094339fc09fb7d27fc1636d96;p=kivitendo-erp.git Ungenutzte Funktion retrieve_assemblies in IC.pm entfernt --- diff --git a/SL/IC.pm b/SL/IC.pm index 2b3abf63b..f164d097f 100644 --- a/SL/IC.pm +++ b/SL/IC.pm @@ -91,42 +91,6 @@ sub retrieve_buchungsgruppen { $main::lxdebug->leave_sub(); } -sub retrieve_assemblies { - $main::lxdebug->enter_sub(); - - my ($self, $myconfig, $form) = @_; - - # connect to database - my $dbh = $form->get_standard_dbh; - - my $where = qq|NOT p.obsolete|; - my @values; - - if ($form->{partnumber}) { - $where .= qq| AND (p.partnumber ILIKE ?)|; - push(@values, like($form->{partnumber})); - } - - if ($form->{description}) { - $where .= qq| AND (p.description ILIKE ?)|; - push(@values, like($form->{description})); - } - - # retrieve assembly items - my $query = - qq|SELECT p.id, p.partnumber, p.description, - p.onhand, p.rop, - (SELECT sum(p2.inventory_accno_id) - FROM parts p2, assembly a - WHERE (p2.id = a.parts_id) AND (a.id = p.id)) AS inventory - FROM parts p - WHERE NOT p.obsolete AND p.part_type = 'assembly' $where|; - - $form->{assembly_items} = selectall_hashref_query($form, $dbh, $query, @values); - - $main::lxdebug->leave_sub(); -} - sub assembly_item { $main::lxdebug->enter_sub();