Bug 38279: Remove unused C4::ImportBatch::EmbedItemsInImportBiblio

Last call removed from bug 30779 (I think)

Test plan:
  % git grep EmbedItemsInImportBiblio
should not return anything

Signed-off-by: David Nind <david@davidnind.com>
Signed-off-by: Tomas Cohen Arazi <tomascohen@theke.io>
Signed-off-by: Katrin Fischer <katrin.fischer@bsz-bw.de>
This commit is contained in:
Jonathan Druart 2024-10-28 14:26:14 +01:00 committed by Katrin Fischer
parent ae3c4ab009
commit c8a5bdffbe
No known key found for this signature in database
GPG Key ID: 0EF6E2C03357A834
1 changed files with 0 additions and 18 deletions

View File

@ -192,24 +192,6 @@ sub GetImportRecordMarc {
return $marc, $encoding;
}
sub EmbedItemsInImportBiblio {
my ( $record, $import_record_id ) = @_;
my ( $itemtag, $itemsubfield ) = GetMarcFromKohaField( "items.itemnumber" );
my $dbh = C4::Context->dbh;
my $import_items = $dbh->selectall_arrayref(q|
SELECT import_items.marcxml
FROM import_items
WHERE import_record_id = ?
|, { Slice => {} }, $import_record_id );
my @item_fields;
for my $import_item ( @$import_items ) {
my $item_marc = MARC::Record::new_from_xml($import_item->{marcxml}, 'UTF-8');
push @item_fields, $item_marc->field($itemtag);
}
$record->append_fields(@item_fields);
return $record;
}
=head2 AddImportBatch
my $batch_id = AddImportBatch($params_hash);