Lianja

Call a JavaScript Function Returning a Boolean

See more JavaScript Examples

Demonstrates how to call a JavaScript function that returns a boolean. Lianja

llSuccess = .F.

// This is the JavaScript function we'll call:

// function isEven(number) {
//     return number % 2 === 0;
// }

loSbScript = createobject("CkStringBuilder")
loSbScript.Append("function isEven(number) { return number % 2 === 0; }")

loJs = createobject("CkJs")

loResult = createobject("CkJsonObject")
loResult.EmitCompact = .F.

// Call Eval to add the function to the context's global object
llSuccess = loJs.Eval(loSbScript,loResult)
if (llSuccess = .F.) then
    // Examine the result for an exception.
    ? loResult.Emit()

    // Also examine the LastErrorText.
    ? loJs.LastErrorText
    release loSbScript
    release loJs
    release loResult
    return
endif

// ------------------------------------------------------------------------------
// Call the function isEven(8)

loFuncCall = createobject("CkJsonObject")

// Create JSON specifying the function name and arguments

// {
//   "name": "isEven",
//   "args": [ 8 ]
// }

loFuncCall.UpdateString("name","isEven")
loFuncCall.UpdateInt("args[0]",8)

llSuccess = loJs.CallFunction(loFuncCall,loResult)
if (llSuccess = .F.) then
    // Examine the result for an exception.
    ? loResult.Emit()

    // Also examine the LastErrorText.
    ? loJs.LastErrorText
    release loSbScript
    release loJs
    release loResult
    release loFuncCall
    return
endif

? loResult.Emit()

// Output:
// {
//   "type": "bool",
//   "value": true
// }

llRetval = loResult.BoolOf("value")
? str(llRetval)

// Output:
// .T.


release loSbScript
release loJs
release loResult
release loFuncCall