DECLARE
ora_err NUMBER;
rg_id RECORDGROUP;
BEGIN
rg_id := CREATE_GROUP_FROM_QUERY('CGLL$POP_LIST','
SELECT LIBELLE , CODE
FROM ( SELECT column1 CODE,
column2 LABEL
FROM your_table_name
WHERE ( your_where_clause) ) ');
/* Populate the record group by executing the query */
ora_err := POPULATE_GROUP(rg_id);
/* Intitialise the list item with the record group */
POPULATE_LIST('VU.CODE_GENRE', rg_id);
/* Always delete the record group */
DELETE_GROUP(rg_id);
END;
ora_err NUMBER;
rg_id RECORDGROUP;
BEGIN
rg_id := CREATE_GROUP_FROM_QUERY('CGLL$POP_LIST','
SELECT LIBELLE , CODE
FROM ( SELECT column1 CODE,
column2 LABEL
FROM your_table_name
WHERE ( your_where_clause) ) ');
/* Populate the record group by executing the query */
ora_err := POPULATE_GROUP(rg_id);
/* Intitialise the list item with the record group */
POPULATE_LIST('VU.CODE_GENRE', rg_id);
/* Always delete the record group */
DELETE_GROUP(rg_id);
END;
文章標籤
全站熱搜
