+my $suggestions_loop = &SearchSuggestion( {STATUS=> $status} );
+# ---------------------------------------------------
+# number format
+my $period = GetBudgetPeriod;
+my $budget_period_id = $period->{budget_period_id};
+my $budget_branchcode = $period->{budget_branchcode};
+my $moo = GetBudgetHierarchy('',$homebranch, $template->{param_map}->{'USER_INFO'}[0]->{'borrowernumber'} );
+@results = @$moo;
+my $period_total = 0;
+my $toggle = 0;
+my @loop;
+
+foreach my $result (@results) {
+ # only get top-level budgets for display
+ # warn $result->{'budget_branchcode'};
+
+ $period_total += $result->{'budget_amount'};
+
+ my $a = $result->{'budget_code_indent'};
+ $a =~ s/\ /\ \;/g;
+ $result->{'budget_code_indent'} = $a;
+
+ my $r = GetBranchName( $result->{'budget_owner_id'} );
+ $result->{'budget_branchname'} = GetBranchName( $result->{'budget_branchcode'} );
+
+ my $member = GetMember( borrowernumber => $result->{budget_owner_id} );
+ my $member_full = $member->{'firstname'} . ' ' . $member->{'surname'} if $member;
+
+ $result->{'budget_owner'} = $member_full;
+ $result->{'budget_ordered'} = GetBudgetOrdered( $result->{'budget_id'} );
+ $result->{'budget_spent'} = GetBudgetSpent( $result->{'budget_id'} );
+ $result->{'budget_avail'} = $result->{'budget_amount'} - $result->{'budget_spent'} - $result->{'budget_ordered'};
+
+ $total += $result->{'budget_amount'};
+ $totspent += $result->{'budget_spent'};
+ $totordered += $result->{'budget_ordered'};
+ $totavail += $result->{'budget_avail'};
+
+ $result->{'budget_amount'} = $num->format_price( $result->{'budget_amount'} );
+ $result->{'budget_spent'} = $num->format_price( $result->{'budget_spent'} );
+ $result->{'budget_ordered'} = $num->format_price( $result->{'budget_ordered'} );
+ $result->{'budget_avail'} = $num->format_price( $result->{'budget_avail'} );
+
+ # my $spent_percent = ( $result->{'budget_spent'} / $result->{'budget_amount'} ) * 100;
+ # $result->{'budget_spent_percent'} = sprintf( "%00d", $spent_percent );
+
+ if ($member) {
+ $result->{budget_owner_name} = $member->{'firstname'} . ' ' . $member->{'surname'};
+ }
+
+ push( @loop_budget, { %{$result}, toggle => $toggle++ % 2, } );
+}