Get Attribute from Outlinked Module

Bob_Swan - Wed Apr 25 03:07:03 EDT 2012
Your 'assumption' is correct, the dxl needs to id the far module, open it, verify the target object actually exists/is not deleted, then extract the attribute you require. Also throw in any special handling (richtext/ole objects) you may need.

Look in the dxl examples, especially the 'Example of Trace Analysis' file for some pointers.

(Or get the 'Requirements Management Add on' that has a lot of the functionality you are looking for already.)

SystemAdmin - Wed Apr 25 12:29:10 EDT 2012

Hi,

Thanks for the replies. I tried something else and it worked, but Im not sure if its a foolproof solution. Please see below.
 

for o in m do {
    col = 0
        row ++    
    
   for l in o -> "*" do {
 
        string temp2 = sTargetPath
        sTargetPath = sTargetPath fullName(target l) 
        
        ModuleVersion targetVer = targetVersion(l)
        
        
        if(exists(module targetVer)){
        
        //      if (null data(targetVer)) 
        //      {     
        //              Module m2 = load(targetVer, false)
        //      }
        // Works without this condition, but I thought I had to load this module????
 
                targetObj = target l
                
                
                if (probeAttr_(targetObj,"Attr2") != "")
                {
                        s1 = targetObj."Attr2"
                }
                else
                {
                        s1 = ""
                }
                
                if (probeAttr_(targetObj,"Attr3") != "")
                {
                        s2 = targetObj."Attr3"
                }
                else
                {
                        s2 = ""
                }            
        
                if (targetObj != null)
                {
                        sTargetPath = sTargetPath (NLS_(" ")) identifier (targetObj) (NLS_(" ")) s1 (NLS_(" ")) s2 (NLS_("\n"))
                }
        
                if (temp2 != sTargetPath) 
                {
                        setCell(row, outlink, sTargetPath)
                }
   }
        
}

llandale - Wed Apr 25 12:01:41 EDT 2012
For outlinks, you can see all "LinkRef"s which let you get a name of the target module, but you cannot see the target Object. Once you open the target module's, you can use a "Link" loop and then get the

• Objec oTarget = target(lnk)

• A1_Value = probeAttr_(oTarget, "Attr1")
• A2_Value = probeAttr_(oTarget, "Attr2")

SystemAdmin - Wed Apr 25 12:29:10 EDT 2012

Hi,

Thanks for the replies. I tried something else and it worked, but Im not sure if its a foolproof solution. Please see below.
 

for o in m do {
    col = 0
        row ++    
    
   for l in o -> "*" do {
 
        string temp2 = sTargetPath
        sTargetPath = sTargetPath fullName(target l) 
        
        ModuleVersion targetVer = targetVersion(l)
        
        
        if(exists(module targetVer)){
        
        //      if (null data(targetVer)) 
        //      {     
        //              Module m2 = load(targetVer, false)
        //      }
        // Works without this condition, but I thought I had to load this module????
 
                targetObj = target l
                
                
                if (probeAttr_(targetObj,"Attr2") != "")
                {
                        s1 = targetObj."Attr2"
                }
                else
                {
                        s1 = ""
                }
                
                if (probeAttr_(targetObj,"Attr3") != "")
                {
                        s2 = targetObj."Attr3"
                }
                else
                {
                        s2 = ""
                }            
        
                if (targetObj != null)
                {
                        sTargetPath = sTargetPath (NLS_(" ")) identifier (targetObj) (NLS_(" ")) s1 (NLS_(" ")) s2 (NLS_("\n"))
                }
        
                if (temp2 != sTargetPath) 
                {
                        setCell(row, outlink, sTargetPath)
                }
   }
        
}

llandale - Wed Apr 25 14:15:09 EDT 2012

If the other module is already loaded then the code will work. Note that it can be loaded invisibly; look at "Tools menu >Manage Open Modules...".

Its difficult to manage the "other" modules you've opened invisibly due to links, most folks just leave them open and don't worry about it.

Your "sTargetPath" stuff looks wrong as you keep appending paths and identifiers to the same string; so 3 links will result in a huge string.

Your "setCell" algorithm doesn't look right; the 10th object in the module will result in "row" being 10. If you only want to check table cells in your module, you can do this:

for o in m do
{  if (!table(o)) continue    // Ignore all objects except "table" header objects
   row = -1
   for oRow in oTable do
   {  row++
      cell = -1
      for oCell in oRow do
      {  cell++
         set(row, cell, whatever)
      }
   }
}
// or forget about "row" and "cell", just set values for "oCell" directly
// oCell.NameAttr = pathInfo

You can change this:

if (probeAttr_(targetObj,"Attr2") != "")
{
    s1 = targetObj."Attr2"
}
else
{
        s1 = ""
}

To just this:

• s1 = probeAttr_(targetObj,"Attr2")

Someone needs to explain why "NLS" is needed; I doubt a single space is different in the different locality languages.

-Louie

llandale - Wed Apr 25 14:15:09 EDT 2012

If the other module is already loaded then the code will work. Note that it can be loaded invisibly; look at "Tools menu >Manage Open Modules...".

Its difficult to manage the "other" modules you've opened invisibly due to links, most folks just leave them open and don't worry about it.

Your "sTargetPath" stuff looks wrong as you keep appending paths and identifiers to the same string; so 3 links will result in a huge string.

Your "setCell" algorithm doesn't look right; the 10th object in the module will result in "row" being 10. If you only want to check table cells in your module, you can do this:

for o in m do
{  if (!table(o)) continue    // Ignore all objects except "table" header objects
   row = -1
   for oRow in oTable do
   {  row++
      cell = -1
      for oCell in oRow do
      {  cell++
         set(row, cell, whatever)
      }
   }
}
// or forget about "row" and "cell", just set values for "oCell" directly
// oCell.NameAttr = pathInfo

You can change this:

if (probeAttr_(targetObj,"Attr2") != "")
{
    s1 = targetObj."Attr2"
}
else
{
        s1 = ""
}

To just this:

• s1 = probeAttr_(targetObj,"Attr2")

Someone needs to explain why "NLS" is needed; I doubt a single space is different in the different locality languages.

-Louie