@@ -, +, @@ --- C4/Bookseller.pm | 2 -- acqui/lateorders.pl | 2 +- 2 files changed, 1 insertion(+), 3 deletions(-) --- a/C4/Bookseller.pm +++ a/C4/Bookseller.pm @@ -70,8 +70,6 @@ sub GetBooksellersWithLateOrders { OR datereceived IS NULL OR aqorders.quantityreceived < aqorders.quantity ) - AND aqorders.rrp <> 0 - AND aqorders.ecost <> 0 AND aqorders.quantity - COALESCE(aqorders.quantityreceived,0) <> 0 AND aqbasket.closedate IS NOT NULL "; --- a/acqui/lateorders.pl +++ a/acqui/lateorders.pl @@ -134,7 +134,7 @@ push @parameters, $estimateddeliverydateto_dt my %supplierlist = GetBooksellersWithLateOrders(@parameters); my (@sloopy); # supplier loop -foreach (keys %supplierlist){ +foreach( sort { $supplierlist{$a} cmp $supplierlist{$b} } keys %supplierlist ) { push @sloopy, (($booksellerid and $booksellerid eq $_ ) ? {id=>$_, name=>$supplierlist{$_}, selected=>1} : {id=>$_, name=>$supplierlist{$_}} ) ; --