Bom dia a todos,
tenho uma trigger para inserir na um lançamento no fluxus de CSLL, esta trigger funcionava muito bem, até que de repente começam a aparecer para os usuários a seguinte mensagem:
No user transaction is currently in progress. The ROLLBACK TRANSACTION request has no corresponding BEGIN TRANSACTION.
Já olhei aqui no forum alguns posts mas nenhum deles resolveu meu problema, tenho quase certeza que isso aconteceu depois que mudei da versão 10.60 para a versão 10.80 mas não tentei voltar a versão porque de toda maneira terei que resolver o problema na versão atual. Alguém tem alguma idéia do que pode estar acontecendo? Segue abaixo minha trigger:
CREATE TRIGGER ADD_CSLL on FTRBLAN
FOR INSERT AS
DECLARE @IDLAN INTEGER
DECLARE @NUMERODOCUMENTO VARCHAR(40)
DECLARE @HISTORICO VARCHAR(255)
DECLARE @MOVIMENTO VARCHAR(10)
DECLARE @STATUS VARCHAR(1)
DECLARE @CODCFO VARCHAR(25)
DECLARE @CODTDO VARCHAR(10)
DECLARE @USUARIO VARCHAR(20)
DECLARE @VALOR_OR DECIMAL(9,2)
DECLARE @NFOUDUP SMALLINT,@CLASSIFICACAO SMALLINT,@PAGREC SMALLINT,@STATUSLAN SMALLINT
DECLARE @DATACRIACAO DATETIME,@DATAVENCIMENTO DATETIME,@DATAEMISSAO DATETIME,@DATAPREVBAIXA DATETIME,@DATAOP1 DATETIME
SELECT @IDLAN = IDLAN, @VALOR_OR = VALOR FROM INSERTED
SET @CLASSIFICACAO = 21
SELECT @NUMERODOCUMENTO = NUMERODOCUMENTO, @NFOUDUP = NFOUDUP,
@PAGREC = PAGREC,@STATUSLAN = STATUSLAN, @USUARIO = USUARIO,
@DATACRIACAO = DATACRIACAO,@DATAVENCIMENTO = DATAVENCIMENTO,@DATAEMISSAO = DATAEMISSAO,
@DATAPREVBAIXA = DATAPREVBAIXA,@DATAOP1 = DATAOP1
FROM FLAN WHERE IDLAN = @IDLAN
SET @HISTORICO = 'Tributação referente a lançamento Ref. "' + @NUMERODOCUMENTO + '", Cód. Tributo "CS-RF", Cód. Retenção "005"'
SET @CODTDO = '029'
IF @IDLAN <> 1
BEGIN
INSERT INTO FLAN(CODCOLIGADA,IDLAN,NUMERODOCUMENTO,CLASSIFICACAO,PAGREC,STATUSLAN,CODCOLXCX,
HISTORICO,
DATACRIACAO,DATAVENCIMENTO,DATAEMISSAO,DATAPREVBAIXA,DATAOP1,VALORORIGINAL,CODCF
O,CODCOLCXA,CODTDO,CODFILIAL,
SERIEDOCUMENTO,TIPOCONTABILLAN,USUARIO,USUARIOCRIACAO,DATAALTERACAO,CODRECEITA,A
LIQUOTA,PERCBASEINSSEMPREGADO,
REUTILIZACAO,INSSEMOUTRAEMPRESA,CODCOLCFO)
VALUES(1,@IDLAN + 2,@NUMERODOCUMENTO,@CLASSIFICACAO,2,0,1,@HISTORICO,
@DATACRIACAO,@DATAVENCIMENTO + 15,@DATAEMISSAO,@DATAPREVBAIXA,@DATAOP1,@VALOR_OR,'F00053',1,@CODTDO,1,
'@@@',2,@USUARIO,@USUARIO,@DATACRIACAO,'005',1.5,100,1,0,0)
END