**
–匿名代码块
**
declare --定义变量
deptcount2 number(2); --声明
deptno2 number(2) := 60; --声明且赋值
begin--可执行语句块开始
--查询sql=语句,将值放入变量
select count(1) into deptcount2 from dept where deptno = deptno2;
--如果记录为0则表示不存在此编号的部门
if deptcount2 = 0 --条件判断
then
--执行插入操作
insert into dept values(deptno2,'财务部','深圳');
--显示信息
dbms_output.put_line('成功插入部门资料');
end if; --if结束
exception --异常处理
when others
then
--显示异常信息
dbms_output.put_line ('部门资料插入是失败');
end;--语句块结束
---------
**
** —定义变量
**
declare
deptname varchar2(10); --标量变量
loopcount binary_integer; --pl/sql变量类型定义标量变量
--定义记录类型’
type employee2 is record(
empname varchar2(20);
empno number(7);
job varchar2(20);
);
employee = employee2; --定义记录类型变量
type csor is ref cursor; --游标变量
v_date date not null default sysdate ;--默认系统时间
begin
null
end;