ServiceSoap12 / Ricevuta

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

    xml := chilkat.NewXml()
    xml.SetTag("soap:Envelope")
    xml.AddAttribute("xmlns:soap","http://www.w3.org/2003/05/soap-envelope")
    xml.AddAttribute("xmlns:all","AlloggiatiService")
    xml.UpdateChildContent("soap:Header","")
    xml.UpdateChildContent("soap:Body|all:Ricevuta|all:Utente","string")
    xml.UpdateChildContent("soap:Body|all:Ricevuta|all:token","string")
    xml.UpdateChildContent("soap:Body|all:Ricevuta|all:Data","dateTime")
    xml.UpdateChildContent("soap:Body|all:Ricevuta|all:PDF","BqozVXeZZg==")

    // In a SOAP HTTP request, including the XML declaration (<?xml version="1.0" encoding="UTF-8"?>) in the XML body is generally not required. 
    xml.SetEmitXmlDecl(false)
    soapRequestBody := xml.GetXml()

    endpoint := "https://alloggiatiweb.poliziadistato.it/service/service.asmx"
    soapAction := "AlloggiatiService/Ricevuta"
    //  For SOAP requests, the standard Content-Type is usually set to "text/xml" or "application/soap+xml"
    contentType := "text/xml"

    http := chilkat.NewHttp()

    http.ClearHeaders()
    http.SetRequestHeader("Content-Type",contentType)
    http.SetRequestHeader("SOAPAction",soapAction)

    resp := http.PostXml(endpoint,*soapRequestBody,"utf-8")
    if http.LastMethodSuccess() == false {
        fmt.Println(http.LastErrorText())
        fmt.Println("Failed to send SOAP request.")
        xml.DisposeXml()
        http.DisposeHttp()
        return
    }

    // Get the XML response body.
    responseXml := chilkat.NewXml()
    resp.GetBodyXml(responseXml)

    statusCode := resp.StatusCode()
    fmt.Println("response status code: ", statusCode)

    resp.DisposeHttpResponse()

    // If the status code does not indicate succcess, then show the response XML,
    // which probably contains error information.
    if statusCode != 200 {
        fmt.Println(*responseXml.GetXml())
        xml.DisposeXml()
        http.DisposeHttp()
        responseXml.DisposeXml()
        return
    }

    fmt.Println(*responseXml.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).

    esito := responseXml.GetChildContent("*:Body|*:RicevutaResponse|*:RicevutaResult|*:esito")
    ErroreCod := responseXml.GetChildContent("*:Body|*:RicevutaResponse|*:RicevutaResult|*:ErroreCod")
    ErroreDes := responseXml.GetChildContent("*:Body|*:RicevutaResponse|*:RicevutaResult|*:ErroreDes")
    ErroreDettaglio := responseXml.GetChildContent("*:Body|*:RicevutaResponse|*:RicevutaResult|*:ErroreDettaglio")
    PDF := responseXml.GetChildContent("*:Body|*:RicevutaResponse|*:PDF")

    xml.DisposeXml()
    http.DisposeHttp()
    responseXml.DisposeXml()

Request XML

<soap:Envelope xmlns:soap="http://www.w3.org/2003/05/soap-envelope" xmlns:all="AlloggiatiService">
    <soap:Header/>
    <soap:Body>
        <all:Ricevuta>
            <all:Utente>string</all:Utente>
            <all:token>string</all:token>
            <all:Data>dateTime</all:Data>
            <all:PDF>BqozVXeZZg==</all:PDF>
        </all:Ricevuta>
    </soap:Body>
</soap:Envelope>

Response XML

<soap:Envelope xmlns:soap="http://www.w3.org/2003/05/soap-envelope" xmlns:all="AlloggiatiService">
    <soap:Header/>
    <soap:Body>
        <all:RicevutaResponse>
            <all:RicevutaResult>
                <all:esito>true</all:esito>
                <all:ErroreCod>string</all:ErroreCod>
                <all:ErroreDes>string</all:ErroreDes>
                <all:ErroreDettaglio>string</all:ErroreDettaglio>
            </all:RicevutaResult>
            <all:PDF>BqozVXeZZg==</all:PDF>
        </all:RicevutaResponse>
    </soap:Body>
</soap:Envelope>