TOTVSTEC

Árvore de páginas

Abre e fecha um arquivo texto para disponibilizar às funções FT_F*.

Sintaxe

FT_FUse( < cTXTFile > )

Parâmetros

Nome

Tipo

Descrição

Obrigatório

Referência

cTXTFile

caractere

Indica o nome do arquivo *.txt que será aberto. Caso o nome não seja passado e já exista um arquivo aberto, o mesmo será fechado.

X

 

Retorno

Nome

Tipo

Descrição

nRet

numérico

Retorna o manipulador de controle do arquivo. Em caso de falha na abertura, a função retornará -1.

Observações

  • As funções FT_F* são utilizadas para ler arquivos texto, em que as linhas são delimitadas pela seqüência de caracteres CRLF ou LF(*) e o tamanho máximo, de cada linha, de 1022 bytes. Além disso, o arquivo é aberto em uma área de trabalho similar a usada pelas tabelas de dados.
  • Para mais detalhes sobre a especificação do arquivo, consulte a documentação da função FT_FReadLn().

Exemplos

User Function Example()
  // Abre o arquivo
  nHandle := FT_FUse("c:\garbage\test.txt")
  // Se houver erro de abertura abandona processamento
  if nHandle = -1
    return
  endif
  // Posiciona na primeria linha
  FT_FGoTop()
  // Retorna o número de linhas do arquivo
  nLast := FT_FLastRec()
  MsgAlert( nLast )
  While !FT_FEOF()
    cLine  := FT_FReadLn()
    // Retorna a linha corrente
    nRecno := FT_FRecno()
    // Retorna o recno da Linha
    MsgAlert( "Linha: " + cLine + " - Recno: " + StrZero(nRecno,3) )
    // Pula para próxima linha
    FT_FSKIP()
  End
  // Fecha o Arquivo
  FT_FUSE()
return

Abrangência

Advanced Protheus 6.09 , Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Protheus 10 , TOTVS Application Server 10 , ByYou Application Server

Veja também


  • Sem rótulos