@@ -, +, @@ authorised value --- C4/XSLT.pm | 20 ++++++++++++++++++-- .../prog/en/xslt/MARC21slim2intranetDetail.xsl | 3 ++- .../prog/en/xslt/MARC21slim2intranetResults.xsl | 3 ++- 3 files changed, 22 insertions(+), 4 deletions(-) --- a/C4/XSLT.pm +++ a/C4/XSLT.pm @@ -85,8 +85,8 @@ sub transformMARCXML4XSLT { $value = GetAuthorisedValueDesc( $tag, $letter, $value, '', $tagslib ) if $av->{ $tag }->{ $letter }; push( @new_subfields, $letter, $value ); - } - $field ->replace_with( MARC::Field->new( + } + $field->replace_with( MARC::Field->new( $tag, $field->indicator(1), $field->indicator(2), @@ -212,7 +212,23 @@ sub XSLTParse4Display { next unless defined($sp); $sysxml .= "$sp\n"; } + $sysxml .= "\n"; + + ## Non-syspref variables that need to be computed + $sysxml .= ""; + + # Fetch the authorised value description for 942$n ( supressed in opac ) for the value '1' + # if 942$n is not mapped, the return value will be '1' which means even if the field is not + # mapped in the framework, we will still get the correct value to compare against + my $frameworkcode = GetFrameworkCode($biblionumber) || ''; + my $tagslib = &GetMarcStructure(1,$frameworkcode); + my $value = GetAuthorisedValueDesc( '942', 'n', '1', '', $tagslib ); + $sysxml .= "$value"; + + $sysxml .= "\n"; + ## End non-syspref variables that need to be computed + $xmlrecord =~ s/\<\/record\>/$itemsxml$sysxml\<\/record\>/; if ($fixamps) { # We need to correct the HTML entities that Zebra outputs $xmlrecord =~ s/\&amp;/\&/g; --- a/koha-tmpl/intranet-tmpl/prog/en/xslt/MARC21slim2intranetDetail.xsl +++ a/koha-tmpl/intranet-tmpl/prog/en/xslt/MARC21slim2intranetDetail.xsl @@ -91,7 +91,8 @@ - + + - Suppressed in OPAC --- a/koha-tmpl/intranet-tmpl/prog/en/xslt/MARC21slim2intranetResults.xsl +++ a/koha-tmpl/intranet-tmpl/prog/en/xslt/MARC21slim2intranetResults.xsl @@ -282,7 +282,8 @@ - + + - Suppressed in OPAC --