Kbase P98972: How to reposition an ADM2 smartbrowse on a separate page?
Autor |
  Progress Software Corporation - Progress |
Acesso |
  Público |
Publicação |
  12/17/2004 |
|
Status: Unverified
GOAL:
How to reposition an ADM2 smartbrowse on a separate page?
GOAL:
How to apply focus to a browse row, when the browse is not on the first visible page and there isn't a foreign field link between the SDO's.
GOAL:
When selecting another page the smartDatabrowse row does not have focus. How can a row be selected without using the mouse?
FIX:
In an initializeObject procedure override in the browse use 'fetchrowIdent' to reposition the browse. For example the procedure should look like:
RUN SUPER.
DEFINE VARIABLE h_DataSource AS HANDLE NO-UNDO.
DEFINE VARIABLE cRowIdent AS CHARACTER NO-UNDO.
{get DataSource h_DataSource}.
cRowIdent = DYNAMIC-FUNCTION('getRowIdent':U IN h_DataSource) NO-ERROR.
IF cRowIdent NE ? THEN
DYNAMIC-FUNCTION('fetchRowIdent':U IN h_DataSource, cRowIdent, '':U).