• oracle14 复杂数据类型


     复合类型-pl/sql表类型
    相当于高级语言中的数组,但是需要注意的是在高级语言中数组的下标不能为负数,而pl/sql是可以为负数的,并且表元素的下标没有限制。实例如下: 
    Sql代码 
    1.declare  
    2.--定义了一个pl/sql表类型sp_table_type,该类型是用于存放emp.ename%type这种类型的数据,   
    3.--index by binary_integer 表示下标是整数   
    4.  type sp_table_type is table of emp.ename%type    
    5.  index by binary_integer;   
    6.--定义了一个sp_table变量,这个变量的类型是sp_table_type   
    7.  sp_table sp_table_type;   
    8.begin  
    9.  select ename into sp_table(-1from emp where empno = 7788;   
    10.  dbms_output.put_line('员工名:' || sp_table(-1));   
    11.end;  
    说明: 
    sp_table_type 是pl/sql表类型 
    emp.ename%type 指定了表的元素的类型和长度 
    sp_table 为pl/sql表变量 
    sp_table(0) 则表示下标为0的元素 
    注意:如果把select ename into sp_table(-1) from emp where empno = 7788;变成select ename into sp_table(-1) from emp;则运行时会出现错误,错误如下: 
    ORA-01422:实际返回的行数超出请求的行数 
    解决方法是:使用参照变量(这里不讲)
     复合变量——嵌套表(nested table) 
    
     复合变量——变长数组(varray) 
    参照变量
      参照变量是指用于存放数值指针的变量。通过使用参照变量,可以使得应用程序共享相同对象,从而降低占用的空间。在编写pl/sql程序时,可以使用游标变量(ref cursor,用的最多)和对象类型变量(ref obj_type)两种参照变量类型。 
    
     参照变量——ref cursor游标变量
      使用游标时,当定义游标时不需要指定相应的select语句,但是当使用游标时(open时)需要指定select语句,这样一个游标就与一个select语句结合了。实例如下: 
    1.请使用pl/sql编写一个块,可以输入部门号,并显示该部门所有员工姓名和他的工资。 
    2.在1的基础上,如果某个员工的工资低于200元,就添加100元。 
    
    Sql代码 
    1.declare  
    2.--定义游标sp_emp_cursor类型    
    3.    type sp_emp_cursor is ref cursor;   
    4.--定义一个游标变量   
    5.    test_cursor sp_emp_cursor;      
    6.--定义变量   
    7.v_ename emp.ename%type;    
    8.v_sal emp.sal%type;   
    9.begin  
    10.--执行   
    11.--把test_cursor和一个select结合   
    12.open test_cursor for select ename,sal from emp where deptno=&no;   
    13.--循环取出   
    14.loop   
    15.    fetch test_cursor into v_ename,v_sal;   
    16.    --判断是否test_cursor为空   
    17.    exit when test_cursor%notfound;   
    18.    dbms_output.put_line('名字:'||v_ename||' 工资:'||v_sal);   
    19.end loop;   
    20.end;   
    
    pl/sql的进阶--控制结构(分支,循环,控制)
    pl/sql的进阶--控制结构 
    
      在任何计算机语言(c,java,pascal)都有各种控制语句(条件语句,循环结构,顺序控制结构...)在pl/sql中也存在这样的控制结构。 
    在本部分学习完成后,希望大家达到: 
    1.使用各种if语句 
    2.使用循环语句 
    3.使用控制语句——goto和null; 
    
     条件分支语句 
    pl/sql中提供了三种条件分支语句if—then,if – then – elseif – then – elsif – then 
    这里我们可以和java语句进行一个比较 
    
     简单的条件判断 if – then 
    问题:编写一个过程,可以输入一个雇员名,如果该雇员的工资低于2000,就给该员工工资增加10%。 
    Sql代码 
    1.create or replace procedure sp_pro6(spName varchar2) is  
    2.--定义   
    3.v_sal emp.sal%type;   
    4.begin  
    5.    --执行   
    6.    select sal into v_sal from emp where ename=spName;   
    7.    --判断   
    8.    if v_sal<2000 then  
    9.        update emp set sal=sal+sal*10where ename=spName;   
    10.    end if;   
    11.end;   
    12./  
    
     二重条件分支 if – then – else 
    问题:编写一个过程,可以输入一个雇员名,如果该雇员的补助不是0就在原来的基础上增加100;如果补助为0就把补助设为200; 
    Sql代码 
    1.create or replace procedure sp_pro6(spName varchar2) is  
    2.--定义   
    3.v_comm emp.comm%type;   
    4.begin  
    5.    --执行   
    6.    select comm into v_comm from emp where ename=spName;   
    7.    --判断   
    8.    if v_comm<>0 then  
    9.        update emp set comm=comm+100 where ename=spName;   
    10.    else  
    11.        update emp set comm=comm+200 where ename=spName;   
    12.    end if;   
    13.end;   
    14./  
    
    多重条件分支
    if – then – elsif – then 问题:编写一个过程,可以输入一个雇员编号,如果该雇员的职位是PRESIDENT就给他的工资增加1000,如果该雇员的职位是MANAGER就给他的工资增加500,其它职位的雇员工资增加200。 Sql代码 1.create or replace procedure sp_pro6(spNo number) is   2.    --定义    3.    v_job emp.job%type;    4.begin   5.    --执行    6.    select job into v_job from emp where empno=spNo;    7.    if v_job='PRESIDENT' then   8.        update emp set sal=sal+1000 where empno=spNo;    9.    elsif v_job='MANAGER' then   10.        update emp set sal=sal+500 where empno=spNo;    11.    else   12.        update emp set sal=sal+200 where empno=spNo;    13.    end if;    14.end;    15./  
    循环语句 –loop
      是pl/sql中最简单的循环语句,这种循环语句以loop开头,以end loop结尾,这种循环至少会被执行一次。 
    案例:现有一张表users,表结构如下: 
    用户id | 用户名 
           | 
    请编写一个过程,可以输入用户名,并循环添加10个用户到users表中,用户编号从1开始增加。 
    Sql代码 
    1.create or replace procedure sp_pro6(spName varchar2) is  
    2.--定义  :=表示赋值   
    3.    v_num number:=1;       
    4.begin  
    5.    loop   
    6.        insert into users values(v_num,spName);   
    7.        --判断是否要退出循环   
    8.        exit when v_num=10;   
    9.        --自增   
    10.        v_num:=v_num+1;   
    11.    end loop;   
    12.end;   
    
     循环语句 –while循环 
      基本循环至少要执行循环体一次,而对于while循环来说,只有条件为true时,才会执行循环体语句,while循环以while...loop开始,以end loop结束。 
    案例:现有一张表users,表结构如下: 
    用户id 用户名 
    
    问题:请编写一个过程,可以输入用户名,并循环添加10个用户到users表中,用户编号从11开始增加。 
    Sql代码 
    1.create or replace procedure sp_pro6(spName varchar2) is  
    2.--定义  :=表示赋值   
    3.    v_num number:=11;       
    4.begin  
    5.    while v_num<=20 loop   
    6.    --执行   
    7.       insert into users values(v_num,spName);   
    8.       v_num:=v_num+1;   
    9.    end loop;   
    10.end;   
    11./  
    循环语句 –for循环 
    基本for循环的基本结构如下 
    Sql代码 
    1.begin  
    2.  for i in reverse 1..10 loop   
    3.    insert into users values (i, 'shunping');   
    4.  end loop;   
    5.end;  
    我们可以看到控制变量i,在隐含中就在不停地增加。
    顺序控制语句 –gotonull
    1.goto语句 
      goto语句用于跳转到特定符号去执行语句。注意由于使用goto语句会增加程序的复杂性,并使得应用程序可读性变差,所以在做一般应用开发时,建议大家不要使用goto语句。 
    基本语法如下 goto lable,其中lable是已经定义好的标号名, 
    Sql代码 
    1.declare  
    2.  i int := 1;   
    3.begin  
    4.  loop   
    5.    dbms_output.put_line('输出i=' || i);   
    6.    if i = 1{} then  
    7.      goto end_loop;   
    8.    end if;   
    9.    i := i + 1;   
    10.  end loop;   
    11.  <<end_loop>>   
    12.  dbms_output.put_line('循环结束');   
    13.end;  
    
    2.null 
    null语句不会执行任何操作,并且会直接将控制传递到下一条语句。使用null语句的主要好处是可以提高pl/sql的可读性。 
    Sql代码 
    1.declare  
    2.  v_sal   emp.sal%type;   
    3.  v_ename emp.ename%type;   
    4.begin  
    5.  select ename, sal into v_ename, v_sal from emp where empno = &no;   
    6.  if v_sal < 3000 then  
    7.    update emp set comm = sal * 0.1 where ename = v_ename;   
    8.  else  
    9.    null;   
    10.  end if;   
    end; 
  • 相关阅读:
    合并一个二维数组中相同项,其他数量则相加
    清除空值
    数组的一维下标换为指定的key值
    二维数组排序
    word输出
    解决Zend加密的PHP页面出现Fatal error: Incompatible file format: The encoded file has format major ID 1, whereas the Loader expects 4 in
    nginx反向代理substitutions4nginx模块实现替换字符盗站 nginx.conf配置
    ubuntu 编译安装nginx 并添加substitutions4nginx模块
    windows 2008 R2 wincache 不稳定
    php5.5及php5.6 wincache无法启用问题
  • 原文地址:https://www.cnblogs.com/yaowen/p/4858229.html
Copyright © 2020-2023  润新知