|
Lines 964-970
subtest 'Split subfields in Item2Marc (Bug 21774)' => sub {
Link Here
|
| 964 |
|
964 |
|
| 965 |
Koha::MarcSubfieldStructures->search({ tagfield => '952', tagsubfield => '8' })->delete; # theoretical precaution |
965 |
Koha::MarcSubfieldStructures->search({ tagfield => '952', tagsubfield => '8' })->delete; # theoretical precaution |
| 966 |
Koha::MarcSubfieldStructures->search({ kohafield => 'items.ccode' })->delete; |
966 |
Koha::MarcSubfieldStructures->search({ kohafield => 'items.ccode' })->delete; |
| 967 |
my $mapping = Koha::MarcSubfieldStructure->new({ frameworkcode => q{}, tagfield => '952', tagsubfield => '8', kohafield => 'items.ccode' })->store; |
967 |
my $mapping = Koha::MarcSubfieldStructure->new( |
|
|
968 |
{ |
| 969 |
frameworkcode => q{}, |
| 970 |
tagfield => '952', |
| 971 |
tagsubfield => '8', |
| 972 |
kohafield => 'items.ccode', |
| 973 |
repeatable => 1 |
| 974 |
} |
| 975 |
)->store; |
| 976 |
Koha::Caches->get_instance->clear_from_cache( "MarcSubfieldStructure-" ); |
| 968 |
|
977 |
|
| 969 |
# Start testing |
978 |
# Start testing |
| 970 |
my $marc = C4::Items::Item2Marc( $item, $biblio->{biblionumber} ); |
979 |
my $marc = C4::Items::Item2Marc( $item, $biblio->{biblionumber} ); |
| 971 |
- |
|
|