1 set serveroutput on ;
 2 
 3 --使用基本类型的变量
 4 declare
 5   --定义基本变量类型
 6   --定义基本数据类型
 7   pnumber number(7,2);
 8   --字符变量
 9   pname varchar2(20);
10   --日期类型变量
11   pdate date;
12 
13 begin
14 
15   pnumber := 1;
16   DBMS_OUTPUT.PUT_LINE(pnumber);
17   
18   pname := ‘Tom‘;
19   DBMS_OUTPUT.PUT_LINE(pname);
20   
21   pdate := sysdate;
22   DBMS_OUTPUT.PUT_LINE(pdate);
23   
24   --计算明天的日期
25   DBMS_OUTPUT.PUT_LINE(pdate+1);
26   
27 end;
28 
29 /

 1 --引用变量
 2 declare
 3   --定义引用变量：查询并打印7839的姓名和薪水
 4   pname emp.ename%type;
 5   psal emp.sal%type;
 6   
 7 begin
 8 
 9   select ename,sal into pname,psal from emp where empno = 7839;
10   dbms_output.put_line(pname||‘的薪水是‘||psal); 
11 end;
12 /

--使用记录型变量查询并打印7839的姓名和薪水
set serveroutput on;

declare

  emp_rec emp%rowtype;
  
begin
  select * into emp_rec from emp where empno=7839;
  
  dbms_output.put_line(emp_rec.ename||‘的薪水是‘||emp_rec.sal);
  

end;
/