Cursor c1 parameter valve (PAR_SPRIDEN_PIDM) into the cursor c2

Question

hi,
I am using 10g. I am new to oracle.
My task is:
I have to pass cursor c1 parameter valve (PAR_SPRIDEN_PIDM) into the cursor c2
and get the output FULL_NAME which Concatenate the first_name and last_name
Please find the code:
========================================
CREATE TABLE spriden
( SPRIDEN_PIDM NUMBER(8
,SPRIDEN_ID VARCHAR2(9)
,SPRIDEN_LAST_NAME VARCHAR2(60)
,SPRIDEN_FIRST_NAME VARCHAR2(60 CHAR)
,SPRIDEN_CHANGE_IND VARCHAR2(1)
==================================================
create or replace procedure multiple_cursors_proc is
cursor c1 (PAR_SPRIDEN_PIDM in SPRIDEN.SPRIDEN_PIDM%type) is
select SPRIDEN_ID
from SPRIDEN
where SPRIDEN_CHANGE_IND IS NULL
and SPRIDEN_PIDM = PAR_SPRIDEN_PIDM;
cursor c2 is select (SPRIDEN_FIRST_NAME || ' ' || SPRIDEN_LAST_NAME) FULL_NAME
from SPRIDEN
where SPRIDEN_CHANGE_IND IS NULL
and SPRIDEN_PIDM = PAR_SPRIDEN_PIDM;
BEGIN
FOR cr1 in c1
loop
for cr2 in c2
loop
DBMS_OUTPUT.PUT_LINE('START TIME : ' ||
to_char(sysdate, 'HH24:MI:SS'));
dbms_output.put_line('SPRIDEN_PIDM: ' || PAR_SPRIDEN_PIDM || ' ' ||
'FULL_NAME: ' || cr2.FULL_NAME);
DBMS_OUTPUT.PUT_LINE('END TIME : ' ||
to_char(sysdate, 'HH24:MI:SS'));
end loop;
end loop;
end multiple_cursors_proc;
=========================================================
Thanks in advance
Edited by: user10285804 on Apr 14, 2011 5:57 PM

Answer 1

Hi,
Your code has to change this way (untested):
create or replace procedure multiple_cursors_proc is
cursor c1 (PAR_SPRIDEN_PIDM in SPRIDEN.SPRIDEN_PIDM%type) is
select SPRIDEN_ID
from SPRIDEN
where SPRIDEN_CHANGE_IND IS NULL
and SPRIDEN_PIDM = PAR_SPRIDEN_PIDM;
cursor c2(PAR_SPRIDEN_ID SPRIDEN.SPRIDEN_ID%type)
is
  select (SPRIDEN_FIRST_NAME || ' ' || SPRIDEN_LAST_NAME) FULL_NAME
  from SPRIDEN
  where SPRIDEN_CHANGE_IND IS NULL
  and SPRIDEN_PIDM = PAR_SPRIDEN_ID;
BEGIN
FOR cr1 in c1
loop
  for cr2 in c2(cr1.SPRIDEN_ID)
  loop
    DBMS_OUTPUT.PUT_LINE('START TIME : ' ||to_char(sysdate, 'HH24:MI:SS'));
    dbms_output.put_line('SPRIDEN_PIDM: ' || PAR_SPRIDEN_PIDM || ' ' ||'FULL_NAME: ' || cr2.FULL_NAME);
    DBMS_OUTPUT.PUT_LINE('END TIME : ' ||to_char(sysdate, 'HH24:MI:SS'));
  end loop;
end loop;
end multiple_cursors_proc;Herald ten Dam
http://htendam.wordpress.com