if ($ff1) {my @a_ff1 =  &GetRow("$ff1")};

   
sub GetRow {
my ($set) = $_[0];

     my $sth = $dbh->prepare("SELECT `filter_partnumber`,`filter_fram`,`filter_fleetguard`,`filter_notes` FROM `filter_desc` WHERE `filter_id` = $set ") or die $DBI::errstr;
          $sth->execute() or die $DBI::errstr;
          my @ary = $sth->fetchrow_array();
          $sth->finish;
       return @ary;
}