流程控制語句【循環、條件】

閱讀目錄

--簡單循環

declare                    --聲明
  mynum number(3) := 0;    
begin
  loop
    mynum := mynum + 1;
    dbms_output.put_line(mynum);    exit when mynum = 200; --退出循環條件
  end loop;end;

--while循環

declare
  i number := 1;begin
  while i <= 100 loop  --執行循環條件           dbms_output.put_line(i);
    i := i + 1;  end loop;end;

--for循環

begin
  for i in 1 .. 10 loop
    dbms_output.put_line(i);  end loop;end;

--goto循環

declare
   i number := 1;begin
   loop 
     dbms_output.put_line('i:'||i);
     i := i + 1;   if i > 100 then
       goto biaoji;   end if;   end loop;   <<biaoji>>
     dbms_output.put_line('i:'||i);end;

--if條件語句

declare
  v_value1 number := 20;begin
  if v_value1 < 10 then
    dbms_output.put_line('v_value1小于10');
  elsif v_value1 < 20 then  --注意elsif 不是 else if
    dbms_output.put_line('v_value1小于20');  else
    dbms_output.put_line('v_value1大于或等于20');  end if;end;

--case when

declare
  v_value1 varchar2(2) := 'A';
  v_value2 varchar2(100);begin
  v_value2 := case v_value1                when 'A' then
                 '優秀'
                when 'B' then
                 '一般'
                else
                 '差勁'
              end;
  dbms_output.put_line(v_value2);end;

declare
  v_value1 varchar2(2) := 'A';
  v_value2 varchar2(100);begin
  v_value2 := case
                when v_value1 = 'A' then
                 '優秀'
                when v_value1 = 'B' then
                 '一般'
                else
                 '差勁'
              end;
  dbms_output.put_line(v_value2);end;

以上兩種方式都是可以的，這里注意了，case when語句 始終都都返回值（這點和if條件語句不一樣）。

也可以用于查詢結果和查詢條件

select case t.c_type         when 'B' then
          '一般'
         when 'A' then
          '優秀'
         else
          '差勁'
       end,       case
         when t.c_case_no = '4090003002115000012' then
          '4090003002015000012'
       end
  from tbl_claim t where t.c_case_no = case
         when t.c_case_no = '4090003002015000012' then
          '4090003002015000012'
       end;

--decode

decode(條件,值1,翻譯值1,值2,翻譯值2,...值n,翻譯值n,缺省值)

select decode('A', 'B', '一般', 'A', '優秀', '差勁') from dual;

可用于查詢結果和查詢條件。（但是不能像case when一樣賦值）

select decode(t.type, 'B', '一般', '差勁')  from mytable t where t.c_no = decode(t.c_no, '111', '111', '222');