Не указан режим транзакций

Страницы: 1
RSS
Не указан режим транзакций, При исполнении скрипта сервер возвращает ошибку : "Не указан режим транзакций "
 
Доброго дня!
При исполнении скрипта  сервер возвращает ошибку : "Не указан режим транзакций "
О каком режиме идет речь?
Секция биржи - "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     ' процедура  НОВЫЙ  стоп-лимит по исполнению заявки 
 
 
проверьте код класса в транзакции
www.bot4sale.ru        t.me/bot4sale
 
Проверил : classcode = "TQBR" ,  взято из Текущей таблицы параметров ...
Проблема та же.
 
Цитата
Александр Зайченко написал:
Проверил : classcode = "TQBR" ,  взято из Текущей таблицы параметров ...
Проблема та же.
Александр, я вам гарантирую ,проблема что проблема в отсутствующем коде класса в транзакции.

наведите резкость, посмотрите, как вы передаёте код класса в транзакцию.
www.bot4sale.ru        t.me/bot4sale
 
Добавил в скрипт определение   classcode = "TQBR"  Лучше не стало.  До этого classcode был объявлен глобально... Или вы о другом речь ведёте ?
Код
   
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     ' процедура  НОВЫЙ  стоп-лимит по исполнению заявки 
 
 
Александр, давайте посмеемся вместе ..

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


CLAS_SCODE
www.bot4sale.ru        t.me/bot4sale
 
Цитата
s_mike@rambler.ru написал:
Александр, давайте посмеемся вместе ..

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


CLAS_SCODE
ха ха ха ха ха, как же смешно, ха ха ха ха ха..........................
укатался от смеха, живот порвал, ха ха ха ха ха.......................
ой не могууу, ха ха ха ха ха........................................................
 
Вот спасибо! Действительно смешная ошибка .. Даже сам улыбнулся )) .. Правда ржал не так долго и не так громко как Максим )))...
Вот исправленный вариант.  Обращаю внимание  на то, что пришлось изменить "EXPIRY_DATE"  с "GTC" на "TODAY"  , иначе получал ошибку
Код
   
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     ' процедура  НОВЫЙ  стоп-лимит по исполнению заявки 
 
Страницы: 1
Читают тему (гостей: 1)
Наверх