my $xx = $db[$vars{_recNo}]{'name'};
$xx = 0;