- my $stock = $object->part->get_simple_stock;
- my @stocked = grep { $_->{warehouse_id} == $object->warehouse_id && $_->{bin_id} == $object->bin_id } @$stock;
- my $stocked_qty = 0;
- foreach (@stocked) {
- $stocked_qty += $stocked[0]->{sum} * 1;
- }
+ my $query = <<SQL;
+ SELECT sum(qty) FROM inventory
+ WHERE parts_id = ? AND warehouse_id = ? AND bin_id = ? AND chargenumber = ?
+ GROUP BY warehouse_id, bin_id, chargenumber
+SQL
+
+ my ($stocked_qty) = selectrow_query($::form, $::form->get_standard_dbh, $query,
+ $object->parts_id, $object->warehouse_id, $object->bin_id, $object->chargenumber);