[set severoutput on]

declare
????變量，標記，用戶定義的數據，游標的聲明
begin
????主體部分，只能放DML語句
exception
????異常處理部分
end

-- := 是賦值的意思

<常量名> constant <數據類型> :=<值>；

-- 語法結構

DECLARE
????變量名 類型 := 默認值；

-- 基本變量類型

Char、boolean、number
-- 引用型變量
my_name emp.ename%type

my_name的類型與emp表中的ename字段的類型一樣

dbms_output.put_line(打印內容);

||

-- 提示輸入語句，用戶輸入一個值，將輸入的值賦給age，MESSAGE是提示內容，age可以不用聲明

accept age prompt ‘MESSAGE’
-- 在begin和end之間接收數據，（nn需要提前聲明）
nn:=&age

-- 將查詢結果賦給變量，使用into關鍵字
select id,name into sid,sname from person where id=1;

if ... then
elsif ... then
else
end if

case var when ... then
when ... then
end

declare
????i int:=0;
begin
????i:=(case when 1=1 then 111 else 222 end);
????dbms_output.put_line(i);
end;

select (case when id=2 then ‘2222’ else ‘333’ end) from t6;

Loop
<程序塊>
if <條件表達式> then
exit
end if
<程序塊2>
end loop;

loop
<程序塊1>
exit when<表達式>
<程序塊2>
end loop;

while ... loop ... end loop
當while為真時循環

declare

??Varnum INTEGER:=1;

??Varnum INTEGER:=0;

Begin

???While ?varNum<=4

???Loop

??????varSum:=varNum+varSum;

??????varNUm:=varNum+1;

???End loop

End;

for <循環變量> in <初始值> ..<終止值> loop
<程序塊>
end loop

exception
when<異常情況名>then
<異常處理代碼>
when<異常情況名>then
<異常處理代碼>
when others then
<異常處理代碼>

?

set serveroutput on; -- 打開打印
begin
????insert into person values('','');
????insert into person values('','');
commit;
??exception
????when others then
??????rollback;
??????dbms_output.put_line(SQLCODE||SQLERRM);
end;

declare
myException EXCEPTION;
begin
???update person set ids=''
???if sql%notfound then
????????----
???end if;
???exception
??????when others then
??????---
end

type 類型名稱 is record
(
變量名稱1 數據類型,
變量名稱2 數據類型,
變量名稱2 數據類型
);

type charset is table of char;
answ charset :=charset('a','b','c','d');

變量名 表名%rowtype
變量名 表名.列%type