WS TWsdlManager com certificado digital

//chamo a classe para o tratamento de arquivos WSDL (DOCUMENTAÇÃO: http://tdn.totvs.com/display/tec/Classe+TWsdlManager)

    oWsdl := TWsdlManager():New()


    //oWsdl:nSSLVersion    := 1
    oWsdl:cSSLCACertFile := "\certOK\000004_all.pem.pem"

    oWsdl:cSSLCertFile   := "\certOK\000004_cert.pem"

    oWsdl:cSSLKeyFile    := "\certOK\000004_key.pem"

    oWsdl:cSSLKeyPwd     := "XXXXX"



    // DLB-Ticket (solicitar o Ticket de Segurança)
    xRet := oWsdl:ParseURL("https://ymbdlb.santander.com.br/dl-ticket-services/TicketEndpointService/TicketEndpointService.wsdl")

    if xRet == .F.
        conout( "Erro primeiro link: " + oWsdl:cError )
        Return(.F.)
    else 
        conout( "Sucesso! " )
    endif

Retorno objeto oWsdl:cError = [WARN ][SERVER] Trying WSDL annonymous (PEER) connection...

Erro primeiro link: An exception occurred at 0:0 WsdlParser Exception : Unable to connect to https://ymbdlb.santander.com.br/dl-ticket-services/TicketEndpointService/TicketEndpointService.wsdl due to error: SSL connect error

compartilhar
  • Boa tarde Carlos, estou com o mesmo problema. Conseguiu uma solução ?

    fernando_advpl   19 de Aug de 2019
  1. Você vai ver essas setas em qualquer página de pergunta. Com elas, você pode dizer se uma pergunta ou uma resposta foram relevantes ou não.
  2. Edite sua pergunta ou resposta caso queira alterar ou adicionar detalhes.
  3. Caso haja alguma dúvida sobre a pergunta, adicione um comentário. O espaço de respostas deve ser utilizado apenas para responder a pergunta.
  4. Se o autor da pergunta marcar uma resposta como solucionada, esta marca aparecerá.
  5. Clique aqui para mais detalhes sobre o funcionamento do DevForum TOTVS!

3 respostas

Não é a resposta que estava procurando? Procure outras perguntas com as tags twsdlmanager ssl advpl ou faça a sua própria pergunta.