--創建一個表
create table wan (ename varchar2(6),sex char(2),hiredate date,sal number(8),hun number(1) default 0);

select * from wan;


--插入數據
insert into wan(ename,sex,hiredate,sal) values (‘馬驥‘,‘男‘,to_date(‘2000-01-01‘,‘yyyy-mm-dd‘),5000 );
insert into wan(ename,sex,hiredate,sal) values (‘馬強‘,‘男‘,to_date(‘2001-02-11‘,‘yyyy-mm-dd‘),5500 );
insert into wan values (‘薛凱‘,‘女‘,to_date(‘2000-01-01‘,‘yyyy-mm-dd‘),5000 ,1);
insert into wan values (‘馬強‘,‘男‘,to_date(‘2001-02-11‘,‘yyyy-mm-dd‘),5500 ,default);

savepoint a1; --設置回滾點
-- 執行語句
declare --聲明部分
se wan.sex%type; --定義變量
begin --執行部分
select sex into se from wan where sex=‘女‘;
dbms_output.put_line(‘性別是:‘||se);
if se =‘女‘ then
update wan set sex=‘男‘ where ename=‘薛凱‘;
insert into wan values (‘白超峰‘,‘男‘,to_date(‘2005-05-11‘,‘yyyy-mm-dd‘),6500 ,default);
delete from wan where sal=5000;
--alter table wan drop column hun; 不能這樣操作
-- drop table wan;
end if;
end; --結束部分

rollback to a1; --回滾到指定點

alter table wan add (local varchar2(8));

設置回滾點