Public n private function in pl/sql

Question

hello guyz,
i wanna create a package which contains public function and private function.
the package should contain finding highest number as one private function and lowest number as the other private function. Also i need a public function which uses the above private functions to display the result.
Your help is appreciated.

Answer 1

Here is a sample script from where you should take the concept and implement it in your case --
satyaki>create or replace package pack_vakel
  2  is
  3    procedure aa(a in number,b out varchar2);
  4  end;
  5  /
Package created.
satyaki>
satyaki>create or replace package body pack_vakel
  2  is
  3    procedure test_a(x in varchar2,y out varchar2)
  4    is
  5      str varchar2(300);
  6    begin
  7      str := 'Local ->'||x;
  8      y := str;
  9    end;
10   
11    procedure aa(a in number,b out varchar2)
12    is
13      cursor c1(eno in number)
14      is
15        select ename
16        from emp
17        where empno = eno;
18       
19      r1 c1%rowtype;
20     
21      str2  varchar2(300);
22      str3  varchar2(300);
23    begin
24      open c1(a);
25      loop
26        fetch c1 into r1;
27        exit when c1%notfound;
28        str2 := r1.ename; 
29      end loop;
30      close c1;
31     
32      test_a(str2,str3);
33      b := str3;
34    exception
35      when others then
36        b := sqlerrm;
37    end;
38  end;
39  /
Package body created.
satyaki>
satyaki>
satyaki>set serveroutput on
satyaki>
satyaki>
satyaki>declare
  2    u   number(10);
  3    v   varchar2(300);
  4  begin
  5    u:= 7369;
  6    pack_vakel.aa(u,v);
  7    dbms_output.put_line(v);
  8  end;
  9  /
Local ->SMITH
PL/SQL procedure successfully completed.
satyaki>
satyaki>declare
  2    p   varchar2(300);
  3    q   varchar2(300);
  4  begin
  5    p:= 'SMITH';
  6    pack_vakel.test_a(p,q);
  7    dbms_output.put_line(q);
  8  exception
  9   when others then
10    dbms_output.put_line(sqlerrm);
11  end;
12  /
  pack_vakel.test_a(p,q);
ERROR at line 6:
ORA-06550: line 6, column 14:
PLS-00302: component 'TEST_A' must be declared
ORA-06550: line 6, column 3:
PL/SQL: Statement ignoredRegards.
Satyaki De.