[Ruff]

Вот такая заготовка поможет?

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;
}