LINE/COL ERROR

Question

Hi,
I have declared one nested table , then i am using the variable of that nested table in select statement. I am executing the code in procedure i am getting
LINE/COL ERROR
59/8 PL/SQL: Statement ignored
59/44 PLS-00597: expression 'COLL' in the INTO list is of wrong type
Here you can find procedure...
create or replace PROCEDURE POD_DBVERSION_PROC
AS
CURSOR C1 IS SELECT POD_ID, SHORTNAME FROM POD_DATA WHERE POD_ID IS NOT NULL AND SHORTNAME IS NOT NULL AND SHORTNAME IN ('AJA','AOA','ALA');
EXEC_STRING VARCHAR2(4000) :=NULL;
Podid number;
podname varchar2(30);
Row_id varchar2(20);
ErrorString1 varchar2(4000);
V3 NUMBER;
V4 varchar2(40);
EXEC_STRING1 VARCHAR2(4000);
pod_cnt number;
type COL is table of varchar2(2000);
rowid varchar2(40);
coll COL;
BEGIN
open C1;
loop
fetch C1 into Podid,podname;
exit when C1%NOTFOUND;
BEGIN
EXEC_STRING:='SELECT COUNT(*) FROM POD_VERSION WHERE POD_ID='''||Podid||''' AND TIER=''DB'' and BUILD_LEVEL IN (SELECT ROW_ID FROM dboltp.s_db_ver_ondemd@SX'||podname||'M)';
EXECUTE IMMEDIATE EXEC_STRING into pod_cnt;
IF pod_cnt = 0 then
EXEC_STRING1:='select ROW_ID from dboltp.s_db_ver_ondemd@SX'||podname||'M where row_id not in (select BUILD_LEVEL from POD_VERSION WHERE POD_ID='''||Podid||''' AND TIER=''DB'')';
EXECUTE IMMEDIATE EXEC_STRING1 INTO coll;
FOR i IN coll.FIRST..coll.LAST LOOP
if coll.EXISTS(i) THEN
V4 := coll.NEXT(i);
DBMS_OUTPUT.PUT_LINE(V4);
end if;
END LOOP;
END IF;
EXCEPTION
WHEN OTHERS THEN
DBMS_OUTPUT.PUT_LINE(SQLERRM);
END;
END LOOP;
END POD_DBVERSION_PROC;
Could some help me? I want to assign some list values to collection, latter i need to use those values.
Thanks in advance.
Thanks
Asif

Answer 1

user12233770 wrote:
Hi,
This is the part in the function. I will detect if there is any row returned or not. What's the problem with 'exec ...'?
exec immediate 'select * from sch.jb_'||TRIM(p_type)
||'my_vs where Z'||trim(p_type)||'no=:1'
using p_my_id;
     if sql%rowcount=0 then
Many thanks & Regards,
huaminAn example of how to use dynamic sql.
TUBBY_TUBBZ?declare
  2  l_count number;
  3  begin
  4  execute immediate 'select count(*) from all_objects where owner = :x' into l_count using user;
  5  dbms_output.put_line(user || ' owns ' || l_count || ' objects');
  6  end;
  7  /
TUBBY owns 138 objects
PL/SQL procedure successfully completed.
Elapsed: 00:00:00.47
TUBBY_TUBBZ?