у меня экспорт денег в этой функции, попробуйте разобраться
— экспорт позиции и денег на фортс и валютном рынках
function ExportMoney()
— Если не соединено то выходим
if isConnected() == 0 then return; end
— PapersForts (позиции ФОРТС)
local portfolio = «S|»
local count1 = getNumberOf(«futures_client_holding»)
for i = 0, (count1 — 1) do
local r = getItem(«futures_client_holding», i)
portfolio = portfolio… r.sec_code… ","… r.totalnet… "|"
end
— собираем Позиции по валютному рынку
— количество строк валюты
local count2 = getNumberOf(«depo_limits»)
— проходимся по строкам
for i = 0, (count2 — 1) do
— строка позиции
local r = getItem(«depo_limits», i)
portfolio = portfolio… r.sec_code… ","… r.currentbal… "|"
end
— Добавим E на конце
portfolio = portfolio… «E»
— Если текст для portfolio изменился и запись прошла
if g_LastPortfolioText ~= portfolio and WriteText(«d:\\G\\»… g_folder… "\\Portfolio\\"… GetTime()… ".txt", portfolio) then
— Запоминаем текст
g_LastPortfolioText = portfolio
— Добавим в лог
Log(«запись portfolio»)
end
— собираем деньги на фортс
local money = «S|»
— собираем все деньги
local myMoney = ""
— количество строк в лимитах фьючерсов
local count2 = getNumberOf(«futures_client_limits»)
— проходим по строкам
for i = 0, (count2 — 1) do
— получаем строку
local r = getItem(«futures_client_limits», i)
myMoney = myMoney… r.firmid… " " ..r.trdaccid .. " "… r.cbplimit… " "… r.cbplplanned… "\r\n"
if (r.cbplimit ~= 0) then
money = money… r.cbplimit… "|"… r.cbplplanned… "|"
end
end
— количество строк в лимитах денег
count2 = getNumberOf(«money_limits»)
— проходим по строкам
for i = 0, (count2 — 1) do
— получаем строку
local r = getItem(«money_limits», i)
myMoney = myMoney… r.firmid… " "… r.currcode… " "… r.openbal… " "… r.openlimit… " "… r.currentbal… " "… r.currentlimit… "\r\n"
end
— количество строк в Денежные позиции
count2 = getNumberOf(«account_positions»)
— проходим по строкам
for i = 0, (count2 — 1) do
— получаем строку
local r = getItem(«account_positions», i)
myMoney = myMoney… r.firmid… " "… r.currcode… " "… r.openbal… " "… r.currentpos… "\r\n"
end
— Добавим E на конце
money = money… «E»
— Если текст для money изменился и запись прошла
if g_LastMoneyText ~= money and WriteText(«d:\\G\\»… g_folder… "\\Money\\"… GetTime()… ".txt", money) then
— Запоминаем текст
g_LastMoneyText = money
— Добавим в лог
Log(«запись money»)
end
— Если текст для myMoney изменился и запись прошла
if g_LastMyMoneyText ~= myMoney and WriteText(«d:\\G\\Logs\\»… g_folder… "\\MyMoney.log", myMoney) then
— Запоминаем текст
g_LastMyMoneyText = myMoney
— Добавим в лог
Log(«запись myMoney»)
end
— конец функции экспорта позиции и денег
end
EASE, в моем примере показано как взять позицию на фортс и валютной секции. Для бумаг вроде другая таблица. И таблицы перечислены в файле qlua.chm в папке quik, делайте по аналогии.
Казахстанская биржа обсудит исключение Мосбиржи из числа ее акционеров
После попадания Мосбиржи под санкции США Казахстанская фондовая биржа, где российской площадке принадлежит 13,1%, обсудит возмо...
Всеинструменты.ру планирует выплатить дивиденды по итогам 2024г Компания «Всеинструменты.ру» планирует по итогам 2024 года выплатить дивиденды, сообщил «Интерфакс» со ссылкой на финансового директора ...
Илья Петров, у него уже накопилось 800 лямов нераспределенки. вот пусть всю и бросит на дивы)))) а то скоро нераспределенная прибыль будет больше капы. и банк будет стоить меньше своего кэша. прямо...
Акционеры Инарктики утвердили дивиденды за IV кв 2023 г. и I кв 2024 г. в размере 1,76 млрд рублей или 20 рублей на одну акцию совокупно за оба периода (ДД: 2,38%) - компания Акционеры «Инарктики» утв...
Российский авторынок ждет падение на 8–10% — Известия Дилеры ожидают сокращения авторынка на 8–10% после вступления в силу 1 июля решения ЦБ по ограничению автокредитования и повышения надбавки к коэф...
Российский авторынок ждет падение на 8–10% — Известия Дилеры ожидают сокращения авторынка на 8–10% после вступления в силу 1 июля решения ЦБ по ограничению автокредитования и повышения надбавки к коэф...
— экспорт позиции и денег на фортс и валютном рынках
function ExportMoney()
— Если не соединено то выходим
if isConnected() == 0 then return; end
— PapersForts (позиции ФОРТС)
local portfolio = «S|»
local count1 = getNumberOf(«futures_client_holding»)
for i = 0, (count1 — 1) do
local r = getItem(«futures_client_holding», i)
portfolio = portfolio… r.sec_code… ","… r.totalnet… "|"
end
— собираем Позиции по валютному рынку
— количество строк валюты
local count2 = getNumberOf(«depo_limits»)
— проходимся по строкам
for i = 0, (count2 — 1) do
— строка позиции
local r = getItem(«depo_limits», i)
portfolio = portfolio… r.sec_code… ","… r.currentbal… "|"
end
— Добавим E на конце
portfolio = portfolio… «E»
— Если текст для portfolio изменился и запись прошла
if g_LastPortfolioText ~= portfolio and WriteText(«d:\\G\\»… g_folder… "\\Portfolio\\"… GetTime()… ".txt", portfolio) then
— Запоминаем текст
g_LastPortfolioText = portfolio
— Добавим в лог
Log(«запись portfolio»)
end
— собираем деньги на фортс
local money = «S|»
— собираем все деньги
local myMoney = ""
— количество строк в лимитах фьючерсов
local count2 = getNumberOf(«futures_client_limits»)
— проходим по строкам
for i = 0, (count2 — 1) do
— получаем строку
local r = getItem(«futures_client_limits», i)
myMoney = myMoney… r.firmid… " " ..r.trdaccid .. " "… r.cbplimit… " "… r.cbplplanned… "\r\n"
if (r.cbplimit ~= 0) then
money = money… r.cbplimit… "|"… r.cbplplanned… "|"
end
end
— количество строк в лимитах денег
count2 = getNumberOf(«money_limits»)
— проходим по строкам
for i = 0, (count2 — 1) do
— получаем строку
local r = getItem(«money_limits», i)
myMoney = myMoney… r.firmid… " "… r.currcode… " "… r.openbal… " "… r.openlimit… " "… r.currentbal… " "… r.currentlimit… "\r\n"
end
— количество строк в Денежные позиции
count2 = getNumberOf(«account_positions»)
— проходим по строкам
for i = 0, (count2 — 1) do
— получаем строку
local r = getItem(«account_positions», i)
myMoney = myMoney… r.firmid… " "… r.currcode… " "… r.openbal… " "… r.currentpos… "\r\n"
end
— Добавим E на конце
money = money… «E»
— Если текст для money изменился и запись прошла
if g_LastMoneyText ~= money and WriteText(«d:\\G\\»… g_folder… "\\Money\\"… GetTime()… ".txt", money) then
— Запоминаем текст
g_LastMoneyText = money
— Добавим в лог
Log(«запись money»)
end
— Если текст для myMoney изменился и запись прошла
if g_LastMyMoneyText ~= myMoney and WriteText(«d:\\G\\Logs\\»… g_folder… "\\MyMoney.log", myMoney) then
— Запоминаем текст
g_LastMyMoneyText = myMoney
— Добавим в лог
Log(«запись myMoney»)
end
— конец функции экспорта позиции и денег
end