VPF::команда внутри транзакции - Форум программистов

Artiom

Дата 18.9.2006, 16:05 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Участник Клуба
Сообщений: 1031
Регистрация: 11.3.2003
Где: Минск\Баку

Репутация: 3
Всего: 17

основной код такой

Код


SELECT SELECT(1)  
    USE journal SHARED   
    SET MULTILOCKS ON   
    =CURSORSETPROP("Buffering" , 3)  
    BEGIN TRANSACTION   
    APPEND BLANK   
    GATHER FROM nArray FIELDS EXCEPT jr_id  
        IF !TABLEUPDATE(1)  
            ROLLBACK   
            SELECT journal  
            USE  
            MESSAGEBOX("Error writing log!", 16, "error")  
            RETURN   
        ENDIF   
    END TRANSACTION   
    SELECT journal  
    USE

Проблема в том что когда я пытаюсь вызвать эту процедуру внутри другой транзакции - выдается ошибка на
=CURSORSETPROP("Buffering" , 3) (недопустимая команда внутри транзакции)
Как лучше поступить в этом случае?

Добавлено @ 16:20
Эта процедура пишет данные в лог файл - похоже просто придется отказаться от лога внутри транзакций - плохо smile

--------------------

Если тебя жизнь трахает, значит, ты ещё живой

Artiom

Дата 18.9.2006, 16:46 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Участник Клуба
Сообщений: 1031
Регистрация: 11.3.2003
Где: Минск\Баку

Репутация: 3
Всего: 17

ну оказалось что не страшно
вызываю свою процедуру или после ROLLBACK или за пределами транзакции - почти все что хотел в лог попадает

--------------------

Если тебя жизнь трахает, значит, ты ещё живой

Cashey

Дата 19.9.2006, 13:02 (ссылка)

(нет голосов)

Загрузка ...

Бессмертный

Профиль
Группа: Завсегдатай
Сообщений: 3441
Регистрация: 13.11.2002
Где: в столице

Репутация: 13
Всего: 60

Введи в ф-цию, производящую запись логов параметр, в который передавай нужно ли открывать транзакцию или нет. Например:

Код


LPARAM lTrans
SELECT SELECT(1)  
    USE journal SHARED   
    SET MULTILOCKS ON   
    IF !lTrans
        =CURSORSETPROP("Buffering" , 3)
    ENDIF 
    BEGIN TRANSACTION   
    APPEND BLANK   
    GATHER FROM nArray FIELDS EXCEPT jr_id  
        IF !TABLEUPDATE(1)  
            ROLLBACK   
            SELECT journal  
            USE  
            MESSAGEBOX("Error writing log!", 16, "error")  
            RETURN   
        ENDIF   
    END TRANSACTION   
    SELECT journal  
    USE

Или перед каждой командой транзакции

--------------------

библия учит любить ближнего, а камасутра обучает как именно

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Foxpro/Clipper/Dbase \| Следующая тема »