diff --git a/acqui/neworderempty.pl b/acqui/neworderempty.pl
index a8526a88b4..e3d57b2dc1 100755
--- a/acqui/neworderempty.pl
+++ b/acqui/neworderempty.pl
@@ -276,6 +276,8 @@ foreach my $r (@{$budgets}) {
     };
 }
 
+@{$budget_loop} =
+  sort { uc( $a->{b_txt}) cmp uc( $b->{b_txt}) } @{$budget_loop};
 
 if ($close) {
     $budget_id      =  $data->{'budget_id'};