Como utilizar cursor no Oracle Forms 6i?

Se você esta procurando como criar cursores no Oracle Forms 6i, segue abaixo um exemplo:

DECLARE
		      	
  CURSOR lobj_cursorUsuario is
  SELECT
     nome
     e-mail
  FROM
     usuario
  WHER
     AREA = :ID_AREA
			  
BEGIN

  FOR lobj_registroUsuario IN lobj_cursorUsuario LOOP
      
      message('Nome: ' || lobj_registroUsuario.nome || ' - E-Mail: ' || lobj_registroUsuario.e-mail, no_acknowledge);

  END LOOP;

END;

Observe que o objeto onde será armazenado o registro ( no exemplo lobj_registroUsuario) não precisa ser declarado.

Paulo A. Costa

Natural de Salvador-BA, é graduado em Analise de Sistemas pela Universidade Católica do Salvador (2003), e especialista em Engenharia de Software pela Universidade Salvador (2010). Exerce atualmente o cargo de Analista Judiciário na Justiça do Trabalho.