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 |
- |
|
|