[Алексей Контев]

Скорее всего, где-то в методе используется выход из метода по условию без использования ttsabort;
В этом случае ttscommit не работает, следовательно, непарные ttsbegin и ttscommit