LOG_file_writeln

Gravar uma nova linha de texto em um arquivo aberto via função LOG_file_create ou LOG_file_openMode em modo de edição.

Sintaxe

LOG_file_writeln( < l_hdl > , < l_text > ) => SMALLINT

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_create ou LOG_file_openMode no modo de edição.

l_text

VARCHAR

Sim

Conteúdo do texto a ser gravado no arquivo.

Quando usar conteúdo de uma variável 4GL tipo CHAR neste parâmetro irá considerar os espaços em branco no final do texto. Neste caso, utilize a instrução CLIPPED para ignorar os espaços em branco. Exemplo: l_var_char CLIPPED.

Retorno

Tipo	Descrição
`SMALLINT`	Verdadeiro se o conteúdo foi adicionado com sucesso no arquivo.

Atenção

Esta função irá quebrar a linha após adição da cada bloco de texto. Neste caso, o ponteiro de gravação ficará posicionado exatamente na primeira posição da linha seguinte ao texto adicionado.

Exemplo

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

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

  LET l_text = "Adicionando texto no arquivo"

  LET l_handle = LOG_file_create(l_file,0)
  IF l_handle >= 0 THEN
     IF LOG_file_writeln(l_handle,l_text) THEN
        CALL conout("Texto adicionado ao arquivo com sucesso")
     ELSE
        CALL conout("Falha ao adicionar texto no arquivo")
     END IF
     LET l_handle = LOG_file_close(l_handle)
  END IF
END FUNCTION

Informações

Fontes: file.4gl, file.prw

Veja também

LOG_file_close

LOG_file_create

LOG_file_openMode

Observações

Para evitar quebra de linha após adição de cada texto no arquivo, utilize a função LOG_file_write.

Páginas filhas