View | Details | Raw Unified | Return to bug 17232
Collapse All | Expand All

(-)a/admin/marctagstructure.pl (-7 / +6 lines)
Lines 335-347 sub StringSearch { Link Here
335
# the sub used to duplicate a framework from an existing one in MARC parameters tables.
335
# the sub used to duplicate a framework from an existing one in MARC parameters tables.
336
#
336
#
337
sub duplicate_framework {
337
sub duplicate_framework {
338
	my ($newframeworkcode,$oldframeworkcode) = @_;
338
    my ($newframeworkcode,$oldframeworkcode) = @_;
339
	my $dbh = C4::Context->dbh;
339
    my $dbh = C4::Context->dbh;
340
    $dbh->do(q|INSERT INTO marc_tag_structure (tagfield, liblibrarian, libopac, repeatable, mandatory, authorised_value, ind1_defaultvalue, ind2_defaultvalue, frameworkcode)
340
    $dbh->do(q|INSERT INTO marc_tag_structure (tagfield, liblibrarian, libopac, repeatable, mandatory, important, authorised_value, ind1_defaultvalue, ind2_defaultvalue, frameworkcode)
341
        SELECT tagfield,liblibrarian,libopac,repeatable,mandatory,authorised_value, ind1_defaultvalue, ind2_defaultvalue, ? from marc_tag_structure where frameworkcode=?|, undef, $newframeworkcode, $oldframeworkcode );
341
        SELECT tagfield,liblibrarian,libopac,repeatable,mandatory,important,authorised_value, ind1_defaultvalue, ind2_defaultvalue, ? from marc_tag_structure where frameworkcode=?|, undef, $newframeworkcode, $oldframeworkcode );
342
342
343
    $dbh->do(q|INSERT INTO marc_subfield_structure (frameworkcode,tagfield,tagsubfield,liblibrarian,libopac,repeatable,mandatory,kohafield,tab,authorised_value,authtypecode,value_builder,seealso,hidden)
343
    $dbh->do(q|INSERT INTO marc_subfield_structure (frameworkcode,tagfield,tagsubfield,liblibrarian,libopac,repeatable,mandatory,important,kohafield,tab,authorised_value,authtypecode,value_builder,isurl,seealso,hidden,link,defaultvalue,maxlength)
344
        SELECT ?,tagfield,tagsubfield,liblibrarian,libopac,repeatable,mandatory,kohafield,tab,authorised_value,authtypecode,value_builder,seealso,hidden from marc_subfield_structure where frameworkcode=?
344
        SELECT ?,tagfield,tagsubfield,liblibrarian,libopac,repeatable,mandatory,important,kohafield,tab,authorised_value,authtypecode,value_builder,isurl,seealso,hidden,link,defaultvalue,maxlength from marc_subfield_structure where frameworkcode=?
345
    |, undef, $newframeworkcode, $oldframeworkcode );
345
    |, undef, $newframeworkcode, $oldframeworkcode );
346
}
346
}
347
347
348
- 

Return to bug 17232