Faz o upload de um arquivo via protocolo SFTP do Totvs Application Server para um servidor SFTP, autenticando o usuário informado com uma chave PEM existente, previamente carregada no sistema por meio de um agente.
Sintaxe
nStatus := SFTPUpld2( < sFileName >, < sRemotePath >, < sServer >, < sUser > , [ @sError ] )
Parâmetros
Nome | Tipo | Descrição | Obrigatório | Referência |
---|---|---|---|---|
sFileName | caractere | Caminho completo do arquivo a ser transferido do seu computador | X | |
sRemotePath | caractere | Caminho completo do arquivo a ser salvo no servidor remoto | X | |
sServer | caractere | Endereço do servidor remoto | X | |
sUser | caractere | Nome do usuário | X | |
sError | caractere | Obtém por referência uma string contendo detalhes em caso de falha na execução da função | X |
Retorno
Nome | Tipo | Descrição |
---|---|---|
aResult | vetor | 0 = Sucesso | Quanquer retorno diferente de zero indica falha na operação |
Exemplos
Exemplo de implementação do upload de arquivo utilizando autenticação por chave PEM existente.
User Function uploadSFTPexemplo2() Local nStatus , cError := '' nStatus := SFTPUpld2("meuarquivo.txt", "/home/user/meufile.txt", "cloud1.dominio.com", "user", @cError) if (nStatus != 0) Conout("Falha ao transferir arquivo : "+cError) endif Return
Abrangência
Função disponível, na linguagem TLPP, para build superior a 19.3.1.7.
IMPORTANTE: Utilizar preferencialmente na linguagem TLPP pois o suporte desta função no AdvPL está sendo descontinuado.