Copiar um arquivo localizado no disco do servidor para outro arquivo ou diretório localizado na máquina local do usuário.
Sintaxe
LOG_file_copyServerToClient( < l_file > , < l_clientDir > , < l_sem_uso >) => SMALLINT
Parâmetros
Nome | Tipo | Obrigatório? | Descrição |
---|
l_file | CHAR
| Sim | Caminho completo do arquivo existente no disco do servidor. |
l_clientDir | CHAR
| Sim | Caminho completo do diretório ou arquivo de destino na máquina local. Se for informado apenas um diretório da máquina local, o arquivo do servidor será transferido pra máquina local com o mesmo nome do arquivo de origem. Se for informado o nome do arquivo local de destino, este nome será respeitado na cópia do servidor para máquina local. |
l_sem_uso | SMALLINT
| Não | Parâmetro sem uso. Informe este parâmetro com valor NULL. Para manter a compatibilidade com os programas que já fazem uso desta função, este parâmetro foi mantido. |
Retorno
Tipo | Descrição |
---|
SMALLINT
| Verdadeiro caso a cópia do arquivo tenha sido realizada com sucesso. |
Exemplo
FUNCTION LOG_fileCopyServerToClient_test()
DEFINE l_file CHAR(250)
DEFINE l_fileTo CHAR(250)
LET l_file = "c:\\totvs\\temp\\arquivo1.txt" ##Arquivo no disco do servidor
LET l_fileTo = "c:\\temp\\arquivo2.txt" ##Arquivo de destino no disco da máquina local.
#Copiar arquivo do servidor para um arquivo de nome diferente em uma pasta da máquina local
IF LOG_file_copyServerToClient(l_file,l_fileTo,2,NULL) THEN
CALL conout("Arquivo do servidor copiado com sucesso para outro arquivo na máquina local.")
ELSE
CALL conout("Falha na cópia de arquivo do servidor.")
END IF
#Copiar arquivo do servidor para uma pasta da máquina local, mantendo o nome do arquivo de origem.
IF LOG_file_copyServerToClient(l_file,"c:\\temp\\",2,NULL) THEN
CALL conout("Arquivo do servidor copiado com sucesso para diretório da máquina local.")
ELSE
CALL conout("Falha na cópia de arquivo do servidor.")
END IF
END FUNCTION
Fontes: funcoes_genericas.4gl, funcoes_genericas.prw
Veja também
LOG_file_copy
Observações
Para cópia de arquivos do disco local para servidor veja a função LOG_file_CopyClientToServer().