projekt kivitendo

  my $onhand_mode = !!$params{onhand};

  my @values;

  my @where;

  my @groups;

    || exists $chargenumbers{$b->{chargenumber}}  <=> exists $chargenumbers{$a->{chargenumber}} # then prefer wanted chargenumbers

    || exists $bin_whitelist{$b->{bin_id}}        <=> exists $bin_whitelist{$a->{bin_id}}       # then prefer wanted bins

    || exists $wh_whitelist{$b->{warehouse_id}}   <=> exists $wh_whitelist{$a->{warehouse_id}}  # then prefer wanted bins

  } @filtered_results;

  my @allocations;

  my $rest_qty = $qty;