ORACLE第7天txt.docVIP

回顾 游标 --- 处理多行记录 存储过程 函数 ORACLE中的程序包 PACKAGE 用途: 1模块化 例子 --公司的员工的管理 1.增加一个员工 2.员工离职 用存储过程和函数来实现 1.增加一个员工 create sequence seq1 start with 7935; create or replace function insert_emp( enm emp.ename%type, --员工的名字 ejob varchar2, --职务 mgr number, --上级 ehiredate date,--参加工作时间 esal number, --工资 ecomm number, --津贴 dno number) return number as a number; begin --工号来自序列 select seq1.nextval into a from dual; --增加了一个员工 insert into emp values ( a,enm,ejob,mgr,ehiredate,esal,ecomm,dno); return a; end; 2.员工离职 create or replace procedure remove_emp(eno emp.empno%type) as begin delete from emp where empno = eno; end; 把这2个功能设计成一个package(包) 包-- 说明部分 + 实现部分 建立说明部分: create or replace package company_gl as --加员工 function insert_emp( enm emp.ename%type, --员工的名字 ejob varchar2, --职务 mgr number, --上级 ehiredate date,--参加工作时间 esal number, --工资 ecomm number, --津贴 dno number) return number; --员工离职 procedure remove_emp(eno emp.empno%type); end; --实现部分 create or replace package body company_gl as function insert_emp( enm emp.ename%type, --员工的名字 ejob varchar2, --职务 mgr number, --上级 ehiredate date,--参加工作时间 esal number, --工资 ecomm number, --津贴 dno number) return number as a number; begin --工号来自序列 select seq1.nextval into a from dual; --增加了一个员工 insert into emp values ( a,enm,ejob,mgr,ehiredate,esal,ecomm,dno); return a; end; procedure remove_emp(eno emp.empno%type) as begin delete from emp where empno = eno; end; end; 怎么用这个PACKAGE???? 1包中存储过程 --7369的员工离开公司 execute company_gl.remove_emp(7369); 2使用函数 --新增加一个员工 declare no number; begin no := company_gl.insert_emp( 张三,CLERK,7499,sysdate, 1500,200,10); dbms_output.put_line(员工号=||no); end; 2包中的变量是全局变量 create or re