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
смотрите там