PowerBuilder

Demonstrates Manual Tool Function Calls

See more AI Examples

Demonstrates how to do manual tool function calling using Chilkat. This is where your application manually checks for function calls in the AI's response, makes the function calls, and returns the function call results to the AI. PowerBuilder

integer li_rc
integer li_Success
oleobject loo_JsonTools
integer li_ToolIdx
oleobject loo_Ai
string ls_Conversation_name
string ls_SysMessage
string ls_DevMessage
oleobject loo_JsonFn
integer li_NumFnCalls
integer li_Fn_idx
oleobject loo_SbFnName
string ls_CallId
string ls_Zodiac_sign
string ls_ApplicationFnCallResult
oleobject loo_SbResponse

li_Success = 0

// Create the following JSON to define tool functions available for the AI to use.
// Note: You'll use the following JSON format regardless of the AI provider, whether
// it be ChatGPT, Gemini, Claude, Grok, etc.  Chilkat automatically converts to the required
// format needed for a given AI provider.

// In this example, the application is providing two functions the AI may choose to call.

// {
//   "tools": [
//     {
//       "name": "get_horoscope",
//       "description": "Get today's horoscope for an astrological sign.",
//       "parameters": {
//         "properties": {
//           "sign": {
//             "type": "string",
//             "description": "An astrological sign like Taurus or Aquarius"
//           }
//         }
//       }
//     },
//     {
//       "name": "get_compatibility",
//       "description": "Returns compatibility analysis between two zodiac signs, including a score and explanation.",
//       "parameters": {
//         "properties": {
//           "sign1": {
//             "type": "string",
//             "description": "The first zodiac sign (e.g., Aries, Taurus, Gemini)."
//           },
//           "sign2": {
//             "type": "string",
//             "description": "The second zodiac sign (e.g., Aries, Taurus, Gemini)."
//           },
//           "relationship_type": {
//             "type": "string",
//             "description": "Type of compatibility to evaluate. (e.g., romantic, friendship, professional, general)"
//           },
//           "detail_level": {
//             "type": "string",
//             "description": "Level of detail in the response. (e.g., short, medium, detailed)"
//           }
//         }
//       }
//     }
//   ]
// }

loo_JsonTools = create oleobject
li_rc = loo_JsonTools.ConnectToNewObject("Chilkat.JsonObject")
if li_rc < 0 then
    destroy loo_JsonTools
    MessageBox("Error","Connecting to COM object failed")
    return
end if

li_ToolIdx = 0

loo_JsonTools.I = li_ToolIdx
loo_JsonTools.UpdateString("tools[i].name","get_horoscope")
loo_JsonTools.UpdateString("tools[i].description","Get today's horoscope for an astrological sign.")
loo_JsonTools.UpdateString("tools[i].parameters.properties.sign.type","string")
loo_JsonTools.UpdateString("tools[i].parameters.properties.sign.description","An astrological sign like Taurus or Aquarius")

li_ToolIdx = li_ToolIdx + 1
loo_JsonTools.I = li_ToolIdx
loo_JsonTools.UpdateString("tools[i].name","get_compatibility")
loo_JsonTools.UpdateString("tools[i].description","Returns compatibility analysis between two zodiac signs, including a score and explanation.")
loo_JsonTools.UpdateString("tools[i].parameters.properties.sign1.type","string")
loo_JsonTools.UpdateString("tools[i].parameters.properties.sign1.description","The first zodiac sign (e.g., Aries, Taurus, Gemini).")
loo_JsonTools.UpdateString("tools[i].parameters.properties.sign2.type","string")
loo_JsonTools.UpdateString("tools[i].parameters.properties.sign2.description","The second zodiac sign (e.g., Aries, Taurus, Gemini).")
loo_JsonTools.UpdateString("tools[i].parameters.properties.relationship_type.type","string")
loo_JsonTools.UpdateString("tools[i].parameters.properties.relationship_type.description","Type of compatibility to evaluate. (e.g., romantic, friendship, professional, general)")
loo_JsonTools.UpdateString("tools[i].parameters.properties.detail_level.type","string")
loo_JsonTools.UpdateString("tools[i].parameters.properties.detail_level.description","Level of detail in the response. (e.g., short, medium, detailed)")

// More tools can be added as desired..

