Consultor Eletrônico

Status: Unverified

FACT(s) (Environment):

Windows
OpenEdge 10.x

SYMPTOM(s):

pupdsav.w toolbar takes focus while browsing

Browsing parent browse with arrow keys, toolbar takes focus.

Toolbar 'Copy' button takes focus from parent SmartDataBrowser, if the child SmartDataBrowser doesn't have any related records.

The pupdsav.w smartPanel takes focus when scrolling with the keyboard arrow keys.

CAUSE:

This is a known issue

FIX:

As a workaround use the dyntoolbar.w instead.

Or alternaively, create an enableFields override (see below) to set focus back if a different object has focus. Use a standard customization with a custom super, or add it directly to the dynamic .w if dynamic browsers are used. Once compiled, this should resolve the problem.

procedure enableFields:
define variable hBrowse as handle no-undo.
define variable hFocusParent as handle no-undo.
define variable hFocus as handle no-undo.

{get BrowseHandle hBrowse}.

if valid-handle(focus) and focus <> hBrowse then
do:
hFocusParent = focus:parent.
if hFocusParent <> hBrowse then
hFocus = Focus.
end.
run super.

if valid-handle(hFocus) then
apply 'entry' to hFocus.
end.