Dynamic execution of sequenc

Question

Hi,
I have the below function which takes the sequence name as variable and
returns me the next val.
Function fngetnextseq(object_id varchar2) return number IS
l_next_no number(38);
l_sql varchar2(100);
BEGIN
     l_sql := 'select '||object_id ||'.nextval into l_next_no from dual';
      execute immediate l_sql;
      return l_next_no;  
END;END TEST;
But while executing its throws an error.
Any idea how this can be solved so that i can take sequence name dynamically at runtime and then execute it.
Thanks

Answer 1

execute_immediate_statement ::=
EXECUTE_IMMEDIATE dynamic_string
    INTO { define_variable [, define_variable ...] | record_name }
  | BULK COLLECT INTO { collection_name [, collection_name ...] | :host_array_name }
   [ USING [ IN | OUT | IN OUT ] bind_argument
   [, [ IN | OUT | IN OUT ] bind_argument] ... ] [ returning_clause ] ;Try like this:
Function fngetnextseq(object_id varchar2) return number IS
l_next_no number(38);
l_sql varchar2(100);
BEGIN
     l_sql := 'select '||object_id ||'.nextval from dual';
      execute immediate l_sql into l_next_no;
      return l_next_no;  
END;