Pedro R Tortoro

Problema resolvido. Obrigado.

Por algum erro, cadastrei os funcionários com todos os campos do infoDeficiencia como true, e agora ao tentar corrigir estes campos, ao informar todos eles com tnNao, o grupo infoDeficiencia não é enviado ao eSocial. Como faço para corrigir isto ? Obrigado.

Fiz conforme o EMBarbosa orientou e funcionou. Obrigado.

Boa tarde, Estou tentando atualizar o ACBR para migrar para a versão 2.5 do eSocial. Quando faço a atualização do SVN ocorrem alguns conflitos conforme listados em ErroInstala1. Quando executo o ACBrInstall_Trunk2, mesmo marcando a opção de remover arquivos antigos do disco, ele aborta conforme arquivo log anexo. Obs: Só utilizo os componentes do eSocial. Grato log_Delphi_2007.txt

Oi Arce, Obrigado pela resposta, mas o que eu preciso é gravar um TMemo (ou dbMemo) em um campo tipo Blob no Firebird, e isto não consigo. Pesquisei muito na internet e pelo que eu vi, o Delphi 2007 não consegue gravar campos blob (ou memo) no firebird (2.1) utilizando os componentes do DBExpress, visto que estes componentes são próprios para o Interbase.

Boa tarde pessoal, não estou conseguindo gravar campo blob no Firebird. Já vasculhei a internet, forums, testei todas as sugestões apresentadas e não tive sucesso. Já tentei com passagem de parâmetro, direto de campo DBMemo, com TMemoryStrem, LoadFromStream, no banco definindo como campo blob, campo blob text, etc, etc. O que eu pretendo é gravar o retorno do envio dos lotes do eSocial, formatado de uma maneira parecida com o exemplo do ACBr, com as mensagens de erros de cada evento enviado. Estou usando Delphi 2007 com DBExpress, banco Firebird 2.1 e o campo foi definido assim "CAMPOB BLOB SUB_TYPE 1 SEGMENT SIZE 1024," A mensagem que apresenta é "incorrect values within SQLDA structure". Alguém poderia me dizer qual a maneira correta de gravar campos blob ou outra maneira de armazenar o resultado e poder exibir posteriormente. ? Grato

Ok. Obrigado.

Minha aplicação está retornando esse erro abaixo: E R R O: WebService: http://www.esocial.gov.br/servicos/empregador/lote/eventos/envio/v1_1_0/ServicoEnviarLoteEventos/EnviarLoteEventos - Inativo ou Inoperante tente novamente. Erro Interno: 0 Erro HTTP: 0 URL: https://webservices.envio.esocial.gov.br/servicos/empregador/enviarloteeventos/WsEnviarLoteEventos.svc Falha ajustando WINHTTP_OPTION_SECURE_PROTOCOLS. Erro:Erro: 87 - Quando enviando lote com Windows XP e certificado A3. Se eu alterar a SSLCryptLib para cryOpenSSL e a SSLHttpLib para httpOpenSSL, dá erro "TDFeOpenSSL não suporta a carga de certificado pelo número de série. Utilize Arquivo PFX ou Dados.pfx" por estar usando certificado A3. Tem como usar um certificado A3 com Windows XP ? Grato.

Obrigado pessoal, já deu ter uma idéia de como fazer.

Deixa eu explicar melhor a minha dúvida: Para cada evento gerado, utilizando as classes, programas do ACBr, como por exemplo, ao gerar o evento S1000 a partir de: with ACBreSocial1.Eventos.Iniciais.S1000.Add do é gerado o ID_EVENTO pelo componente. Aí todo o lote é enviado com vários eventos e cada um com seu ID. O eSocial me retorna o Protocolo de Envio e através deste eu tenho acesso às informações de cada evento processado, como ID, número recibo e código/descrição de resposta. O que eu quero é cruzar cada evento enviado com o respectivo evento recebido nesta consulta para fazer os devidos tratamentos. Grato.

Boa noite, Para cada evento, o ACBr cria automaticamente o ID_EVENTO. Eu queria ter o conteúdo de cada ID criado pelo ACBr, ou então, se eu teria a opção de gerar o ID e passar ao ACBr para envio do lote. Grato,

Bom dia, tem como obter o ID de cada evento gerado pelo ACBr no momento da geração do XML ou então, tem como eu gerar o ID e passar para o ACBr ? Obrigado.

Ok, setando o ssllib, funcionou. Muito obrigado. Pedro

No programa exemplo, funciona. Rafael, não entendi como selecionar a classe, eu incluí o ACBrDFeSSL no uses. Seria isso ?

Boa tarde, Estou tentando consultar o retorno do processamento de um lote enviado ao eSocial e está retornando o erro: Método enviar não implementado em TDFeSSLHttpClass Este erro está ocorrendo na linha 1149 do ACBrDFeSSL : Result := FSSLHttpClass.Enviar(ConteudoXML, AURL, ASoapAction, AMimeType); e a função que está sendo chamada está na linha 821 do ACBrDFeSSL: function TDFeSSLHttpClass.Enviar(const ConteudoXML: String; const AURL: String; const ASoapAction: String; AMimeType: String): String; begin {$IFDEF FPC} Result := ''; {$ENDIF} raise EACBrDFeException.Create('Método "Enviar" não implementado em: '+ClassName); end; Alguém pode me orientar nesse erro ? Grato Pedro