Александр Зайченко (Все сообщения пользователя)

Выбрать дату в календареВыбрать дату в календаре

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