Bug in TMS.MCP.TOOLS

DEV TMS AI Studio
1

Row 702

      for J := 0 to Prop.ArrayItemProperties.Count - 1 do
      begin
        ItemProp := Prop.ArrayItemProperties[I];       //Bug: I must be J
        ItemPropObj := TJSONObject.Create;
        ItemPropObj.AddPair('type', ItemProp.PropertyType.ToString);

        if ItemProp.Description <> '' then
          ItemPropObj.AddPair('description', ItemProp.Description);

        ItemPropsObj.AddPair(ItemProp.Name, ItemPropObj);

        if ItemProp.Required then
        begin
          ItemRequiredArray.Add(ItemProp.Name);
          HasRequiredItems := True;
        end;
      end;
3

Hi,

Thank you for bringing this to our attention. We have applied a fix for this, and this will be added in the next version of TMS AI Studio.

With kind regards