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