河南法制建设网站,建网页网站,新开发网站,网站模板平台资源本章主要内容#xff1a;
1.PL/SQL的基本构成#xff1a;declare,begin,exception,end;
2.结构控制语句:IF语句,CASE语句
3.循环结构#xff1a;loop循环#xff0c;for loop循环#xff0c;while loop循环 PL/SQL的基本构成
特点 PL/SQL语言是SQL语言的扩展#xff…本章主要内容
1.PL/SQL的基本构成declare,begin,exception,end;
2.结构控制语句:IF语句,CASE语句
3.循环结构loop循环for loop循环while loop循环 PL/SQL的基本构成
特点 PL/SQL语言是SQL语言的扩展具有为程序开发而设计的特性如数据封装、异常处理、面向对象等特性。PL/SQL是嵌入到Oracle服务器和开发工具中的所以具有很高的执行效率和同Oracle数据库的完美结合。在PL/SQL模块中可以使用查询语句和数据操纵语句(即进行DML操作)这样就可以编写具有数据库事务处理功能的模块。 至于数据定义(DDL)和数据控制(DCL)命令的处理需要通过Oracle提供的特殊的DBMS_SQL包来进行。PL/SQL还可以用来编写过程、函数、包及数据库触发器。过程和函数也称为子程序在定义时要给出相应的过程名和函数名。它们可以存储在数据库中成为存储过程和存储函数并可以由程序来调用它们在结构上同程序模块类似。 PL/SQL过程化结构的特点是可将逻辑上相关的语句组织在一个程序块内通过嵌入或调用子块构造功能强大的程序可将一个复杂的问题分解成为一组便于管理、定义和实现的小块。
块结构和基本语法要求
PL/SQL程序的基本单元是块(BLOCK)块就是实现一定功能的逻辑模块。一个PL/SQL程序由一个或多个块组成。块有固定的结构也可以嵌套。一个块可以包括三个部分每个部分由一个关键字标识。 块中各部分的作用解释如下 (1) DECLARE声明部分标志。 (2) BEGIN可执行部分标志。 (3) EXCEPTION异常处理部分标志。 (4) END程序结束标志。 在以下的训练中将使用函数DBMS_OUTPUT.PUT_LINE显示输出结果。DBMS_OUTPUT是Oracle提供的包该包有如下三个用于输出的函数用于显示PL/SQL程序模块的输出信息。 第一种形式 DBMS_OUTPUT.PUT(字符串表达式) 用于输出字符串但不换行括号中的参数是要输出的字符串表达式。 第二种形式 DBMS_OUTPUT.PUT_LINE(字符串表达式) 用于输出一行字符串信息并换行括号中的参数是要输出的字符串表达式。
第三种形式 DBMS_OUTPUT.NEW_LINE 用来输出一个换行没有参数。 调用函数时在包名后面用一个点“.”和函数名分隔表示隶属关系。 要使用该方法显示输出数据在SQL*Plus环境下要先执行一次如下的环境设置命令 SET SERVEROUTPUT ON [SIZE n] 用来打开DBMS_OUTPUT.PUT_LINE函数的屏幕输出功能系统默认状态是OFF。其中n表示输出缓冲区的大小。n的范围在20001 000 000之间默认为2000。如果输出内容较多需要使用SIZE n来设置较大的输出缓冲区。 在PL/SQL模块中可以使用查询语句和数据操纵语句(即进行DML操作)所以PL/SQL程序是同SQL语言紧密结合在一起的。在PL/SQL程序中最常见的是使用SELECT语句从数据库中获取信息同直接执行SELECT语句不同在程序中的SELECT语句总是和INTO相配合INTO后跟用于接收查询结果的变量形式如下 SELECT 列名1列名2... INTO 变量1变量2... FROM 表名 WHERE 条件
注意接收查询结果的变量类型、顺序和个数同SELECT语句的字段的类型、顺序和个数应该完全一致。并且SELECT语句返回的数据必须是一行否则将引发系统错误。当程序要接收返回的多行结果时可以采用后面介绍的游标的方法。 使用INSERT、DELETE和UPDATE的语法没有变化但在程序中要注意判断语句执行的状态并使用COMMIT或ROLLBACK进行事务处理。 以下训练包含了按照标准结构书写的一个包含SELECT语句的PL/SQL程序示例。
【训练1】 查询雇员编号为7788的雇员姓名和工资。 步骤1用SCOTT账户登录SQL*Plus。步骤2在输入区输入以下程序/*这是一个简单的示例程序*/SET SERVEROUTPUT ONDECLARE--定义部分标识v_name VARCHAR2(10); --定义字符串变量v_namev_sal NUMBER(5); --定义数值变量v_salBEGIN --可执行部分标识SELECT ename,sal INTO v_name,v_sal FROM emp WHERE empno7788; --在程序中插入的SQL语句DBMS_OUTPUT.PUT_LINE(7788号雇员是||v_name||工资为||to_char(v_sal));--输出雇员名和工资END; --结束标识步骤3按执行按钮或F5快捷键执行程序。输出的结果是7788号雇员是SCOTT工资为3000PL/SQL 过程已成功完成。以上程序的作用是查询雇员编号为7788的雇员姓名和工资然后显示输出。这种方法同直接在SQL环境下执行SELECT语句显示雇员的姓名和工资比较程序变得更复杂。那么两者究竟有什么区别呢SQL查询的方法只限于SQL环境并且输出的格式基本上是固定的。而程序通过把数据取到变量中可以进行复杂的处理完成SQL语句不能实现的功能并通过多种方式输出。 “--”是注释符号后边是程序的注释部分。该部分不编译执行所以在输入程序时可以省略。/*......*/中间也是注释部分同“--”注释方法不同它可以跨越多行进行注释。 PL/SQL程序的可执行语句、SQL语句和END结束标识都要以分号结束。
数据类型
变量的基本数据类型同SQL部分的字段数据类型相一致但是也有不同如表所示。
变量的数据类型 数据类型说明 NUMBER和VARCHAR2是最常用的数据类型。 VARCHAR2是可变长度的字符串定义时指明最大长度存储数据的长度是在最大长度的范围自动调节的数据前后的空格Oracle 9i会自动将其删去。 NUMBER型可以定义数值的总长度和小数位如NUMBER(10,3)表示定义一个宽度为10、小数位为3的数值。整个宽度减去小数部分的宽度为整数部分的宽度所以整数部分的宽度为7。
CHAR数据类型为固定长度的字符串定义时要指明宽度如不指明默认宽度为1。定长字符串在显示输出时有对齐的效果。 DATE类型用于存储日期数据内部使用7个字节。其中包括年、月、日、小时、分钟和秒数。默认的格式为DD-MON-YY如07-8月-03表示2003年8月7日。 BOOLEAN为布尔型用于存储逻辑值可用于PL/SQL的控制结构。 LOB数据类型可以存储视频、音频或图片支持随机访问存储的数据可以位于数据库内或数据库外具体有四种类型BFILE、BLOB、CLOB、NCLOB。但是操纵大对象需要使用Oracle提供的DBMS_LOB包。
变量定义 1变量定义 变量的作用是用来存储数据可以在过程语句中使用。变量在声明部分可以进行初始化即赋予初值。变量在定义的同时也可以将其说明成常量并赋予固定的值。变量的命名规则是以字母开头后跟其他的字符序列字符序列中可以包含字母、数值、下划线等符号最大长度为30个字符不区分大小写。不能使用Oracle的保留字作为变量名。变量名不要和在程序中引用的字段名相重如果相重变量名会被当作列名来使用。
变量的作用范围是在定义此变量的程序范围内如果程序中包含子块则变量在子块中也有效。但在子块中定义的变量仅在定义变量的子块中有效在主程序中无效。 变量定义的方法是 变量名 [CONSTANT] 类型标识符 [NOT NULL][:值|DEFAULT 值]; 关键字CONSTANT用来说明定义的变量是常量如果是常量必须有赋值部分进行赋值。 关键值NOT NULL用来说明变量不能为空。 ∶或DEFAULT用来为变量赋初值。 变量可以在程序中使用赋值语句重新赋值。通过输出语句可以查看变量的值。 在程序中为变量赋值的方法是 变量名:值 或 PL/SQL 表达式; 以下是有关变量定义和赋值的练习。
【训练1】 变量的定义和初始化。
输入和运行以下程序SET SERVEROUTPUT ON DECLARE --声明部分标识v_job VARCHAR2(9);v_count BINARY_INTEGER DEFAULT 0;v_total_sal NUMBER(9,2) : 0;v_date DATE : SYSDATE 7;c_tax_rate CONSTANT NUMBER(3,2) : 8.25;v_valid BOOLEAN NOT NULL : TRUE;BEGINv_job:MANAGER; --在程序中赋值DBMS_OUTPUT.PUT_LINE(v_job); --输出变量v_job的值DBMS_OUTPUT.PUT_LINE(v_count);--输出变量v_count的值DBMS_OUTPUT.PUT_LINE(v_date); --输出变量v_date的值DBMS_OUTPUT.PUT_LINE(c_tax_rate); --输出变量c_tax_rate的值END;执行结果 MANAGER 0 18-4月 -03 8.25 PL/SQL 过程已成功完成。 说明本训练共定义了6个变量分别用“:”赋值运算符或DEFAULT 关键字对变量进行了初始化或赋值。其中c_tax_rate为常量在数据类型前加了 “CONSTANT” 关键字v_valid变量在赋值运算符前面加了关键字“NOT NULL”强制不能为空。如果变量是布尔型它的值只能是“TRUE”、“FALSE”或“NULL”。本练习中的变量v_valid布尔变量的值只能取“TRUE”或“FALSE”。 2根据表的字段定义变量 变量的声明还可以根据数据库表的字段进行定义或根据已经定义的变量进行定义。方法是在表的字段名或已经定义的变量名后加 %TYPE将其当作数据类型。定义字段变量的方法如下 变量名 表名.字段名%TYPE; 【训练2】 根据表的字段定义变量。
输入并执行以下程序SET SERVEROUTPUT ON DECLAREv_ename emp.ename%TYPE;--根据字段定义变量
BEGINSELECT enameINTO v_enameFROM empWHERE empno 7788;DBMS_OUTPUT.PUT_LINE(v_ename); --输出变量的值END;执行结果SCOTTPL/SQL 过程已成功完成。说明变量v_ename是根据表emp的ename字段定义的两者的数据类型总是一致的。 如果我们根据数据库的字段定义了某一变量后来数据库的字段数据类型又进行了修改那么程序中的该变量的定义也自动使用新的数据类型。使用该种变量定义方法变量的数据类型和大小是在编译执行时决定的这为书写和维护程序提供了很大的便利。 3结合变量的定义和使用 我们还可以定义SQL*Plus环境下使用的变量称为结合变量。结合变量也可以在程序中使用该变量是在整个SQL*Plus环境下有效的变量在退出SQL*Plus之前始终有效所以可以使用该变量在不同的程序之间传递信息。结合变量不是由程序定义的而是使用系统命令VARIABLE定义的。在SQL*Plus环境下显示该变量要用系统的PRINT命令。 在SQL*Plus环境下定义结合变量的方法如下 VARIABLE 变量名 数据类型
【训练3】 定义并使用结合变量。
步骤1输入和执行下列命令定义结合变量g_enameVARIABLE g_ename VARCHAR2(100) 步骤2输入和执行下列程序SET SERVEROUTPUT ON BEGIN:g_ename:g_ename|| Hello~ ; --在程序中使用结合变量DBMS_OUTPUT.PUT_LINE(:g_ename); --输出结合变量的值END;
输出结果Hello~PL/SQL 过程已成功完成。步骤3重新执行程序。输出结果Hello~ Hello~PL/SQL 过程已成功完成。步骤4程序结束后用命令显示结合变量的内容 PRINT g_ename 输出结果 G_ENAME ----------------------------------------------- Hello~ Hello~ 说明g_ename为结合变量可以在程序中引用或赋值引用时在结合变量前面要加上“∶”。在程序结束后该变量的值仍然存在其他程序可以继续引用。
4记录变量的定义 还可以根据表或视图的一个记录中的所有字段定义变量称为记录变量。记录变量包含若干个字段在结构上同表的一个记录相同定义方法是在表名后跟%ROWTYPE。记录变量的字段名就是表的字段名数据类型也一致。 记录变量的定义方法是 记录变量名 表名%ROWTYPE 获得记录变量的字段的方法是记录变量名.字段名如emp_record.ename。 如下练习中定义并使用了记录变量。
【训练4】 根据表定义记录变量。
输入并执行如下程序SET SERVEROUTPUT ON DECLAREemp_record emp%ROWTYPE;--定义记录变量BEGINSELECT * INTO emp_recordFROM empWHERE mpno 7788;--取出一条记录DBMS_OUTPUT.PUT_LINE(emp_record.ename); --输出记录变量的某个字段 END;
执行结果为SCOTTPL/SQL 过程已成功完成。 说明在以上的练习中定义了记录变量emp_record它是根据表emp的全部字段定义的。SELECT语句将编号为7788的雇员的全部字段对应地存入该记录变量最后输出记录变量的雇员名称字段emp_record.ename的内容。如果要获得其他字段的内容比如要获得编号为7788的雇员的工资可以通过变量emp_record.sal获得依此类推。
5TABLE类型变量 在PL/SQL中可以定义TABLE类型的变量。 TABLE数据类型用来存储可变长度的一维数组数据即数组中的数据动态地增长。要定义TABLE变量需要先定义TABLE数据类型。通过使用下标来引用TABLE变量的元素。 TABLE数据类型的定义形式如下 TYPE 类型名 IS TABLE OF 数据类型[NOT NULL] INDEX BY BINARY_INTEGER; 此数据类型自动带有BINARY_INTEGER型的索引。
【训练5】 定义和使用TABLE变量
SET SERVEROUTPUT ON DECLARETYPE type_table IS TABLE OF VARCHAR2(10) INDEX BY BINARY_INTEGER; --类型说明v_t type_table; --定义TABLE变量BEGINv_t(1):MONDAY;v_t(2):TUESDAY;v_t(3):WEDNESDAY;v_t(4):THURSDAY;v_t(5):FRIDAY;DBMS_OUTPUT.PUT_LINE(v_t(3)); --输出变量的内容END;执行结果为WEDNESDAYPL/SQL 过程已成功完成。说明本例定义了长度为10的字符型TABLE变量通过赋值语句为前五个元素赋值最后输出第三个元素。
运算符和函数 PL/SQL常见的运算符和函数包括以下方面(这里只做简单的总结可参见SQL部分的例子) * 算术运算加()、减(-)、乘(*)、除(/)、指数(**)。 * 关系运算小于()、小于等于()、大于()、大于等于()、等于()、不等于(!或)。 * 字符运算连接(||)。 * 逻辑运算与(AND)、或(OR)、非(NOT)。 还有如表所示的特殊运算。 IS NULL或IS NOT NULL用来判断运算对象的值是否为空不能用“”去判断。另外对空值的运算也必须注意对空值的算术和比较运算的结果都是空但对空值可以进行连接运算结果是另外一部分的字符串。例如 NULL5的结果为NULL。 NULL5的结果为NULL。 NULL|| ABC 的结果为ABC。 在PL/SQL中可以使用绝大部分Oracle函数但是组函数(如AVG( )、MIN( )、MAX( )等)只能出现在SQL语句中不能在其他语句中使用。还有GREATEST( )、LEAST( )也不能使用。类型转换在很多情况下是自动的在不能进行自动类型转换的场合需要使用转换函数。
结构控制语句
分支结构 分支结构是最基本的程序结构分支结构由IF语句实现。 使用IF语句根据条件可以改变程序的逻辑流程。IF语句有如下的形式:
IF 条件1 THEN
语句序列1
[ELSIF 条件2 THEN
语句序列2
ELSE
语句序列n]
END IF;
其中
条件部分是一个逻辑表达式值只能是真(TRUE)、假(FALSE)或空(NULL)。 语句序列为多条可执行的语句。 根据具体情况分支结构可以有以下几种形式 IF-THEN-END IF IF-THEN-ELSE-END IF IF-THEN-ELSIF-ELSE-END IF
1IF-THEN-END IF形式 这是最简单的IF结构练习如下 【训练1】 如果温度大于30℃则显示“温度偏高”。
输入并执行以下程序SET SERVEROUTPUT ONDECLAREV_temprature NUMBER(5):32;V_result BOOLEAN:false;BEGINV_result: v_temprature 30;IF V_result THEN DBMS_OUTPUT.PUT_LINE(温度|| V_temprature ||度,偏高);END IF; END;执行结果为温度32度偏高PL/SQL过程已成功完成。说明该程序中使用了布尔变量初值为false表示温度低于30℃。表达式v_temprature 30返回值为布尔型赋给逻辑变量V_result。如果变量v_temprature的值大于30则返回值为真否则为假。V_result值为真就会执行IF到 END IF之间的输出语句否则没有输出结果。 试修改温度的初值为25℃重新执行观察结果。 2IF-THEN-ELSE-END IF形式 这种形式的练习如下 【训练2】 根据性别显示尊称。
输入并执行以下程序
SET SERVEROUTPUT ON
DECLAREv_sex VARCHAR2(2);v_titil VARCHAR2(10);
BEGINv_sex:男;IF v_sex 男 THENv_titil:先生;ELSEv_titil:女士;END IF; DBMS_OUTPUT.PUT_LINE(v_titil||您好);
END;执行结果为先生您好PL/SQL 过程已成功完成。说明该程序根据性别显示尊称和问候无论性别的值为何总会有显示结果输出。如果V_sex的值不是‘男’和‘女’那么输出结果会是什么 【练习1】对以上程序进行补充修改在ELSE部分嵌入一个IF结构如果V_sex的值不是女则显示“朋友你好”。 3IF-THEN-ELSIF-ELSE-END IF形式 这种形式的练习如下 【训练3】 根据雇员工资分级显示税金。
输入并运行以下程序
SET SERVEROUTPUT ON
DECLAREv_sal NUMBER(5);v_tax NUMBER(5,2);
BEGINSELECT sal INTO v_salFROM empWHERE empno7788;IF v_sal 3000 THEN V_tax: v_sal*0.08;--税率8%ELSIF v_sal1500 THENV_tax: v_sal*0.06; --税率6%ELSEV_tax: v_sal*0.04; --税率4%END IF;DBMS_OUTPUT.PUT_LINE(应缴税金:||V_tax);
END;执行结果为应缴税金:240PL/SQL 过程已成功完成。说明该程序根据工资计算7788号雇员应缴税金不同工资级别的税率不同。
选择结构
CASE语句适用于分情况的多分支处理可有以下三种用法。 1基本CASE结构 语句的语法如下 CASE 选择变量名 WHEN 表达式1 THEN 语句序列1 WHEN 表达式2 THEN 语句序列2 WHEN 表达式n THEN 语句序列n ELSE 语句序列n1 END CASE; 在整个结构中选择变量的值同表达式的值进行顺序匹配如果相等则执行相应的语句序列如果不等则执行ELSE部分的语句序列。 以下是一个使用CASE选择结构的练习。
【训练1】 使用CASE结构实现职务转换。
输入并执行程序
SET SERVEROUTPUT ON
DECLARE
v_job VARCHAR2(10);
BEGIN
SELECT job INTO v_job
FROM emp
WHERE empno7788;
CASE v_job
WHEN PRESIDENT THEN DBMS_OUTPUT.PUT_LINE(雇员职务:总裁);
WHEN MANAGER THEN DBMS_OUTPUT.PUT_LINE(雇员职务:经理);
WHEN SALESMAN THEN DBMS_OUTPUT.PUT_LINE(雇员职务:推销员);
WHEN ANALYST THEN DBMS_OUTPUT.PUT_LINE(雇员职务:系统分析员);
WHEN CLERK THEN DBMS_OUTPUT.PUT_LINE(雇员职务:职员);
ELSE DBMS_OUTPUT.PUT_LINE(雇员职务:未知);
END CASE;
END;执行结果雇员职务:系统分析员PL/SQL 过程已成功完成。 说明以上实例检索雇员7788的职务通过CASE结构转换成中文输出。 【练习1】将雇员号修改成其他已知雇员号重新执行。
2表达式结构CASE语句 在Oracle中CASE结构还能以赋值表达式的形式出现它根据选择变量的值求得不同的结果。 它的基本结构如下 变量CASE 选择变量名 WHEN 表达式1 THEN 值1 WHEN 表达式2 THEN 值2 WHEN 表达式n THEN 值n ELSE值n1 END; 【训练2】 使用CASE的表达式结构。 SET SERVEROUTPUT ONDECLAREv_grade VARCHAR2(10);v_result VARCHAR2(10);BEGINv_grade:B;v_result:CASE v_gradeWHEN A THEN 优WHEN B THEN 良WHEN C THEN 中WHEN D THEN 差ELSE 未知END;DBMS_OUTPUT.PUT_LINE(评价等级:||V_result);END;执行结果为评价等级:良PL/SQL 过程已成功完成。说明该CASE表达式通过判断变量v_grade的值对变量V_result赋予不同的值。
3搜索CASE结构 Oracle还提供了一种搜索CASE结构它没有选择变量直接判断条件表达式的值根据条件表达式决定转向。 CASE WHEN 条件表达式1 THEN 语句序列1 WHEN 条件表达式2 THEN 语句序列2 WHEN 条件表达式n THEN 语句序列 ELSE 语句序列n1 END CASE; 【训练3】 使用CASE的搜索结构。 SET SERVEROUTPUT ONDECLAREv_sal NUMBER(5);BEGINSELECT sal INTO v_sal FROM emp WHERE empno7788;CASE WHEN v_sal3000 THEN DBMS_OUTPUT.PUT_LINE(工资等级高);WHEN v_sal1500 THENDBMS_OUTPUT.PUT_LINE(工资等级中);ELSEDBMS_OUTPUT.PUT_LINE(工资等级低);END CASE;END;执行结果为工资等级高PL/SQL 过程已成功完成。
说明此结构类似于IF-THEN-ELSIF-ELSE-END IF结构。本训练判断7788雇员的工资等级。
循环结构 循环结构是最重要的程序控制结构用来控制反复执行一段程序。比如我们要进行累加则可以通过适当的循环程序实现。PL/SQL循环结构可划分为以下3种 * 基本LOOP循环。 * FOR LOOP循环。 * WHILE LOOP循环。
1基本LOOP循环 基本循环的结构如下 LOOP --循环起始标识 语句1; 语句2; EXIT [WHEN 条件]; END LOOP; --循环结束标识 该循环的作用是反复执行LOOP与END LOOP之间的语句。 EXIT用于在循环过程中退出循环WHEN用于定义EXIT的退出条件。如果没有WHEN条件遇到EXIT语句则无条件退出循环。
【训练1】 求135...15 的值。
输入并执行以下程序SET SERVEROUTPUT ONDECLAREv_total NUMBER(5):0;v_count NUMBER(5):1;BEGINLOOPv_total:v_totalv_count**2;EXIT WHEN v_count15;--条件退出v_count:v_count2;END LOOP;DBMS_OUTPUT.PUT_LINE(v_total);END;输出结果为680PL/SQL 过程已成功完成。说明基本循环一定要使用EXIT退出否则就会成为死循环。 【练习1】求1*2*3*4*...*10的值。
2FOR LOOP循环 FOR循环是固定次数循环格式如下 FOR 控制变量 in [REVERSE] 下限..上限 LOOP 语句1; 语句2; END LOOP; 循环控制变量是隐含定义的不需要声明。 下限和上限用于指明循环次数。正常情况下循环控制变量的取值由下限到上限递增REVERSE关键字表示循环控制变量的取值由上限到下限递减。 以下是FOR循环结构的练习。
【训练2】 用FOR循环输出图形。 SET SERVEROUTPUT ONBEGINFOR I IN 1..8 LOOPDBMS_OUTPUT.PUT_LINE(to_char(i)||rpad(*,I,*));END LOOP;END;
输出结果为
1*
2**
3***
4****
5*****
6******
7*******
8********PL/SQL 过程已成功完成。 说明该程序在循环中使用了循环控制变量I该变量隐含定义。在每次循环中根据循环控制变量I的值使用RPAD函数控制显示相应个数的“*”。 【练习2】为以上程序增加REVERSE关键字观察执行结果。 【训练3】 输出一个空心三角形。 BEGIN FOR I IN 1..9LOOP IF I1 OR I9 THENDBMS_OUTPUT.PUT_LINE(to_char(I)||rpad( ,12-I, )||rpad(*,2*i-1,*)); ELSEDBMS_OUTPUT.PUT_LINE(to_char(I)||rpad( ,12-I, )||*||rpad( ,I*2-3, )||*); END IF;END LOOP; END;
输出结果为
1 *
2 * *
3 * *
4 * *
5 * *
6 * *
7 * *
8 * *
9 *****************
PL/SQL 过程已成功完成。说明该实例采用循环和IF结构相结合对第1行和第9行(I1 OR I9)执行同样的输出语句其他行执行另外的输出语句。 【练习3】修改程序输出一个实心三角形。 3WHILE LOOP循环 WHILE循环是有条件循环其格式如下 WHILE 条件 LOOP 语句1; 语句2; END LOOP; 当条件满足时执行循环体当条件不满足时则结束循环。如果第一次判断条件为假则不执行循环体。 以下是WHILE循环结构的练习。
【训练3】 使用WHILE 循环向emp表连续插入5个记录。
步骤1执行下面的程序
SET SERVEROUTPUT ON
DECLARE
v_count NUMBER(2) : 1;
BEGINWHILE v_count 6 LOOPINSERT INTO emp(empno, ename)VALUES (5000v_count, 临时);
v_count : v_count 1;END LOOP;COMMIT;
END;
输出结果为
PL/SQL 过程已成功完成。
步骤2显示插入的记录
SELECT empno,ename FROM emp WHERE ename临时;
输出结果为EMPNO ENAME------------------ ----------5001 临时5002 临时5003 临时5004 临时5005 临时已选择5行。
步骤3删除插入的记录DELETE FROM emp WHERE ename临时;COMMIT;输出结果为已删除5行。提交完成。说明该练习使用WHILE循环向emp表插入5个新记录(雇员编号根据循环变量生成)并通过查询语句显示新插入的记录然后删除。
4多重循环 循环可以嵌套以下是一个二重循环的练习。 【训练4】 使用二重循环求12...10的值。
步骤1第1种算法
SET SERVEROUTPUT ON
DECLAREv_total NUMBER(8):0;v_ni NUMBER(8):0;J NUMBER(5);
BEGIN
FOR I IN 1..10LOOPJ:1;v_ni:1;WHILE JILOOPv_ni: v_ni*J;J:J1;END LOOP;--内循环求n!v_total:v_totalv_ni;END LOOP;--外循环求总和DBMS_OUTPUT.PUT_LINE(v_total);
END;
输出结果为
4037913
PL/SQL 过程已成功完成。步骤2第2种算法
SET SERVEROUTPUT ON
DECLAREv_total NUMBER(8):0;v_ni NUMBER(8):1;
BEGINFOR I IN 1..10LOOPv_ni: v_ni*I; --求n!v_total: v_totalv_ni;END LOOP; --循环求总和DBMS_OUTPUT.PUT_LINE(v_total);
END;输出结果为409114PL/SQL 过程已成功完成。说明第1种算法的程序内循环使用WHILE循环求阶层外循环使用FOR循环求总和。第2种算法是简化的算法根据是n!n*(n?1)!。 阶段训练
【训练1】 插入雇员如果雇员已经存在则输出提示信息。SET SERVEROUTPUT ON DECLAREv_empno NUMBER(5):7788;v_num VARCHAR2(10); i NUMBER(3):0;BEGIN SELECT count(*) INTO v_num FROM SCOTT.emp WHERE empnov_empno;IF v_num1 THENDBMS_OUTPUT.PUT_LINE(雇员||v_empno||已经存在);ELSEINSERT INTO emp(empno,ename) VALUES(v_empno,TOM);COMMIT;DBMS_OUTPUT.PUT_LINE(成功插入新雇员);END IF; END;说明在本程序中使用了一个技巧来判断一个雇员是否存在。如果一个雇员不存在那么使用SELECT...INTO来获取雇员信息就会失败因为SELECT...INTO形式要求查询必须返回一行。但如果使用COUNT统计查询返回满足条件的雇员人数则该查询总是返回一行所以任何情况都不会失败。COUNT返回的统计人数为0说明雇员不存在返回的统计人数为1说明雇员存在返回的统计人数大于1说明有多个满足条件的雇员存在。本例在雇员不存在时进行插入操作如果雇员已经存在则不进行插入。 【训练2】 输出由符号“*”构成的正弦曲线的一个周期(0360°)。SET SERVEROUTPUT ON SIZE 10000
SET LINESIZE 100
SET PAGESIZE 100
DECLAREv_a NUMBER(8,3);v_p NUMBER(8,3);
BEGINFOR I IN 1..18LOOPv_a:I*20*3.14159/180;--生成角度并转换为弧度v_p:SIN(v_a)*2025;--求SIN函数值20为放大倍数25为水平位移DBMS_OUTPUT.PUT_LINE(to_char(i)||lpad(*,v_p, ));--输出记录变量的某个字段END LOOP;END;
输出结果如下
1 *
2 *
3 *
4 *
5 *
6 *
7 *
8 *
9 *
10 *
11 *
12 *
13 *
14 *
15 *
16 *
17 *
18 *
PL/SQL 过程已成功完成。说明在本程序中使用到了固定次数的循环以及SIN和LPAD函数通过正确地设置步长、幅度和位移的参数在屏幕上可正确地显示图形。 本人从事软件项目开发20多年2005年开始从事Java工程师系列课程的教学工作录制50多门精品视频课程包含java基础jspweb开发SSH,SSMSpringBootSpringCloud,人工智能在线支付等众多商业项目每门课程都包含有项目实战上课PPT及完整的源代码下载有兴趣的朋友可以看看我的在线课堂
讲师课堂链接https://edu.csdn.net/lecturer/893
