Muitas vezes me perguntaram como se preenche dinamicamente um LIST-ITEM. Abaixo vou demonstrar um pequeno e simples exemplo de como fazer isso:
CURSOR c1
IS SELECT <campo-chave> , <campo-descricao>
FROM <tabela>;
r1 c1%ROWTYPE;
BEGIN
-- Limpa o conteúdo do list-item
CLEAR_LIST('<nome-list-item>');
OPEN c1;
LOOP
FETCH c1 INTO r1;
EXIT WHEN c1%NOTFOUND;
-- Adiciona um elemento na lista
ADD_LIST_ELEMENT('<nome-list-item>',<indice - v_seq>,<campo-descricao>, <campo-chave>);
v_seq := v_seq + 1;
END LOOP;
CLOSE c1;
END;
Para fazer com que a lista inicie em um ítem específico, apenas faça:
<list-item> := <campo-chave>;
Fica a dica !
Formado em Gestão em Tecnologia da Informação, com sólidos conhecimentos em SQL, PL/SQL, Oracle Forms, Reports e E-Business Suite (AP,AR e GL).
Foi durante 3 anos gerente de tecnologia de grande empresa do setor de saúde, e atualmente atua como Analista de Sistema Sênior na Scania Latin America e também como Diretor-fundador do GPO (Grupo de Profissionais Oracle).
