Get more the one records in procedure by using out parameter

Question

Hi good evening every body,
how to get more the one records in procedure by using out parameter ,
give me one example of it.
regards
subba

Answer 1

Like this ?
SQL> set serverout on
SQL> declare
  2    v_empno dbms_sql.Number_Table;
  3    v_ename dbms_sql.Varchar2_Table;
  4    PROCEDURE P1(p_in_deptno IN emp.deptno%TYPE,
  5                 p1_out OUT  dbms_sql.Number_Table,
  6                 p2_out OUT  dbms_sql.Varchar2_Table) IS
  7    BEGIN
  8      SELECT empno, ename BULK COLLECT
  9        INTO p1_out, p2_out
10        FROM emp
11       WHERE deptno = p_in_deptno;
12    END;
13  BEGIN
14    P1(20, v_empno, v_ename);
15    FOR i in 1 .. v_ename.COUNT LOOP
16      dbms_output.put_line(v_empno(i) || '--' || v_ename(i));
17    END LOOP;
18  END;
19  /
7369--SMITH
7566--JONES
7788--SCOTT
7876--ADAMS
7902--FORD
7941--ABCDEFGHIJKLMNOPQRSTUVWXYZAAAAAA
7942--MY#@ ' "ABC
PL/SQL procedure successfully completed.
{code}