Consulta !

Dicas do Oracle Forms Builder - Blocos, Itens, LOV, Canvas, Triggers, comandos, PLL, d2kwutil, FMB, Alert, menus, etc
Responder
thebranco
Rank: Programador Sênior
Rank: Programador Sênior
Mensagens: 61
Registrado em: Ter, 04 Ago 2009 7:29 pm
Localização: santa cruz das palmeiras

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:

Selecionar tudo

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
diegolenhardt
Moderador
Moderador
Mensagens: 1177
Registrado em: Qui, 15 Out 2009 10:28 am
Localização: Recife

Clear_block(No_Validate);

antes do loop
Responder
  • Informação
  • Quem está online

    Usuários navegando neste fórum: Nenhum usuário registrado e 13 visitantes