- $template->param(rate => $data->{'rate'},
- total => $total);
- # END $OP eq DELETE_CONFIRM
-################## DELETE_CONFIRMED ##################################
-# called by delete_confirm, used to effectively confirm deletion of data in DB
-} elsif ($op eq 'delete_confirmed') {
- $template->param(delete_confirmed => 1);
- my $sth=$dbh->prepare("delete from currency where currency=?");
- $sth->execute($searchfield);
- # END $OP eq DELETE_CONFIRMED
-################## DEFAULT ##################################
-} else { # DEFAULT
- $template->param(else => 1);
-
- my $results = StringSearch($searchfield);
- my $count = scalar(@$results);
- my @loop;
- my $activecurrency;
- for (my $i=$offset; $i < ($offset+$pagesize<$count?$offset+$pagesize:$count); $i++){
- # warn Data::Dumper::Dumper($results->[$i]);
- if($results->[$i]{'active'} == 1){ $activecurrency = 1; }
- push @loop, {
- currency => $results->[$i]{'currency'},
- rate => $results->[$i]{'rate'},
- symbol => $results->[$i]{'symbol'},
- timestamp => format_date($results->[$i]{'timestamp'}),
- active => $results->[$i]{'active'},
- };
+ $template->param( delete_confirm => 1 );
+ my $total_row = $dbh->selectrow_hashref(
+ 'select count(*) as total from aqbooksellers where currency=?',
+ {}, $curr );
+
+ my $curr_ref = $dbh->selectrow_hashref(
+ 'select currency,rate from currency where currency=?',
+ {}, $curr );
+
+ if ( $total_row->{total} ) {
+ $template->param( totalgtzero => 1 );