Список полей таблиц на базе конкретного EDT

[ddadream]

типа может так?

static void LookPropertiesInTables1(Args _args)
{
    TreeNode    tablesRoot;
    TreeNode    newTable, newField;
    AOTTableFieldList   newTableFields;
    TreeNode    tableField;
    int         edtPos;
    str         properties;
    str         tablename;
    UtilIdElements  UtilIdElements;

;
    tablesRoot = TreeNode::findNode("\\Data Dictionary\\Tables");

    newTable = tablesRoot.AOTfirstChild();
    while (newTable)
    {

        newField = newTable.AOTfindChild("Fields");
        newField = newField.AOTfirstChild();
        while (newField)
        {
            properties = newField.AOTgetProperties();
            edtPos = strlen(properties);

            if(strscan(properties, "tableId",1,strlen(properties)))
            {
                print newTable.treeNodeName();
            }
            newField = newField.AOTnextSibling();
        }
        newTable = newTable.AOTnextSibling();
    }
}