Oracle PL/SQL编程规范指南

核心提示： 存储过程的名称应该描述该存储过程所执行的动作函数的名称应该描述所返回的变量例如：PACKAGE student_admin– admin 后缀可能是用于表示管理功能.PROCEDURE remove_student (i_student_id IN student.studid

存储过程的名称应该描述该存储过程所执行的动作

函数的名称应该描述所返回的变量

例如：

PACKAGE student_admin

– admin 后缀可能是用于表示管理功能.

PROCEDURE remove_student (i_student_id IN student.studid%TYPE);

FUNCTION student_enroll_count (i_student_id student.studid%TYPE)

RETURN INTEGER;

四、PL/SQL编程规范之注释

PL/SQL中的注释如同SQL中的注释一样重要。他们应该解释程序的主要部分和所有关键的逻辑步骤。

使用单行注释(–)而不是多行注释(/*)。即使PL/SQL对这些注释做同样处理，这样在代码完成后进行调试也会容易些，因为你不能在多行注释中嵌入多行注释。换句话说，单行注释代码中可以部分取消注释，而在多行注释代码中则不行。

五、其他的建议

对于PL/SQL中嵌入的SQL声明，使用相同的格式化指南来决定这些声明应该如何在代码块中出现

提供一个头部注释，用于说明代码块的用途并列出创建日期和作者名字。并且每个修订版都要有一行注释，包含作者名、日期和修订版描述。

例如：下面的这个示例体现了上述建议。请注意该示例还使用了等宽字体（Courier New），因为每个字体占据同等宽度可以使格式化更加简便。等比例空格字体会隐藏空格使得行间对齐比较困难。多数文本和程序编辑器默认使用等宽字体。

REM　********************************************************　　
REM　*　文件名：coursediscount01.sql　　
REM　*　版本：1　　
REM　*　用途：对于至少有一部分超过十个学生登记的课程给予折扣　　
REM　*　参数：无　　
REM　*　　
REM　*　作者：s.tashi　　时间：2000.1.1　　
REM　*　修改者：y.sonam　时间：2000.2.1　　
REM　*　描述：修正游标，添加缩进和注释。　　
REM　********************************************************　　
DECLARE　
--　C_DISCOUNT_COURSE　找出那些至少有一部分超过十个学生登记的课程　　
CURSOR　c_discount_course　IS　
SELECT　DISTINCT　course_no　　
FROM　section　sect　　
WHERE　10　<=　(SELECT　COUNT(*)　　
FROM　enrollment　enr　　
WHERE　enr.section_id　=　sect.section_id　　
);　　
--　费用超过　$2000.00的课程的折扣率　　
con_discount_2000　CONSTANT　NUMBER　:=　.90;　　
--　费用在$1001.00和$2000.00之间的课程的折扣率　　
con_discount_other　CONSTANT　NUMBER　:=　.95;　　
v_current_course_cost　course.cost%TYPE;　　
v_discount_all　NUMBER;　　
e_update_is_problematic　EXCEPTION;　　
BEGIN　
--　对于那些要打折的课程,　确定当前费用和新的费用　　
FOR　r_discount_course　in　c_discount_course　LOOP　　
SELECT　cost　　
INTO　v_current_course_cost　　
FROM　course　　
WHERE　course_no　=　r_discount_course.course_no;　　
IF　v_current_course_cost　>　2000　THEN　
v_discount_all　:=　con_discount_2000;　　
ELSE　
IF　v_current_course_cost　>　1000　THEN　
v_discount_all　:=　con_discount_other;　　
ELSE　
v_discount_all　:=　1;　　
END　IF;　　
END　IF;　　
BEGIN　
UPDATE　course　　
SET　cost　=　cost　*　v_discount_all　　
WHERE　course_no　=　r_discount_course.course_no;　　
EXCEPTION　　
WHEN　OTHERS　THEN　
RAISE　e_update_is_problematic;　　
END;　--　更新记录的子代码块结束　　
END　LOOP;　--　主循环结束　　
COMMIT;　　
EXCEPTION　　
WHEN　e_update_is_problematic　THEN　
--　事务回滚　　
ROLLBACK;　　
DBMS_OUTPUT.PUT_LINE　　
(’There　was　a　problem　updating　a　course　cost.’);　　
WHEN　OTHERS　THEN　
NULL;　　
END;　　
/