PL/SQL编程—数据类型

-- =====<PL/SQL中的数据类型>===== --
-- 包含标量类型、LOB类型、属性类型
  -- 标量类型包含:数字、字符、布尔型、日期时间、参照类型
  -- LOB类型包含:BFILE、BLOB、CLOB、NCLOB
  -- 复合类型包含:PL/SQL记录、PL/SQL表

-- 1.标量类型(scalar)==>常用类型,数据库中的预定义类型的变量
  -- 定义标量的语法:variable_NAME data_TYPE,其中variable_NAME是变量名,data_TYPE是PL/SQL中预定义的类型
  -- 定义变量示例
 -- 定义一个变长字符串

v_name varchar2(20);

 -- 定义一个小数并赋初始值为5.4,:=是赋值号
v_sal2 number(6,2):=5.4;

 -- 定义一个日期类型数据
v_hiredate date;

 -- 定义一个布尔变量,不能为空,初始值为FALSE
v_valid boolean not null default false;

 -- 定义一个常量
c_num constant number(5):=100;

-- 例:输入员工号,显示雇员姓名、工资、个人所得税。
-- 说明变量的使用

create or replace procedure pro_01(v_empno number) is

-- 声明需要用到的变量变量
-- 声明就定义了该变量
v_ename varchar2(20);
v_sal number(10,2);
c_taxrate constant number(3,2):=0.03;
v_tax number(10,2);

 begin
   select ename,sal into v_ename,v_sal from emp where empno=v_empno;
   
   -- 根据工资计算所得税
   v_tax:=v_sal*c_taxrate;
   
   dbms_output.put_line('姓名:'||v_ename||'工资:'||v_sal||'所得税:'||v_tax);
   
end;

-- 定义变量时数据类型参照数据库表中的数据类型,以实现对变量长度空间的灵活分配

create or replace procedure pro_02(v_empno number) is

-- 声明变量时数据类型参照表字段的类型
v_ename emp.ename%type;
v_sal emp.sal%type;
c_taxrate constant number(3,2):=0.03;
v_tax number(10,2);

 begin
   select ename,sal into v_ename,v_sal from emp where empno=v_empno;
   
   -- 根据工资计算所得税
   v_tax:=v_sal*c_taxrate;
   
   dbms_output.put_line('姓名:'||v_ename||'工资:'||v_sal||'所得税:'||v_tax);
   
end;

 -- 两例代码请注意变量声明时变量类型的区别

-- 2.复合变量==>
 -- PL/SQL记录=>一个类型存放多个数据
  -- 定义一个PL/SQL记录类型emp_recordtype
  -- 包含3个数据name,sal,job
  -- 语法:type CompositeTyp_NAME is record();
 -- 例:定义一个函数,根据输入的员工编号,返回员工的姓名,工资和岗位

-- 对于PL/SQL记录的使用首先要定义一个包,将记录放到包中:

-- 首先定义一个包
create or replace package package_01 is

  -- 在包中定义一个复合类型
  type emp_recordtype is record(
    v_name emp.ename%type,
    v_sal emp.sal%type,
    v_job emp.job%type
  );
  
end package_01;

  -- PL/SQL记录是为多返回值而生的,有时在PL/SQL编程中,得到的结果不止一个,且类型各不相同,使用PL/SQL记录可解决此问题:

-- 由于需要返回多个值,通过返回自定义类型,将多个值包含在自定义类型中
create or replace procedure pro_03(v_empno number) is

  -- 定义自定义类型的变量
  v_record package_01.emp_recordtype;
begin
  
  -- 查询语句
  select ename,sal,job into v_record.v_name,v_record.v_sal,v_record.v_job from emp where empno=v_empno;
  dbms_output.put_line('姓名:'||v_record.v_name||'工资:'||v_record.v_sal||'岗位:'||v_record.v_job);
end;

-- PL/SQL表=>
 -- 例:查询部门10的所有员工的姓名。

create or replace procedure pro_04(v_deptno number) is

-- 定义一个PL/SQL表类型=>表类型类似于C/C++/Java中的数组类型
type emp_tableNAME is table of emp.ename%type index by binary_integer;

-- 使用自定义表类型创建数组变量
v_names emp_tableNAME;

begin
  select ename into v_names(0) FROM EMP WHERE DEPTNO=v_deptno;
  
  dbms_output.put_line(v_names(0));

end;
-- 此代码运行时报错,多条数据需要使用参照变量

-- 3.参照类型==>
 -- 游标类型 ref cursor=>  
  -- 例:使用PL/SQL编写一个块,可以输入部门号,显示该部门所有员工的姓名和工资

-- 由于有多个结果,需要进行多取出结果,并输出,游标在此就充当了一个标记的作用,将结果循环获取

create or replace procedure pro_04(v_deptno number) is 

-- 定义一个游标类型
type empcursor_TYPE is ref cursor;

-- 定义游标变量,此处默认是关闭的
emp_cursor empcursor_TYPE;

-- 定义变量接受游标中的数据
v_ename emp.ename%type;
v_sal emp.sal%type;

begin
  
  -- 使用游标时要打开,再将PL/SQL语句执行的结果交给游标管理
  open emp_cursor for select ename,sal from emp where deptno=v_deptno;
  
  -- 循环取出游标中的数据
  loop
    -- 取游标数据
    fetch emp_cursor into v_ename,v_sal;
    dbms_output.put_line('姓名:'||v_ename||'工资:'||v_sal);
    
    -- 当游标中没有数据时结束循环
    exit when emp_cursor%notfound;
    
  end loop;
end;

猜你喜欢

转载自songjie-xuan.iteye.com/blog/2144994