Oracle數(shù)據(jù)庫(kù)包的構(gòu)造過(guò)程是沒(méi)有任何名稱的，它是在實(shí)現(xiàn)了包的其他過(guò)程之后，以begin開(kāi)始，以end結(jié)束的部分。本文我們就介紹了一個(gè)構(gòu)造過(guò)程的實(shí)例，接下來(lái)就讓我們一起來(lái)了解一下這部分內(nèi)容吧。

創(chuàng)新互聯(lián)-專業(yè)網(wǎng)站定制、快速模板網(wǎng)站建設(shè)、高性價(jià)比蓮湖網(wǎng)站開(kāi)發(fā)、企業(yè)建站全套包干低至880元,成熟完善的模板庫(kù),直接使用。一站式蓮湖網(wǎng)站制作公司更省心,省錢,快速模板網(wǎng)站建設(shè)找我們，業(yè)務(wù)覆蓋蓮湖地區(qū)。費(fèi)用合理售后完善，10年實(shí)體公司更值得信賴。

1.包頭

 
 
 

  
  
  
create or replace package pkg_emp is  
  
  
  
  minsal number(6, 2);  
  
  
  
  maxsal number(6, 2);  
  
  
  
  procedure add_employee(eno    number,  
  
  
  
                         name   varchar2,  
  
  
  
                         salary number,  
  
  
  
                         dno    number);  
  
  
  
  procedure upd_sal(eno number, salary number);  
  
  
  
  procedure upd_sal(name varchar2, salary number);  
  
  
  
end pkg_emp; 
 
 
 

2.包體

 
 
 

  
  
  
create or replace package body pkg_emp is  
  
  
  
 
  
  
  
  procedure add_employee(eno    number,  
  
  
  
                         name   varchar2,  
  
  
  
                         salary number,  
  
  
  
                         dno    number) is  
  
  
  
  begin  
  
  
  
    if salary between minsal and maxsal then  
  
  
  
      insert into emp  
  
  
  
        (empno, ename, sal, deptno)  
  
  
  
      values  
  
  
  
        (eno, name, salary, dno);  
  
  
  
    else  
  
  
  
      raise_application_error(-20001, '工資不在范圍內(nèi)');  
  
  
  
    end if;  
  
  
  
  exception  
  
  
  
    when dup_val_on_index then  
  
  
  
      raise_application_error(-20002, '該雇員已經(jīng)存在');  
  
  
  
  end;  
  
  
  
 
  
  
  
  procedure upd_sal(eno number, salary number) is  
  
  
  
  begin  
  
  
  
    if salary between minsal and maxsal then  
  
  
  
      update emp set sal = salary where empno = eno;  
  
  
  
      if sql%notfound then  
  
  
  
        raise_application_error(-20003, '不存在該雇員號(hào)');  
  
  
  
      end if;  
  
  
  
    else  
  
  
  
      raise_application_error(-20001, '工資不在范圍內(nèi)');  
  
  
  
    end if;  
  
  
  
  end;  
  
  
  
 
  
  
  
  procedure upd_sal(name varchar2, salary number) is  
  
  
  
  begin  
  
  
  
    if salary between minsal and maxsal then  
  
  
  
      update emp set sal = salary where upper(ename) = upper(name);  
  
  
  
      if sql%notfound then  
  
  
  
        raise_application_error(-20004, '不存在該雇員號(hào)');  
  
  
  
      end if;  
  
  
  
    else  
  
  
  
      raise_application_error(-20001, '工資不在范圍內(nèi)');  
  
  
  
    end if;  
  
  
  
  end; 
 
 
 

3.構(gòu)造過(guò)程

 
 
 

  
  
  
begin    
  
  
  
select min(sal), max(sal) into minsal, maxsal from emp;    
  
  
  
end;  
 
 
 

 

關(guān)于Oracle數(shù)據(jù)庫(kù)包的構(gòu)造過(guò)程實(shí)例的知識(shí)就介紹到這里了，希望本次的介紹能夠?qū)δ兴斋@！

【編輯推薦】

1. 介紹六個(gè)有用的MySQL的SQL語(yǔ)句
2. MySQL大數(shù)據(jù)量快速插入方法和語(yǔ)句優(yōu)化
3. MySQL數(shù)據(jù)庫(kù)完整備份與增量備份的原理簡(jiǎn)介
4. 六條比較有用的MySQL數(shù)據(jù)庫(kù)操作的SQL語(yǔ)句
5. 詳解xtrabackup對(duì)MySQL進(jìn)行備份和恢復(fù)的全過(guò)程

新聞標(biāo)題：Oracle數(shù)據(jù)庫(kù)包的構(gòu)造過(guò)程實(shí)例
URL鏈接：http://uogjgqi.cn/article/dpcocdj.html