LOG_file_readln

Realiza leitura de conteúdo de uma linha inteira de arquivo aberto via função LOG_file_open() ou LOG_file_openMode().

Sintaxe

LOG_file_readln( < l_hdl > ) => VARCHAR

Parâmetros

Nome	Tipo	Obrigatório?	Descrição
l_hdl	`INTEGER`	Sim	Handle do arquivo recuperado na abertura do arquivo pela função LOG_file_open() ou LOG_file_openMode().

Retorno

Tipo

Descrição

VARCHAR

Retorna o conteúdo lido de 1 linha completa do arquivo, independente do tamanho da linha do arquivo.

Se o valor retornado for NULO, indica final de arquivo.

Atenção

Atente para o tamanho definido para a variável 4GL do tipo CHAR ou VARCHAR que receber o retorno da função LOG_file_readln(), para que tenha um tamanho que comporte todo o conteúdo da linha do arquivo.

Exemplo

#---------------------------------------#
 FUNCTION LOG_fileReadLn_test()
#---------------------------------------#
  DEFINE l_file   CHAR(250)
  DEFINE l_handle SMALLINT
  DEFINE l_text   VARCHAR(1000)

  LET l_file = "c:\\temp\\arquivo1.txt"

  LET l_handle = LOG_file_open(l_file,0)
  IF l_handle >= 0 THEN
     LET l_text = LOG_file_readln(l_handle)
     WHILE l_text IS NOT NULL 
         CALL conout("Conteúdo da linha do arquivo: ["||l_text||"]")
         LET l_text = LOG_file_readln(l_handle)
     END WHILE
     LET l_handle = LOG_file_close(l_handle)
  END IF
END FUNCTION

Informações

Fontes: file.4gl, file.prw

Veja também

LOG_file_open

LOG_file_openMode

LOG_file_readBlock

Páginas filhas