function scanoforder(whatsorder) - функция сканирования активных заявок по определенному инструменту
   local transaction,bs,res={},{},""
   local iTorF=0
   local iSorB=""
   for i=0,(tonumber(getNumberOf("orders"))-1) do   
      bs=getItem("orders",i)
   if whatsorder=="TorF" then
      if bit.band(bs["flags"],1)~=0 and bs["sec_code"]==p_seccode then
         iTorF=iTorF+1
      end
   elseif whatsorder=="SorB" then
      if bit.band(bs["flags"],1)~=0 and bs["sec_code"]==p_seccode then
         if bit.band(bs["flags"],4)>0 then
            iSorB="S" --break
         else
            iSorB="B"
         end
      elseif bit.band(bs["flags"],1)==0 then
         iSorB="nil"
      end
   end
   end
   if whatsorder=="TorF" then
      if iTorF>0 then
         return true
      else 
         return false
      end
   end
   if whatsorder=="SorB" then
      return iSorB
   end
end

function delete_order()
   local transaction,bs,res={},{},""
   for i=0,(tonumber(getNumberOf("orders"))-1) do   
      bs=getItem("orders",i)
      if bit.band(bs["flags"],1)~=0 and bs["sec_code"]==p_seccode then
         local tr={
      ["CLASSCODE"]=p_classcode,
      ["SECCODE"]=p_seccode,
      ["ACTION"]="KILL_ORDER",
      ["ACCOUNT"]=p_account,
      ["CLIENT_CODE"]=p_client_code,
      ["TYPE"]="L",
      ["OPERATION"]=l_oper,
      ["TRANS_ID"]=p_trans_ID,
      ["ORDER_KEY"]=tostring(bs["order_num"])
   }
   -- ЕСЛИ функция вернула строку диагностики ошибки, ТО значит транзакция не прошла   
         Result = sendTransaction(tr)
      end
   end
end

function Close_all_order()
 function myFind(F)
  return (bit.band(F, 0x1) ~= 0) 
 end
 local ord = "orders"
 local orders = SearchItems(ord, 0, getNumberOf(ord)-1, myFind, "flags")
 if (orders ~= nil) and (#orders > 0) then
  for i=1,#orders do
   local transaction={
   TRANS_ID=tostring(1000*os.clock()),
   ACTION="KILL_ORDER",
   CLASSCODE=c_code,
   SECCODE=getItem(ord,orders[i]).sec_code,
   ORDER_KEY=tostring(getItem(ord,orders[i]).order_num)
   }
   local res=sendTransaction(transaction) 
  end
 end
end