sendTransaction

-- Пример отправки рыночной заявки

-- Код класса
class_code = "QJSIM"
-- Код бумаги
sec_code = "SBER"
-- Номер счета
account = "NL0011100043"

-- Классы фьючерсов и опционов
FUT_OPT_CLASSES = "FUTUX, OPTUX, SPBOPT, SPBFUT"

-- Уникальное число берется из текущей полной даты и времени.
--  Используется для получения случайного числа
RANDOM_SEED = tonumber(os.date("%Y%m%d%H%M%S"))

function main()
    -- Вызываем функцию отправки рыночной заявки на покупку. 1 контракт
    local trans_id, trans_msg = send_market("B", 1)
    -- Выводим результат в виде сообщени
    message("trans_id: " .. tostring(trans_id) .. "; trans_msg: " .. tostring(trans_msg))
end

-- Функция для отравки рыночной заявки
function send_market(direction, volume, comment)
	-- отправка рыночной заявки
	-- все параметры кроме кода клиента и коментария должны быть не nil
	-- если код клиента nil - подлставляем счет
	-- Данная функция возвращает 2 параметра
	--     1. ID присвоенный транзакции либо nil если транзакция отвергнута на уровне сервера Квик
	--     2. Ответное сообщение сервера Квик либо строку с параметрами транзакции
	if (class_code == nil or sec_code == nil or direction == nil or volume == nil or account == nil) then		
		return nil, "Can`t send order. Nil parameters."
	end

    -- Получаем случайное уникальное число для id
    local trans_id = random_max()
    -- Таблица параметров транзацкии
	local transaction={
		["TRANS_ID"] = tostring(trans_id),
		["ACTION"] = "NEW_ORDER",
		["CLASSCODE"] = class_code,
		["SECCODE"] = sec_code,
		["OPERATION"] = direction,
		["TYPE"] = "M",
		["QUANTITY"] = string.format("%d", tostring(volume)),
		["ACCOUNT"] = account
    }
    -- Если нет кода клиента, то вместо него подставляем номер счета
	if client_code == nil then
		transaction.client_code = account
	else
		transaction.client_code = client_code
	end

    -- Если это заявка для Фьючерсов
    if string.find(FUT_OPT_CLASSES, class_code) ~= nil then
        local sign = 0
        -- Для покупки
        if direction == "B" then
            sign = 1
            -- Получаем максимальную цену
            transaction.price = getParamEx(class_code, sec_code, "pricemax").param_value
            -- Если текущая цена 0
            if transaction.price == 0 then
                -- Берем цену предложения и добавляем 10 шагов
				transaction.price = getParamEx(class_code, sec_code, "offer").param_value + 10 * getParamEx(class_code, sec_code, "SEC_PRICE_STEP").param_value
			end
        else
            sign = -1
            -- Для продажи берем минимальную цену
            transaction.price = getParamEx(class_code, sec_code, "pricemin").param_value
            -- Если текущая цена 0
            if transaction.price == 0 then
                -- Берем цену Bid и отнимаем 10 шагов
				transaction.price = getParamEx(class_code, sec_code, "bid").param_value - 10 * getParamEx(class_code, sec_code, "SEC_PRICE_STEP").param_value
			end
        end
        -- Если цена так и не установилась
        if transaction.price == 0 then
            -- То пытаемся отнять/прибавть 10 шагов к последней известной цене
			transaction.price = getParamEx(class_code, sec_code, "last").param_value + sign * 10 * getParamEx(class_code, sec_code, "SEC_PRICE_STEP").param_value
        end
        -- Форматируем цену
		transaction.price = to_price(sec_code, transaction.price, class_code)
	else
		transaction.price = "0"
	end

    -- Если комментарий не указан
	if comment ~= nil then
		transaction.client_code = string.sub(transaction.client_code .. '/' .. tostring(comment), 0, 20)
	else
		transaction.client_code = string.sub(transaction.client_code, 0, 20)
	end
		
    -- Отправляем транзацкию
    local res = sendTransaction(transaction)
    -- Если незультат не пустой
	if res ~= "" then		
		return nil, res
    else        
		local msg = 
			"Market order sended sucesfully. Class = " .. class_code ..
			" Sec = " .. sec_code ..
			" Dir = " .. direction ..
			" Vol = " .. volume ..
			" Acc = " .. account ..
			" Trans_id = " .. trans_id ..
			" Price = " .. transaction.price
		
		return trans_id, msg
	end
end

function random_max()
	-- не принимает параметры и возвращает от 0 до 2147483647 (макс. полож. 32 битное число) подходит нам для транзакций
	local res = (16807*(RANDOM_SEED or 137137))%2147483647
	RANDOM_SEED = res
	return res
end

function to_price(security, value, class)
	-- преобразования значения value к цене инструмента правильного ФОРМАТА (обрезаем лишнии знаки после разделителя)
	-- Возвращает строку
	if (security == nil or value == nil) then return nil end
	local scale = getSecurityInfo(class or getSecurityInfo("", security).class_code, security).scale
	return string.format("%."..string.format("%d", scale).."f", tonumber(value))
end