create or replace procedure next_value (seqname varchar2) as nextvalue integer; stat varchar2(100); begin stat := 'select '|| seqname||'.nextval from dual'; execute immediate stat into nextvalue; dbms_output.put_line('Next value is: '||TO_CHAR(nextvalue)); end;
begin next_value('dept'); end;
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)