FiveTech Software tech support forums

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

Si el Indice estiver Correcto...


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

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

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