TYPE PAISES IS TABLE OF PAIS INDEX BY BINARY_INTEGER ;
  tPAISES PAISES;
BEGIN

  miPAIS(1).CO_PAIS := 27;
  miPAIS(1).DESCRIPCION := 'ITALIA';
  miPAIS(1).CONTINENTE  := 'EUROPA';

END;
En este codigo, no deberia ser:

tPAISES(1).CO_PAIS ...
en lugar de
miPAIS(1).CO_PAIS

???????

Cierto y corregido.

Felicitaciones por el sitio. Miconsulta es si puedo retornar una tabla pl/sql como resultado de una función y rescatarla con algún lenguaje de programación como Java.

Hola Pedro,necesito saber como hacer para transportar una B.D. desde una aplicación PL/SQL a una B.D. Oracle  10 G.
Desde ya muchas gracias por tu valiosa colaboración. Saludos

donde dice:
 "dbms_output.put_line('El elemento previo a 3 es:' || misCiudades.NEXT(1));"

no deberia decir "El elemento proximo a 1 es : misCiudades.NEXT(1)"

PeneLico sql me excita :B

Deseo crear un vector o array en form builder y no se como definirla
gracias

'El elemento previo a 3 es:' || misCiudades.NEXT(1));
END;  ?????

solo hacer notar ese detallito

Visto y corregido!

hola soy de puebla estoy estudiando en estos momentos oracle 10g aunque no se me damucho me interesa saber programar bases de datos quisiera saber si me podrian ayudar de antemano mil gracias y espero una pronta respuesta 
pd
mi  talon de aquiles es lo mas basico las relaciones de identidades e identificar las llaves por favor ayudenme mi correo es zherezar@hotmail.com 

Hola estoy intentando hacer una tabla de tablas de varchar2. Es decir una matriz de varchar2 y al intentar asignar un valor a la posicion (0)(0) me dice:
Subscript outside of limit
He inicializado antes la variable con un constructor con el mismo nombre que el tipo. 
Algo como esto:

v_matriz := tt_generico();

donde: 
TYPE tt_generico IS TABLE OF t_generico;

TYPE t_generico IS TABLE OF varchar2(600);

La definicion se haria de otra manera? O me estoy dejando algo?
Un saludo, 
Gracias.  

Hola, estoy desarrolloando una aplicación en ColdFusion y me conecto a Oracle, estoy usando procedimientos almacenados para mis consultas, en el procedimiento, utilizo algo como esto para enviar el resultado de la consulta

OPEN cur FOR
SELECT * FROM miTABLA

donde cur es un parámetro de salida de mi procedimiento almacenado. Todo esto funciona muy bien, no tengo problemas.

El asunto es que ahora quisiera realizar una serie de operaciones antes de devolver la tabla, así que se me ocurre crear un tipo RECORD con los campos que voy a procesar e ir colocando cada registro en una tabla. Bueno, hasta aquí vamos bien, pero ahora como saco los resultados de la tabla para poder recuperarlos desde mi aplicacion. El dbms_output.put_line no me sirve para lo que yo quiero, pensaba en algo como esto

OPEN cur FOR
SELECT * FROM miTABLAconRECORDS

pero esto no funciona. Alguna idea de como poder realizar esto??

De antemano gracias y felicidades, es un excelente trabajo el que tu haces...

Como se le hace para tomar datos de una tabla creada y crear otra; es decir..
la base de datos es muy lenta entonces tuve cque crear unas tablas en pl pero aun asi tarda muchisimo.
entonces necesito hacer una consulta muy general y guardarla en una tabla para despues llenar la otra tabla con calculos de esta y asi hace r menos consultas a la base de datos y agilizar el proceso, porke mas menos se tarda 2 hrs en leer 1026 registos..
si tienes algo que pueda ayudarme te lo agradeceria..

Hola Idalia, no entendi muy bien tu pregunta, pero si te tardas 2 horas en procesar 1000 registros lo primero que me viene a la mente es que no tienes creados los indices adecuados o incluso que no tienes indices.

