# acc_trans entries are deleted by database triggers.
my $query = qq|DELETE FROM ar WHERE id = ?|;
do_query($form, SL::DB->client->dbh, $query, $form->{id});
# acc_trans entries are deleted by database triggers.
my $query = qq|DELETE FROM ar WHERE id = ?|;
do_query($form, SL::DB->client->dbh, $query, $form->{id});