EsbOtlCloseOutline

Description

EsbOtlCloseOutline() frees all information associated with the outline.

Syntax

EsbOtlCloseOutline (hOutline)
ByVal hOutline As Long

Parameters

hOutlineOutline context handle.

Return Value

Returns 0 if successful.

Notes

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()