EsbDefaultCalc

Executes the default calculation for the active database.

Syntax

EsbDefaultCalc (hCtx)
ByVal hCtx As Long
ParameterDescription

hCtx

VB API context handle.

Notes

Return Value

None.

Access

This function requires the caller to have calc privilege (ESB_PRIV_CALC) to the active database.

Example

Declare Function EsbDefaultCalc Lib "ESBAPIN" (ByVal hCtx As Long) As Long

Sub ESB_DefaultCalc ()
   Dim sts As Long
   Dim ProcState As ESB_PROCSTATE_T   '************************
   ' Run default calc script
   '************************
   sts = EsbDefaultCalc (hCtx)   '************************************
   ' Check process state till it is done 
   '************************************
   sts = EsbGetProcessState (hCtx, ProcState)
    Do Until ProcState.State = ESB_STATE_DONE 
      sts = EsbGetProcessState (hCtx, ProcState)
   Loop 
End Sub

See Also