Форум QUIK [тема: Не указан режим транзакций] http://forum.quik.ru Новое в теме Не указан режим транзакций форума на сайте Форум QUIK [forum.quik.ru] ru http://backend.userland.com/rss2 Tue, 14 Apr 2026 05:31:57 +0300 Не указан режим транзакций Не указан режим транзакций При исполнении скрипта сервер возвращает ошибку : "Не указан режим транзакций " в форуме Программирование на языке QPILE.
Вот спасибо! Действительно смешная ошибка .. Даже сам улыбнулся )) .. Правда ржал не так долго и не так громко как Максим )))...
Вот исправленный вариант.  Обращаю внимание  на то, что пришлось изменить "EXPIRY_DATE"  с "GTC" на "TODAY"  , иначе получал ошибку ====code==== 
   
FUNC   FUNC_NEW_STOP_ORDER_LIMIT_ACTIVATE_IF_BASE_ORDER(Account,ClientCode, baseOrderKey, seccode,Operation,Stopprise,PriceNewOrder ,f_LOG_BOT)  
            ' процедура  НОВЫЙ  стоп-лимит по исполнению заявки 
          ' 
             classcode = "TQBR"      
          TransID= 4  '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, "SECCODE",   seccode)   
   trans_params = set_value (trans_params, "CLASSCODE", 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","TODAY")             '  до конца торгового дня
    '
   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     ' процедура  НОВЫЙ  стоп-лимит по исполнению заявки
=============
26.05.2020 11:56:25, Александр Зайченко.]]> http://forum.quik.ru/messages/forum9/message45548/topic5462/ http://forum.quik.ru/messages/forum9/message45548/topic5462/ Tue, 26 May 2020 11:56:25 +0300 Программирование на языке QPILE Не указан режим транзакций Не указан режим транзакций При исполнении скрипта сервер возвращает ошибку : "Не указан режим транзакций " в форуме Программирование на языке QPILE.

====quote====
s_mike@rambler.ru написал:
Александр, давайте посмеемся вместе ..

поищите текстовым редактором в вашем тексте


CLAS_SCODE
=============
ха ха ха ха ха, как же смешно, ха ха ха ха ха..........................
укатался от смеха, живот порвал, ха ха ха ха ха.......................
ой не могууу, ха ха ха ха ха........................................................
22.05.2020 21:23:33, Максим.]]> http://forum.quik.ru/messages/forum9/message45441/topic5462/ http://forum.quik.ru/messages/forum9/message45441/topic5462/ Fri, 22 May 2020 21:23:33 +0300 Программирование на языке QPILE Не указан режим транзакций Не указан режим транзакций При исполнении скрипта сервер возвращает ошибку : "Не указан режим транзакций " в форуме Программирование на языке QPILE.
Александр, давайте посмеемся вместе ..

поищите текстовым редактором в вашем тексте


CLAS_SCODE
22.05.2020 18:45:55, s_mike@rambler.ru.]]> http://forum.quik.ru/messages/forum9/message45440/topic5462/ http://forum.quik.ru/messages/forum9/message45440/topic5462/ Fri, 22 May 2020 18:45:55 +0300 Программирование на языке QPILE Не указан режим транзакций Не указан режим транзакций При исполнении скрипта сервер возвращает ошибку : "Не указан режим транзакций " в форуме Программирование на языке QPILE.
Добавил в скрипт определение   classcode = "TQBR"  Лучше не стало.  До этого classcode был объявлен глобально... Или вы о другом речь ведёте ? ====code==== 
   
FUNC   FUNC_NEW_STOP_ORDER_LIMIT_ACTIVATE_IF_BASE_ORDER(Account,ClientCode, baseOrderKey, seccode,Operation,Stopprise,PriceNewOrder ,f_LOG_BOT)  
            ' процедура  НОВЫЙ  стоп-лимит по исполнению заявки 
          ' 
             classcode = "TQBR"      
          TransID= 4  '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     ' процедура  НОВЫЙ  стоп-лимит по исполнению заявки
=============
22.05.2020 18:15:57, Александр Зайченко.]]> http://forum.quik.ru/messages/forum9/message45438/topic5462/ http://forum.quik.ru/messages/forum9/message45438/topic5462/ Fri, 22 May 2020 18:15:57 +0300 Программирование на языке QPILE Не указан режим транзакций Не указан режим транзакций При исполнении скрипта сервер возвращает ошибку : "Не указан режим транзакций " в форуме Программирование на языке QPILE.

====quote====
Александр Зайченко написал:
Проверил : classcode = "TQBR" ,  взято из Текущей таблицы параметров ...
Проблема та же.
=============
Александр, я вам гарантирую ,проблема что проблема в отсутствующем коде класса в транзакции.

наведите резкость, посмотрите, как вы передаёте код класса в транзакцию.
22.05.2020 10:55:00, s_mike@rambler.ru.]]> http://forum.quik.ru/messages/forum9/message45401/topic5462/ http://forum.quik.ru/messages/forum9/message45401/topic5462/ Fri, 22 May 2020 10:55:00 +0300 Программирование на языке QPILE Не указан режим транзакций Не указан режим транзакций При исполнении скрипта сервер возвращает ошибку : "Не указан режим транзакций " в форуме Программирование на языке QPILE.
Проверил : classcode = "TQBR" ,  взято из Текущей таблицы параметров ...
Проблема та же.
22.05.2020 10:50:51, Александр Зайченко.]]> http://forum.quik.ru/messages/forum9/message45400/topic5462/ http://forum.quik.ru/messages/forum9/message45400/topic5462/ Fri, 22 May 2020 10:50:51 +0300 Программирование на языке QPILE Не указан режим транзакций Не указан режим транзакций При исполнении скрипта сервер возвращает ошибку : "Не указан режим транзакций " в форуме Программирование на языке QPILE.
проверьте код класса в транзакции
22.05.2020 00:35:16, s_mike@rambler.ru.]]> http://forum.quik.ru/messages/forum9/message45380/topic5462/ http://forum.quik.ru/messages/forum9/message45380/topic5462/ Fri, 22 May 2020 00:35:16 +0300 Программирование на языке QPILE Не указан режим транзакций Не указан режим транзакций При исполнении скрипта сервер возвращает ошибку : "Не указан режим транзакций " в форуме Программирование на языке QPILE.
Доброго дня!
При исполнении скрипта  сервер возвращает ошибку : "Не указан режим транзакций "
О каком режиме идет речь?
Секция биржи - "TQBR",  акции SBER ,
QUIK 8.4.1.6 ====code==== 
   
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     ' процедура  НОВЫЙ  стоп-лимит по исполнению заявки
=============
21.05.2020 23:32:33, Александр Зайченко.]]> http://forum.quik.ru/messages/forum9/message45379/topic5462/ http://forum.quik.ru/messages/forum9/message45379/topic5462/ Thu, 21 May 2020 23:32:33 +0300 Программирование на языке QPILE