DECLARE
rg_list_item recordgroup;
ret_code NUMBER;
BEGIN
--SQL里必做是以值键两个字段顺序,并且都要为字符串类型
rg_list_item := CREATE_GROUP_FROM_QUERY ('RG_LIST_ITEM_NAME'
, ' SELECT meaning, lookup_code
FROM FND_LOOKUPS
WHERE 1 = 1 AND lookup_code = ''GROUP_NAME''
ORDER BY lookup_code');
ret_code := POPULATE_GROUP (rg_list_item);
POPULATE_LIST ('BLOCK.ITEM', 'RG_LIST_ITEM_NAME');
END;