oracle 存储过程 单条 多条 逻辑

Posted 2022-12-07 IT的鱼

--用存储过程返回一条记录

CREATE OR REPLACE  PROCEDURE proc_select02 
  (vperson out TBLTVDR_N8770B_STIH237%rowtype)   
  is     
  begin
   select * into vperson from TBLTVDR_N8770B_STIH237 where nuid = 'B8A10002';
  end;
  
  
  declare n TBLTVDR_N8770B_STIH237%rowtype;
begin

    proc_select02(vperson=>n);
    dbms_output.put_line('The input string is:' || n.nuid);
end;


--用存储过程返回一个结果集

create or replace procedure proc_select06(out_var out sys_refcursor)
  as
   begin
    open out_var for select * from TBLTVDR_N8770B_STIH237;
  end;



declare
  v_out sys_refcursor;
 begin
  proc_select06(v_out);
 end;