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;
文章標籤
全站熱搜
創作者介紹
創作者 pointer53 的頭像
pointer53

EBS備忘錄

pointer53 發表在 痞客邦 留言(0) 人氣(0)