* get WC series group
SELECT SINGLE WERKSFROM CRHD
INTO LV_WERKS
WHERE OBJTY = LV_SGTP
AND OBJID = LV_SGID.
* get object type and id of hierarchy
SELECT OBJTY
OBJID
FROM CRHH
INTO (LV_OBJTY, LV_OBJID)
WHERE WERKS = LV_WERKS
AND NAME = Hierarchy Name.
EXIT.
ENDSELECT.
CALL FUNCTION 'CR_HIERARCHY_DISOLVE'
EXPORTING
LEVELS = 2
OBJID_HO = LV_SGID
OBJID_HY = LV_OBJID
OBJTY_HO = LV_SGTP
TABLES
T_STRUC = ITAB
EXCEPTIONS
HIERARCHY_NOT_FOUND = 1
OBJECT_NOT_IN_HIERARCHY = 2
OTHERS = 3.