Блог им. roma095

Кто программит на qpile - есть вопрос

    • 17 августа 2012, 11:57
    • |
    • roma095
  • Еще
Кто разбирается в qpile, можете подсказать, как после фильтра в текстовый файл мне экспортировать сделки?

Есть рабочий вариант с заявками, но мне нужна именна таблица всех сделок. спасибо

n=GET_NUMBER_OF(«ORDERS»)
map=CREATE_MAP()
delete_all_items()

FOR i FROM 1 to n
TRADE = GET_ITEM («ORDERS», i)
NUM = GET_VALUE (TRADE,«NUMBER»)
TIME = GET_VALUE (TRADE,«TIME»)
OPERATION = GET_VALUE (TRADE,«OPERATION»)
ACCOUNT = GET_VALUE (TRADE,«ACCOUNT»)
QUANT = GET_VALUE (TRADE,«QUANTITY»)
OSTATOK = GET_VALUE (TRADE,«BALANCE»)
SOSTOYAN = GET_VALUE (TRADE,«STATUS»)
map=SET_VALUE(map,«NUMER»,0+NUM)
TIME=SUBSTR(TIME,0,2) & ":" & SUBSTR(TIME,2,2) & ":" & SUBSTR(TIME,4,2)
map=SET_VALUE(map,«TIME»,""&TIME)
map=SET_VALUE(map,«OPER»,""&OPERATION)
map=SET_VALUE(map,«ACCOUNT»,""&ACCOUNT)

map=SET_VALUE(map,«QUANTITY»,0+QUANT)
map=SET_VALUE(map,«QUANTITY»,0+QUANT)
map=SET_VALUE(map,«OSTATOK»,0+OSTATOK)
map=SET_VALUE(map,«SOSTOYAN»,""&SOSTOYAN)
WRITELN(«C:\TABLZAYAV.TXT»,«ORDER_N:»&NUM&" TIME:"&TIME&" OPERATION:"&OPERATION&" ACCOUNT:"&ACCOUNT&" QUANTITY:"&QUANT&" OSTATOK:"&OSTATOK&" STATUS:"&SOSTOYAN)
add_item(i,map)
END FOR

END_PROGRAM

PARAMETER NUMER;
PARAMETER_TITLE Nзаявки;
PARAMETER_DESCRIPTION Null;
PARAMETER_TYPE NUMERIC(9,0);
END

PARAMETER TIME;
PARAMETER_TITLE Время;
PARAMETER_DESCRIPTION Null;
PARAMETER_TYPE STRING(256);
END

PARAMETER OPER;
PARAMETER_TITLE Операция;
PARAMETER_DESCRIPTION Null;
PARAMETER_TYPE STRING(256);
END

PARAMETER ACCOUNT;
PARAMETER_TITLE Счет;
PARAMETER_DESCRIPTION Null;
PARAMETER_TYPE STRING(256);
END

PARAMETER QUANTITY;
PARAMETER_TITLE Количество;
PARAMETER_DESCRIPTION Null;
PARAMETER_TYPE NUMERIC(6,0);
END

PARAMETER OSTATOK;
PARAMETER_TITLE Остаток;
PARAMETER_DESCRIPTION Null;
PARAMETER_TYPE NUMERIC(6,0);
END

PARAMETER SOSTOYAN;
PARAMETER_TITLE Состояние;
PARAMETER_DESCRIPTION Null;
PARAMETER_TYPE STRING(256);
END

END_PORTFOLIO_EX
Данная публикация является личным мнением автора. Мнение владельца сайта может не совпадать с мнением автора.
  • Ключевые слова:
  • qpile
64
3 комментария
я не шарю, но может надо созданную тут таблицу через DDE или ODBC выводить
avatar
Mr. Bean, мне именно в текстовый файл надо
avatar
Наверное вместо «ORDERS» нужно разбирать таблицу «ALL_TRADES». Или я вопрос не понял?
avatar

Читайте на SMART-LAB:
Фото
✅ Хэдхантер объединил данные соискателя в профиле
🌟 Что случилось
Фото
Колл-оферта в облигациях или почему эмитент может забрать у инвестора выгодный выпуск?
При выборе облигаций инвестор обычно смотрит на купон, доходность к погашению и кредитный рейтинг эмитента. Но иногда в параметрах выпуска есть...
ОПЕК снова снизила прогноз роста спроса на нефть
ОПЕК в сентябрьском отчете в очередной раз пересмотрела прогноз по мировому рынку нефти. Организация снизила оценку роста спроса в 2026 году до 380...
Фото
Сбер РПБУ 8 мес. 2026 г. - менеджмент ждет замедления, но в отчетах пока рекорды
Сбер опубликовал результаты по РПБУ за 8 мес. 2026 г.  Чистая прибыль за 8 месяцев составила 1,33 трлн руб. (+19%). За август 169,1 млрд руб....

теги блога roma095

....все тэги



UPDONW
Новый дизайн