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 |
Lines 549-555
sub BatchCommitRecords {
Link Here
|
549 |
my $num_items_errored = 0; |
551 |
my $num_items_errored = 0; |
550 |
my $num_ignored = 0; |
552 |
my $num_ignored = 0; |
551 |
# commit (i.e., save, all records in the batch) |
553 |
# commit (i.e., save, all records in the batch) |
552 |
SetImportBatchStatus($batch_id, 'importing'); |
|
|
553 |
my $overlay_action = GetImportBatchOverlayAction($batch_id); |
554 |
my $overlay_action = GetImportBatchOverlayAction($batch_id); |
554 |
my $nomatch_action = GetImportBatchNoMatchAction($batch_id); |
555 |
my $nomatch_action = GetImportBatchNoMatchAction($batch_id); |
555 |
my $item_action = GetImportBatchItemAction($batch_id); |
556 |
my $item_action = GetImportBatchItemAction($batch_id); |
556 |
- |
|
|