function   FindSecCode (class_code,pref,dtmd)  -- Определяем инструмент для торговли 
   local  sec_list =  getClassSecurities (class_code)  -- Получаем список инструментов 
   for  test_sec_code  in   string.gmatch (sec_list,"( "..pref.." [^,] + )")  do   -- Перебираем список 
     local  param =  getParamEx (class_code,test_sec_code,"DAYS_TO_MAT_DATE")
     if (param.result =  =  "1" ) and (param.param_image~ =  "" ) and (param.param_type~ =  "0" ) then   -- Параметр получен корректно? 
       if (tonumber(param.param_value) >  = dtmd) then   return  test_sec_code  end   -- Проверяем дни до экспирации 
     end 
   end 
 end 

sec_code = FindSecCode( "SPBFUT" ,"BR", 3 )
 if (sec_code) then   message ( "actual futures is "  .. sec_code)  end   

   function   FindSecCode (class_code,pref,dtmd)  -- Определяем инструмент для торговли 
   local  sec_list =  getClassSecurities (class_code)  -- Получаем список инструментов 
   for  test_sec_code  in   string.gmatch (sec_list,"( "..pref.." [^,] + )")  do   -- Перебираем список 
     local  param =  getParamEx (class_code,test_sec_code,"DAYS_TO_MAT_DATE")
     if (param.result =  =  "1" ) and (param.param_image~ =  "" ) and (param.param_type~ =  "0" ) then   -- Параметр получен корректно? 
       if (tonumber(param.param_value) >  = dtmd) then   return  test_sec_code  end   -- Проверяем дни до экспирации 
     end 
   end 
 end 

sec_code = FindSecCode( "SPBFUT" ,"BR", 3 )
 if (sec_code) then   message ( "actual futures is "  .. sec_code)  end   

function FindSecCode(class_code,pref,dtmd) -- Определяем инструмент для торговли
  local sec_list=getClassSecurities(class_code) -- Получаем список инструментов
  for test_sec_code in string.gmatch(sec_list,"("..pref.."[^,]+)") do -- Перебираем список
    local param=getParamEx(class_code,test_sec_code,"DAYS_TO_MAT_DATE")
    if(param.result=="1")and(param.param_image~="")and(param.param_type~="0")then -- Параметр получен корректно?
      if(tonumber(param.param_value)>=dtmd)then return test_sec_code end -- Проверяем дни до экспирации
    end
  end
end

sec_code=FindSecCode("SPBFUT","BR",3)
if(sec_code)then message("actual futures is "..sec_code) end

function contract()
--функция проверки актуальности контракта
   --if TP==0 then
   local futdate = {} 
   local timedif = {}
   local idx = 0
      activename = "BR"
      futnames = { "BRZ1","BRF2", "BRG2", "BRH2", "BRJ2","BRK2", "BRM2", "BRN2", "BRQ2", "BRU2", "BRV2","BRX2"}
      for i=1,12 do
         if idx==1 then break end
         --message("futnames"..futnames[1]..type(futnames[i]))
         if futnames[i] then
            futdate[i] = getParamEx(CLASSCODE, futnames[i], "DAYS_TO_MAT_DATE").param_value
            futstatus[i]= getParamEx(CLASSCODE, futnames[i], "STATUS").param_value
            --message("futdate[i]"..futdate[1])
            --message("futstatus[i]"..futstatus[1])
            --timedif[i] = futdate[i]-tonumber(DATE)
            --message('timedif='..timedif[i])
            if  futdate[i]~=nil then
               if tonumber(futdate[i])>2 then 
               INSTRUMENT=futnames[i]
               message('actual futures is'..INSTRUMENT)
               idx=1
               end
            end
         end
      end
end

function contract()
local futdate = {} 
   local timedif = {}
   local idx = 0
      activename = "RTS"
      
      futnames = {"RIZ1", "RIH2", "RIM2", "RIU2", "RIZ2","RIH3", "RIM3", "RIU3", "RIZ3"}
      --message("futnames[1]"..futnames[1].."futnames[2]"..futnames[2])
      for i=1,12 do
         if idx==1 then break end
         --message("futnames"..futnames[i]..type(futnames[i]))
         if futnames[i] then
            futdate[i] = getParamEx(CLASSCODE, futnames[i], "DAYS_TO_MAT_DATE").param_image
            --message("futdate[i]"..futdate[i])
            --message(type(DATE).."date="..DATE)
            --timedif[i] = futdate[i]-tonumber(DATE)
            --message('timedif='..timedif[i])
               if tonumber(futdate[i])>2 then 
                  INSTRUMENT=futnames[i]
                  --message('actual futures is'..INSTRUMENT)
                  idx=1
               end
         end
      end
end