Получение списка заявок

Поиск
Пользователи
Правила

Закрыть

Войти

Внимание

Для участия в обсуждениях и оформления подписки на новые сообщения форума вам необходимо зарегистрироваться.

RSS

Cообщений на странице:

Получение списка заявок, getItem("orders", i)

Иванович Петровский

Пользователь

Сообщений: 3 Регистрация: 30.10.2016

30.10.2016 17:40:03

Добрый день!
Хочу получить табличку с некоторыми атрибутами моих заявок. Использую getNumberOf("orders"), getItem.
В результате получаю не все, а только последнюю зарегистрированную заявку. Спасите - помогите, пожалуйста!!!

Код

function main( ... )
   t_id=AllocTable()
   AddColumn(t_id,0,"trans_id",true, QTABLE_STRING_TYPE,30)
   AddColumn(t_id,1,"sec_code",true, QTABLE_STRING_TYPE,30)
   AddColumn(t_id,2,"activation_time",true, QTABLE_STRING_TYPE,30)
   AddColumn(t_id,3,"settlecode",true, QTABLE_STRING_TYPE,30)
   AddColumn(t_id,4,"exec_type",true, QTABLE_STRING_TYPE,30)
   AddColumn(t_id,5,"#",true, QTABLE_STRING_TYPE,30)
   if CreateWindow(t_id)<1 then
      message("Error creating Dlg window",1)
   end
   SetWindowCaption(t_id,"Orders data")
   local t=0
   local count = getNumberOf("orders")
   InsertRow(t_id,-1)
   if count then
      for i=0,count-1 do
         InsertRow(t_id,-1)
         if stopped then
            break
         end
         t=getItem("orders", i)
         if t ~= nil then
            SetCell(t_id,i,0,tostring(t.trans_id))
            SetCell(t_id,i,1,tostring(t.sec_code))
            SetCell(t_id,i,2,tostring(t.activation_time))
            SetCell(t_id,i,3,tostring(t.settlecode))
            SetCell(t_id,i,4,tostring(t.exec_type))
         end
         SetCell(t_id,i,5,tostring(i))
      end
   end
end

Sergey Gorokhov QUIK clients support Сообщений: 3879 Регистрация: 23.01.2015	#2 31.10.2016 15:13:19 Здравствуйте, Приведенный код у нас работает (выводит не только последнюю запись но и другие). Возможно Вы привели не весь текст?

Иванович Петровский

Пользователь

Сообщений: 3 Регистрация: 30.10.2016

31.10.2016 17:59:48

Здравствуйте! Большое спасибо, что отреагировали.

Смотрю и удивляюсь. Сегодня зарегистрировал 4 ре заявки на рынке акций. Первая по инструменту А, три последние по инструменту Б. Так вот, скрипт выводит 3 записи только по инструменту Б, причем значения всех полей таблицы (кроме, последней, номера) одинаковые.
Версия quik 7.2.2.3. Скрипт именно тот, который приведен, ничего не скрывал. :sad:

Sergey Gorokhov

QUIK clients support

Сообщений: 3879 Регистрация: 23.01.2015

31.10.2016 20:24:24

Попробуйте изменить код следующим образом:

Код

function main( ... )
   t_id=AllocTable()
   AddColumn(t_id,0,"trans_id",true, QTABLE_STRING_TYPE,30)
   AddColumn(t_id,1,"sec_code",true, QTABLE_STRING_TYPE,30)
   AddColumn(t_id,2,"activation_time",true, QTABLE_STRING_TYPE,30)
   AddColumn(t_id,3,"settlecode",true, QTABLE_STRING_TYPE,30)
   AddColumn(t_id,4,"exec_type",true, QTABLE_STRING_TYPE,30)
   AddColumn(t_id,5,"#",true, QTABLE_STRING_TYPE,30)
   if CreateWindow(t_id)<1 then
      message("Error creating Dlg window",1)
   end
   SetWindowCaption(t_id,"Orders data")
   local t=0
   local count = getNumberOf("orders")
   if count then
      for i=0,count-1 do
         if stopped then
            break
         end
         t=getItem("orders", i)
         if t ~= nil then
            local row = InsertRow(t_id,-1)
            SetCell(t_id,row,0,tostring(t.trans_id))
            SetCell(t_id,row,1,tostring(t.sec_code))
            SetCell(t_id,row,2,tostring(t.activation_time))
            SetCell(t_id,row,3,tostring(t.settlecode))
            SetCell(t_id,row,4,tostring(t.exec_type))
            SetCell(t_id,row,5,tostring(i))
         end
      end
   end
end

Иванович Петровский Пользователь Сообщений: 3 Регистрация: 30.10.2016	#5 31.10.2016 21:46:11 Огромное спасибо за помощь, Сергей. Так работает!

Читают тему