EsbOtlMoveMember() moves a member.
EsbOtlMoveMember (hOutline, hMember, hNewParent, hNewPrevSibling)
ByVal hOutline As Long ByVal hMember As Long ByVal hNewParent As Long ByVal hNewPrevSibling As Long
hOutline | Outline context handle. |
hMember | Handle of member to move. |
hNewParent | Handle of new parent. This field is only used if the hNewPrevSibling field is ESB_NULL. |
hNewPrevSibling | Handle of new previous sibling. |
Returns 0 if successful; otherwise:
OTLAPI_BAD_MOVE
Declare Function EsbOtlMoveMember Lib "ESBOTLW" (ByVal hOutline As Long, ByVal hMember As Long, ByVal hNewParent As Long, ByVal hNewPrevSibling As Long) As Long Sub ESB_OtlMoveMember() Dim sts As Long Dim Object As ESB_OBJDEF_T Dim hOutline As Long Dim hMemberProfit As Long Dim hFQ 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, "First Q", hFQ) End If If sts = 0 Then sts = EsbOtlFindMember(hOutline, "Profit", hMemberProfit) End If If sts = 0 And hFQ And hMemberProfit Then sts = EsbOtlMoveMember(hOutline, hFQ, hMemberProfit, ESB_NULL) End If End Sub
EsbOtlFindMember()
EsbOtlRenameMember()
EsbOtlAddMember()
EsbOtlDeleteMember()