loo_JsonTools.EmitCompact = 0
Write-Debug loo_JsonTools.Emit()

loo_Ai = create oleobject
li_rc = loo_Ai.ConnectToNewObject("Chilkat.Ai")

// Register the tools that will be made available to the AI.
loo_Ai.RegisterManualTools(loo_JsonTools)

// The provider can be "openai", "google", "claude", "grok", "mistral", "custom", etc.
loo_Ai.Provider = "openai"
// Use your provider's API key.
loo_Ai.ApiKey = "MY_API_KEY"
// Choose a model.
loo_Ai.Model = "gpt-5-mini"

// Tool function calling must always occur within a conversation.
ls_Conversation_name = "convo_astrology"
ls_SysMessage = "You are a helpful astrologer"
ls_DevMessage = "Respond only with a horoscope generated by a tool. Use the tool output as the final answer."
loo_Ai.NewConvo(ls_Conversation_name,ls_SysMessage,ls_DevMessage)

// Provide inputs
loo_Ai.InputAddText("What is my horoscope? I am an Aquarius.")

// Send inputs, tool functions, etc. and ask for a "text" response.
li_Success = loo_Ai.Ask("text")
if li_Success = 0 then
    Write-Debug loo_Ai.LastErrorText
    destroy loo_JsonTools
    destroy loo_Ai
    return
end if

// Did the AI respond with requests for tool function calls?
if loo_Ai.HasFunctionCalls = 1 then

    loo_JsonFn = create oleobject
    li_rc = loo_JsonFn.ConnectToNewObject("Chilkat.JsonObject")

    loo_JsonFn.EmitCompact = 0

    loo_Ai.GetFunctionCalls(loo_JsonFn)
    Write-Debug loo_JsonFn.Emit()

    // Note: Chilkat will convert responses from all AI providers to this format:

    // {
    //   "function_call": [
    //     {
    //       "name": "get_horoscope",
    //       "call_id": "call_RYmeysYQFocFc7Z2ofkv61dW",
    //       "arguments": "{\"sign\":\"Aquarius\"}",
    //       "args": {
    //         "sign": "Aquarius"
    //       }
    //     }
    //   ]
    // }

    li_NumFnCalls = loo_JsonFn.SizeOfArray("function_call")
    li_Fn_idx = 0
    do while (li_Fn_idx < li_NumFnCalls)
        loo_JsonFn.I = li_Fn_idx

        loo_SbFnName = create oleobject
        li_rc = loo_SbFnName.ConnectToNewObject("Chilkat.StringBuilder")

        loo_JsonFn.StringOfSb("function_call[i].name",loo_SbFnName)
        ls_CallId = loo_JsonFn.StringOf("function_call[i].call_id")

        if loo_SbFnName.ContentsEqual("get_horoscope",1) = 1 then

            // The get_horoscope function (as defined above) has one argument named "sign".
            ls_Zodiac_sign = loo_JsonFn.StringOf("function_call[i].args.sign")
            Write-Debug "zodiac_sign = " + ls_Zodiac_sign

            // Insert application code here to call your app's get_horoscope function, passing the zodiac_sign to it..

            // For this example, we'll pretend the app's get_horoscope function returned the following:
            ls_ApplicationFnCallResult = "Aquarius: Next Tuesday you will befriend a baby otter."

            // Provide the tool call result as an input for the followup Ask.
            loo_Ai.InputAddFnResult(ls_CallId,ls_ApplicationFnCallResult)
        end if

        // Your application would add code to check for and handle each possible function call.

        li_Fn_idx = li_Fn_idx + 1
    loop

    // After making the requested tool function calls, send the results back to the AI.
    li_Success = loo_Ai.Ask("text")
    if li_Success = 0 then
        Write-Debug loo_Ai.LastErrorText
        destroy loo_JsonTools
        destroy loo_Ai
        destroy loo_JsonFn
        destroy loo_SbFnName
        return
    end if

end if

// Get the final AI response.
loo_SbResponse = create oleobject
li_rc = loo_SbResponse.ConnectToNewObject("Chilkat.StringBuilder")

loo_Ai.GetOutputTextSb(loo_SbResponse)
Write-Debug loo_SbResponse.GetAsString()


destroy loo_JsonTools
destroy loo_Ai
destroy loo_JsonFn
destroy loo_SbFnName
destroy loo_SbResponse