1 CREATE OR REPLACE PACKAGE pack3 AS 
 2 FUNCTION fun_calc (num1 NUMBER ,num2 NUMBER ) RETURN  number ;
 3 function fun_null return varchar2 ;
 4 procedure p_add (num1 number ,num2 number ) ;
 5 
 6 END ;
 7 /
 8 CREATE OR REPLACE PACKAGE BODY pack3 AS 
 9 FUNCTION fun_calc (num1 NUMBER ,num2 NUMBER ) RETURN NUMBER AS 
10 num3 NUMBER:=0 ;
11 BEGIN 
12     num3 := num1+num2;
13     RETURN num3 ;
14 END fun_calc;
15 function fun_null return varchar2  as 
16 strmsg varchar2(100) := '我是无参的 function !'
17     begin     
18     return strmsg ;
19     end fun_null;
20 procedure p_add (num1 number ,num2 number ) as 
21     num3 number := 0 ;
22     begin 
23         num3 := num1+num2 ;
24     return num1||'+'||num2||'='||num3 ;
25     end p_add ;
26 
27 END pack3 ;
View Code

相关文章:

  • 2022-01-12
  • 2021-05-10
  • 2021-06-03
  • 2021-04-30
  • 2021-11-30
猜你喜欢
  • 2021-07-30
  • 2022-01-10
  • 2022-01-07
  • 2021-11-08
  • 2021-08-02
  • 2021-08-29
  • 2021-09-10
相关资源
相似解决方案