LOG_dir_create

Cria um diretório no disco do Servidor (AppServer) ou Local.

Sintaxe

LOG_dir_create( < 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 criado.

Não deve ser enviado um caminho contendo nome de um arquivo ao final, apenas o caminho do diretório, pois a função irá considerar o nome do arquivo como nome para uma subpasta.

l_client

SMALLINT

Sim

Ambiente para criação do diretório:

0 - Servidor

1 - Local

Retorno

Tipo	Descrição
`SMALLINT`	Verdadeiro (TRUE) se o diretório informado for criado com sucesso no 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_DirCreate_test()
#----------------------------#
  DEFINE l_dir  CHAR(250)

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

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

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

Informações

Fontes: directory.4gl, directory.prw

Veja também

LOG_dir_exist

Páginas filhas