LOG_file_size

Retorna o tamanho de um arquivo em disco local ou servidor.

Sintaxe

LOG_file_size( < l_file > , < l_client >) => INTEGER

Parâmetros

Nome

Tipo

Obrigatório?

Descrição

l_file

CHAR

Sim

Caminho completo do arquivo em disco a ser avaliado.

l_client

SMALLINT

Sim

Ambiente de localização do arquivo:

0 - Servidor

1 - Local.

Retorno

Tipo

Descrição

INTEGER

Retorna o tamanho do arquivo (em Bytes).

Quando não encontrar o arquivo, o retorno será (-1).

Exemplo

#---------------------------------------#
 FUNCTION LOG_fileSize_test()
#---------------------------------------#
  DEFINE l_file CHAR(250)
  DEFINE l_size INTEGER

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

  LET l_size = LOG_file_size(l_file,0)
  IF l_size >= 0 THEN
     CALL conout("Tamanho do arquivo = "||l_size)
  ELSE
     CALL conout("Arquivo não encontrado ou falha de permissão de leitura do arquivo.")
  END IF
END FUNCTION

Informações

Fontes: file.4gl, file.prw

Veja também

LOG_file_exist

Páginas filhas