my $sql = 'SELECT count(*) FROM products WHERE nr = ?';
my ($dbh,$sth) = IS4_SQL_execute($sql,$nr);
while (my @data = $sth->fetchrow_array()) {
  $count = $data[0];
}
$sth->finish;
$dbh->disconnect;