Oracle存储过程学习

create or replace procedure my_pro1(
para1 in wi_reference.name%type,  -- 不能带长度信息
para2 out wi_reference.name%type
)
aS
begin
       --游标方式1
     --定义变量
     declare val varchar2(20);
     --定义游标
     cursor cur is select name from wi_reference where rownum<10;
     
     begin
     --打开游标
     open cur;
     
     --循环数据集
     loop 
     fetch cur into val;
     exit when cur%notfound;
     dbms_output.put_line(val);
     end loop;
     
     --关闭游标
     close cur;
     end;
     
     --隐式游标
     for res in (select name from wi_reference where rownum<10) loop
     dbms_output.put_line(res.name);
     end loop;
     
     --case语法
     declare  
     num number(10) := 1;  
     begin  
      case   
          when num = 0 then dbms_output.put_line( 'zero');  
          when num = 1 then dbms_output.put_line( 'one');  
          else  dbms_output.put_line( 'default');  
      end case;  
        
      case num  
          when 0 then dbms_output.put_line( 'zero');  
          when 1 then dbms_output.put_line( 'one');  
          else  dbms_output.put_line( 'default');  
      end case;  
    end; 
    --for循环
    for i in 0..9 loop  
    dbms_output.put_line('i:' || i);  
    end loop;  
    --if语法
    if a = 1 or b = 2 then  
  
    elsif c = 3 then  
  
    else  
  
    end if; 
    
end my_pro1;


call my_pro1('213','213');


--在语句块中执行DDL语句
DBMS_UTILITY.EXEC_DDL_STATEMENT(create,drop...)