Fórum Passando IP e Porta no Centura #457509
04/10/2013
0
Boa noite! Estou realizando a integração de nosso sistema de gestão HU/UFSC com uma máquina unitarizadora Opus30, e preciso transferir um arquivo para a máquina passando IP e a Porta (Obs.: Não é possível transferência por FTP com o protocolo da máquina), preciso de uma função que passe o número de IP e porta ou um socket em Centura (Linguagem Sal), Se alguém puder me ajudar ficarei agradecido!
Ivam Filho
Curtir tópico
+ 0
Responder
Posts
04/10/2013
Mauricio Padua
Ivam, poderia explicar no geral o que ta acontecendo.
Responder
Gostei + 0
04/10/2013
Ivam Filho
Preciso transferir um arquivo no formato .txt para uma maquina que imprime envelopes para remédios, mas no Centura a função que uso só passa o IP da máquina e se não passar a porta também não funciona, e o arquivo não chega na máquina devido aos protocolos internos dela. Aqui segue um trecho do código:
Set dfCurDir = "\\\\250.250.250.250\\"
Set wseparador3 = '\\'
Set strArquivo = dfCurDir || wseparador3 || dfNomeArq
If SalFileOpen( Arquivo, strArquivo, OF_Exist )
If SalFileOpen( Arquivo, strArquivo, OF_Delete )
If SalFileOpen( Arquivo, strArquivo, OF_Write )
! Set wcomando = ''
Call SalFilePutStr( Arquivo, wcomando )
Call SalFileClose( Arquivo )
Call SalMessageBox( 'Arquivo enviado!', '', 0 )
Set dfCurDir = "\\\\250.250.250.250\\"
Set wseparador3 = '\\'
Set strArquivo = dfCurDir || wseparador3 || dfNomeArq
If SalFileOpen( Arquivo, strArquivo, OF_Exist )
If SalFileOpen( Arquivo, strArquivo, OF_Delete )
If SalFileOpen( Arquivo, strArquivo, OF_Write )
! Set wcomando = ''
Call SalFilePutStr( Arquivo, wcomando )
Call SalFileClose( Arquivo )
Call SalMessageBox( 'Arquivo enviado!', '', 0 )
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)