Create user defined type under SQL type

Question

Hello guys,
I have a table PART_NEEDED and a table function which returns table of PART_NEEDED%ROWTYPE. This works fine but if I try to create new user defined type with with the same attributes as PART_NEEDED and pipe the rows into table of that type I am getting an inconsistency of types error - Error(30,16): PLS-00382: expression is of wrong type.
Please refer to the script below. I appreciate any help!
CREATE TABLE "TOSS"."PART_NEEDED"
"PART_NEEDED_ID" NUMBER NOT NULL ENABLE,
"TYPE_OF_PART_NEEDS_ID" NUMBER,
"TYPE_OF_PART_IS_NEEDED_ID" NUMBER,
"AMOUNT" NUMBER
SEGMENT CREATION IMMEDIATE PCTFREE 10 PCTUSED 40 INITRANS 1 MAXTRANS 255 NOCOMPRESS LOGGING STORAGE
INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645 PCTINCREASE 0 FREELISTS 1 FREELIST GROUPS 1 BUFFER_POOL DEFAULT FLASH_CACHE DEFAULT CELL_FLASH_CACHE DEFAULT
TABLESPACE "USERS" ;
CREATE OR REPLACE TYPE "TYPE_PART_NEEDED" AS OBJECT
ID NUMBER,
PART_ID NUMBER,
SUB_PART_ID NUMBER,
AMOUNT NUMBER
create or replace package KOLEV_ADMIN_PKG as
TYPE TYPE_PART_NEEDED_TBL IS TABLE OF TOSS.TYPE_PART_NEEDED; -- if the type here is PART_NEEDED%ROWTYPE it works perfectly fine
FUNCTION GET_SUBPARTS (IN_PART_ID IN NUMBER)
RETURN TYPE_PART_NEEDED_TBL PIPELINED;
end;
CREATE OR REPLACE PACKAGE BODY "KOLEV_ADMIN_PKG" AS
FUNCTION GET_SUBPARTS (IN_PART_ID IN NUMBER)
RETURN TYPE_PART_NEEDED_TBL PIPELINED
IS
R_TBL TYPE_PART_NEEDED_TBL; -- To be returned
BEGIN
FOR R IN (
WITH
SUBPARTS(ID, PART_ID, SUBPART_ID, AMOUNT) AS
SELECT PART_NEEDED_ID, TYPE_OF_PART_NEEDS_ID, TYPE_OF_PART_IS_NEEDED_ID, AMOUNT
FROM PART_NEEDED
WHERE TYPE_OF_PART_NEEDS_ID = IN_PART_ID
UNION ALL
SELECT PN.PART_NEEDED_ID, PN.TYPE_OF_PART_NEEDS_ID, PN.TYPE_OF_PART_IS_NEEDED_ID, PN.AMOUNT
FROM SUBPARTS SP, PART_NEEDED PN
WHERE PN.TYPE_OF_PART_NEEDS_ID = SP.SUBPART_ID
SELECT SP.ID, SP.PART_ID, SP.SUBPART_ID, SP.AMOUNT
FROM SUBPARTS SP
ORDER BY PART_ID
LOOP
PIPE ROW(R); -- Error(30,16): PLS-00382: expression is of wrong type
END LOOP;
RETURN;
END GET_SUBPARTS;
END "KOLEV_ADMIN_PKG";
INSERT INTO "TOSS"."PART_NEEDED" (PART_NEEDED_ID, TYPE_OF_PART_NEEDS_ID, TYPE_OF_PART_IS_NEEDED_ID, AMOUNT) VALUES ('4', '2', '3', '2')
INSERT INTO "TOSS"."PART_NEEDED" (PART_NEEDED_ID, TYPE_OF_PART_NEEDS_ID, TYPE_OF_PART_IS_NEEDED_ID, AMOUNT) VALUES ('5', '3', '1', '2')
INSERT INTO "TOSS"."PART_NEEDED" (PART_NEEDED_ID, TYPE_OF_PART_NEEDS_ID, TYPE_OF_PART_IS_NEEDED_ID, AMOUNT) VALUES ('3', '2', '1', '4')
INSERT INTO "TOSS"."PART_NEEDED" (PART_NEEDED_ID, TYPE_OF_PART_NEEDS_ID, TYPE_OF_PART_IS_NEEDED_ID, AMOUNT) VALUES ('17', '3', '4', '1')
Database Release 11.2.0.1.0
I want this functionality because I need to make some joins and add descriptions for each part. Now this table PART_NEEDED contains only IDs - many to many.
Regards!
Edited by: Todor Kolev on Mar 3, 2012 12:47 PM

Answer 1

CREATE OR REPLACE
  PACKAGE BODY KOLEV_ADMIN_PKG
    AS
      FUNCTION GET_SUBPARTS (IN_PART_ID IN NUMBER)
        RETURN TYPE_PART_NEEDED_TBL PIPELINED
        IS
        BEGIN
            FOR R IN (
                      WITH SUBPARTS(ID, PART_ID, SUBPART_ID, AMOUNT)
                        AS (
                             SELECT  PART_NEEDED_ID,
                                     TYPE_OF_PART_NEEDS_ID,
                                     TYPE_OF_PART_IS_NEEDED_ID,
                                     AMOUNT
                               FROM  PART_NEEDED
                               WHERE TYPE_OF_PART_NEEDS_ID = IN_PART_ID
                            UNION ALL
                             SELECT  PN.PART_NEEDED_ID,
                                     PN.TYPE_OF_PART_NEEDS_ID,
                                     PN.TYPE_OF_PART_IS_NEEDED_ID,
                                     PN.AMOUNT
                               FROM  SUBPARTS SP,
                                     PART_NEEDED PN
                               WHERE PN.TYPE_OF_PART_NEEDS_ID = SP.SUBPART_ID
                      SELECT  TYPE_PART_NEEDED(
                                               SP.ID,
                                               SP.PART_ID,
                                               SP.SUBPART_ID,
                                               SP.AMOUNT
                                              ) O
                        FROM  SUBPARTS SP
                        ORDER BY PART_ID
                     ) LOOP
              PIPE ROW(R.O);
            END LOOP;
            RETURN;
      END GET_SUBPARTS;
END KOLEV_ADMIN_PKG;
/SY.