11.01.2013 Views

Oracle Forms Developer – Form Builder Reference, Volume 1

Oracle Forms Developer – Form Builder Reference, Volume 1

Oracle Forms Developer – Form Builder Reference, Volume 1

SHOW MORE
SHOW LESS

You also want an ePaper? Increase the reach of your titles

YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.

PREVIOUS_BLOCK built-in<br />

Description<br />

Navigates to the first navigable item in the previous enterable block in the navigation sequence. By<br />

default, the previous block in the navigation sequence is the block with the next lower sequence number,<br />

as defined by the block order in the Object Navigator. However, the Previous Navigation Block block<br />

property can be set to specify a different block as the previous block for navigation purposes.<br />

If there is no enterable block with a lower sequence, PREVIOUS_BLOCK navigates to the enterable<br />

block with the highest sequence number.<br />

Syntax<br />

PROCEDURE PREVIOUS_BLOCK;<br />

Built-in Type restricted procedure<br />

Enter Query Mode no<br />

Parameters<br />

none<br />

PREVIOUS_BLOCK examples<br />

/*<br />

** Built-in: PREVIOUS_BLOCK<br />

** Example: If the current item is the first item in the<br />

** block, then skip back the previous block<br />

** instead of the default of going to the last<br />

** item in the same block<br />

** trigger: Key-Previous-Item<br />

*/<br />

DECLARE<br />

cur_itm VARCHAR2(80) := :System.Cursor_Item;<br />

cur_blk VARCHAR2(80) := :System.Cursor_Block;<br />

frs_itm VARCHAR2(80);<br />

BEGIN<br />

frs_itm :=<br />

cur_blk||’.’||Get_Block_Property(cur_blk,FIRST_ITEM);<br />

IF cur_itm = frs_itm THEN<br />

Previous_Block;<br />

ELSE<br />

Previous_Item;<br />

END IF;<br />

END;<br />

321

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!