动态sql.txt

来自「介绍了在oracle里」· 文本 代码 · 共 25 行

declare
  str1 varchar2(1000);
  p_id varchar2(10);
  v_SNAME varchar2(20);
  v_SAGE number;
Begin
  str1:='create table t1 (t varchar2(10))';
  execute immediate str1;

  str1:='insert into t1 (t) values (''5'') returning t into :p_id';
  execute immediate str1
  using out p_id;
  commit;
  dbms_output.put_line(p_id);

  p_id:='001';
  str1:='select SNAME,SAGE from STUDENT where trim(sno)=:p_id';
  execute immediate str1 into v_SNAME,v_SAGE
  using p_id; 
  dbms_output.put_line(v_SNAME||'  '||to_char(v_SAGE));

  Exception When others then
  dbms_output.put_line(sqlerrm);
end ;