Hola a todos! estoy intentando insertar unos datos en una tabla q ya tengo creada, pero me da un error y no se si es xq nop uedo hacer el insert normal de sql en un bloque pl/sql...
alguien me puede ayudar??
muchas gracias de antemano

Verifica si tu tabla tiene restricciones de integridad, te pongo un ejemplillo sencillo espero que te sirva un saludo.

DECLARE 
 V_CONTADOR NUMBER := 7;
BEGIN
INSERT INTO TEMPORAL(COLUMNANUMERICA)
VALUES(V_CONTADOR);
END;
/

te envio la tabla sencilla.
CREATE TABLE TEMPORAL (COLUMNANUMERICA NUMBER(2));

Se puede utilizar una variable de tipo table dentro del where de un select.De este modo:
declare
TYPE tab_bien IS TABLE OF NUMBER(10) INDEX BY BINARY_INTEGER;
v_a_bien tab_bien;
i integer;
begin
--estos valores los recibo concatenados en un varchar2
  v_a_bien(1):=3100;
  v_a_bien(2):=91;
  v_a_bien(3):=1248;
  v_a_bien(4):=958;
  select count(*) into i from bien b where b.codbien in v_a_bien;
--ojo: no puedo colocar b.codbien in (3100,91,1248,958) pues estos valores vienen en un parametro
  dbms_output.put_line('Cantidad: '+to_char(i));
end;
Gracias por la respuesta.

Buenas, como se puede devolver una tabla creada en pl/sql?

begin

HystoryNoteNew := HISTORY_NOTE_TAB();
v_index := 0;

for i in  HystoryNote.first..HystoryNote.last
     loop
     
     
     -- Check New or Old
      select count(1) into v_count
                      from sa_service_request 
                         where sa_service_request.attribute8 =  HystoryNote(i).Attribute8
                           and sa_service_request.requested_date = HystoryNote(i).RequestedDate;
     if v_count > 0 then
       
       v_index := v_index + 1;
       
       HystoryNoteNew(v_index) :=  HISTORY_NOTE_TYP(  HystoryNote(i).CallDate,HystoryNote(i).CallerComments,HystoryNote(i).CreatedBy, 
                                                      to_date(to_char(HistoryNote(i).RequestedDateStr)||' '||to_char( HistoryNote(i).RequestedTimeStr), 'DAY MON-DD-YY AM'),
                                                      HystoryNote(i).RequestedDateStr,HystoryNote(i).RequestedTimeStr,
                                                      HystoryNote(i).LastUpdateUser,HystoryNote(i).Attribute8);
       
   --  RequestedDateStr := HistoryNoteNew(v_index).RequestedDateStr;
 --      v_requested_date_final := to_date(HistoryNoteNew(v_index).RequestedDateStr||' '|| HistoryNoteNew(v_index).RequestedTimeStr, 'DAY MON-DD-YY AM');  /*si le saco esta linea me anda, el tema me parece que no anda con el to_date*/
 --     HistoryNoteNew(HystoryNote.last).RequestedDate := to_date(HistoryNoteNew(HystoryNote.last).RequestedDateStr||' '|| HistoryNoteNew(HystoryNote.last).RequestedTimeStr, 'DAY MON-DD-YY AM');
        
             
    end if;
  
end loop;

hola mi pregunta es como puedo recuperar el nombre y el tipo de las columnas de una tabla en PL/SQL

Al generar la tabla en un package requiero enviar el parametro type table como retorno, pero en el encabezado del package no me reconoce la variable denominada del tipo... 

perdona creo que te falto el metodo EXTEND , metodo inprescindible para poder añadir sucesivamente nuevos elementos a la tabla..

Bueno amigos, espero les sirva esta porción de código de como sacar una tabla creada en pl-sql:

/* Primero, declarar un Registro y luego un arreglo de registros*/
        TYPE reg_Indicador IS RECORD
        (
            K_Region Cat_Region.K_Region%Type,
            K_Centro Cat_Centro.K_Centro%Type,
            K_SuperIntendencia Cat_SuperIntendencia.K_SuperIntendencia%Type,
            Registrados Number,
            Planeados Number,
            Seguimiento Number,
            Cerrados Number
        );

        TYPE tabla_Indicador IS TABLE OF reg_Indicador INDEX BY BINARY_INTEGER;

