EsbOtlGenerateCurrencyOutline

Generates a currency outline based on the existing outline.

Syntax

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

hOutline

Outline contexthandle.

phCurOutline

Return variable for the currency outline handle.

Notes

Return Value

Returns 0 if successful; otherwise one of the following:

Example

Declare Function EsbOtlGenerateCurrencyOutline Lib 
"ESBOTLN" (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