EsbOtlGenerateCurrencyOutline

Description

EsbOtlGenerateCurrencyOutline() generates a currency outline based on the existing outline.

Syntax

EsbOtlGenerateCurrencyOutline (hOutline, phCurOutline)
ByVal hOutline     As Long
      phCurOutline As Long

Parameters

hOutline Outline contexthandle.
phCurOutlineReturn variable for the currency outline handle.

Return Value

Returns 0 if successful; otherwise one of the following:

OTLAPI_ERR_ALREADYCURRENCY
OTLAPI_CUR_NOACCOUNTS
OTLAPI_CUR_NOTIME
OTLAPI_CUR_NOCOUNTRY

Notes

Example

Declare Function EsbOtlGenerateCurrencyOutline Lib 
"ESBOTLW" (ByVal hOutline As Long, 
phCurOutline As Long) As Long

Sub ESB_OtlGenerateCurrencyOutline()
Dim sts As Long
Dim Object As ESB_OBJDEF_T
Dim hOutline As Long
Dim hCurOutline As Long

Object.hCtx = hCtx
Object.Type = ESB_OBJTYPE_OUTLINE
Object.AppName = "Sample"
Object.DbName = "Interntl"
Object.FileName = " Interntl "

sts = EsbOtlOpenOutline(hCtx, Object, 
ESB_YES, ESB_YES, hOutline)

If sts = 0 Then
   sts = EsbOtlGenerateCurrencyOutline
    (hOutline, hCurOutline)
End If
End Sub

See Also

EsbOtlOpenOutline()
EsbOtlWriteOutline()
EsbOtlRestructure()