function get_position (sec)

  function fn(t)

      if stop_search then return nil end --stop_search - это флаг. Изначально равен nil

      if t.sec_code == sec and t.client_code==client_code and t.limit_kind==2 then
        stop_search=true      
          return true
      else
          return false
      end

  end

   stop_search=nil --убиваем флаг, выставленный на прежних запусках функции.
   tbl_indxs=SearchItems('depo_limits', 0, getNumberOf("depo_limits")-1, fn)   
   if tbl_indxs then
      limit = getItem("depo_limits", tbl_indxs[1]) --найден 1 индекс, его и берём.
      local lot=lot[sec]--lot[sec] ранее определена
      return limit.currentbal/lot,limit.locked_buy/lot, limit.locked_sell/lot, limit.awg_position_price
   else
      return 0,0,0,0
   end
end

function fn(t)

    if stop_search then return nil end --stop_search - это флаг. Изначально равен nil

    if t.sec_code == paper and t.client_code==client_code and t.limit_kind==2 then
      stop_search=true      
        return true
    else
        return false
    end

end

function get_position (sec)
   paper=sec
   stop_search=nil --убиваем флаг, выставленный на прежних запусках функции.
   tbl_indxs=SearchItems('depo_limits', 0, getNumberOf("depo_limits")-1, fn)   
   if tbl_indxs then
      limit = getItem("depo_limits", tbl_indxs[1]) --найден 1 индекс, его и берём.
      local lot=lot[sec]--lot[sec] ранее определена
      return limit.currentbal/lot,limit.locked_buy/lot, limit.locked_sell/lot, limit.awg_position_price
   else
      return 0,0,0,0
   end
end

function fn(t)
   if stop_search then return nil end --stop_search - это флаг. Изначально равен nil
    if t.sec_code == sec and t.client_code==client_code and t.limit_kind==2 then
      stop_search=true
        return true
    else
        return false
    end
end


function get_position (sec)
   stop_search=nil --убиваем флаг, выставленный на прежних запусках функции.
   tbl_indxs=SearchItems('depo_limits', 0, getNumberOf("depo_limits")-1, fn)
   limit = getItem("depo_limits", tbl_indxs[1]) --найден 1 индекс, его и берём.
   local lot=lot[sec]--lot[sec] ранее определена
   return limit.currentbal/lot,limit.locked_buy/lot, limit.locked_sell/lot, limit.awg_position_price
end

sec='SBER'
client_code='12345'

function main()
  
  function fn(t)
    if t.sec_code == sec and t.client_code==client_code and t.limit_kind==2 then 
        return true
    else
        return false
    end
  end

  --или здесь...
  --sec='SBER'
  --client_code='12345'

  tbl_indxs=SearchItems('depo_limits', 0, getNumberOf("depo_limits")-1, fn)

end

function fn(t)
    if t.sec_code == sec and t.client_code==client_code and t.limit_kind==2 then 
        return true
    else
        return false
    end
end

tbl_indxs=SearchItems('depo_limits', 0, getNumberOf("depo_limits")-1, fn)

function fn (ord_sec_code, ord_flags)
   if table_contains(ticker_list, ord_sec_code) and orderflags2table(ord_flags).active  then
      return true
   else
      return false
   end
end

tbl=SearchItems('orders', 0, getNumberOf("orders")-1, fn, "sec_code,flags")

• fn – функция обратного вызова, возвращающая одно из следующих
  значений:
  • true – текущий индекс учитывается в результате;
    
  • false – текущий индекс не учитывается в результате;
    
  • nil – поиск прерывается, функция SearchItems возвращает таблицу с индексами,
    найденными ранее, включая текущий индекс.
    

function fn (ord_sec_code, ord_flags)
   if table_contains(ticker_list, ord_sec_code) and orderflags2table(ord_flags).active  then
      return true
   else
      return false
   end
end

tbl=SearchItems('trades', 0, getNumberOf("trades")-1, fn, "sec_code,flags")

function fn (t)
   if t.sec_code=='BANEP' then
      return true
   end
end

tbl=SearchItems('trades', 0, getNumberOf("trades")-1, fn, "qty,class_code, sec_code")

function fn (t)
   if t.sec_code=='BANEP' then
      return t
   end
end

tbl=SearchItems('trades', 0, getNumberOf("trades")-1, fn)

'SBER'=true; 'GAZP'=true; 'GMKN'=true;...

function addToTable(table, key)
    table[key] = true
end

function tableContains(table, key)
    return table[key] ~= nil
end

1=SBER;2=GAZP;3=GMKN;4=LKOH;................

function tableContains(table, key)    
return table[key] ~= nil
end

'SBER'=1; 'GAZP' = 2; 'GMKN' = 3;

for i=0,getNumberOf("orders")-1,1 do

function addToTable(table, key)
    table[key] = true
end

function removeFromTable(table, key)
    table[key] = nil
end

function tableContains(table, key)
    return table[key] ~= nil
end

function CleanActive (ticker_list) --переписать её, чтобы искать с конца.
   local row={}
   for i=0,getNumberOf("orders")-1,1 do
      row=getItem("orders",i)   
      local sec=row.sec_code
      if table_contains(ticker_list, sec) and orderflags2table(row.flags).active then
         res,ms=killOrder(tostring(row.order_num),sec,row.class_code)
      end
   end
end

function table_contains(table, element)   
   for _, value in pairs(table) do
      if value == element then return true end
   end
   return nil
end