View | Details | Raw Unified | Return to bug 13222
Collapse All | Expand All

(-)a/C4/ImportBatch.pm (-7 / +6 lines)
Lines 1328-1334 sub SetImportRecordOverlayStatus { Link Here
1328
1328
1329
=head2 GetImportRecordStatus
1329
=head2 GetImportRecordStatus
1330
1330
1331
  my $overlay_status = GetImportRecordStatus($import_record_id);
1331
  my $status = GetImportRecordStatus($import_record_id);
1332
1332
1333
=cut
1333
=cut
1334
1334
Lines 1338-1362 sub GetImportRecordStatus { Link Here
1338
    my $dbh = C4::Context->dbh;
1338
    my $dbh = C4::Context->dbh;
1339
    my $sth = $dbh->prepare("SELECT status FROM import_records WHERE import_record_id = ?");
1339
    my $sth = $dbh->prepare("SELECT status FROM import_records WHERE import_record_id = ?");
1340
    $sth->execute($import_record_id);
1340
    $sth->execute($import_record_id);
1341
    my ($overlay_status) = $sth->fetchrow_array();
1341
    my ($status) = $sth->fetchrow_array();
1342
    $sth->finish();
1342
    $sth->finish();
1343
    return $overlay_status;
1343
    return $status;
1344
1344
1345
}
1345
}
1346
1346
1347
1347
1348
=head2 SetImportRecordStatus
1348
=head2 SetImportRecordStatus
1349
1349
1350
  SetImportRecordStatus($import_record_id, $new_overlay_status);
1350
  SetImportRecordStatus($import_record_id, $new_status);
1351
1351
1352
=cut
1352
=cut
1353
1353
1354
sub SetImportRecordStatus {
1354
sub SetImportRecordStatus {
1355
    my ($import_record_id, $new_overlay_status) = @_;
1355
    my ($import_record_id, $new_status) = @_;
1356
1356
1357
    my $dbh = C4::Context->dbh;
1357
    my $dbh = C4::Context->dbh;
1358
    my $sth = $dbh->prepare("UPDATE import_records SET status = ? WHERE import_record_id = ?");
1358
    my $sth = $dbh->prepare("UPDATE import_records SET status = ? WHERE import_record_id = ?");
1359
    $sth->execute($new_overlay_status, $import_record_id);
1359
    $sth->execute($new_status, $import_record_id);
1360
    $sth->finish();
1360
    $sth->finish();
1361
1361
1362
}
1362
}
1363
- 

Return to bug 13222