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; |