Select Code to Download

sub getParentCategory {
  my ($child) = @_;
  my $res = getDb()->selectrow_arrayref("SELECT parent FROM categories
+ WHERE id=$child");
  return $res ? $res->[0] : undef;
}