var_sal number(9,2); begin --执行部分的开始
select ename ，sal into var_name ，var_sal from emp where empno = var_empno; dbms_output.put_line(var_empno || ' 的名字是 :' || var_name); --输出语句 dbms_output.put_line(var_empno || ' 的工资是 :' || var_ sal ); --输出语句 end; --执行部分的结束，end后面要加 ;
----执行结果为：
7369 的名字是 : SMITH
1. 定义游标update_cur，根据职务调整雇员的工资，如果职务为
?SALESMAN?或者?ANALYST?工资上调100元，如果职务为?MANAGER?工资上调200元，其它职务工资上调50元。
1.
DECLARE
v_job emp.job%TYPE; CURSOR update_cur IS
SELECT job FROM emp FOR UPDATE; BEGIN
OPEN emp_cur; LOOP
FETCH update_cur INTO v_job;
EXIT WHEN emp_cur%NOTFOUND; CASE
WHEN v_job='SALESMAN' OR v_job='ANALYST' THEN update emp set sal=sal+100 where current of emp_cur; WHEN v_job=' MANAGER ' THEN
update emp set sal=sal+200 where current of emp_cur; ELSE
update emp set sal=sal+50 where current of emp_cur;
END CASE; END LOOP; END;
2. 创建一个触发器，使其可以修改DEPT表的DEPTNO。
create or replace trigger update_dept after update on dept for each row begin
update emp set deptno=:new.deptno where deptno=:old.deptno; end;