Versão atual:

SendSoapMsg não está retornando nada na TWsdlManager

Bom dia!

Estou usando a classe TWsdlManager para fazer um envio de uma requisição SOAP. Estou com um problema que, quando envio a requisição usando o método SendSoapMsg, o mesmo retorna falso, o método GetSoapResponse retorna vazio e a propriedade cError não é preenchida, impossibilitando que eu saiba o que está ocorrendo e de obter o retorno.

Ao usar o método GetSoapMsg e colar o XML no SoapUI, a requisição é feita normalmente e sem erros.

Alguém já passou por essa situação e sabe o que pode ser feito para corrigir?

Grato.

oWs := TWSDLManager():New()

oWs:lVerbose := .T.

If(oWs:ParseURL(cWsUrl))

    If(oWs:SetOperation('buscarNf'))

        oWs:SetValue(0, '00279701')
        oWs:SetValue(1, '000169675')
        oWs:SetValue(2, '34')
        oWs:SetValue(3, '06/05/2020')

        If(oWs:SendSoapMsg())

            ConOut('Sucesso')

        EndIf

    EndIf                

EndIf

FreeObj(oWs)

Versões (2):

Ver a versão formatada

SendSoapMsg não está retornando nada na TWsdlManager

Comentário

new question