Gravar Dados De Uma Query A Uma Outra Query

[Guest Eduardo Nobrega Aguiar]

estou com um probleminha facil eu acho é que o seguinte

preciso fazer uma atualização de daADOS DE UMA QUERY PARA OUTRA QUERY .....EX

QURO GRAVAR NA TABELA INVENTÁRIO O CUSTO,QUANTIDADE,DATA DE FECHAMENTO QUE ESTES DADOS ESTÃO NA TABELA DE ESTOQUE

COLOQUEI UM BOTÃO PARA FAZER ISSO E AO CLICA-LO

FAÇA

WITH QRINVENTARIO DO

BEGIN

INSERT;

QRINVENTÁRIO.FIELDBYNAME('CTMEDIO').ASINTEGER:=QRESTOQUE.FILDBYNAME('CTMEDIO').ASINTEGER;

POST;

UPDATE;

SO QUE DA ERRO NO FOREIGN KEY CONSTRAINT

MUITO GRATO NOBREGA......

[Guest Guest]

Ola amigo tente assim

WITH QRINVENTARIO DO

BEGIN

qrinventario.append;

QRINVENTÁRIO.CTMEDIO.value:=QRESTOQUE.CTMEDIO.value;

qrinventario.POST;

qrinventario.refresh;

beleza

T+