Package Hierarchy

[Former Member]

Hi All,

How to get Package Hierarchy programmatically in ABAP that output should include parent and child packages relation and corresponding objects.

Is there any standard FM or class methods available?

Regards,

BD

[Former Member]

Hi All,

How to get Package Hierarchy programmatically in ABAP that output should include parent and child packages relation and corresponding objects.

Is there any standard FM or class methods available?

Regards,

BD

[ipravir]

Hi Rao,

You can do query on TADIR table.

Logic could be.

Pass current package into OBJ_NAME = 'PACKAGE_NAME"

                                            OBJECT  ='DEVC" (Package)

                                            PGMID  = "R3TR".

Take DEVCLASS field information.

Again do query in TADIR, condition would be

OBJECT  ='DEVC" (Package)

PGMID  = "R3TR"

DEVCLASS  = dev_class value from above query.

You can try with above logic to get sub-package information.

Regards,

Praveer

[Former Member]

Hi Praveer,

For instance if a package having 10 subpackages in this for each package may have sub packages. I cannot write logic as you said. It should happen dynamically irrespective of no.of packages.

Rao.

[ipravir]

Hi Rao,

Bit change in existing logic.

As you requires Package Hierarchy (last tab of Package).

Fetch DEVCLASS information from TADIR table, pass the same in TDEVC table.

Fetch PARENTCL field information, and pass only PARENTCL as condition in TDEVC table to get all DEVCLASS information.

Again pass in TADIR table with

OBJECT  ='DEVC" (Package)

PGMID  = "R3TR" to get all package information.

For example: VA package.

From TADIR Table

From TDEVC table.

again in TDEVC table.

Pass all DEVCLASS information to TADIR table with

OBJECT  ='DEVC" (Package)

                                            PGMID  = "R3TR".

Hope you are clear with logic.

Regards,

Praveer.,