UslugaWysylkiDanychSoap / GetIDZbioru

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("soapenv:Envelope")
    xml.AddAttribute("xmlns:soapenv","http://schemas.xmlsoap.org/soap/envelope/")
    xml.AddAttribute("xmlns:sta","http://www.stat.gov.pl/")
    xml.UpdateChildContent("soapenv:Header","")
    xml.UpdateChildContent("soapenv:Body|sta:GetIDZbioru|sta:pSessionID","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. 
    xml.SetEmitXmlDecl(false)
    soapRequestBody := xml.GetXml()

    endpoint := "http://form.stat.gov.pl:81/uwd/UslugaWysylkiDanych.asmx"
    soapAction := "http://www.stat.gov.pl/GetIDZbioru"
    //  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).

    GetIDZbioruResult := responseXml.GetChildIntValue("*:Body|*:GetIDZbioruResponse|*:GetIDZbioruResult")

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

Request XML

<soapenv:Envelope xmlns:soapenv="http://schemas.xmlsoap.org/soap/envelope/" xmlns:sta="http://www.stat.gov.pl/">
    <soapenv:Header/>
    <soapenv:Body>
        <sta:GetIDZbioru>
            <sta:pSessionID>string</sta:pSessionID>
        </sta:GetIDZbioru>
    </soapenv:Body>
</soapenv:Envelope>

Response XML

<soapenv:Envelope xmlns:soapenv="http://schemas.xmlsoap.org/soap/envelope/" xmlns:sta="http://www.stat.gov.pl/">
    <soapenv:Header/>
    <soapenv:Body>
        <sta:GetIDZbioruResponse>
            <sta:GetIDZbioruResult>1042</sta:GetIDZbioruResult>
        </sta:GetIDZbioruResponse>
    </soapenv:Body>
</soapenv:Envelope>