Lines 224-231
if ($op eq 'add_form') {
Link Here
|
224 |
my $id = $input->param('id'); |
224 |
my $id = $input->param('id'); |
225 |
my $sth=$dbh->prepare("delete from authorised_values where id=?"); |
225 |
my $sth=$dbh->prepare("delete from authorised_values where id=?"); |
226 |
$sth->execute($id); |
226 |
$sth->execute($id); |
227 |
$sth = $dbh->prepare("DELETE FROM authorised_values_branches WHERE id = ?"); |
|
|
228 |
$sth->execute($id); |
229 |
print "Content-Type: text/html\n\n<META HTTP-EQUIV=Refresh CONTENT=\"0; URL=authorised_values.pl?searchfield=$searchfield&offset=$offset\"></html>"; |
227 |
print "Content-Type: text/html\n\n<META HTTP-EQUIV=Refresh CONTENT=\"0; URL=authorised_values.pl?searchfield=$searchfield&offset=$offset\"></html>"; |
230 |
exit; |
228 |
exit; |
231 |
# END $OP eq DELETE_CONFIRMED |
229 |
# END $OP eq DELETE_CONFIRMED |
232 |
- |
|
|