EsbOtlGetParent

Returns the parent of a member.

Syntax

EsbOtlGetParent (hOutline, hMember, phMember)
ByVal hOutline As Long
ByVal hMember  As Long
      phMember As Long

Parameter	Description
hOutline	Outline context handle.
hMember	Handle of member to retrieve the parent of.
phMember	Return variable for the member handle of the parent of the hMember parameter.

Notes

If there is no parent, phMember is set to ESB_NULL and the call returns 0. (hMember is a dimension.)

Return Value

Returns 0 if successful.

Example

Declare Function EsbOtlGetParent Lib
"ESBOTLN" (ByVal hOutline As Long, ByVal hMember As Long,
phMember As Long) As Long

Sub ESB_OtlGetParent()
Dim sts As Long
Dim Object As ESB_OBJDEF_T
Dim hOutline As Long
Dim hMemberProfit As Long
Dim hParent As Long
Object.hCtx = hCtx
Object.Type = ESB_OBJTYPE_OUTLINE
Object.AppName = "Sample"
Object.DbName = "Basic"
Object.FileName = "Basic"
sts = EsbOtlOpenOutline(hCtx, Object, 
ESB_YES, ESB_YES, hOutline)
If sts = 0 Then
   sts = EsbOtlFindMember(hOutline, "Profit",
    hMemberProfit) 
End If
If sts = 0 And hMemberProfit <> 0 Then
   sts = EsbOtlGetParent(hOutline, hMemberProfit, 
    hParent)
End If
End Sub