/* Posteriormente, crear un procedimiento que retorne la tabla de registros creada */

procedure ACT_Indicadores(pRegion IN Cat_Region.K_Region%Type Default Null,
                                pCentro IN Cat_Centro.K_Centro%Type Default Null,
                                pSuperIntendencia IN Cat_SuperIntendencia.K_SuperIntendencia%Type Default Null,
                                tab_Indicador in out tabla_Indicador) IS
                                 
        /* Obteniendo todos los centros de trabajo */
        CURSOR curCentros (Region IN Cat_Region.K_Region%Type Default Null,
                            Centro IN Cat_Centro.K_Centro%Type Default Null,
                            SuperIntendencia IN Cat_SuperIntendencia.K_SuperIntendencia%Type Default Null) IS
            SELECT  DISTINCT B.K_Centro, A.K_Region, C.K_SuperIntendencia
            FROM    Cat_Gerencia A JOIN Cat_Centro B ON A.K_Centro = B.K_Centro JOIN Cat_SuperIntendencia C ON C.K_Centro = B.K_Centro
            WHERE   B.Borrado = 'NO'
            AND     A.K_Region = CASE WHEN Region Is Null THEN A.K_Region ELSE Region END
            AND     A.K_Region > 0
            AND     C.K_SuperIntendencia > 0
            AND     B.K_Centro = CASE WHEN Centro Is Null THEN B.K_Centro ELSE Centro END
            AND     C.K_SuperIntendencia = CASE WHEN SuperIntendencia Is Null THEN C.K_SuperIntendencia ELSE SuperIntendencia END
            ORDER BY 2,1,3;

        v_Region Number;
        v_Centro Number;
        v_SuperIntendencia Number;
        filaCentro curCentros%RowType;

        Indice Number;

        t_Indicador tabla_Indicador;

    BEGIN

        IF (pRegion Is Not Null) THEN
        
        /* Obteniendo los indicadores para una region */
            Indice:= 1;
            v_Region:= pRegion;
            v_Centro:= null;
            v_SuperIntendencia:= null;

            /* Obtener todas las SuperIntendencias de la Region-Centro */
            FOR filaCentro IN curCentros(v_Region, v_Centro, v_SuperIntendencia) LOOP

                -- Agregando elementos a la tabla temporal
                t_Indicador(Indice).K_Region:= filaCentro.K_Region;
                t_Indicador(Indice).K_Centro:= filaCentro.K_Centro;
                t_Indicador(Indice).K_SuperIntendencia:= filaCentro.K_SuperIntendencia;
                t_Indicador(Indice).Registrados:= ACT_Registrados(filaCentro.K_Region, filaCentro.K_Region, filaCentro.K_SuperIntendencia);
                t_Indicador(Indice).Planeados:= ACT_Planeados(filaCentro.K_Region, filaCentro.K_Centro, filaCentro.K_SuperIntendencia);
                t_Indicador(Indice).Seguimiento:= ACT_Seguimiento(filaCentro.K_Region, filaCentro.K_Centro, filaCentro.K_SuperIntendencia);
                t_Indicador(Indice).Cerrados:= ACT_Cerrados(filaCentro.K_Region, filaCentro.K_Centro, filaCentro.K_SuperIntendencia);
                Indice:= Indice + 1;

            END LOOP;
            
            tab_Indicador:= t_Indicador;

        END IF;

    END ACT_Indicadores;

o se amuchachos que si se crea una tabla de estas y no se puede hacer 
insert into mi_tabla
selec .....

no sirve de mucho ya que para ahcer un insercion secuencia a mano es un tremendo array. y la ide ad euna tabla es otra cosa. estoy sorprendido que sea tan mala esta solucion.

o sea muchachos que si se crea una tabla de estas y no se puede hacer insert into mi_tablaselec .....no sirve de mucho ya que para hacer un insercion secuencial y a mano es un tremendo array. y la idea de una tabla es otra cosa. estoy sorprendido que sea tan mala esta solucion.

