Histórico da Página

...

Bloco de código
LOG_gZipCompress( < l_file > , < l_env_file > , < l_gzip_file > , < l_env_gzip > ) => SMALLINT

Parâmetros

Nome	Tipo	Obrigatório?	Descrição
l_file	`CHAR`	Sim	Caminho completo do arquivo que será compactado.
l_env_file	`SMALLINT`	Sim	Ambiente do arquivo: 0 - Servidor ou 1 - Local.
l_gzip_file	`CHAR`	Sim	Caminho completo do arquivo compactado.
l_env_gzip	`SMALLINT`	Sim	Ambiente do arquivo compactado: 0 - Servidor ou 1 - Local.

Retorno

Tipo	Descrição
`SMALLINT`	Verdadeiro se o arquivo foi compactado com sucesso.

Exemplo

Bloco de código

language	ruby
theme	Confluence
linenumbers	true

#------------------------------------------------------------------------------#
 FUNCTION LOG_gZipCompressExample()
#------------------------------------------------------------------------------#
    DEFINE l_status  SMALLINT
    DEFINE l_message CHAR(200)

    LET l_status = LOG_tarCompress("D:/arquivo1.txt",1,"D:/arquivos.gz",1)


    IF  NOT l_status THEN
        LET l_message = log0030_mensagem_get_texto()
        CALL log0030_processa_mensagem(l_message,"excl",0)
    ELSE
        LET l_message = "Arquivo compactado com sucesso em ""D:\arquivos.gz""."
        CALL log0030_processa_mensagem(l_message,"info",0)
    END IF


    RETURN l_status
END FUNCTION

Informações

Autor: Rubens Dos Santos Filho
Desde: 19/06/2017
Fonte: zip.4gl e zip.prw
Versão: 12.1.18

Observações

Para recuperar a mensagem de eventual erro na geração é possível utilizar a função log0030_mensagem_get_texto ou log0030_exibe_ultima_mensagem.
Para compactar mais de um arquivo, é necessário primeiro compactar a lista de arquivos no formato TARTAR utilizando a função LOG_tarCompress.

Páginas filhas

Versões comparadas

Versão antiga 1

Nova versão Atual

Chave

Parâmetros

Retorno

Exemplo

Informações

Observações