Ir para conteúdo
  • Cadastre-se

dev botao

Gravar campo blob no Firebird


  • Este tópico foi criado há 1941 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

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

Link para o comentário
Compartilhar em outros sites

Você pode gravar desta forma.

  qrExec.SQL.Add(' sql para gravar o xml ')
  qrExec.ParamByName('XML').Value := ACBreSocial.Eventos.Iniciais.S1005.Items[i].evtTabEstab.XML;
  qrExec.ExecSQL;

  qrEvento.SQL.Add('select da tabela gravada ');    
  qrEvento.Open;

  // Salva o XML do arquivo  
  TBlobField(qrEvento.FieldByName('XML')).SaveToFile('C:\evento_ret.xml');

 

  • Curtir 1
Link para o comentário
Compartilhar em outros sites

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.

Link para o comentário
Compartilhar em outros sites

  • 1 mês depois ...
  • Administradores

Boa tarde.

Este tópico está inativo a algum tempo e por isso será fechado, caso necessário favor criar um novo tópico.

Att.

Consultora SAC ACBr

Juliana Tamizou

Gerente de Projetos ACBr / Diretora de Marketing AFRAC
Ajude o Projeto ACBr crescer - Seja Pro

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.  Discord

Projeto ACBr - A maior comunidade Open Source de Automação Comercial do Brasil


Participe de nosso canal no Discord e fique ainda mais próximo da Comunidade !!

Link para o comentário
Compartilhar em outros sites

  • Este tópico foi criado há 1941 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.
Visitante
Este tópico está agora fechado para novas respostas
×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.

The popup will be closed in 10 segundos...