cursor/update freezes

From: Thomas Sjoerdsma <t_sjoerdsma_at_hotmail.com>
Date: Thu, 16 Mar 2000 14:04:36 +0100
Message-ID: <953211533.174983@newsreader2.wirehub.nl>

Hi

i use the following cursor/update methode but the system freezes while running the program in wich this sql is embedded. Does anybody have an idea why????

Thanks

EXEC SQL WHENEVER NOT FOUND DO break;
EXEC SQL DECLARE emp_cursor CURSOR FOR SELECT AMOUNT FROM SYS.BP_DECO WHERE DEALER_ID = :searchkey FOR UPDATE OF AMOUNT;   EXEC SQL OPEN emp_cursor;
   for(;;) {

           EXEC SQL FETCH emp_cursor INTO :mamount;
           EXEC SQL UPDATE SYS.BP_DECO SET AMOUNT = 10
            WHERE CURRENT OF emp_cursor;
              }

  EXEC SQL CLOSE emp_cursor;
  EXEC SQL COMMIT; Received on Thu Mar 16 2000 - 07:04:36 CST