Exibir origem

Informa se está no fim do Arquivo/Tabela.

Sintaxe

Eof()

Retorno

Nome	Tipo	Descrição
lRet	lógico	Retorna .T. (Verdadeiro) se estiver no fim do arquivo/tabela; Caso contrário, .F. (Falso)

Observações

O uso da DBGoBottom não ativa a flag de EOF. Para isto, após sua chamada, é necessário o uso da DBSkip.
Após abertura de uma tabela, caso nenhum registro tenha sido inserido, a flag de EOF sempre será True (.T.).

Exemplos

static function CreateTable()
  TCDelFile('T1')
  
  DBCreate('T1', {{"FIELD_NAME", "C", 10, 0}, ;
                  {"FIELD_TYPE"   , "C", 10, 0}}, 'TOPCONN')
RETURN

user function test()
  Local cT1 := "T1"
  
  TCLink()
  
  CreateTable()

  DBUseArea(.F., 'TOPCONN', cT1, (cT1), .F., .F.)
  
  (cT1)->( DBAppend( .F. ) )
  (cT1)->FIELD_NAME := "name"
  (cT1)->FIELD_TYPE := "string"
  (cT1)->( DBCommit() )
  
  (cT1)->( DBAppend( .F. ) )
  (cT1)->FIELD_NAME := "name2"
  (cT1)->FIELD_TYPE := "string"
  (cT1)->( DBCommit() )
  
  (cT1)->( DBAppend( .F. ) )
  (cT1)->FIELD_NAME := "name3"
  (cT1)->FIELD_TYPE := "string"
  (cT1)->( DBCommit() )
  
  DBGoBottom()
  DBSkip()
  
  if Eof() == .T.
    conout("Fim da Tabela/Arquivo")
  endif
 
  DBCloseArea()
  
  TCUnlink()
return

Veja também

Bof