I have been receiving the Runtime error
DBIF_RSQL_INVALID _CURSOR in my Zobject.
On the Production as we are expecting 3 Million records i used the COMMIT WORK statement inside the loop, so that once the record # reaches 10,000 it can free the memory space (Before i added the COMMIT WORK statement i was receiving the DBIF_RSQL_SQL_ERROR).
The main objective of this object is to delete the Orphan entries available in the table ZOMLT.
DATA : CNTR TYPE I VALUE '0', "Total deleted records
CNTR1 TYPE I VALUE '0'. "Commit records
SORT ORPHAN_TAB BY MSG_ID.
WRITE :/ 'Message IDs of Orphan entries in ZOMLT'.
IF ORPHAN_TAB IS INITIAL.
WRITE :/ ' - None'.
LOOP AT ORPHAN_TAB.
WRITE :/ ORPHAN_TAB-MSG_ID.
SELECT * FROM ZOMLT WHERE MSG_ID = ORPHAN_TAB-MSG_ID.
IF SY-SUBRC = '0'.
--> DELETE ZOMLT.
CNTR = CNTR + 1. "For total # of records
CNTR1 = CNTR1 + 1.
IF CNTR1 EQ 10000.
so that after every 10,000 records deleted from ZOMLT we * are using COMMIT.
Would be great to have the views to correct the above code.