04-过程函数、程序包和触发器.pptVIP

create or replace function doaverage( vcname in varchar2) return number is vavg number; begin select avg(score) into vavg from courses,courseresults where courses.cid=courseresults.cid and cname=vcname; return(vavg); end doaverage; * * declare t number(3,1); begin t:=doaverage(操作系统); dbms_output.put_line(操作系统的平均成绩是：||t); end; / 操作系统的平均成绩是：77.8 PL/SQL 过程已成功完成。 * SERIALLY: [ si?ri?li ]? pragma: ?编译指示 SQL set serveroutput on SQL exec dbms_output.put_line(mypkg.vsqlerrm); 初始化消息文本 SQL declare n number; 2 begin 3 n:=mypkg.add_cour(233,eeee,117,3); 4 dbms_output.put_line(insert ||n|| item); 5 end; 6 / insert 1 item PL/SQL 过程已成功完成。 V1 ---------- 0 * SQL declare n number; 2 begin 3 n:=mypkg.add_cour(233,eeee,117,3); 4 dbms_output.put_line(insert ||n|| item); 5 dbms_output.put_line(mypkg.vsqlerrm); 6 end; 7 / insert 0 item 初始化消息文本 PL/SQL 过程已成功完成。 * SQL declare n number; 2 begin 3 n:=mypkg.add_cour(234,eeee,19,3); 4 dbms_output.put_line(insert ||n|| item); 5 dbms_output.put_line(mypkg.vsqlerrm); 6 end; 7 / insert -1 item ORA-02291: 违反完整约束条件 (COURSEADMIN.SYS_C005154) - 未找到父项关键字 PL/SQL 过程已成功完成。 * Begin mypkg.query_cour(6); dbms_output.put_line(mypkg.vrec.cid); dbms_output.put_line(ame); dbms_output.put_line(mypkg.vrec.tid); dbms_output.put_line(mypkg.vrec.credits); end; / 145 eeee 119 3 PL/SQL 过程已成功完成。 * SQL begin 2 mypkg.read_cour; 3 end; 4 / 145 eeee 233 eeee 1 数学 2 离散 4 统计 5 c语言 6 汇编语言 7 操作系统 8 数据库原理 9 软件基础 * * create or replace view view1 as select a.tid,a.tname,b.cid,ame,b.credits from teachers a,courses b where a.tid=b.tid; 视图已创建。 * ALTER TABLE table_name MODIFY column_name new_attributes * * SQL select trigger_name,status,table_name from user_triggers; * * * create sequence seq_teachers start with 300 increment by 1 maxvalue minvalue 1 cache 5 nocycle order; * create trigger increaseid before insert o