|
Lines 323-331
sub AddShelf {
Link Here
|
| 323 |
|
323 |
|
| 324 |
return -1 unless _CheckShelfName($hashref->{shelfname}, $hashref->{category}, $owner, 0); |
324 |
return -1 unless _CheckShelfName($hashref->{shelfname}, $hashref->{category}, $owner, 0); |
| 325 |
|
325 |
|
| 326 |
my $query = qq(INSERT INTO virtualshelves |
326 |
my $query = q|INSERT INTO virtualshelves |
| 327 |
(shelfname,owner,category,sortfield,allow_add,allow_delete_own,allow_delete_other) |
327 |
(shelfname,owner,category,sortfield,allow_add,allow_delete_own,allow_delete_other, creation_time) |
| 328 |
VALUES (?,?,?,?,?,?,?)); |
328 |
VALUES (?,?,?,?,?,?,?, NOW()) |
|
|
329 |
|; |
| 329 |
|
330 |
|
| 330 |
my $sth = $dbh->prepare($query); |
331 |
my $sth = $dbh->prepare($query); |
| 331 |
$sth->execute( |
332 |
$sth->execute( |
|
Lines 475-487
sub ShelfPossibleAction {
Link Here
|
| 475 |
} |
476 |
} |
| 476 |
|
477 |
|
| 477 |
my $dbh = C4::Context->dbh; |
478 |
my $dbh = C4::Context->dbh; |
| 478 |
my $query = qq/ |
479 |
my $query = q{ |
| 479 |
SELECT COALESCE(owner,0) AS owner, category, allow_add, allow_delete_own, allow_delete_other, COALESCE(sh.borrowernumber,0) AS borrowernumber |
480 |
SELECT COALESCE(owner,0) AS owner, category, allow_add, allow_delete_own, allow_delete_other, COALESCE(sh.borrowernumber,0) AS borrowernumber |
| 480 |
FROM virtualshelves vs |
481 |
FROM virtualshelves vs |
| 481 |
LEFT JOIN virtualshelfshares sh ON sh.shelfnumber=vs.shelfnumber |
482 |
LEFT JOIN virtualshelfshares sh ON sh.shelfnumber=vs.shelfnumber |
| 482 |
AND sh.borrowernumber=? |
483 |
AND sh.borrowernumber=? |
| 483 |
WHERE vs.shelfnumber=? |
484 |
WHERE vs.shelfnumber=? |
| 484 |
/; |
485 |
}; |
| 485 |
my $sth = $dbh->prepare($query); |
486 |
my $sth = $dbh->prepare($query); |
| 486 |
$sth->execute($user, $shelfnumber); |
487 |
$sth->execute($user, $shelfnumber); |
| 487 |
my $shelf= $sth->fetchrow_hashref; |
488 |
my $shelf= $sth->fetchrow_hashref; |