Linha Logix

Páginas filhas
  • LOG_file_writeln

Versões comparadas

Versão antiga 1

changes.mady.by.user Cleane Hermann

Gravado em

comparado com

Nova versão Atual

changes.mady.by.user Cleane Hermann

Gravado em

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

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

Sintaxe

...

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  ou LOG_file_openMode() no  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.

Nota
titleAtençã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

Bloco de código
languageruby
themeConfluence
linenumberstrue
#---------------------------------------#
 FUNCTION LOG_fileWritefileWriteln_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_writewriteln(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

...