Блог им. evg_gen

пост пользы №?

есть проблема — вести историю сделок на ноуте где МС офис кончился, и появился либре офис… из квика если заказать отчет сделок, то они криво становятся в либру, и приходится форматировать  строки  — утомительно
плюс еще не у всех брокеров как оказывается можно запросить отчет по сделкам — в РСХБ такого нет
так вот 
решение проблемы — скрипт. который создает файлы по ФОНДЕ и по ФОРТСу, потому что это сделки в одну таблицу по сути записываются..

создать файл и вызвать скрипт

---------------------------------------

local QuikTableName = «trades»
local fileName = tostring(os.date("%d-%m-%Y")… "-" ..os.date("%H-%M-%S")… ".csv") --формат имени файла ДД-ММ-ГГГГ-ЧЧ-ММ-СС.csv
local fileName_FORTS = tostring(os.date("%d-%m-%Y")… "-" ..os.date("%H-%M-%S")… «FORTS.csv») --формат имени файла ДД-ММ-ГГГГ-ЧЧ-ММ-ССFORTS.csv


function main ()
SaveActiveStockOrdersToFile()
end


function SaveActiveStockOrdersToFile()

local ordersFilePath = «C:\\Users\\user\\Documents\\uralsib\\» — здесь прописать папку куда сохранить файлы
local num = 0
local sec_name = ""
local deal = ""

num = getNumberOf(QuikTableName)
if num > 0 then
local strTmp = ""
local tradesFile = io.open(ordersFilePath… fileName,«w+»)
local tradesFileFORTS = io.open(ordersFilePath… fileName_FORTS,«w+»)
io.output(tradesFile)
io.output(tradesFileFORTS)
for i = 1, num — 1 do
trade = getItem(«trades», i)
if trade ~= nil then
if (trade.class_code == «TQBR» or trade.class_code == «SMAL»)
--and
then
if (trade.flags == 36 or trade.flags == 68) then
deal = «Продажа»
end
if (trade.flags == 32 or trade.flags == 64) then
deal = «Купля»
end
sec_name = getSecurityInfo(«TQBR», trade.sec_code)
tradesFile:write(trade.datetime.day… "."… trade.datetime.month… "."… trade.datetime.year… " " ..
trade.datetime.hour… ":"… trade.datetime.min… ":"… trade.datetime.sec… ";" ..
sec_name.short_name… ";"… deal… ";"… trade.qty… ";"… trade.price… ";"… trade.value .."\n")
else
tradesFileFORTS:write(trade.datetime.day… "."… trade.datetime.month… "."… trade.datetime.year… " " ..
trade.datetime.hour… ":"… trade.datetime.min… ":"… trade.datetime.sec… ";" ..
sec_name.sec_code… ";"… trade.flags… ";"… trade.qty… ";"… trade.price… ";"… trade.value .."\n")
end
else
message («var trade got nil»)
end
end

io.close(tradesFile)
io.close(tradesFileFORTS)
end
end

  • обсудить на форуме:
  • QUIK
1 комментарий
есть еще пост пользы про учетку на сайте rusbonds но снесен в оффтоп

смотрите там
avatar

теги блога evg_gen +100(100)

....все тэги



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