Вот такая заготовка поможет?
PHP код:
static void subClasses(Args _args)
{
str space;
void findChildrens(ClassId _classId)
{
DictClass dc = new DictClass(_classId);
List childrens = dc.extendedBy(); // в список заносятся все потомки класса
ListIterator li = new ListIterator(childrens);
;
print space, classid2name(_classId);
// пробежимся по списку
while (li.more())
{
space += ' ';
findChildrens(li.value());
space = strdel(space, 1, 2);
li.next();
}
}
;
findChildrens(classnum(JournalTransData));
pause;
}