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 110DBSkip(-10)Recno()     // retorna 100