CREATE PROCEDURE TRASNSF
AS
DECLARE VARIABLE VCODIGO INTEGER;
DECLARE VARIABLE VDESCRICAO VARCHAR(60);
BEGIN
   FOR SELECT A.CODIGO,A.DESCRICAO
   FROM TABELA1 A
   INTO:VCODIGO,:VDESCRICAOi
   DO
   BEGIN
     UPDATE TABELA2 B
     SET B.DESCRICAO=:VDESCRICAO
     WHERE B.CODIGO=:VCODIGO;
     SUSPEND;
   END
END
Nao deveria funcionar,preenchendo DESCRICAO da tabela2 com DESCRICAO da tabela1?

[ ]'s
Savio Assuncao
D6+DbExpress+FB1.5+Cl10


