SFTPUpld1

Faz o upload de um arquivo via protocolo SFTP do Totvs Application Server para um servidor SFTP, utilizando autenticação por usuário e senha.

Sintaxe

nStatus := SFTPUpld1( < sFileName >, < sRemotePath >, < sServer >, < sUser >, < sPassword > , [ @cError ]  )

Parâmetros

Nome	Tipo	Descrição	Obrigatório	Referência
sFileName	caractere	Nome do arquivo a ser usado para upload. ()**	X
sRemotePath	caractere	Nome do arquivo – caminho completo – a ser criado no servidor de SFTP	X
sServer	caractere	Endereço do servidor de SFTP ( Hostname ou IP)	X
sUser	caractere	Nome do usuário do servidor SFTP para autenticação	X
sPassword	caractere	Senha do usuário do servidor SFTP para autenticação	X
sError	caractere	Obtém por referência uma string contendo detalhes em caso de falha na execução da função		X

(**) O nome do arquivo segue o padrão de arquivos a partir do ROOTPATH do ambiente em uso no Totvs Application Server

Retorno

Nome	Tipo	Descrição
numérico	0	Sucesso na operação
numérico	-1111	Caminho de arquivo inválido
numérico	-1112	Falha ao abrir o arquivo
numérico	67	Servidor remoto rejeitou a conexão
numérico	79	Erro na camada SSH
numérico	82	O servidor rejeitou a chave pública fornecida
numérico	83	Chave de host inválida
numérico	84	Nome de usuário ou senha inválidos
numérico	85	Falha ao inicializar o SSH
numérico	86	Erro ao ler o arquivo local para upload SFTP
numérico	87	Erro SSH geral
numérico	88	Falha ao carregar uma biblioteca libcurve necessária
numérico	89	Erro com o arquivo de hosts conhecidos
numérico	90	Erro do agente SSH
numérico	91	A chave pública do host remoto não foi encontrada
numérico	92	A conexão com o host remoto foi negada
numérico	93	Ocorreu um erro de protocolo SSH
numérico	94	Caminho de arquivo inválido para operação SFTP
numérico	96	Autoridade de certificação desconhecida no SSH
numérico	101	O acesso ao recurso remoto foi negado
numérico	102	A chave pública fornecida para autenticação não foi verificada

Exemplos

Exemplo de implementação do upload de arquivo utilizando autenticação por usuário e senha.

User Function exemplo()
local nStatus , cError := ''
nStatus := SFTPUpld1("meuarquivo.txt", "/home/user/meufile.txt", "cloud1.dominio.com", "username", "password",@cError)

if (nStatus != 0)
	Conout("Falha ao transferir : "+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.

Árvore de páginas