SOAP WSDL Generate Code

WSDVSPortBinding / validate

ASP AutoIt C C (Unicode) C++ C++ (Unicode) C# DataFlex Delphi Foxpro Go Java Node.js Objective-C Perl PHP Extension PowerBuilder Powershell PureBasic Python CkPython Ruby SQL Server Swift TCL VB.NET VB6 VBScript Xojo
LOCAL loXml
LOCAL lcSoapRequestBody
LOCAL lcEndpoint
LOCAL lcSoapAction
LOCAL lcContentType
LOCAL loHttp
LOCAL loResp
LOCAL loResponseXml
LOCAL lnStatusCode
LOCAL lcValidateResponseOutput_success
LOCAL lcValidateResponseOutput_interrupted
LOCAL lcValidateResponseOutput_mostSevereErrorLevel
LOCAL lcResult_success
LOCAL lcResult_artifactType
LOCAL lcResult_artifactPath
LOCAL lcItem_errorLevel
LOCAL lcItem_errorID
LOCAL lcItem_errorFieldName
LOCAL lcItem_errorLocation
LOCAL lcItem_errorText
LOCAL lcItem_test
LOCAL lcException

loXml = CreateObject('Chilkat_9_5_0.Xml')
loXml.Tag = "soapenv:Envelope"
loXml.AddAttribute("xmlns:pep","http://peppol.helger.com/ws/documentvalidationservice/201701/")
loXml.AddAttribute("xmlns:soapenv","http://schemas.xmlsoap.org/soap/envelope/")
loXml.UpdateChildContent("soapenv:Header","")
loXml.UpdateAttrAt("soapenv:Body|pep:validateRequestInput",1,"VESID","?")
loXml.UpdateAttrAt("soapenv:Body|pep:validateRequestInput",1,"displayLocale","?")
loXml.UpdateChildContent("soapenv:Body|pep:validateRequestInput|pep:XML","string")

* In a SOAP HTTP request, including the XML declaration (<?xml version="1.0" encoding="UTF-8"?>) in the XML body is generally not required. 
loXml.EmitXmlDecl = 0
lcSoapRequestBody = loXml.GetXml()

lcEndpoint = "https://peppol.helger.com/wsdvs"
lcSoapAction = "validate"
*  For SOAP requests, the standard Content-Type is usually set to "text/xml" or "application/soap+xml"
lcContentType = "text/xml"

loHttp = CreateObject('Chilkat_9_5_0.Http')

loHttp.ClearHeaders()
loHttp.SetRequestHeader("Content-Type",lcContentType)
loHttp.SetRequestHeader("SOAPAction",lcSoapAction)

loResp = loHttp.PostXml(lcEndpoint,lcSoapRequestBody,"utf-8")
IF (loHttp.LastMethodSuccess = 0) THEN
    ? loHttp.LastErrorText
    ? "Failed to send SOAP request."
    RELEASE loXml
    RELEASE loHttp
    CANCEL
ENDIF

* Get the XML response body.
loResponseXml = CreateObject('Chilkat_9_5_0.Xml')
loResp.GetBodyXml(loResponseXml)

lnStatusCode = loResp.StatusCode
? "response status code: " + STR(lnStatusCode)

RELEASE loResp

* If the status code does not indicate succcess, then show the response XML,
* which probably contains error information.
IF (lnStatusCode <> 200) THEN
    ? loResponseXml.GetXml()
    RELEASE loXml
    RELEASE loHttp
    RELEASE loResponseXml
    CANCEL
ENDIF

? loResponseXml.GetXml()

* Parse the successful SOAP response XML.

* This is a sample of the response XML, but the namespace prefixes will be different.
* We can parse the result using "*" for the namespace prefixes (see below).

lcValidateResponseOutput_success = loResponseXml.ChilkatPath("*:Body|*:validateResponseOutput|(success)")
lcValidateResponseOutput_interrupted = loResponseXml.ChilkatPath("*:Body|*:validateResponseOutput|(interrupted)")
lcValidateResponseOutput_mostSevereErrorLevel = loResponseXml.ChilkatPath("*:Body|*:validateResponseOutput|(mostSevereErrorLevel)")
lcResult_success = loResponseXml.ChilkatPath("*:Body|*:validateResponseOutput|*:Result|(success)")
lcResult_artifactType = loResponseXml.ChilkatPath("*:Body|*:validateResponseOutput|*:Result|(artifactType)")
lcResult_artifactPath = loResponseXml.ChilkatPath("*:Body|*:validateResponseOutput|*:Result|(artifactPath)")
lcItem_errorLevel = loResponseXml.ChilkatPath("*:Body|*:validateResponseOutput|*:Result|*:Item|(errorLevel)")
lcItem_errorID = loResponseXml.ChilkatPath("*:Body|*:validateResponseOutput|*:Result|*:Item|(errorID)")
lcItem_errorFieldName = loResponseXml.ChilkatPath("*:Body|*:validateResponseOutput|*:Result|*:Item|(errorFieldName)")
lcItem_errorLocation = loResponseXml.ChilkatPath("*:Body|*:validateResponseOutput|*:Result|*:Item|(errorLocation)")
lcItem_errorText = loResponseXml.ChilkatPath("*:Body|*:validateResponseOutput|*:Result|*:Item|(errorText)")
lcItem_test = loResponseXml.ChilkatPath("*:Body|*:validateResponseOutput|*:Result|*:Item|(test)")
lcException = loResponseXml.GetChildContent("*:Body|*:validateResponseOutput|*:Result|*:Item|*:Exception")

RELEASE loXml
RELEASE loHttp
RELEASE loResponseXml

Request XML
<soapenv:Envelope xmlns:pep="http://peppol.helger.com/ws/documentvalidationservice/201701/" xmlns:soapenv="http://schemas.xmlsoap.org/soap/envelope/">
    <soapenv:Header/>
    <soapenv:Body>
        <pep:validateRequestInput VESID="?" displayLocale="?">
            <pep:XML>string</pep:XML>
        </pep:validateRequestInput>
    </soapenv:Body>
</soapenv:Envelope>
Response XML
<soapenv:Envelope xmlns:pep="http://peppol.helger.com/ws/documentvalidationservice/201701/" xmlns:soapenv="http://schemas.xmlsoap.org/soap/envelope/">
    <soapenv:Header/>
    <soapenv:Body>
        <pep:validateResponseOutput success="?" interrupted="?" mostSevereErrorLevel="?">
            <pep:Result success="?" artifactType="?" artifactPath="?">
                <pep:Item errorLevel="?" errorID="?" errorFieldName="?" errorLocation="?" errorText="?" test="?">
                    <pep:Exception>string</pep:Exception>
                </pep:Item>
            </pep:Result>
        </pep:validateResponseOutput>
    </soapenv:Body>
</soapenv:Envelope>