EsbOtlGetPrevSibling() returns the previous sibling of a member.
EsbOtlGetPrevSibling (hOutline, hMember, phMember)
ByVal hOutline As Long ByVal hMember As Long phMember As Long
hOutline | Outline context handle. |
hMember | Handle of member to retrieve the previous sibling of. |
phMember | Return variable for the handle of the previous sibling of the hMember parameter. |
Returns 0 if successful.
Declare Function EsbOtlGetPrevSibling Lib "ESBOTLW" (ByVal hOutline As Long, ByVal hMember As Long, phMember As Long) As Long Sub ESB_OtlGetPrevSibling() Dim sts As Long Dim Object As ESB_OBJDEF_T Dim hOutline As Long Dim hChild As Long Dim hPrevSibling 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", hChild) End If If sts = 0 And hChild <> 0 Then sts = EsbOtlGetPrevSibling(hOutline, hChild, hPrevSibling) End If End Sub
EsbOtlGetNextSibling()
EsbOtlGetParent()
EsbOtlGetChild()
EsbOtlGetFirstMember()