Copiar campo blob para outro campo blob

Delphi

02/01/2006

pessoal

utilizo FB 1.5 e tenho duas tabelas, cada uma com um campo bloB.
quero migrar os dados de uma para a outra
qual a forma garantida de migrar estes campos Blob ?
obs.: existem vezes q o campo blob não é preenchido, mesmo assim o registro tem q ser migrado.

tentei isso abaixo, é correto e garantido ?
if not(TblAnm.FindKey([Codigo]))then
begin
  TblAnm.Insert;
  TblAnmCODIGO.Value  := Codigo;  // é um integer;
  TblAnmDATA.Value      := TblOldDATA.Value;  // campo Date;
  TblAnmDS.Value          := TblOldDS.Value; // Campo string
  TblAnmDADOS.Value   := TblOldDADOS.Value; // campo BLOB
  TblAnm.Post;
end;



Diogoalles

Diogoalles

Curtidas 0

Respostas

Edilcimar

Edilcimar

02/01/2006

em vez de fazer a importação direta campo a campo, teste o campo blob antes para ver se o mesmo não é nulo, se não for faça a importação direta e se for jogue um nulo


GOSTEI 0
Diogoalles

Diogoalles

02/01/2006

´importação direta´ ?

seria isso ?

if not(TblAnm.FindKey([Codigo]))then 
begin 
  TblAnm.Insert; 
  TblAnmCODIGO.Value  := Codigo;  // é um integer; 
  TblAnmDATA.Value      := TblOldDATA.Value;  // campo Date; 
  TblAnmDS.Value          := TblOldDS.Value; // Campo string 

  if not(TblOldDADOS.IsNull) then
    TblAnmDADOS.Value   := TblOldDADOS.Value // campo BLOB 

  TblAnm.Post; 
end;



GOSTEI 0
Edilcimar

Edilcimar

02/01/2006

é, só falta fazer o else para quando o campo for nulo e vc desejar colocar algo lá!


GOSTEI 0
POSTAR