Lines 536-541
sub BatchCommitRecords {
Link Here
|
536 |
$progress_interval = 0 unless $progress_interval && $progress_interval =~ /^\d+$/; |
536 |
$progress_interval = 0 unless $progress_interval && $progress_interval =~ /^\d+$/; |
537 |
$progress_interval = 0 unless ref($progress_callback) eq 'CODE'; |
537 |
$progress_interval = 0 unless ref($progress_callback) eq 'CODE'; |
538 |
|
538 |
|
|
|
539 |
SetImportBatchStatus($batch_id, 'importing'); |
540 |
|
539 |
my $schema = Koha::Database->schema; |
541 |
my $schema = Koha::Database->schema; |
540 |
$schema->txn_begin; |
542 |
$schema->txn_begin; |
541 |
# NOTE: Moved this transaction to the front of the routine. Note that inside the while loop below |
543 |
# NOTE: Moved this transaction to the front of the routine. Note that inside the while loop below |
542 |
- |
|
|