Ошибка несоответствия типа для массива

[AliakseiDanilchyk]

gedemin.exe v 2.9.5.11993 от 05.10.2023
База общепита.
Исследователь - Общепит - 01. Складской учет - 01. Накладная на получение товара
При добавлении позиции в документ возникает ошибка:

Ошибка выполнения Microsoft VBScript
скрипт-функция inv_socRound: 
Несоответствие типа: 'Res', строка: 10

Ошибка возникает в этом скрипте на строке if:

  dim Res(), RoundValue, tmpValue, Rounded
  call gdcBaseManager.ExecSingleQueryResult("select coalesce(USR$INV_SOCGROUP, 0) from gd_good g " & _
    " join gd_goodgroup gr ON g.groupkey = gr.id WHERE g.id = :id", GoodKey, Res, _
    Dataset.ReadTransaction)

  RoundValue = gs.MulDiv(Value, 1, 1, 1, 2)
  if Res(0, 0) = 1 and RoundValue > Value then
    RoundValue = int(Value / 0.01) * 0.01
  end if

  inv_socRound = RoundValue

На старом экзешнике ошибки нет
Путь к базе сброшу.

[yoannawx]

странно, это уже чинили: #4371

[Polfath]

@yoannawx права. Починили. Но потом из гита прилетели изменения, снова поломалось. Вроде как снова починил. @AliakseiDanilchyk @yoannawx проверьте плиз