Jump to content

Assista tectoy.png

Gravar campo blob no Firebird


Pedro R Tortoro
  • Este tópico foi criado há 1342 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 to comment
Share on other 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');

 

  • Like 1
Link to comment
Share on other 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 to comment
Share on other sites

  • 1 month later...
  • 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
Ajude o Projeto ACBr crescer - Assine o SAC

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 to comment
Share on other sites

  • Este tópico foi criado há 1342 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.
Guest
This topic is now closed to further replies.
×
×
  • Create New...

Important Information

We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.