Re: PL/SQL question.

Ming Zhang wrote:

> Hi, everyone:
>
> I have a following PL/SQL, I got several basic erros, like PLS 00103....
> I did not touch PL/SQL for a while........
> Anyonw who can help me to point out my errors in the code will be great!
> Thanks in advance!
>
> Ming
>
> CREATE OR REPLACE PROCEDURE WRESCREEN(lotseq VARCHAR2) IS
> DECLARE
> CURSOR C1 IS
> SELECT devwafid, devx, devy, MAX(waf_end) from VC6203D9
> where lseq in lotseq and devwafid is not NULL
> group by devwafid, devx, devy;
> my_lseq VC6203D9.LSEQ%TYPE;
> my_wseq VC6203D9.WSEQ%TYPE;
> my_devwafid VC6203D9.DEVWAFID%TYPE;
> my_devx VC6203D9.DEVX%TYPE;
> my_devy VC6203D9.DEVY%TYPE;
> my_wafend VC6203D9.WAF_END%TYPE;
> my_dienum VC6203D9.DIE_NUM%TYPE;
>
> BEGIN
> OPEN C1;
> LOOP
> FETCH C1 INTO my_devwafid, my_devx, my_devy, my_wafend;
> EXIT WHEN C1%NOTFOUND;
>
> select max(die_num) into my_dienum from VC6203D9
> where devwafid = my_devwafid and devx = my_devx
> and devy = my_devy and waf_end = my_wafend;
>
> INSERT INTO OERESCREEN
> select lseq, wseq, die_num from VC6203D9
> where devwafid = my_devwafid
> and devx = my_devx and devy = my_devy
> and waf_end = my_wafend and die_num != my_dienum;
>
> INSERT INTO OERESCREEN
> select lseq, wseq, die_num from VC6203D9
> where devwafid = my_devwafid
> and devx = my_devx and devy = my_devy
> and waf_end != my_wafend;
>
> END LOOP;
> CLOSE C1;
> COMMIT;
> EXCEPTION
> DBMS_OUTPUT.enable;
> DBMS_OUTPUT.PUT_LINE(SQLERRM);
> END;
> /

My guess, just looking quickly is the problem is with this line:

where lseq in lotseq and devwafid is not NULL

I don't think leseq IN lotseq is going to work. But I could be wrong. Try substituting a string liteal and see if it compiles.

But you might also want to try formatting your code. It is very hard to read.

Daniel A. Morgan Received on Thu Jun 14 2001 - 11:53:46 CDT