Oracle数据库---PLSQL
SET SERVEROUTPUT ON
BEGIN
--打印输出
DBMS_OUTPUT.PUT_LINE('hello everyone!');
END;
DECLARE
v_name VARCHAR2(10);
v_sal NUMBER(7,2);
v_hiredate DATE;
c_tax_rate CONSTANT NUMBER(3,2) := 0.02;
v_tax_sal NUMBER(7,2);
v_valid BOOLEAN DEFAULT TRUE;
BEGIN
SELECT ename,sal,hiredate
INTO v_name,v_sal,v_hiredate
FROM emp
WHERE empno = 7369;
--计算所得税
v_tax_sal:= v_sal * c_tax_rate;
--打印输出
DBMS_OUTPUT.PUT_LINE(v_name||'的工资是:'||v_sal||' 雇员日期是:' || v_hiredate|| ' 所得税是:' || v_tax_sal);
IF v_valid THEN
DBMS_OUTPUT.PUT_LINE('已核实');
END IF;
END;
--引用型变量
DECLARE
v_name emp.ename%TYPE;
v_sal emp.sal%TYPE;
BEGIN
SELECT ename,sal
INTO v_name,v_sal
FROM emp
WHERE empno = 7788;
--打印输出
DBMS_OUTPUT.PUT_LINE(v_name||'的工资是:'||v_sal);
END;
--记录型变量
DECLARE
emp_record emp%ROWTYPE;
BEGIN
SELECT * INTO emp_record FROM emp WHERE empno = 7788;
--打印输出
DBMS_OUTPUT.PUT_LINE(emp_record.ename||'的工资是:'||emp_record.sal);
END;
--算术运算符
DECLARE
v_num1 NUMBER(3):=10;
v_num2 NUMBER(3):=2;
BEGIN
DBMS_OUTPUT.PUT_LINE(v_num1+v_num2);
DBMS_OUTPUT.PUT_LINE(v_num1-v_num2);
DBMS_OUTPUT.PUT_LINE(v_num1*v_num2);
DBMS_OUTPUT.PUT_LINE(v_num1/v_num2);
DBMS_OUTPUT.PUT_LINE(v_num1**v_num2);
END;
--关系运算符
DECLARE
v_num1 NUMBER(2) := &n1;
v_num2 NUMBER(2) := &n2;
BEGIN
IF (v_num1 = v_num2) THEN
DBMS_OUTPUT.PUT_LINE('num1等于num2');
ELSIF(v_num1 < v_num2) THEN
DBMS_OUTPUT.PUT_LINE('num1小于num2');
ELSIF(v_num1 > v_num2) THEN
DBMS_OUTPUT.PUT_LINE('num1大于num2');
END IF;
IF (v_num1 <> v_num2) THEN
DBMS_OUTPUT.PUT_LINE('num1不等于num2');
END IF;
END;
--比较运算符
DECLARE
--&n1是替代变量,在执行程序时会提示输入值
v_num1 NUMBER(2):= &n1;
BEGIN
IF(v_num1 BETWEEN 5 AND 10 )THEN
DBMS_OUTPUT.PUT_LINE('num1在5到10之间');
ELSE
DBMS_OUTPUT.PUT_LINE('num1不在5到10之间');
END IF;
IF(v_num1 IN(3,8,10) )THEN
DBMS_OUTPUT.PUT_LINE('num1等于3,8,10中的一个值');
ELSE
DBMS_OUTPUT.PUT_LINE('num1不等于3,8,10中的一个值');
END IF;
IF(v_num1 IS NULL)THEN
DBMS_OUTPUT.PUT_LINE('num1为空');
ELSE
DBMS_OUTPUT.PUT_LINE('num1不为空');
END IF;
END;
--逻辑运算符
DECLARE
v_b1 BOOLEAN := &n1;
v_b2 BOOLEAN := &n2;
BEGIN
IF(v_b1 AND v_b2)THEN
DBMS_OUTPUT.PUT_LINE('AND--TRUE');
END IF;
IF(v_b1 OR v_b2)THEN
DBMS_OUTPUT.PUT_LINE('OR--TRUE');
END IF;
IF(NOT v_b1)THEN
DBMS_OUTPUT.PUT_LINE('v_b1取反为TRUE');
END IF;
END;
--输入员工号,判断员工工资, 显示工资小于3000的员工姓名及工资。
--简单的IF语句
DECLARE
v_name emp.ename%TYPE;
v_sal emp.sal%TYPE;
BEGIN
SELECT ename,sal
INTO v_name,v_sal
FROM emp
WHERE empno = &no;
IF v_sal <3000 THEN
DBMS_OUTPUT.PUT_LINE(v_name||'的工资是:'||v_sal);
END IF;
END;
SELECT * FROM emp;
--输入员工号,判断员工工资,将工资小于3000的员工工资涨200,并显示涨工资的员工姓名,其他员工显示员工姓名及工资。
--二重分支语句
DECLARE
v_name empnew.ename%TYPE;
v_sal empnew.sal%TYPE;
v_empno empnew.empno%TYPE := &no;
BEGIN
SELECT ename,sal
INTO v_name,v_sal
FROM empnew
WHERE empno = v_empno;
IF v_sal <3000 THEN
UPDATE empnew set sal = sal + 200 where empno = v_empno;
COMMIT;
DBMS_OUTPUT.put_line(v_name||'涨工资了');
ELSE
DBMS_OUTPUT.put_line(v_name||'的工资是:'||v_sal);
END IF;
END;
select * from empnew;
--输入员工号,判断员工工资, 工资小于2000,显示低收入,工资小于6000,显示中等收入,其它显示高收入。
--多重分支语句
DECLARE
v_name empnew.ename%TYPE;
v_sal empnew.sal%TYPE;
BEGIN
SELECT ename,sal
INTO v_name,v_sal
FROM empnew
WHERE empno = &no;
IF v_sal<2000 THEN
DBMS_OUTPUT.PUT_LINE(v_name||'的工资是:'||v_sal||' 属于低收入');
ELSIF v_sal<6000 THEN
DBMS_OUTPUT.PUT_LINE(v_name||'的工资是:'||v_sal||' 属于中等收入');
ELSE
DBMS_OUTPUT.PUT_LINE(v_name||'的工资是:'||v_sal||' 属于高收入');
END IF;
END;
/*
--输入员工号,判断员工工资, 显示工资小于3000的员工姓名及工资。
--简单的IF语句
DECLARE
v_name emp.ename%TYPE;
v_sal emp.sal%TYPE;
BEGIN
SELECT ename,sal
INTO v_name,v_sal
FROM emp
WHERE empno = &no;
IF v_sal <3000 THEN
DBMS_OUTPUT.PUT_LINE(v_name||'的工资是:'||v_sal);
END IF;
END;
SELECT * FROM emp;
--输入员工号,判断员工工资,将工资小于3000的员工工资涨200,并显示涨工资的员工姓名,其他员工显示员工姓名及工资。
--二重分支语句
DECLARE
v_name empnew.ename%TYPE;
v_sal empnew.sal%TYPE;
v_empno empnew.empno%TYPE := &no;
BEGIN
SELECT ename,sal
INTO v_name,v_sal
FROM empnew
WHERE empno = v_empno;
IF v_sal <3000 THEN
UPDATE empnew set sal = sal + 200 where empno = v_empno;
COMMIT;
DBMS_OUTPUT.put_line(v_name||'涨工资了');
ELSE
DBMS_OUTPUT.put_line(v_name||'的工资是:'||v_sal);
END IF;
END;
select * from empnew;
--输入员工号,判断员工工资, 工资小于2000,显示低收入,工资小于6000,显示中等收入,其它显示高收入。
--多重分支语句
DECLARE
v_name empnew.ename%TYPE;
v_sal empnew.sal%TYPE;
BEGIN
SELECT ename,sal
INTO v_name,v_sal
FROM empnew
WHERE empno = &no;
IF v_sal<2000 THEN
DBMS_OUTPUT.PUT_LINE(v_name||'的工资是:'||v_sal||' 属于低收入');
ELSIF v_sal<6000 THEN
DBMS_OUTPUT.PUT_LINE(v_name||'的工资是:'||v_sal||' 属于中等收入');
ELSE
DBMS_OUTPUT.PUT_LINE(v_name||'的工资是:'||v_sal||' 属于高收入');
END IF;
END;
*/
--输入成级等级,判断属于哪个层次,并打印输出
--CASE 等值比较
DECLARE
v_grade char(1) := '&no';
BEGIN
CASE v_grade
WHEN 'A' THEN
DBMS_OUTPUT.PUT_LINE('优秀');
WHEN 'B' THEN
DBMS_OUTPUT.PUT_LINE('中等');
WHEN 'C' THEN
DBMS_OUTPUT.PUT_LINE('一般');
ELSE
DBMS_OUTPUT.PUT_LINE('输入有误');
END CASE;
END;
--输入员工号,获取员工工资,判断工资,如果工资小于1500,补助加100,如果工资小于2500,补助加80,如果工资小于5000,补助加50.
--CASE 非等值比较
DECLARE
v_sal empnew.sal%TYPE;
v_empno empnew.empno%TYPE := &no;
BEGIN
SELECT sal
INTO v_sal
FROM empnew
WHERE empno = &no;
CASE
WHEN v_sal<1500 THEN
UPDATE empnew set comm = nvl(comm,0)+100 WHERE empno = v_empno;
WHEN v_sal<2500 THEN
UPDATE empnew set comm = nvl(comm,0)+80 WHERE empno = v_empno;
WHEN v_sal<5000 THEN
UPDATE empnew set comm = nvl(comm,0)+50 WHERE empno = v_empno;
--COMMIT;
END CASE;
END;
select * from empnew;
--基本循环
DECLARE
v_cnt INT :=1;
BEGIN
LOOP
DBMS_OUTPUT.PUT_LINE(v_cnt);
EXIT WHEN v_cnt = 10;
v_cnt := v_cnt+1;
END LOOP;
END;
--while循环
DECLARE
v_cnt INT :=1;
BEGIN
WHILE v_cnt<=10 LOOP
DBMS_OUTPUT.PUT_LINE(v_cnt);
v_cnt := v_cnt+1;
END LOOP;
END;
--for循环
BEGIN
FOR i IN REVERSE 1..10 LOOP
DBMS_OUTPUT.PUT_LINE(i);
END LOOP;
END;
--嵌套循环
DECLARE
v_result INT;
BEGIN
<<outter>>
FOR i IN 1..5 LOOP
<<inter>>
FOR j IN 1..5 LOOP
v_result:=i;
EXIT outter WHEN i=4;
END LOOP inter;
DBMS_OUTPUT.PUT_LINE('内'||v_result);
END LOOP outter;
DBMS_OUTPUT.PUT_LINE('外'||v_result);
END;
--CONTINUE
DECLARE
v_cnt INT :=0;
BEGIN
LOOP
v_cnt := v_cnt+1;
CONTINUE WHEN v_cnt = 5;
DBMS_OUTPUT.PUT_LINE(v_cnt);
EXIT WHEN v_cnt = 10;
END LOOP;
END;
--GOTO语句
DECLARE
v_cnt INT := 1;
BEGIN
LOOP
DBMS_OUTPUT.PUT_LINE(v_cnt);
IF v_cnt=10 THEN
--EXIT;
GOTO end_loop;
END IF;
v_cnt := v_cnt + 1;
END LOOP;
<<end_loop>>
DBMS_OUTPUT.PUT_LINE('循环结束');
END;
--NULL语句
DECLARE
v_sal empnew.sal%TYPE;
v_name empnew.ename%TYPE;
BEGIN
SELECT ename,sal
INTO v_name,v_sal
FROM empnew
WHERE empno = &no;
IF v_sal<3000 THEN
UPDATE empnew set comm = nvl(comm,0)+sal*0.2 WHERE ename=v_name;
COMMIT;
DBMS_OUTPUT.PUT_LINE(v_name||'的奖金更新了');
ELSE
NULL;
END IF;
END;
select * from empnew;
Oracle数据库---PLSQL的更多相关文章
- 用Excel导入Oracle数据库plsql
打开plsql之后,在工具栏点击[tools]--[ODBC Imoprter] 选择导入文件的类型,这里是excel文件,所以选择Excel Files 输入连接数据库的用户名和密码 点击Conne ...
- Oracle数据库PLSQL的中文乱码显示全是问号
plsql连接数据库乱码问题 缘由: 小师妹周末叫我帮她重装数据库,这么大好的周末时光不出去玩儿,给她装数据库这不是很蛋疼么. 我问她为什么要重装,她说:数据存入数据库后,中文字符有乱码,一定是我上次 ...
- Oracle数据库PLSQL编程和存储过程
一.PLSQL编程 1.1.使用PLSQL实现 Hello world! 1 -- Created on 2022/8/22 by ADMINISTRATOR 2 declare 3 -- 这是申明变 ...
- 2018.5.30 Oracle数据库PLSQL编程---游标的使用
显示游标的步骤 /* 显示游标处理步骤 1.声明游标 语法结构:cursor 游标名称 is SQL 语句; 2.打开游标 语法结构:open游标名称; 3.提取数据 语法结构:fetch 4.关闭游 ...
- Oracle数据库基础知识
oracle数据库plsql developer 目录(?)[-] 一 SQL基础知识 创建删除数据库 创建删除修改表 添加修改删除列 oracle cascade用法 添加删除约束主键外 ...
- C#:Oracle数据库带参PLSQL语句的正确性验证
在有Oracle数据库C#项目中,有一个这样的需求:在界面上配置了带参数的PLSQL语句,但是要通过程序验证其正确性,那么该如何实现?这就是本文要探讨的内容. 一:通过OracleCommand对象的 ...
- plsql无法连接64位oracle数据库的解决方法(图文解说)
oracle11g下载页面:http://www.oracle.com/technetwork/database/enterprise-edition/downloads/index.html,找到适 ...
- oracle系列--第五篇 PLSQL连接本地的Oracle数据库
这篇blog主要是针对新手,我也是个新手:) 我们把oracle成功的安装在了我们的计算机上面,那我们如何才能将PLSQL developer连 接到本地的oracle呢? 首先,我们必须有下面步准备 ...
- [原创]安装Oracle 11gR2,以及如何在win8下使用plsql develper连接Oracle数据库 ,在这里和大家分享下
一,关于win8下安装Oracle 11gR2 1.我下载的是Oracle_11gR2_win64.其中有两个包: 注意:在解压了之后将:win64_11gR2_database_2of2\datab ...
随机推荐
- 在mac中如何清除.svn文件
有些时候在开发一个应用程序我们需要用到版本控制,它可以帮助我们很好的控制我们程序的代码,尤其在多人开发的时候,优点尤为突出. 但是在有些情况下我们又认为这些.svn真的很麻烦,那么我们怎么把他们一下子 ...
- ios 时间戳 当前时间 相互转化
1.今天在做一个webservice的接口的时候,被要求传一个时间戳过去,然后就是开始在Google上找 2.遇到两个问题,一,当前时间转化为时间戳,二,获取的当前时间和系统的时间相差8个小时 一,转 ...
- ASP.NET MVC 学习笔记1 Talk about controller & route
For the sake of learning programming better, I'd like to increase the frequency of using English. So ...
- 百度蜘蛛ip段代表的不同含义
有时候我们在分析百度蜘蛛的时候,会发现很多的ip,这些个ip地址,根据后面的参数可以发现都是百度的.刚学习SEO不久的同学肯定要问:这些ip地址到底代表什么含义,是不是不同的ip地址所代表的含义不一样 ...
- API Hook基本原理和实现
API Hook基本原理和实现 2009-03-14 20:09 windows系统下的编程,消息message的传递是贯穿其始终的.这个消息我们可以简单理解为一个有特定意义的整数,正如我们看过的老故 ...
- docker启动命令,docker重启命令,docker关闭命令
启动 systemctl start docker 守护进程重启 sudo systemctl daemon-reload 重启docker服务 systemctl restar ...
- TIME WINAPI
GetDynamicTimeZoneInformation https://msdn.microsoft.com/en-us/library/windows/desktop/ms724318(v=vs ...
- RPG Maker MV游戏解包
该文章最新版本请前往:https://www.crowsong.xyz/127.html 前言 使用Petschko's RPG-Maker-MV File-Decrypter进行解包 使用Petsc ...
- Model1简介
Model1模型出现前,整个Web应用的情况:几乎全部由JSP页面组成,JSP页面接收处理客户端请求,对请求处理后直接做出响应. 弊端:在界面层充斥着大量的业务逻辑的代码和数据访问层的代码,Web程序 ...
- 如何用C++操作无线网卡开启共享热点WiFi?
首先需要笔记本具备AP热点功能,记得写好的程序必须用管理员身份运行. 准备工作需要先做好 //查看是否支持的承载网络 netsh wlan show drivers //设置网络模式为allow ne ...