Update com subselect no firebird

[MSOL]

Boa tarde!

Não tenho muita experiencia no Firebird.

Precisava atualizar a origem dos meus produtos de acordo com a ultima nota de entrada, mas não sei como fazer no firebird, pois uso o Firebird 2,5(não tem merge e nem aceita with para update como no SqlServer)

Tabelas e campos envolvidos:

Produtos.Codigo  e Produtos.Origem.

NfEntrada.DataEntrada, NfEntrada.Serie, NfEntrada.DataEmissao, NfEntrada.Numero

ITNfEntrada.Serie, ITNfEntrada.DataEmissao, ITNfEntrada.Numero, ITNfEntrada.CodProduto, ITNfEntrada.Origem,

 

[Pedro A. Araújo]

UPDATE PRODUTOS
SET ORIGEM = (
  SELECT FIRST 1 ITNFENTRADA.ORIGEM
  FROM ITNFENTRADA
  WHERE ITNFENTRADA.CODPRODUTO= PRODUTOS.CODIGO)

 

[MSOL]

Obrigado pela resposta, Pedro.

Porém, como pegará a ultima entrada, no caso tem que ser com max(NfEntrada.DataEntrada) que está somente na tabela Nfentrada

[Pedro A. Araújo]

Dentro do subselect, você pode fazer join com a tabela NfEntrada e odenar de forma decrescente pela data de entrada.

 

UPDATE PRODUTOS
SET ORIGEM = (
  SELECT FIRST 1 ITNFENTRADA.ORIGEM
  FROM ITNFENTRADA
  INNER JOIN NFENTRADA ON (NFENTRADA.ID = ITNFENTRADA.IDNFENTRADA)
  WHERE ITNFENTRADA.CODPRODUTO= PRODUTOS.CODIGO
  ORDER BY DATAENTRADA DESC)

 

Editado 28 Dezembro, 2022 por Pedro A. Araújo

[MSOL]

Deu certinho!

Obrigado, Pedro!

[Juliomar Marchetti]

Obrigado por reportar.

Fechando. Para novas dúvidas, criar um novo tópico.