Problemas con cursores dentro del procedimiento

En primer lugar, decirte que existen varias formas de tratar los cursores. La forma que tu propones se utiliza más bien cuando tienes que abrir y cerrar varios cursores y no está definido cuáles se van a utilizar cada vez (de forma que puedes decidir si abres unos u otros).
Para el Problema que me cuentas, no es necesario que emplees este método, ya que hay otro mucho más sencillo y más eficiente.
Bueno, la verdad es que no he podido adivinar cómo son las tablas que utilizas, ni cómo es la carga de forma precisa, así que me he inventado un ejemplo que creo que es bastante similar.
Supongamos tres tablas:
a) Va a contener los datos de una serie de coches.
Coches
--------------------------------------------------------------
COD_COCHE NUMBER(6)
Modelo varchar2(15)
Donde COD_COCHE es el código del coche y MODELO es una descripción del modelo de coche.
b) En ella se van a guardar los datos de todos los viajes de cada coche.
Viajes
--------------------------------------------------------------
COD_VIAJE NUMBER(6)
COD_COCHE NUMBER(6)
NUM_KM NUMBER(4)
Tiempo number(4)
Donde COD_VIAJE es el código del viaje, COD_COCHE es el código del coche que ha realizado el viaje, NUM_KM la distancia recorrida en km y TIEMPO el tiempo empleado en horas.
c) Se generará un resumen de todos los viajes de cada coche, totalizando el número de km recorridos y sacando la velocidad media.
Resumen
--------------------------------------------------------------
COD_COCHE NUMBER(6)
MODELO VARCHAR2(15)
NUM_KM_TOTALES NUMBER(10)
TIEMPO_TOTAL NUMBER(10)
VELOCIDAD_MEDIA NUMBER(3)
Donde COD_COCHE es el código de coche, MODELO es la descripción del modelo de coche, NUM_KM_TOTALES es la suma de las distancias de cada viaje de dicho coche en km, y VELOCIDAD_MEDIA es el ratio entre el múmero de kilómetros total y el tiempo total empleado.
De esta forma, cada coche puede tener dos situaciones:
1.- Que no haya realizado viajes, con lo que hay que insertar en la tabla RESUMEN los datos del coche y dejar nulos TIEMPO_TOTAL y VELOCIDAD_MEDIA.
2.- Que ya haya realizado viajes, con lo que habría que actualizar los datos en la tabla RESUMEN.
La forma más sencilla de hacerlo sería la siguiente:
Create or replace package pak_siger is
PROCEDURE pr_resumir ();
END;
/
create or replace package body pak_siger is
PROCEDURE pr_resumir () is
//Definimos variables de traspaso
v_cod_coche NUMBER(6); //Recoge codigos de coche
v_modelo VARCHAR2(15); //Recoge modelos
v_num_km_totales NUMBER(10); //Recoge la suma total de km de un coche
v_tiempo_total NUMBER(10); //Recoge el tiempo total empleado por un coche
v_velocidad_meia NUMBER(3); //Recoge el valor de la velocidad media
//Definimos un cursor que recorra la tabla COCHES
cursor C1 is(
select COD_COCHE, MODELO
from COCHES);
//Definimos una variable de tipo "registro del cursos c1"
R1 C1%rowtype;
BEGIN
//Inicializamos las variables numericas
v_num_km_totales := NULL;
v_tiempo_total := NULL;
v_velocidad_media := NULL;
for R1 in C1 //Recorremos el cursor (todos los coches que tenemos registrados)
loop
//Recogemos algunos valores en las variables
v_cod_coche := R1.COD_COCHE;
v_modelo := R1.MODELO;
//Recogemos el resto de valores en las variables
BEGIN
select sum(NUM_KM), sum(TIEMPO), sum(NUM_KM)/sum(TIEMPO)
into v_num_km_totales, v_tiempo_total, v_velocidad_media
from VIAJES
where COD_COCHE = v_cod_coche;
EXCEPTION
when no_data_found then //Si no encuentra datos en la tabla VIAJES (no hay viajes)
//Tenemos que registrar el coche (codigo y modelo)
insert into RESUMEN
values(v_cod_coche, v_modelo, NULL, NULL, NULL);
END;
if V_NUM_KM_TOTALES is not null then //Si existen viajes, hay que actualizar
update RESUMEN
set NUM_KM_TOTALES = v_num_km_totales,
TIEMPO_TOTAL = v_tiempo_total,
VELOCIDAD_MEDIA = v_velocidad_media
where COD_COCHE = v_cod_coche
and MODELO = v_modelo;
end if;
end loop;
END;
/
Espero que no te sea muy difícil ajustar este ejemplo a tu problema en concreto. Si no lo ves claro, mándame cómo están definidas las tablas y cómo es la carga de datos.
Suerte.