estou utlizando o forms 4.5, e tenho uma list item, e quando o usuário seleciona determinado valor nela, ela preenche os display item utilizando a procedure abaixo, porém ele exibi a mensagem de erro:
FRM-40102 Record must be entered or deleted first.
PROCEDURE popular_valor IS
v_numero number;
v_numero2 number;
cursor a (numero number) is
select a.cd_contato, a.nm_contato
from estrutura_comercial a
where a.cd_contato = numero;
cursor comsetor (numero number) is
select cd_contato
from comercial_setorial
where comercial_setorial.cd_gestao_setorial = numero;
BEGIN
v_numero := to_number(:item19);
for e in comsetor(v_numero)
loop
create_record;
for i in a(e.cd_contato)
loop
:item7 := i.cd_contato;
:item8 := i.nm_contato;
end loop;
next_record;
end loop;
close a;
close comsetor;
EXCEPTION
When too_many_rows then
message('Muitas Linhas Retornadas!');
message('Muitas Linhas Retornadas!');
END;
Obrigado,
Alex