Copiar um arquivo localizado no disco local ou no servidor para outro arquivo ou diretório localizado no mesmo ambiente.
Sintaxe
LOG_file_copy( < l_fileFrom > , < l_fileTo > , < l_confirm > , < l_client >) => SMALLINT
Parâmetros
Nome | Tipo | Obrigatório? | Descrição |
---|---|---|---|
l_fileFrom |
| Sim | Caminho completo do arquivo em disco. |
l_fileTo |
| Sim | Caminho completo do diretório ou arquivo de destino. |
l_confirm |
| Sim | Indicador de confirmação de sobreposição de arquivo de destino, caso já exista. 0 - Se destino já existir, emite msg de alerta que arquivo já existe. 1 - Se destino já existir, tenta sobrepor o arquivo sem alertar usuário. 2 - Se destino já existir, solicita confirmação do usuário para sobrepor ou não o arquivo de destino. Para processo JOB, não será solicitada a confirmação e acusará erro que arquivo de destino já existente. 3 - Se destino já existir, solicita confirmação do usuário para sobrepor ou não o arquivo de destino. Para processo JOB, não será solicitada a confirmação e tentará sobrepor o arquivo de destino já existente. |
l_client |
| Sim | Ambiente de localização do(s) arquivo(s): 0 - Servidor 1 - Local |
Retorno
Tipo | Descrição |
---|---|
| Verdadeiro caso a cópia do arquivo tenha sido realizada com sucesso. |
Exemplo
#----------------------------# FUNCTION LOG_fileCopy_test() #----------------------------# DEFINE l_file CHAR(250) DEFINE l_fileTo CHAR(250) LET l_file = "c:\\temp\\arquivo1.txt" LET l_fileTo = "c:\\temp\\arquivo2.txt" IF LOG_file_copy(l_file,l_fileTo,2,0) THEN CALL conout("Arquivo do servidor copiado com sucesso para outro arquivo no servidor.") ELSE CALL conout("Falha na cópia de arquivo no servidor.") END IF END FUNCTION
Informações
Fontes: file.4gl, file.prw
Veja também
Observações
Para cópia de arquivos do disco local para servidor ou vice-versa, veja as funções LOG_file_copyServerToClient ou LOG_file_CopyClientToServer.