Ola bom dia, alguem ja obteve esse erro ao tentar fazer parse de uma Url?
Mensage de erro: "WsdlParser Exception : Unknown Wsdl tag at 30,1"
Ex do fonte:
oWsdl := TWsdlManager():New()
oWsdl:cSSLCACertFile := SuperGetMV("MV_X_BXCA", .F., "\")
oWsdl:cSSLCertFile := SuperGetMV("MV_X_BXCER", .F., "\")
oWsdl:cSSLKeyFile := SuperGetMV("MV_X_BXKEY", .F., "\")
oWsdl:cSSLKeyPwd := SuperGetMV("MV_X_BXPSW", .F., "")
oWsdl:nSSLVersion := SuperGetMV("MV_X_BXPRO", .F., "0")
oWsdl:lSSLInsecure := SuperGetMV("MV_X_SSLIN", .F., .F.)
oWsdl:nTimeout := 120
oWsdl:lVerbose := .T.
oWsdl:bNoCheckPeerCert := .F.
//Tenta fazer o Parse da URL
lRet := oWsdl:ParseURL(cURL) //https://www1.nfe.fazenda.gov.br/NFeDistribuicaoDFe/NFeDistribuicaoDFe.asmx?WSDL
If ! lRet
ConOut("[u_dNfSfz] - Erro ParseURL: " + oWsdl:cError)
lContinua := .F.
EndIf
//Se for continuar o processamento
If lContinua
//Tenta definir a operação
lRet := oWsdl:SetOperation("nfeDistDFeInteresse")
If ! lRet
ConOut("[u_dNfSfz] - Erro SetOperation: " + oWsdl:cError)
lContinua := .F.
EndIf
EndIf