List of AX Tables /Tables fields in dynamics AX through job

static void findTablesinAX(Args _args)
{
    Dictionary      dictionary;
    TableId         tableId;
    tableName       tableName;
    ;

    dictionary = new Dictionary();

    tableId = dictionary.tableNext(0);
    tableName = dictionary.tableName(tableId);

    while (tableId)
    {
        info(strfmt("%1 - %2",int2str(tableId), tableName));

        tableId = dictionary.tableNext(tableId);
        tableName = dictionary.tableName(tableId);
    }
}

static void FindTableFields(Args _args)
 {

TreeNode node = TreeNode::findNode(@'\Data dictionary\Tables\CustTable\Fields');
TreeNode childNode;
TreeNodeIterator nodeIT;

                                                       tab
nodeIt = node.AOTiterator();

childNode = nodeIt.next();

while(childNode)
{
    info(strfmt("PBATable %1", childNode.treeNodeName()));
    childNode = nodeIt.next();
}
}