Re: A little help debugging this procedure, please

"DFS" <nospam_at_dfs_.com> wrote in message news:BYeQe.6248$Yh6.4077_at_fe04.lga...

CREATE OR REPLACE PROCEDURE SetEventNbr (FacID IN INTEGER) IS BEGIN DECLARE
i NUMBER := 1;
j NUMBER := 1;
execObject VARCHAR2(200);
objectCursor INTEGER;

CURSOR cursor1 IS
 SELECT FIELD1
 FROM TABLE
 WHERE FIELD2 = FacID;

 FOR cObject IN cursor1 LOOP
UPDATE TABLE SET FIELD4 = i WHERE FIELD1 = cObject.FIELD1;

   CURSOR cursor2 IS
    SELECT FIELD1
    FROM TABLE WHERE FIELD2 = FacID AND FIELD3 = cObject.FIELD1;

    FOR cObject2 in cursor2 LOOP
     UPDATE TABLE SET FIELD4 = (i + (j / 100)) WHERE FIELD1 = cObject2.FIELD1;

     j := j + 1;
    END LOOP;
   i := i + 1;
 END LOOP;
 END SetEventNbr; Received on Sun Aug 28 2005 - 06:04:25 CDT