Доброго дня!
При исполнении скрипта сервер возвращает ошибку : "Не указан режим транзакций "
О каком режиме идет речь?
Секция биржи - "TQBR", акции SBER ,
QUIK 8.4.1.6
При исполнении скрипта сервер возвращает ошибку : "Не указан режим транзакций "
О каком режиме идет речь?
Секция биржи - "TQBR", акции SBER ,
QUIK 8.4.1.6
| Код |
|---|
FUNC FUNC_NEW_STOP_ORDER_LIMIT_ACTIVATE_IF_BASE_ORDER( baseOrderKey, seccode,Operation,Stopprise,PriceNewOrder ,f_LOG_BOT)
' процедура НОВЫЙ стоп-лимит по исполнению заявки
'
TransID= 3 'FuncTRANS_ID()
NEW_GLOBAL("TRANS_PARAMS", "")
NEW_GLOBAL("TRANS_RESULT", "")
trans_params = CREATE_MAP ()
'
trans_params = set_value (trans_params, "TRANS_ID", TransID)
trans_params = set_value (trans_params, "ACCOUNT", Account) ' обьявлены ГЛОБАЛЬНО
trans_params = set_value (trans_params, "CLIENT_CODE", ClientCode) ' обьявлены ГЛОБАЛЬНО
trans_params = set_value (trans_params, "ACTION", "NEW_STOP_ORDER")
trans_params = set_value (trans_params, "STOP_ORDER_KIND", "ACTIVATED_BY_ORDER_SIMPLE_STOP_ORDER") ' стоп-лимит по исполнению заявки
trans_params = set_value (trans_params, "BASE_ORDER_KEY", baseOrderKey) ' номер связанной заявки
trans_params = set_value (trans_params, "ACTIVATE_IF_BASE_ORDER_PARTLY_FILLED", "NO") 'Признак активации заявки «по исполнению» при частичном исполнении заявки-условия.
trans_params = set_value (trans_params, "SEC_CODE", seccode)
trans_params = set_value (trans_params, "CLAS_SCODE", classcode)
trans_params = set_value (trans_params, "OPERATION", Operation) ' Покупка или продажа (противополож от исполненой заявки )
trans_params = set_value (trans_params, "STOPPRICE", Stopprise) ' Цена исполненой заявки
trans_params = set_value (trans_params, "PRICE", PriceNewOrder) ' Цена новой заявки
trans_params = set_value (trans_params, "USE_BASE_ORDER_BALANCE", "YES") ' Признак использования в качестве объема количество заявки-условия
trans_params = set_value (trans_params, "EXPIRY_DATE","GTC") ' до отмены
'
trans_result = SEND_TRANSACTION (20, trans_params)
' WRITELN ( f_LOG_BOT,FunTimeNum() & ": " & "Result: " & get_value (trans_result, "RESULT") & ", Result_ex: " & get_value (trans_result, "RESULT_EX") & ", OrderNum: " & get_value (trans_result, "ORDER_NUMBER") & ", Description: " & get_value (trans_result, "DESCRIPTION"))
WRITELN ( f_LOG_BOT,FunTimeNum() & ": PROCEDURE_NEW_STOP_ORDER_LIMIT_ACTIVATE_IF_BASE_ORDER " & "Result: " & get_value (trans_result, "RESULT") & ", Result_ex: " & get_value (trans_result, "RESULT_EX") & ", OrderNum: " & get_value (trans_result, "ORDER_NUMBER") & ", Description: " & get_value (trans_result, "DESCRIPTION"))
IF GET_VALUE (trans_result, "RESULT_EX") == "3"
RESULT= get_value (trans_result, "ORDER_NUMBER")
RETURN ' ' заявка зарегистрирована
else
MESSAGE (""&"ОТВЕТ СЕРВЕРА : " & get_value (trans_result, "DESCRIPTION") ,3) ' сообщение об ошибке
RESULT="0"
RETURN
END IF
'
END FUNC ' процедура НОВЫЙ стоп-лимит по исполнению заявки
|