Passando IP e Porta no Centura
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
Curtidas 0
Respostas
Mauricio Padua
04/10/2013
Ivam, poderia explicar no geral o que ta acontecendo.
GOSTEI 0
Ivam Filho
04/10/2013
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 )
GOSTEI 0