|
Lines 287-293
sub UpdateClaimdateIssues {
Link Here
|
| 287 |
my $dbh = C4::Context->dbh; |
287 |
my $dbh = C4::Context->dbh; |
| 288 |
$date = strftime( "%Y-%m-%d", localtime ) unless ($date); |
288 |
$date = strftime( "%Y-%m-%d", localtime ) unless ($date); |
| 289 |
my $query = " |
289 |
my $query = " |
| 290 |
UPDATE serial SET claimdate=$date,status=7 |
290 |
UPDATE serial SET claimdate=\'$date\',status=7 |
| 291 |
WHERE serialid in (" . join( ",", @$serialids ) . ")"; |
291 |
WHERE serialid in (" . join( ",", @$serialids ) . ")"; |
| 292 |
my $rq = $dbh->prepare($query); |
292 |
my $rq = $dbh->prepare($query); |
| 293 |
$rq->execute; |
293 |
$rq->execute; |
| 294 |
- |
|
|