Browse Source

bug 5579: teach MARC export to embed items when needed

Signed-off-by: Galen Charlton <gmcharlt@gmail.com>
Signed-off-by: Claire Hernandez <claire.hernandez@biblibre.com>
Signed-off-by: Chris Cormack <chrisc@catalyst.net.nz>
3.4.x
Galen Charlton 12 years ago
committed by Chris Cormack
parent
commit
6e217d1d21
  1. 5
      tools/export.pl

5
tools/export.pl

@ -133,13 +133,14 @@ if ($op eq "export") {
next;
}
next if not defined $record;
if ( $dont_export_items || $strip_nonlocal_items || $limit_ind_branch) {
C4::Biblio::EmbedItemsInMarcBiblio($record, $biblionumber) unless $dont_export_items;
if ($strip_nonlocal_items || $limit_ind_branch) {
my ( $homebranchfield, $homebranchsubfield ) =
GetMarcFromKohaField( 'items.homebranch', '' );
for my $itemfield ($record->field($homebranchfield)){
# if stripping nonlocal items, use loggedinuser's branch if they didn't select one
$branch = C4::Context->userenv->{'branch'} unless $branch;
$record->delete_field($itemfield) if($dont_export_items || ($itemfield->subfield($homebranchsubfield) ne $branch) ) ;
$record->delete_field($itemfield) if($itemfield->subfield($homebranchsubfield) ne $branch) ;
}
}

Loading…
Cancel
Save