Lines 388-394
if ($op eq 'add_form') {
Link Here
|
388 |
# my $sth=$dbh->prepare("replace auth_subfield_structure (authtypecode,tagfield,tagsubfield,liblibrarian,libopac,repeatable,mandatory,kohafield,tab,seealso,authorised_value,frameworkcode,value_builder,hidden,isurl) |
388 |
# my $sth=$dbh->prepare("replace auth_subfield_structure (authtypecode,tagfield,tagsubfield,liblibrarian,libopac,repeatable,mandatory,kohafield,tab,seealso,authorised_value,frameworkcode,value_builder,hidden,isurl) |
389 |
# values (?,?,?,?,?,?,?,?,?,?,?,?,?,?,?)"); |
389 |
# values (?,?,?,?,?,?,?,?,?,?,?,?,?,?,?)"); |
390 |
my $sth_insert = $dbh->prepare("insert into auth_subfield_structure (authtypecode,tagfield,tagsubfield,liblibrarian,libopac,repeatable,mandatory,kohafield,tab,seealso,authorised_value,frameworkcode,value_builder,hidden,isurl,defaultvalue) |
390 |
my $sth_insert = $dbh->prepare("insert into auth_subfield_structure (authtypecode,tagfield,tagsubfield,liblibrarian,libopac,repeatable,mandatory,kohafield,tab,seealso,authorised_value,frameworkcode,value_builder,hidden,isurl,defaultvalue) |
391 |
values (?,?,?,?,?,?,?,?,?,?,?,?,?,?,?)"); |
391 |
values (?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?)"); |
392 |
my $sth_update = $dbh->prepare("update auth_subfield_structure set authtypecode=?, tagfield=?, tagsubfield=?, liblibrarian=?, libopac=?, repeatable=?, mandatory=?, kohafield=?, tab=?, seealso=?, authorised_value=?, frameworkcode=?, value_builder=?, hidden=?, isurl=?, defaultvalue=? |
392 |
my $sth_update = $dbh->prepare("update auth_subfield_structure set authtypecode=?, tagfield=?, tagsubfield=?, liblibrarian=?, libopac=?, repeatable=?, mandatory=?, kohafield=?, tab=?, seealso=?, authorised_value=?, frameworkcode=?, value_builder=?, hidden=?, isurl=?, defaultvalue=? |
393 |
where authtypecode=? and tagfield=? and tagsubfield=?"); |
393 |
where authtypecode=? and tagfield=? and tagsubfield=?"); |
394 |
my @tagsubfield = $input->param('tagsubfield'); |
394 |
my @tagsubfield = $input->param('tagsubfield'); |
395 |
- |
|
|