Доброго дня!
При исполнении скрипта сервер возвращает ошибку : "Не указан режим транзакций "
О каком режиме идет речь?
Секция биржи - "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 ' процедура НОВЫЙ стоп-лимит по исполнению заявки |