static void listEDTWithoutHelpText(Args _args)
{
#TreeNodeSysNodeType
TreeNode edtNode = TreeNode::findNode("Data Dictionary\\Extended Data Types");
TreeNodeIterator ir = edtNode.AOTiterator();
TreeNode childNode;
str label;
;
if (ir)
{
childNode = ir.next();
while (childnode)
{
label = childNode.AOTgetProperty("label");
if (label && !childNode.AOTgetProperty("extends")
&& (!strStartsWith(label, "@SYS") // Modify this stuff yourself!
&& !strStartsWith(label, "@SYP") // Modify
&& !strStartsWith(label, "@ESP")) // Modify
&& !childNode.AOTgetProperty("HelpText"))
{
info(strfmt("EDT :%1, %2", childNode.AOTname(), childNode.AOTgetProperty("label")));
}
childNode = ir.next();
}
}
}
{
#TreeNodeSysNodeType
TreeNode edtNode = TreeNode::findNode("Data Dictionary\\Extended Data Types");
TreeNodeIterator ir = edtNode.AOTiterator();
TreeNode childNode;
str label;
;
if (ir)
{
childNode = ir.next();
while (childnode)
{
label = childNode.AOTgetProperty("label");
if (label && !childNode.AOTgetProperty("extends")
&& (!strStartsWith(label, "@SYS") // Modify this stuff yourself!
&& !strStartsWith(label, "@SYP") // Modify
&& !strStartsWith(label, "@ESP")) // Modify
&& !childNode.AOTgetProperty("HelpText"))
{
info(strfmt("EDT :%1, %2", childNode.AOTname(), childNode.AOTgetProperty("label")));
}
childNode = ir.next();
}
}
}
No comments:
Post a Comment