gitea
/
Koha-clms
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Bug 14766: Complete cataloguing plugin unimarc_field_4XX 

Add subfields l, n and o for better UNIMARC compliance

Signed-off-by: Chris Cormack <chrisc@catalyst.net.nz>

Note: I just did a code audit here, as I don't know enough about
UNIMARC to know if the 4XX fields should have these subfields.

Signed-off-by: Jonathan Druart <jonathan.druart@bugs.koha-community.org>
Signed-off-by: Tomas Cohen Arazi <tomascohen@theke.io>
(cherry picked from commit 503dd60369)
Signed-off-by: Chris Cormack <chris@bigballofwax.co.nz>
(cherry picked from commit 84ee44110a)
Signed-off-by: Liz Rea <wizzyrea@gmail.com>
This commit is contained in:
Paul Poulain 2015-08-26 10:54:30 +02:00 committed by Mason James
parent beb77b06bd
commit efa0ff2943
2 changed files with 27 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

18
cataloguing/value_builder/unimarc_field_4XX.pl
View File

@ -254,6 +254,18 @@ sub plugin {
$subfield_value_i = $marcrecord->field('500')->subfield("i");
}
my $subfield_value_l;
$subfield_value_l = $marcrecord->field('200')->subfield("d")
if ( $marcrecord->field('200') );
my $subfield_value_n;
$subfield_value_n = $marcrecord->field('210')->subfield("c")
if ( $marcrecord->field('210') );
my $subfield_value_o;
$subfield_value_o = $marcrecord->field('200')->subfield("e")
if ( $marcrecord->field('200') );
my $subfield_value_p;
$subfield_value_p = $marcrecord->field('215')->subfield("a")
if ( $marcrecord->field('215') );
@ -314,6 +326,9 @@ sub plugin {
$subfield_value_e =~ s/'/\\'/g;
$subfield_value_h =~ s/'/\\'/g;
$subfield_value_i =~ s/'/\\'/g;
$subfield_value_l =~ s/'/\\'/g;
$subfield_value_n =~ s/'/\\'/g;
$subfield_value_o =~ s/'/\\'/g;
$subfield_value_p =~ s/'/\\'/g;
$subfield_value_t =~ s/'/\\'/g;
$subfield_value_u =~ s/'/\\'/g;
@ -332,6 +347,9 @@ sub plugin {
subfield_value_e => "$subfield_value_e",
subfield_value_h => "$subfield_value_h",
subfield_value_i => "$subfield_value_i",
subfield_value_l => "$subfield_value_l",
subfield_value_n => "$subfield_value_n",
subfield_value_o => "$subfield_value_o",
subfield_value_p => "$subfield_value_p",
subfield_value_t => "$subfield_value_t",
subfield_value_u => "$subfield_value_u",

9
koha-tmpl/intranet-tmpl/prog/en/modules/cataloguing/value_builder/unimarc_field_4XX.tt
View File

@ -48,6 +48,15 @@
if(code.value == 'i'){
subfield.value = "[% subfield_value_i %]";
}
if(code.value == 'l'){
subfield.value = "[% subfield_value_l %]";
}
if(code.value == 'n'){
subfield.value = "[% subfield_value_n %]";
}
if(code.value == 'o'){
subfield.value = "[% subfield_value_o %]";
}
if(code.value == 'p'){
subfield.value = "[% subfield_value_p %]";
}