select description, image, org, level from category
connect by parent = prior id
where id = '$id'
####
(@fer) = find_all_categories();
sub find_all_categories {
$id = shift;
if($id) {
$sthm = $dbh->prepare_cached("SELECT * FROM category WHERE id=?");
$sthm->execute($id) or die $dbh->errstr;
} else {
$sthm = $dbh->prepare("SELECT * FROM category");
$sthm->execute or die $dbh->errstr;
}
while (@hi = $sthm->fetchrow_array) {
if($hi[2] eq "0") {
push(@env, @hi[0])
} else {
$a = find_all_categories($slog[0]);
$i += $hi[3];
$i + $a;
}
}
push(@env,$i);
return(@env);
}
####
# Under Construction