DBSkip

DBSkip ( [ nRegistros] ) --> Nil

• Essa função é utilizada para deslocar o ponteiro de registro da tabela para outro registro a partir do registro atual. O deslocamento é lógico, ou seja, leva em consideração a ordem no índice atualmente em uso, e também a expressão de filtro, caso exista.
• Caso o deslocamento seja negativo (registros anteriores), e passe do início da tabela, o primeiro registro é posicionado e a flag de início da tabela (BOF) é setado.
• Caso o deslocamento seja positivo (registros posteriores), e passe do final da tabela, a tabela é posicionada no registro "LastRec()+1", e a flag de final de arquivo (EOF) é setada. Neste último caso, se o RDD for "TOPConnect", o Recno() retornado será por convenção "LastRec() + 5000".

//Este exemplo, apresente como a função DBSkip() pode passar do final da tabela
//e do início da tabela.
DBUseArea( .T.,"dbfcdxads", "\dadosadv609\sa1990.dbf","SSS",.T., .F. )
DBGoBottom()
EOF()        // retorna .F.
DBSkip()
EOF()        // retorna .T.
DBGoTop()
BOF()        // retorna .F.
DBSkip(-1)
BOF()        // retorna .T.

//Este exemplo, apresenta o deslocamento de 10 registros em relação ao registro corrente.
DBUseArea(.T.,"dbfcdxads", "\dadosadv609\sa1990.dbf","SSS",.T., .F. )
DBGoTo(100)
DBSkip(10)
RECNO()     // retorna 110
DBSkip(-10)
Recno()     // retorna 100