getTableProperty

static void getTableProperty(Args _args)

{

/*

    Author      :       Harish Mohanbabu

    Date        :       April 16, 2007

    Purpose     :       To obtain table properties

*/

    #AOT

    str             Property;

    TreeNode        TreeNode;

    identifiername  identifiername;

    str             Name;

    ;

    TreeNode    = TreeNode::findNode(#TablesPath);

    TreeNode    = TreeNode.AOTfirstChild();

    while (TreeNode)

        {

            Name = TreeNode.AOTname();

            Property       = TreeNode.AOTgetProperties();

            identifiername = findproperty(Property, 'SecurityKey');

            info (strfmt("%1, %2", Name, identifiername));

            treenode = TreeNode.AOTnextSibling();

        }

}