PL/SQL question.

From: Ming Zhang <Ming.Zhang_at_ti.com>
Date: Wed, 13 Jun 2001 13:57:28 -0500
Message-ID: <9g8d0n$bvb$1@tilde.csc.ti.com>

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;
/ Received on Wed Jun 13 2001 - 13:57:28 CDT