Need help on object type

Question

Hi,
I have created one object type in oracle 10g database like this
CREATE OR REPLACE
TYPE ORA_criteria_DATA AS OBJECT
( criteria_id NUMBER(5),
criteria_name VARCHAR(100),
map MEMBER FUNCTION mem RETURN NUMBER
Then create a type for the same like this.
CREATE OR REPLACE
TYPE TYPE_ORA_CRITERIA_TAB IS TABLE OF ORA_criteria_DATA
Now I am using this type as IN OUT parameter in one of my pacakge procedure and storing some values in the collection and return into a collection in procedure like this
Package PKG_MIS_REPORT BODY
v_data_tab2 type_ora_criteria_tab :=type_ora_criteria_tab();
PROCEDURE PROC_ORA_DATA_IDS(V_DATA_TAB2 IN OUT TYPE_ORA_CRITERIA_TAB)
AS
v_cri_data TYPE_ORA_CRITERIA_TAB :=TYPE_ORA_CRITERIA_TAB();
BEGIN
SELECT ora_criteria_data(criteria_id,criteria_name)
BULK COLLECT INTO v_cri_data
FROM (
SELECT DISTINCT op.criteria_id,op.criteria_name
FROM ora_notch_mis_data op,ora_criteria_ma oc
WHERE op.criteria_id=oc.criteria_id
AND oc.section_id=1);
V_DATA_TAB2.DELETE;
V_DATA_TAB2:=v_cri_data ;
END PROC_ORA_DATA_IDS;
Now I want to call this procedure in JAVA where I will get the values of the collection and use it.
Please let me confirm the way I am doing I will able to get the values of collection in JAVA.
Thanks a lot..
Regards
Anant

Answer 1

Your code is syntactically correct. You may verify it by:
SQL> CREATE OR REPLACE
  2  TYPE ORA_criteria_DATA AS OBJECT
  3  ( criteria_id NUMBER(5),
  4  criteria_name VARCHAR(100),
  5  map MEMBER FUNCTION mem RETURN NUMBER
  6  );
  7  /
Type created.
SQL> CREATE OR REPLACE
  2  TYPE TYPE_ORA_CRITERIA_TAB IS TABLE OF ORA_criteria_DATA;
  3  /
Type created.
SQL> set serverout on
SQL> DECLARE
  2    v_cri_data  TYPE_ORA_CRITERIA_TAB := TYPE_ORA_CRITERIA_TAB();
  3    V_DATA_TAB2 TYPE_ORA_CRITERIA_TAB := TYPE_ORA_CRITERIA_TAB();
  4  BEGIN
  5    SELECT ora_criteria_data(empno, ename) BULK COLLECT
  6      INTO v_cri_data
  7      FROM (SELECT DISTINCT empno, op.ename FROM emp op);
  8    V_DATA_TAB2.DELETE;
  9    V_DATA_TAB2 := v_cri_data;
10    FOR i IN 1 .. V_DATA_TAB2.COUNT LOOP
11      dbms_output.put_line(V_DATA_TAB2(i)
12                           .criteria_id || '--' || V_DATA_TAB2(i)
13                           .criteria_name);
14    END LOOP;
15  END;
16  /
7839--KING
7698--BLAKE
7782--CLARK
7566--JONES
7788--SCOTT
7902--FORD
7369--SMITH
7499--ALLEN
7521--WARD
7654--MARTIN
7844--TURNER
7876--ADAMS
7900--JAMES
7934--MILLER
PL/SQL procedure successfully completed.
SQL> But, Why I have used syntactically correct ? Because, Your objects seems to have some unused(not required) member function without body, you may think about some other alternatives like REF cursor etc.
Consult PL/SQL manual for alternative and correct approach.