Dbgobottom en Tsbrowse con Scope

[AntonioCrisostomo]

Tengo el siguiente problema con el Tsbrowse con Scope:

cFacnum:="001"

DEFINE WINDOW oWndChild MDICHILD OF oWnd

ORDSCOPE( 0 , cFacnum )
ORDSCOPE( 1 , cFacnum )

oW:bGotFocus := { || DBSELECTAREA( oFactu:cAlias ), oB:Refresh() }

@23,0 BROWSE oB;
OF OW;
COLORS "N/W*"

.
.

oWndChild:SetControl( OB )

ACTIVATE WINDOW oWndChild;
ON INIT ( WndAdjClient( oWndChild:hWnd ) ,;
oB:Gobottom(),;
oB:ResetBarPos()
OB:UpStable()
oB:Refresh()
oB:Setfocus() )

El problema radica que no se posiciona en el ultimo registro. Es un scope con unos 200 registros. Sin embargo, se posiciona correctamente sin Scopes.

Gracias por sus respuesta.

Saludos

[karinha]

Si el Indice estiver Correcto...


oW:bGotFocus := { || DBSELECTAREA( oFactu:cAlias ), oB:Refresh() }

ORDSCOPE( 0 , cFacnum )
ORDSCOPE( 1 , cFacnum )
GO TOP

[AntonioCrisostomo]

El problema continua no se posiciona al inicializar la ventana en el evento ON INIT al ultimo registro.
El indicice es condicional.

cFacnum:="001"

DEFINE WINDOW oWndChild MDICHILD OF oWnd

oW:bGotFocus := { || DBSELECTAREA( oFactu:cAlias ), oB:Refresh() }

@23,0 BROWSE oB;
OF OW;
COLORS "N/W*";
SELECT FACNUM FOR cFacnum

.
.

oWndChild:SetControl( OB )

ACTIVATE WINDOW oWndChild;
ON INIT ( WndAdjClient( oWndChild:hWnd ) ,;
oB:Gobottom(),;
oB:ResetBarPos()
OB:UpStable()
oB:Refresh()
oB:Setfocus() )

He borrado la función Scope para usar el parametro SELECT < Campo > FOR < cVar > que tiene el Tsbrowse.

Pero no se posicionar al ultimo registro, se posiciona en cualquier registro menos en el ultimo.

Saludos