Help with updating in out nested table parameter

Question

I've been asked a question by a workmate, but I haven't been able to help him.
He's got these types:
CREATE OR REPLACE TYPE TP_COLTYPE AS OBJECT (
  parametro varchar2(30 byte),
  rango  number(12,2),
  color  varchar2(15 byte)
CREATE OR REPLACE TYPE TP_COLTYPE_TAB AS TABLE OF TP_COLTYPE;
CREATE OR REPLACE TYPE TP_PARTYPE AS OBJECT (
  perfil_comercial VARCHAR2(30),
  subtendido VARCHAR2(2),
  parametros TP_COLTYPE_TAB
/And he wants to create a procedure that has IN OUT TP_PARTYPE paramter so that he can modify the color column in all the records in the array. This is his try (which fails to compile):
CREATE OR REPLACE PROCEDURE getColoresUmbrales(p_parametros IN OUT TP_PARTYPE) IS
    CURSOR c_partype IS SELECT parametro,rango FROM TABLE(p_parametros.parametros) FOR UPDATE;
BEGIN
    FOR r_partype IN c_partype LOOP
        UPDATE TABLE(p_parametros.parametros)
            SET color = getColorUmbral(p_parametros.perfil_comercial,p_parametros.subtendido,r_partype.parametro,r_partype.parametro)
         WHERE CURRENT OF c_partype;
    END LOOP;
EXCEPTION WHEN OTHERS THEN
RAISE_APPLICATION_ERROR(-20000,SQLERRM);
rollback;
END getColoresUmbrales;I don't think using a cursor is necessary nor efficient, but I have not managed to find the right way. I don't know what release he's working wiht, but I know it is 10g.
Could someone please help us?

Answer 1

I have coded this procedure which should do what we want:
CREATE OR REPLACE PROCEDURE getcoloresumbrales_fernando (
   p_parametros   IN OUT   tp_partype_prueba_fernando
IS
BEGIN
   FOR i IN 1 .. p_parametros.parametros.COUNT
   LOOP
      p_parametros.parametros (i).color :=
         getColorUmbral (p_parametros.perfil_comercial,
                                p_parametros.subtendido,
                                p_parametros.parametros (i).rango,
                                p_parametros.parametros (i).rango
   END LOOP;
EXCEPTION
   WHEN OTHERS
   THEN
      raise_application_error (-20000, SQLERRM);
      ROLLBACK;
END getcoloresumbrales_fernando;
/But, how can I bulk it?
Thanks in advance.