[firebase-br] Atualizar a tabela B com dados de A

[Paulo Geloramo]

Firebird 2.5.8
Atualizar a tabela B com dados de A
Estou usando o código abaixo, porem
este código não executa no componente IBScript.
Tem alguma sugestão para atualizar uma tabela com informação de outra?
====
EXECUTE BLOCK
AS
DECLARE ID INTEGER;
DECLARE QUANTIDADE INTEGER;
BEGIN
  FOR SELECT ID, QUANTIDADE
      FROM A
      INTO :ID, :QUANTIDADE DO
  BEGIN
    UPDATE B
    SET QUANTIDADE = QUANTIDADE + :QUANTIDADE
    WHERE ID = :ID;
  END
END
====
--
Paulo Esteves