-my $toggle=0;
-my @loop_suppliers;
-for (my $i=0; $i<$count; $i++) {
- my $orders = GetPendingOrders($suppliers[$i]->{'id'});
- my $ordcount = scalar @$orders;
-
- my %line;
- if ($toggle==0){
- $line{even}=1;
- $toggle=1;
- } else {
- $line{even}=0;
- $toggle=0;
+my $loop_suppliers = [];
+for my $s (@suppliers) {
+ my $orders = SearchOrders({
+ booksellerid => $s->id,
+ pending => 1
+ });
+
+ my $loop_basket = [];
+ for my $ord ( @{$orders} ) {
+ push @{$loop_basket}, {
+ basketno => $ord->{'basketno'},
+ total => $ord->{'count(*)'},
+ authorisedby => $ord->{'authorisedby'},
+ creationdate => output_pref( { str => $ord->{'creationdate'} } ),
+ closedate => output_pref( { str => $ord->{'closedate'} } ),
+ };