eldhose
Boris Borzic
José Francisco Rangel Serrano
Hello:
Excuse my English, please.
oSOAPRequest:=xbSOAPEnvelope():New() oSOAPRequest:AddNameSpace('SOAPSDK1="spellChecked="true">http://www.w3.org/2001/XMLSchema"') oSOAPRequest:AddNameSpace('SOAPSDK2="spellChecked="true">http://www.w3.org/2001/XMLSchema-instance"') oSOAPRequest:AddNameSpace('SOAPSDK3="spellChecked="true">http://schemas.xmlsoap.org/soap/encoding/"') oSOAPRequest:AddNameSpace('SOAP-ENV="spellChecked="true">http://schemas.xmlsoap.org/soap/envelope/"') oSOAPRequest:Action:="trataPeticionPago" oSOAPRequest:NameSpace:=SERMEPA_NAME_SPACE oSOAPRequest:SetStyle(SOAP_STYLE_DOCUMENT,SOAP_BINDING_LITERAL) oSOAPRequest:AddVar("entradaXML",::ToXML():Serialize(),'xmlns:SOAPSDK4="'+SERMEPA_NAME_SPACE+'"')
oSSLContext:=xbSSLContext():New() oSSLContext:UseCertificateChainFile("C:\Certificados\Desarrollo\Formato PEM\sas-d.sermepa.es.cer")
oSOAPRequest:SetSSLContext(oSSLContext)
oSOAPResponse:=oSOAPRequest:Execute(SERMEPA_SERVIDOR_HTTPS,"trataPeticionPago")
I havecheck certificate iscorrectlyloaded.
Response is: "Client: recv error."
Can youhelp me, please.
Thankyou.
Director Técnico
Aseproda Informática, S.L.
desarrollo@aseproda.com