Utilizando el método bSkip wbrowse

[Joao Cezar]

Ola

Tengo una opción de filtro de búsqueda de productos para elegir qué 1-Productos en stock o 2-Productos sin valores o 3-Wide, intentado usar SetFilter () fue de red lenta, no puedo crear índices fijos o temporales, pensó en utilizar el método de bSkip navegar, pero no puedo hacer que funcione, podría alguien darme un ejemplo?

Seguir lo que estoy haciendo:

oBrwConsul:bSkip := { | nRecs | SkipEstoq( nRadio, cAlias, nRecs ) }
...
...
...

FUNCTION SkipEstoq( nRadio, cAlias, nRecords )

LOCAL nSkipped

DEFAULT nRecords := 1

IF nRadio == 1
IF (cAlias)->PrEstq <= 0 ; IF( nRecords < 0, nRecords--, nRecords++ ); ENDIF
ELSEIF nRadio == 2
IF (cAlias)->PrEstq > 0 ; IF( nRecords < 0, nRecords--, nRecords++ ) ; ENDIF
ENDIF

nSkipped := (cAlias)->( DbSkipper( nRecords ) )

RETURN nSkipped