The following example displays the current index key value during navigation for debugging purposes:

PROCEDURE Form_onNavigate

private cKey 

cKey = key( ) 

? "Key value: [" + &cKey + "]"