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

PROCEDURE Form_onNavigate

   private cKey 

   cKey = key( ) 

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