Menu de navegação

[thebrancoParticipante]

Ola pessoal !
Eu estou com um probleminha, estou utilizando oracle form 6I
tenho um form que tem 2 campos um de data inicial e outro de data final que servem de parametros para minha consulta e tenho um bloco que é preenchido com os resultados da pesquisa.
coloquei dentro da trigger KEY-NEXT-ITEM que é acionada quando eu teclo enter o seguinte codigo:
Código:

DECLARE
CURSOR CUR_FUNC IS
SELECT * FROM FUNCIONARIOS
WHERE FUN_DTCAD BETWEEN :BLK_PARAM.TXT1 AND :BLK_PARAM.TXT2 ORDER BY FUN_ID;
REG_FUNC CUR_FUNC%ROWTYPE;
BEGIN
OPEN CUR_FUNC;
LOOP
FETCH CUR_FUNC INTO REG_FUNC;
EXIT WHEN CUR_FUNC%NOTFOUND;
GO_BLOCK('BLK_FUNCIONARIOS');
:BLK_FUNCIONARIOS.FUN_ID := REG_FUNC.FUN_ID;
:BLK_FUNCIONARIOS.FUN_NOME := REG_FUNC.FUN_NOME;
:BLK_FUNCIONARIOS.FUN_CPF := REG_FUNC.FUN_CPF;
:BLK_FUNCIONARIOS.FUN_DTCAD := REG_FUNC.FUN_DTCAD;
NEXT_RECORD;
END LOOP;
CLOSE CUR_FUNC;
END;


ela funciona certo quando executo uma pesquisa ele preenche o bloco com os dados porem quando volto para as caixas de texto o bloco ainda continua preenchido e se eu precionar enter novamente ele não apaga os itens que já tem e duplica os dados já existentes…
como faço pra resolver isso ?

grato
Branco

[Leonardo LitzParticipante]

Ja tentou limpar o bloco antes de executar o cursor?

Coloca um Clear_Block(No_Validate); antes do cursor.

Vlw Leonardo Litz

[Autor]

Posts