|
Lines 317-325
sub AddShelf {
Link Here
|
| 317 |
|
317 |
|
| 318 |
return -1 unless _CheckShelfName($hashref->{shelfname}, $hashref->{category}, $owner, 0); |
318 |
return -1 unless _CheckShelfName($hashref->{shelfname}, $hashref->{category}, $owner, 0); |
| 319 |
|
319 |
|
| 320 |
my $query = qq(INSERT INTO virtualshelves |
320 |
my $query = q|INSERT INTO virtualshelves |
| 321 |
(shelfname,owner,category,sortfield,allow_add,allow_delete_own,allow_delete_other) |
321 |
(shelfname,owner,category,sortfield,allow_add,allow_delete_own,allow_delete_other, creation_time) |
| 322 |
VALUES (?,?,?,?,?,?,?)); |
322 |
VALUES (?,?,?,?,?,?,?, NOW()) |
|
|
323 |
|; |
| 323 |
|
324 |
|
| 324 |
my $sth = $dbh->prepare($query); |
325 |
my $sth = $dbh->prepare($query); |
| 325 |
$sth->execute( |
326 |
$sth->execute( |
|
Lines 470-482
sub ShelfPossibleAction {
Link Here
|
| 470 |
} |
471 |
} |
| 471 |
|
472 |
|
| 472 |
my $dbh = C4::Context->dbh; |
473 |
my $dbh = C4::Context->dbh; |
| 473 |
my $query = qq/ |
474 |
my $query = q{ |
| 474 |
SELECT COALESCE(owner,0) AS owner, category, allow_add, allow_delete_own, allow_delete_other, COALESCE(sh.borrowernumber,0) AS borrowernumber |
475 |
SELECT COALESCE(owner,0) AS owner, category, allow_add, allow_delete_own, allow_delete_other, COALESCE(sh.borrowernumber,0) AS borrowernumber |
| 475 |
FROM virtualshelves vs |
476 |
FROM virtualshelves vs |
| 476 |
LEFT JOIN virtualshelfshares sh ON sh.shelfnumber=vs.shelfnumber |
477 |
LEFT JOIN virtualshelfshares sh ON sh.shelfnumber=vs.shelfnumber |
| 477 |
AND sh.borrowernumber=? |
478 |
AND sh.borrowernumber=? |
| 478 |
WHERE vs.shelfnumber=? |
479 |
WHERE vs.shelfnumber=? |
| 479 |
/; |
480 |
}; |
| 480 |
my $sth = $dbh->prepare($query); |
481 |
my $sth = $dbh->prepare($query); |
| 481 |
$sth->execute($user, $shelfnumber); |
482 |
$sth->execute($user, $shelfnumber); |
| 482 |
my $shelf= $sth->fetchrow_hashref; |
483 |
my $shelf= $sth->fetchrow_hashref; |