create or replace procedure cnav_group_id_in_list
(
 p_result OUT varchar2,
 p_group_id IN varchar2,
 p_group_id_list IN long
)
IS
BEGIN
 if (p_group_id is null or p_group_id_list is null) then
   p_result := null;
   return;
 end if;
 if ( ListFind(p_group_id,p_group_id_list,',') = 0) then
   p_result :='0';
  else
   p_result := '1'; 
 end if;  
END cnav_group_id_in_list;
/
show errors;