Update cursor query in COBOL-DB2 Program

komal · New User Joined: 09 May 2005 Posts: 17

Hello all,

I run one query in SPUFI for updating table. It is like

UPDATE CO.TAB1 SET COLT = 'TEST' WHERE MOD(LO-ID , 210) = 0;

Where the table having 3 lak records and i want to update every 210th record. And in the above query lo-id(integer) is primary key where as the table having composite primary key.

This query executed fine.

I tried the same quiery in COBOL-DB2 program where as its showing errors.

Anybody plz help me to run this in my program. If possible Using cursor and without using cursor.

And also give me a db2 query to run in COBOL for fetching every nth row.

Thqnq
Kiran

kgumraj · Posted: Tue Sep 12, 2006 9:45 pm

As, pre my knowledge I dont know if their is a query to update a nth row. But through Cobol you can get the same using counter.

For ex:

PERFORM VARING I BY nth row UNTIL <CONDITION>
DIVIDE I BY nthrow REMINDER J
IF J = 0
UPDATE sql
ELSE
CONTINUE
END-PERFORM.