学习大数据DAY15 PLSQL基础语法4

工科小石头2024-07-15 16:34

目录

动态SQL

[execute immediate语句](#execute immediate语句)

带参数使用

作业

动态游标

动态游标类型声明

动态游标使用

强类型游标

作业2

遗忘点复习

动态SQL

plsql里面只能执行 select insert update delete ，想执行create怎么办？其他复杂功能？

使用动态sql，不能加分号，单引号实现转义功能''''

在Oracle数据库开发PL/SQL块中我们使用的SQL分为：静态SQL语句和动态SQL语句。所谓静态SQL指在PL/SQL块中使用的SQL语句在编译时是明确的，执行的是确定对象。而动态SQL是指在PL/SQL块编译时SQL语句是不确定的，如根据用户输入的参数的不同而执行不同的操作。编译程序对动态语句部分不进行处理，只是在程序运行时动态地创建语句、对语句进行语法分析并执行该语句。Oracle中动态SQL可以通过本地动态SQL来执行，也可以通过DBMS_SQL包来执行。本地动态SQL是使用EXECUTE IMMEDIATE语句来实现的。

execute immediate语句

execute immediate sql语句(字符串，也可以是字符串变量) [into(只有在执行查询时使用)变量,...] [using 参数,...];

--不能执行语句，原有能执行的语句也可以放在里面

declare

v_sql varchar2(1000);

begin

v_sql :=

'create table stest(sno varchar(20),sdate date)';

dbms_output.put_line(v_sql);

execute immediate v_sql;

end;

--增删改查也可以使用动态sql，查询需要使用into

declare

v_sql varchar2(200);

v emp%rowtype;

begin

v_sql := 'select * from emp where empno=7369';

execute immediate v_sql into v;

dbms_output.put_line(v.empno||v.ename);

end;

--带输入且判断的复杂动态sql

declare

v_sql varchar2(200);

v emp%rowtype;

eno varchar(4):='&请输入编号';

begin

v_sql := 'select * from emp ';

if eno is not null then

v_sql:=v_sql||' where empno='||eno;

else

v_sql:=v_sql||' where rownum=1';

end if;

execute immediate v_sql into v;

dbms_output.put_line(v.empno||v.ename);

end;

--输入课程编号,如果不输入则显示所有数据第一条，如果输入显示当前课程的第一条

select * from sc where cno='c002' and rownum=1

select * from sc where rownum=1

declare

dsql varchar2(1000);

sc1 sc%rowtype;

cnoin varchar2(10):='&请输入课程编号';

begin

dsql:='select * from sc where ';

if cnoin is null then

dsql:=dsql||'rownum=1';

else

dsql:=dsql||'cno='''||cnoin||''' and rownum=1';

end if;

dbms_output.put_line(dsql);

execute immediate dsql into sc1;

dbms_output.put_line(sc1.sno||' '||sc1.cno||' '||sc1.score);

end;

带参数使用

declare

-- 声名一个变量保存sql语句

v_sql varchar2(255);

-- 声名一个rowtype类型变量保存一条员工信息

v emp%rowtype;

-- 声名一个变量接收从键盘输入的员工编号

v_empno emp.empno%type:='&empno';

begin

v_sql:='select * from emp where empno=:1';

dbms_output.put_line(v_sql);

execute immediate v_sql into v using v_empno;

-- execute immediate v_sql into v using v_empno;

-- 打印变量v的值

dbms_output.put_line(v.empno||v.ename);

execute immediate v_sql into v using 7839;

-- execute immediate v_sql into v using v_empno;

-- 打印变量v的值

dbms_output.put_line(v.empno||v.ename);

end;

作业

sql 复制代码 
/*1、使用动态sql实现输入员工编号查询员工信息，如果不输入则显示所有员工的第一

条，显示员工姓名和工资*/

declare

dsql varchar2(1000):='select ename,sal from emp where empno=';

dsqldefault varchar2(1000):='select ename,sal from emp where rownum=1';

v_empno varchar2(10):='&输入员工编号';

type names is record(

ename emp.ename%type,

sal emp.sal%type

);

v names;

begin

  if v_empno is not null then

    execute immediate concat(dsql,v_empno) into v;

    else

      execute immediate dsqldefault into v;

      end if;

      dbms_output.put_line(v.ename||'  '||v.sal);  

  end;

/*2、搜索一个员工信息，输入工资和工作岗位，如果输入为空则显示不带条件的第一条；

如果不为空则显示带条件的第一条，显示员工姓名和工资

提示：

1000为测试的输入工资，SALESMAN为测试的输入工作岗位

select * from emp where sal>1000 and job = 'SALESMAN' and rownum=1

select * from emp where sal>1000 and rownum=1

select * from emp where job = 'SALESMAN' and rownum=1

select * from emp where rownum=1*/

declare

dsql varchar2(2000);

type names is record(

ename emp.ename%type,

sal emp.sal%type

);

v names;

v_sal varchar2(10):='&输入工资';

v_job varchar2(20):='&输入工作岗位';

begin

  if v_sal is  not null and v_job is  not null then

    dsql:='select ename,sal from emp where sal=''||v_sal||''and job='||v_job;

    elsif v_sal is not  null and v_job is null then

      dsql:='select ename,sal from emp where sal='||v_sal;

      elsif v_sal is null and v_job is not null then

        dsql:='select ename,sal from emp where job='||v_job;

        else dsql:='select ename,sal from emp where rownum=1';

        end if;

      execute immediate dsql into v;

      dbms_output.put_line(v.ename||'   '||v.sal); 

  end;

动态游标

在程序运行过程中，把一个游标变量在不同时刻关联不同的查询语句，也就是使用一个游标变量可以获取多个不同的结果集。通过把动态游标作为参数传递给另一个过程或函数使用，通过这种方式达到共享结果集的目的，把一个游标的内容（结果集）赋值给另外一个游标变量。

动态游标声明步骤：

●声明动态游标类型

●声明动态游标名称

动态游标类型声明

弱类型动态游标系统自带了一个直接使用即可 : sys_refcursor

强类型动态游标只能配合静态sql语句使用，无法和动态sql配合使用。

弱类型动态游标能够执行动态sql 以及配合绑定变量。

示例：

refcur_emp sys_refcursor;

动态游标使用

使用 open 打开动态游标并给其绑定结果集

open 动态游标名 for sql语句;

动态游标无法使用for循环打开。

--没有返回类型的弱类型，一般用sys_refcursor,可以省略步骤，为了返回类型铺垫

declare

cursor cur1 is select * from emp where empno=7499;

emp1 emp%rowtype;

emp2 emp%rowtype;

n1 number(4):=5;

type newcur is ref cursor;--弱类型游标类型

cur2 newcur;--游标变量

begin

open cur2 for select * from emp where empno=7499;

fetch cur2 into emp2;

dbms_output.put_line(emp2.ename);

close cur2;

dbms_output.put_line(n1);

n1:=6;

dbms_output.put_line(n1);

open cur1;

fetch cur1 into emp1;

dbms_output.put_line(emp1.ename);

close cur1;

end;

--弱类型动态游标

declare

emp2 emp%rowtype;

cur2 sys_refcursor;--游标变量

begin

open cur2 for select * from emp where empno=7499;

fetch cur2 into emp2;

dbms_output.put_line(emp2.ename);

close cur2;

end;

--动态游标可以随时换查询结果集

declare

emp2 emp%rowtype;

cur2 sys_refcursor;--游标变量

dept2 dept%rowtype;

begin

open cur2 for select * from emp where empno=7499;

fetch cur2 into emp2;

dbms_output.put_line(emp2.ename);

close cur2;

open cur2 for select * from dept where deptno=20;

fetch cur2 into dept2;

dbms_output.put_line(dept2.dname);

close cur2;

end;

--while循环

declare

emp2 emp%rowtype;

cur2 sys_refcursor;--游标变量

begin

open cur2 for select * from emp;

fetch cur2 into emp2;

while cur2%found

loop

dbms_output.put_line(emp2.ename);

fetch cur2 into emp2;

end loop;

close cur2;

end;

--动态sql弱类型动态游标,输入部门编号，不输入代表所有

declare

dsql varchar2(1000);

dno varchar2(10):='&请输入部门编号';

ename1 varchar2(10);

job1 varchar2(10);

cur1 sys_refcursor;

begin

dsql:='select ename,job from emp ';

if dno is not null then

dsql:=dsql||'where deptno='||dno;

end if;

dbms_output.put_line(dsql);

open cur1 for dsql;

fetch cur1 into ename1,job1;

while cur1%found

loop

dbms_output.put_line(ename1||job1);

fetch cur1 into ename1,job1;

end loop;

close cur1;

end;

--二重循环动态游标显示

declare

cur1 sys_refcursor;

cur2 sys_refcursor;

dept1 dept%rowtype;

emp1 emp%rowtype;

begin

open cur1 for select * from dept;

fetch cur1 into dept1;

while cur1%found

loop

dbms_output.put_line(dept1.deptno||dept1.dname);

open cur2 for select * from emp where deptno=dept1.deptno;

fetch cur2 into emp1;

while cur2%found

loop

dbms_output.put_line(' '||emp1.deptno||emp1.ename);

fetch cur2 into emp1;

end loop;

close cur2;

fetch cur1 into dept1;

end loop;

close cur1;

end;

强类型游标

declare

type names is record(

ename varchar2(10),

dname varchar2(10)

);

zs names;

type curtype is ref cursor return names;

cur1 curtype;

begin

open cur1 for select dname,ename from emp inner join dept on emp.deptno=dept.deptno;

fetch cur1 into zs;

while cur1%found

loop

dbms_output.put_line(zs.name1||zs.name2);

fetch cur1 into zs;

end loop;

close cur1;

end;

作业2

sql 复制代码 
--1、弱类型动态游标，显示所有员工名称，工作

declare

rlx sys_refcursor;

type names is record(

ename emp.ename%type,

job emp.job%type

);

ej names;

begin

  open rlx for select ename,job from emp;

  fetch rlx into ej;

  while rlx%found

    loop

      dbms_output.put_line(ej.ename||'  '||ej.job);

      fetch rlx into ej;

      end loop;

      close rlx;

  end;

/*2、根据输入的部门编号显示员工编号，工作，若没有输入部门编号则显示所有，使用动

态sql+弱类型动态游标实现*/

declare

dsql varchar2(2000);

rlx sys_refcursor;

v_deptno varchar2(3):='&输入部门编号显示员工编号和工作';

type names is record(

empno emp.empno%type,

job emp.job%type

); 

v_ej names;

begin

  if v_deptno is null then

    dsql:='select empno,job from emp';

    open rlx for dsql;

    fetch rlx into v_ej;

    while rlx%found

      loop

        dbms_output.put_line(v_ej.empno||'   '||v_ej.job);

        fetch rlx into v_ej;

        end loop;

        close rlx;

    else 

      dsql:='select empno,job from emp where deptno='||v_deptno;

      open rlx for dsql;

      fetch rlx into v_ej;

      while rlx%found

        loop

           dbms_output.put_line(v_ej.empno||'   '||v_ej.job);

           fetch rlx into v_ej;

          end loop;

         close rlx;

      end if;

  end;

/*3、根据输入显示学员姓名、课程编号及课程成绩，输入学号不输入课程号直接显示学员

姓名和所有课程编号和成绩，输入学号和课程号显示对应课程成绩，使用动态sql+弱类

型动态游标实现*/

declare

type names is record(

cno sc.cno%type,

score sc.score%type

);

sc2 names;

v_name student.sname%type;

v_score sc.score%type;

dsql varchar2(2000);

rlx sys_refcursor;

v_sno sc.sno%type:='&输入学号';

v_cno sc.cno%type:='&输入课程号';

begin

  if v_sno is not null and v_cno is null then

    select sname into v_name from student where sno=v_sno;

    dsql:='select cno,score from sc where sno='''||v_sno||'''';

    dbms_output.put_line(v_name);

    open rlx for dsql;

    fetch rlx into sc2;

    while rlx%found

      loop

        dbms_output.put_line(sc2.cno||'    '||sc2.score);

        fetch rlx into sc2;

        end loop;

    close rlx; 

    elsif v_sno is not null and v_cno is not null then

      select score into v_score from sc where sno=v_sno and cno=v_cno;

      dbms_output.put_line(v_score); 

    end if; 

  end;

--4、通过teacher表显示各个课程信息，二重循环弱类型游标,同上机练习7.2的效果图

declare

rlx sys_refcursor;

rlx2 sys_refcursor;

v_teacher teacher%rowtype;

v_course course%rowtype;

begin

  open rlx for select * from teacher;

  fetch rlx into v_teacher;

  while rlx%found

    loop

    dbms_output.put_line(v_teacher.tno||'---'||v_teacher.tname);

    fetch rlx into v_teacher;

    open rlx2 for select * from course where tno=v_teacher.tno;

    fetch rlx2 into v_course;

    while rlx2%found

      loop

        dbms_output.put_line('     '||v_course.cno||'-----'||v_course.cname||'-----'||v_course.tno); 

        fetch rlx2 into v_course;

        end loop;

    close rlx2;

    end loop;

  close rlx;

  end;

--5、使用强类型游标显示教师姓名及所教课程名称

declare

type names is record(

tname teacher.tname%type,

cname course.cname%type

);

t names;

type cur is ref cursor return names;

A cur;

begin

  open A for select tname,cname

  from teacher left join course on teacher.tno=course.tno;

  fetch A into t;

  while A%found

    loop

    dbms_output.put_line(t.tname||'-----'||t.cname); 

    fetch A into t;

    end loop;

  close A;

end;

遗忘点复习

number类型不能为空。

相关推荐
As977_2 分钟前
前端学习Day12 CSS盒子的定位（相对定位篇“附练习”）
前端·css·学习
ajsbxi5 分钟前
苍穹外卖学习记录
java·笔记·后端·学习·nginx·spring·servlet
Rattenking6 分钟前
React 源码学习01 ---- React.Children.map 的实现与应用
javascript·学习·react.js
dsywws28 分钟前
Linux学习笔记之时间日期和查找和解压缩指令
linux·笔记·学习
道法自然040229 分钟前
Ethernet 系列（8）-- 基础学习::ARP
网络·学习·智能路由器
lzhlizihang31 分钟前
【Hive sql 面试题】求出各类型专利top 10申请人，以及对应的专利申请数（难）
大数据·hive·sql·面试题
Tianyanxiao34 分钟前
如何利用探商宝精准营销，抓住行业机遇——以AI技术与大数据推动企业信息精准筛选
大数据·人工智能·科技·数据分析·深度优先·零售
爱吃生蚝的于勒35 分钟前
深入学习指针（5）！！！！！！！！！！！！！！！
c语言·开发语言·数据结构·学习·计算机网络·算法
大数据编程之光36 分钟前
Hive 查询各类型专利 top10 申请人及专利申请数
大数据·数据仓库·hive·hadoop
BearHan39 分钟前
Sqlsugar调用Oracle的存储过程
oracle·存储过程·orm
热门推荐
01【HarmonyOS】HUAWEI DevEco Studio 下载地址汇总02(欧拉)openEuler系统添加网卡文件配置流程、(欧拉)openEuler系统手动配置ipv6地址流程、(欧拉)openEuler系统网络管理说明03组基轨迹建模 GBTM的介绍与实现（Stata 或 R）04【AIGC】重塑未来的科技巨轮05全面解析：构建基于深度学习的安全帽检测系统（UI界面+YOLO代码+数据集）06【经验分享】Ubuntu22.04安装微信(linux官方版)07基于YOLOv10深度学习的CT扫描图像肾结石智能检测系统【python源码+Pyqt5界面+数据集+训练代码】深度学习实战、目标检测08Ubuntu 20.04使用Livox mid 360 测试 FAST_LIO09RAG 实践- Ollama+RagFlow 部署本地知识库10红米手机使用google play