# EsbOtlCloseOutline

Description

EsbOtlCloseOutline() frees all information associated with the outline.

Syntax

    EsbOtlCloseOutline (hOutline)

    ByVal hOutline As Long

Parameters

hOutline | Outline context handle.

Return Value

Returns 0 if successful.

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.

Example

    Declare Function EsbOtlCloseOutline Lib
    "ESBOTLW" (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 = EsbOtlWriteOutline(hOutline, Object)
    End If

    'restructure outline using EsbOtlRestructure()

    If sts = 0 Then
       sts = EsbOtlCloseOutline(hOutline)
    End If
    End Sub

See Also

EsbOtlOpenOutline()
EsbOtlWriteOutline()
EsbOtlRestructure()