Lines 658-664
Returns a reference to the array of all the basketgroups of bookseller $booksell
Link Here
|
658 |
sub GetBasketgroups { |
658 |
sub GetBasketgroups { |
659 |
my $booksellerid = shift; |
659 |
my $booksellerid = shift; |
660 |
die "bookseller id is required to edit a basketgroup" unless $booksellerid; |
660 |
die "bookseller id is required to edit a basketgroup" unless $booksellerid; |
661 |
my $query = "SELECT * FROM aqbasketgroups WHERE booksellerid=?"; |
661 |
my $query = "SELECT * FROM aqbasketgroups WHERE booksellerid=? ORDER BY `id` DESC"; |
662 |
my $dbh = C4::Context->dbh; |
662 |
my $dbh = C4::Context->dbh; |
663 |
my $sth = $dbh->prepare($query); |
663 |
my $sth = $dbh->prepare($query); |
664 |
$sth->execute($booksellerid); |
664 |
$sth->execute($booksellerid); |
665 |
- |
|
|