SYSTEM.CURSOR_BLOCK
The value that the SYSTEM.CURSOR_BLOCK system variable represents depends on the current navigation unit:
Assume that you want to create a Key-NXTBLK trigger at the form level that navigates depending on what the current block is. The following trigger performs this function, using :SYSTEM.CURSOR_BLOCK stored in a local variable.
DECLARE
curblk VARCHAR2(30);
BEGIN
curblk := :System.Cursor_Block;
IF curblk = 'ORDERS'
THEN Go_Block('ITEMS');
ELSIF curblk = 'ITEMS'
THEN Go_Block('CUSTOMERS');
ELSIF curblk = 'CUSTOMERS'
THEN Go_Block('ORDERS');
END IF;
END;