Lines 79-88
subtest 'transformMARCXML4XSLT tests' => sub {
Link Here
|
79 |
|
79 |
|
80 |
$av->{952}->{a}->{$auth_val->category}->{$auth_val->authorised_value}->{lib} = ""; |
80 |
$av->{952}->{a}->{$auth_val->category}->{$auth_val->authorised_value}->{lib} = ""; |
81 |
$record->field(952)->update( a => $auth_val->authorised_value, c => $branch_2->branchcode, d => $itemtype_2->itemtype ); |
81 |
$record->field(952)->update( a => $auth_val->authorised_value, c => $branch_2->branchcode, d => $itemtype_2->itemtype ); |
82 |
C4::XSLT::transformMARCXML4XSLT( 3, $record, $branches, $itemtypes, $av ); |
82 |
C4::XSLT::transformMARCXML4XSLT( 3, $record, 0, $branches, $itemtypes, $av ); |
83 |
is($record->subfield( '952', 'a' ),$auth_val->authorised_value,'952$a is not transformed when value found but blank'); |
83 |
is($record->subfield( '952', 'a' ),$auth_val->authorised_value,'952$a is not transformed when value found but blank'); |
84 |
is($record->subfield( '952', 'c' ),$branch_2->branchcode,'952$c is returned unaltered invalid branchcode'); |
84 |
is($record->subfield( '952', 'c' ),"",'952$c is returned blank when invalid branchcode'); |
85 |
is($record->subfield( '952', 'd' ),$itemtype_2->itemtype,'952$d is returned unaltered when invalid itemtype'); |
85 |
is($record->subfield( '952', 'd' ),"",'952$d is returned blank when invalid itemtype'); |
86 |
|
86 |
|
87 |
|
87 |
|
88 |
}; |
88 |
}; |
89 |
- |
|
|