Frees all information associated with the outline.
Syntax
EsbOtlCloseOutline (hOutline) ByVal hOutline As Long
Parameter | Description |
---|---|
hOutline | Outline context handle. |
Notes
This function should always be called if EsbOtlNewOutline() or EsbOtlOpenOutline() is called.
If the object was locked when it was opened, you should call EsbUnlockObject() before making this call.
Return Value
Returns 0 if successful.
Example
Declare Function EsbOtlCloseOutline Lib "ESBOTLN" (ByVal hOutline As Long) As Long Sub ESB_OtlCloseOutline() Dim sts As Long Dim Object As ESB_OBJDEF_T Dim hOutline 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) 'body of code... If sts = 0 Then sts = ESBOTLNriteOutline(hOutline, Object) End If 'restructure outline using EsbOtlRestructure() If sts = 0 Then sts = EsbOtlCloseOutline(hOutline) End If End Sub
See Also