|
Lines 328-347
sub AddAuthToBatch {
Link Here
|
| 328 |
return $import_record_id; |
328 |
return $import_record_id; |
| 329 |
} |
329 |
} |
| 330 |
|
330 |
|
| 331 |
=head2 ModAuthInBatch |
|
|
| 332 |
|
| 333 |
ModAuthInBatch($import_record_id, $marc_record); |
| 334 |
|
| 335 |
=cut |
| 336 |
|
| 337 |
sub ModAuthInBatch { |
| 338 |
my ($import_record_id, $marc_record) = @_; |
| 339 |
|
| 340 |
my $marcflavour = C4::Context->preference('marcflavour'); |
| 341 |
_update_import_record_marc($import_record_id, $marc_record, $marcflavour eq 'UNIMARC' ? 'UNIMARCAUTH' : 'USMARC'); |
| 342 |
|
| 343 |
} |
| 344 |
|
| 345 |
=head2 BatchStageMarcRecords |
331 |
=head2 BatchStageMarcRecords |
| 346 |
|
332 |
|
| 347 |
( $batch_id, $num_records, $num_items, @invalid_records ) = |
333 |
( $batch_id, $num_records, $num_items, @invalid_records ) = |
| 348 |
- |
|
|