LOG_dir_remove

Remove um diretório do disco do Servidor (AppServer) ou Local que esteja vazio (sem arquivos ou subpastas).

Sintaxe

LOG_dir_remove( < l_dir > , < l_client >) => SMALLINT

Parâmetros

Nome

Tipo

Obrigatório?

Descrição

l_dir

CHAR

Sim

Caminho completo do diretório em disco a ser eliminado.

Não deve ser enviado um caminho contendo nome de um arquivo ao final, apenas o caminho do diretório.

l_client

SMALLINT

Sim

Ambiente para eliminação do diretório:

0 - Servidor

1 - Local

Retorno

Tipo	Descrição
`SMALLINT`	Verdadeiro (TRUE) se o diretório informado foi eliminado do ambiente indicado. Caso ocorra alguma falha (FALSE), pode-se recuperar a mensagem de erro para exibi-la ao usuário usando a função log0030_mensagem_get_texto().

Exemplo

#----------------------------#
 FUNCTION LOG_DirRemove_test()
#----------------------------#
  DEFINE l_dir  CHAR(250)

  LET l_dir = "c:\\temp\\teste_dir\\"

  IF NOT LOG_dir_remove(l_dir,0) THEN
     CALL conout("Falha de eliminação de diretório no servidor. MOTIVO: "||log0030_mensagem_get_texto())
  ELSE
     CALL conout("Diretório eliminado com sucesso no servidor")
  END IF

  IF NOT LOG_dir_remove(l_dir,1) THEN
     CALL conout("Falha de eliminação de diretório no CLIENT. MOTIVO: "||log0030_mensagem_get_texto())
  ELSE
     CALL conout("Diretório eliminado com sucesso no CLIENT")
  END IF
END FUNCTION

Informações

Fontes: directory.4gl, directory.prw

Veja também

LOG_dir_create

Páginas filhas