Старатель (Все сообщения пользователя)

local info = getDataSourceInfo()
if info.sec_code == sec and info.class_code == class then AddLabel(...) end

Settings = {
  Name = 'ParamRequest',
  line = {
    { Name = 'ParamRequest' }
  }
}

function Init()
  return #Settings.line
end

local class_code, sec_code
function OnChangeSettings()
  OnDestroy()
  local DSI = getDataSourceInfo()
  class_code = DSI.class_code
  sec_code = DSI.sec_code
  PrintDbgStr(tostring(sec_code))
  ParamRequest(class_code, sec_code, 'LAST')
end

function OnCalculate(index)
  if index == 1 then
    ParamRequest(class_code, sec_code, 'LAST')
  end
  return nil
end

function OnDestroy()
  if sec_code then
    CancelParamRequest(class_code, sec_code, 'LAST')
  end
end

local Labels = {}
function OnCalculate(index)
  if index == 1 then
    OnDestroy()
  end
  ...

  local Label = AddLabel(Settings.tag, Param)
  if Label and Label > 0 then
    Labels[#Labels+1] = Label
  end

  ...
end

function OnDestroy()
    for i = 1, #Labels do
      PrintDbgStr('DelLabel(' .. Labels[i] .. '): ' .. tostring(DelLabel(Settings.tag, Labels[i])))
    end
    Labels = {}
end

  local tonumber_ = tonumber
  function tonumber(e, base)
    return tonumber_(e, base) or tonumber_(e, base)
  end

function main()
  xpcall(function()
    ...
    while run do
        ...  --  тут какой-то полезный код
        sleep(1)
        if not tonumber('0') then
          log('tonumber error.')
        end
     end
  end)
end