sub generic_id_fetch {
   my ($table,$id,@field) = @_;
   my $field = @field ? join(',',@field) : '*';
   $dbh->selectrow_hashref("select $field from $table where id=?",undef,$id);
}