Lines 116-124
sub GetShelves ($$$$) {
Link Here
|
116 |
$query .= ($mincategory == 1) ? "WHERE owner=? AND category=?" : "WHERE category>=?"; |
116 |
$query .= ($mincategory == 1) ? "WHERE owner=? AND category=?" : "WHERE category>=?"; |
117 |
$query .= qq( |
117 |
$query .= qq( |
118 |
GROUP BY virtualshelves.shelfnumber |
118 |
GROUP BY virtualshelves.shelfnumber |
119 |
ORDER BY virtualshelves.category |
119 |
ORDER BY virtualshelves.shelfname |
120 |
DESC |
|
|
121 |
LIMIT ?, ?); |
120 |
LIMIT ?, ?); |
|
|
121 |
warn $query; |
122 |
my $sth2 = $dbh->prepare($query); |
122 |
my $sth2 = $dbh->prepare($query); |
123 |
$sth2->execute(@params); |
123 |
$sth2->execute(@params); |
124 |
my %shelflist; |
124 |
my %shelflist; |
125 |
- |
|
|