= 144

CORDIAL SALUDO.
NECESITO ME AYUDEN POR FAVOR, YA QUE TENGO QUE CRAE UN PL/SQL PARA REALIZAR UN DELETE DE UNA TABLA DE A 1000 REGISTROS, Y HAGA COMMIT, CADA VEZ QUE LO HAGA. EL DELETE QUE ESTOY INTENTANDO HACER ES :
DELETE FROM TABLA
WHERE CDCONTRA = '2647'

PERO RESULTA QUE EN LA TABLA, LOS REGISTROS QUE SON 2647, SUMAN 500.000 REGISTROS, Y A L REALIZAR ESTE DELETE DIRECTAMENTE, EL PROCESO SE ROMPE, POR ESO NECESITO CREAR ESTE PL.

MUCHAS GRACIAS POR LA AYUDA

Muy buen ejemplo. Excelente aplicación de una tabla en PL.

Hola,
Requiero de la misma respuesta solicitada hace un tiempo, pero no veo resuesta.

La cito:
 	
consulta de funcion y tabla por JOHN barril
Respuesta recibida el [14/08/2007 11:45:49]
	

Felicitaciones por el sitio. Miconsulta es si puedo retornar una tabla pl/sql como resultado de una función y rescatarla con algún lenguaje de programación como Java.



Gracias!!!!

hola, quisiera saber si es posible hacer una carga de datos de un archivo plano donde los datos vienen separados por coma sobre una tabla de PL para posterior insertarla en una tabla de la BD.}
Gracias!!
Muy buen trabajo

¿Como se puede introducir datos de una tabla  en otra  tabla (backup) que no existe dentro de un pl/sql? 

pensaba que con un select into se podia ya que creaba el solo la tabla peor no me funciona.
Este es el codigo

set SERVEROUTPUT ON
set TERMOUT OFF
SPOOL ${RUTA_TRABAJO}/backup_result.txt
BEGIN

select * INTO PARQUE_TME_SVA_$FECHANTE
FROM
PARQUE_TME_SVA;
DBMS_OUTPUT.PUT_LINE(sqlerr());
END
/
SPOOL off

PROBA CON LA SENTENCIA BULK COLLECT!!
LA TABLA PL/SQL DEBE SER DEL MISMO TIPO QUE LA OTRA.

Yo estoy realizando algo similar, pero en mi caso es para php. Y parte de la respuesta es que si se pueden retornar tablas pl/sql, las cuales se "convierten" a arreglos php.

Si te interesa, en poco tiempo lo termino de organizar y lo publico aca mismo.

Aclaro es para php, pero imagino que en java debe existir un mecanismo similar

Hola me podria ayudar para implementar un rol de pagos mensual basico en pl/sql oracle

ME GUSTARIA SABER SI puedo retornar una tabla pl/sql como resultado de una función y rescatarla con algún lenguaje de programación como Java??.

Una de las tantas ventajas de las tablas PL es que no necesitamos poner en un orden estricto ascendente el índice, este puede saltearse números por ejemplo, el indice bién podría ser 1,3,5,6,9,21.
En este caso, la sentencia For es inutil y genera un error. Voy a tomar una parte del ejemplo del artículo:

DECLARE 
   TYPE ARR_CIUDADES IS TABLE OF VARCHAR2(50) INDEX BY BINARY_INTEGER; 
misCiudades ARR_CIUDADES;  
i BINARY_INTEGER;

BEGIN     
   misCiudades(1) := 'MADRID';
   misCiudades(3) := 'BILBAO';
   misCiudades(5) := 'MALAGA';
   --| Obtenemos el primer valor
   i := misCiudades.FIRST;
   LOOP 
      dbms_output.put_line(misCiudades(i));     
      Exit When (i is null);
      --| Recuperamos el siguiente
      --| valor del índice sea 
      --| Consecutivo o no.
      i := misCiudades.NEXT(i);
   END LOOP;
END;
 
Con esta sintaxis la lectura de la table PL nunca falla, cuando llega al final de la misma i toma valor nulo y sale del bucle.