Softshop > NFe: Erro encontrado na funçao ValidarErros_NFe: 7878 - Os dados foram alterados
Software: SOFTSHOP | Grupo: NFE | Prioridade: ALTA
Solução
Causa:
Erro na função "LiberarNFe", está definindo valor no campo "Validado" causando conflito de gravaçao dos dados via ODBC, ocorre apenas em clientes com banco SQL Server.
Solução:
1 - No módulo de Segurança, aba "SQL Server" marcar a opção "Utilizar Banco SQL Server", informar os dados de conexão ao banco e clicar em "Testar conexão"
2 - No formulario NotaFiscal_Cabecalho, ir na função "LiberarNFe" e fazer o seguinte:
2.1- Comentar a linha 668 que contém: ' [Forms]![NotaFiscal_Cabecalho]![Validado] = 0
2.2- Descomentar a linha 667 que contém: CurrentDb.Execute "UPDATE [NotaFiscal_Cabecalho] SET [Validado] = 0 WHERE [Registro] = " & [Forms]![NotaFiscal_Cabecalho]!registro, dbSeeChanges
3 - Vá no módulo "ModuloValidacao" fazer o seguinte: Fazer a instrução do repetir consulta para o retorno 2 e para o "else"
3.1- Comentar a linha ' [Forms]![NotaFiscal_Cabecalho]![Validado] = -1 ' DoCmd.RunCommand acCmdSaveRecord
3.2 - Colar bloco abaixo: (OBS: O update já existe, está apenas comentado) CurrentDb.Execute "UPDATE [NotaFiscal_Cabecalho] SET [Validado] = -1 WHERE [Registro] = " & cRegistro, dbSeeChanges Forms![NotaFiscal_Cabecalho]!RegistroNFe = Forms![NotaFiscal_Cabecalho]!Registro Forms![NotaFiscal_Cabecalho].Form.Requery DoCmd.GoToControl "Registro" DoCmd.FindRecord [Forms]![NotaFiscal_Cabecalho]![RegistroNFe] DoCmd.GoToControl ("Registro")
4 - Abrir as referências do SOFTSHOP, a "Microsoft DAO 3.6 Object Library" tem que ficar com prioridade acima da "Microsoft ActiveX Data Objects 2.1 Library"
5 - Testar o "Organizar Estoque" para ter certeza que não foi afetado pelo fato de ter sido habilitado o "Utilizar banco SQL Server"
Tags: dados alterados, 7878, validarerros_nfe, validar erro