Retrieving the package of a package elemen

[beginner]

Assume I had retrieved the element of a package. How can I retrieve the package of this element (the one where I picked it)?

Here's a sample code:
my $p = $rep->GetTreeSelectedObject();
my $pe = $p->Element;
my $pep = $rep->GetPackageById ($pe->PackageID);
$rep->log ("package of " . $p->Name . " is " . $pep->Name);

When I run that script EA returns the parent element of the according package and NOT the package itself.

Either I'm doing something completely wrong (it's quite hot here) or this is bug or someone has a good explanation. Who can help?

b.

[Frank Horn]

$pe->PackageID returns the ID of the package containing $pe, so you get the parent package allright.

Maybe you want

my $pep = $rep->GetPackageById ($pe->ElementID);

(provided $pe->ElementID == $p->PackageID)

[beginner]

Not so. A package contains an element ($p->Element) and I would assume that $p->Element->PackageID == $p->PackageID. But it seems to be $p->ParentID.

And: GetPackageById needs a PackageID, not an ElementID. So

my $pep = $rep->GetPackageById ($pe->ElementID);

would not work.

b.

[Frank Horn]

OK, so a package has 2 IDs, an ElementID and a PackageID, both of the same type, but not equal?

In that case, I wouldn't know how to get the package object  if you have an element which you know represents a package. Except for looping through all the packages within the parent package's packages collection...

[beginner]

Looping is what I currently do to get around that bug. If there's no other opinion and I haven't found myself being wrong tomorrow I'll report a bug.

b.

[Eve]

The package id is available in Element.MiscData(0).

[Paolo F Cantoni]

The package id is available in Element.MiscData(0).

Just to be clear Simon, you're saying that the Package_ID of the package that corresponds to the package element you are looking at is held in Element.MiscData(0).  The Package_ID of the containing package is in the Element.Package_ID and that (as a consequence) the Element.Parent_ID is 0.

Just as an aside, the ea_guid of both the Package and the Element is the same.

Paolo

[Eve]

package.Element.MiscData(0) = package.PackageID
package.Element.PackageID = package.ParentID
package.Element.ParentID = 0
package.Element.ElementGUID will usually equal package.PackageGUID but this isn't required, I have seen this not be true in models predating my time at Sparx Systems.

[Paolo F Cantoni]

...package.PackageGUID but this isn't required, I have seen this not be true in models predating my time at Sparx Systems.

Thanks Simon,

I, too, have seen them not to be equal in some very old models (no longer in use) - and put it down to a bug.  However, not for the last many years.  I suspect (without proof) that the integrity check fixes that up.  It certainly fixes incorrect naming if the two instances: t_package and t_object have different names - so it's obviously joining on the GUID.

Could you confirm if the integrity check rectifies the inconsistent GUIDs?

Paolo

[beginner]

Thanks, Simon.

However. This is inconsistent, and in no way logically. It's EAUI. It will not be rectified. I will not report a bug.

b.