Chilkat Tools

CheckpointServiceSoap / VratiSubjektSkraceniPrikaz

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

Min Request Full Request

IncludeFile "CkHttp.pb"
IncludeFile "CkHttpResponse.pb"
IncludeFile "CkXml.pb"

Procedure ChilkatExample()

    xml.i = CkXml::ckCreate()
    If xml.i = 0
        Debug "Failed to create object."
        ProcedureReturn
    EndIf

    CkXml::setCkTag(xml, "soapenv:Envelope")
    CkXml::ckAddAttribute(xml,"xmlns:soapenv","http://schemas.xmlsoap.org/soap/envelope/")
    CkXml::ckAddAttribute(xml,"xmlns:ser","service.checkpoint.rs")
    CkXml::ckUpdateChildContent(xml,"soapenv:Header","")
    CkXml::ckUpdateChildContentInt(xml,"soapenv:Body|ser:VratiSubjektSkraceniPrikaz|ser:subjekt_ID",1042)
    CkXml::ckUpdateChildContent(xml,"soapenv:Body|ser:VratiSubjektSkraceniPrikaz|ser:token","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. 
    CkXml::setCkEmitXmlDecl(xml, 0)
    soapRequestBody.s = CkXml::ckGetXml(xml)

    endpoint.s = "https://service.checkpoint.rs/service.asmx"
    soapAction.s = "service.checkpoint.rs/VratiSubjektSkraceniPrikaz"
    ;  For SOAP requests, the standard Content-Type is usually set to "text/xml" or "application/soap+xml"
    contentType.s = "text/xml"

    http.i = CkHttp::ckCreate()
    If http.i = 0
        Debug "Failed to create object."
        ProcedureReturn
    EndIf

    CkHttp::ckClearHeaders(http)
    CkHttp::ckSetRequestHeader(http,"Content-Type",contentType)
    CkHttp::ckSetRequestHeader(http,"SOAPAction",soapAction)

    resp.i = CkHttp::ckPostXml(http,endpoint,soapRequestBody,"utf-8")
    If CkHttp::ckLastMethodSuccess(http) = 0
        Debug CkHttp::ckLastErrorText(http)
        Debug "Failed to send SOAP request."
        CkXml::ckDispose(xml)
        CkHttp::ckDispose(http)
        ProcedureReturn
    EndIf

    ; Get the XML response body.
    responseXml.i = CkXml::ckCreate()
    If responseXml.i = 0
        Debug "Failed to create object."
        ProcedureReturn
    EndIf

    CkHttpResponse::ckGetBodyXml(resp,responseXml)

    statusCode.i = CkHttpResponse::ckStatusCode(resp)
    Debug "response status code: " + Str(statusCode)

    CkHttpResponse::ckDispose(resp)

    ; If the status code does not indicate succcess, then show the response XML,
    ; which probably contains error information.
    If statusCode <> 200
        Debug CkXml::ckGetXml(responseXml)
        CkXml::ckDispose(xml)
        CkHttp::ckDispose(http)
        CkXml::ckDispose(responseXml)
        ProcedureReturn
    EndIf

    Debug CkXml::ckGetXml(responseXml)

    ; 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).

    Subjekt_ID.i = CkXml::ckGetChildIntValue(responseXml,"*:Body|*:VratiSubjektSkraceniPrikazResponse|*:VratiSubjektSkraceniPrikazResult|*:Subjekt_ID")
    MBR.s = CkXml::ckGetChildContent(responseXml,"*:Body|*:VratiSubjektSkraceniPrikazResponse|*:VratiSubjektSkraceniPrikazResult|*:MBR")
    PIB.s = CkXml::ckGetChildContent(responseXml,"*:Body|*:VratiSubjektSkraceniPrikazResponse|*:VratiSubjektSkraceniPrikazResult|*:PIB")
    Datum_Osnivanja.s = CkXml::ckGetChildContent(responseXml,"*:Body|*:VratiSubjektSkraceniPrikazResponse|*:VratiSubjektSkraceniPrikazResult|*:Datum_Osnivanja")
    Datum_Brisanja.s = CkXml::ckGetChildContent(responseXml,"*:Body|*:VratiSubjektSkraceniPrikazResponse|*:VratiSubjektSkraceniPrikazResult|*:Datum_Brisanja")
    Naziv_skraceni.s = CkXml::ckGetChildContent(responseXml,"*:Body|*:VratiSubjektSkraceniPrikazResponse|*:VratiSubjektSkraceniPrikazResult|*:Naziv_skraceni")
    Naziv_pun.s = CkXml::ckGetChildContent(responseXml,"*:Body|*:VratiSubjektSkraceniPrikazResponse|*:VratiSubjektSkraceniPrikazResult|*:Naziv_pun")
    Sediste_mesto.s = CkXml::ckGetChildContent(responseXml,"*:Body|*:VratiSubjektSkraceniPrikazResponse|*:VratiSubjektSkraceniPrikazResult|*:Sediste_mesto")
    Sediste_opstina.s = CkXml::ckGetChildContent(responseXml,"*:Body|*:VratiSubjektSkraceniPrikazResponse|*:VratiSubjektSkraceniPrikazResult|*:Sediste_opstina")
    Sediste_region.s = CkXml::ckGetChildContent(responseXml,"*:Body|*:VratiSubjektSkraceniPrikazResponse|*:VratiSubjektSkraceniPrikazResult|*:Sediste_region")
    Sediste_drzava.s = CkXml::ckGetChildContent(responseXml,"*:Body|*:VratiSubjektSkraceniPrikazResponse|*:VratiSubjektSkraceniPrikazResult|*:Sediste_drzava")
    Sediste_ulica.s = CkXml::ckGetChildContent(responseXml,"*:Body|*:VratiSubjektSkraceniPrikazResponse|*:VratiSubjektSkraceniPrikazResult|*:Sediste_ulica")
    Sediste_postanski_broj.s = CkXml::ckGetChildContent(responseXml,"*:Body|*:VratiSubjektSkraceniPrikazResponse|*:VratiSubjektSkraceniPrikazResult|*:Sediste_postanski_broj")
    Status_APR.s = CkXml::ckGetChildContent(responseXml,"*:Body|*:VratiSubjektSkraceniPrikazResponse|*:VratiSubjektSkraceniPrikazResult|*:Status_APR")
    Status_NBS.s = CkXml::ckGetChildContent(responseXml,"*:Body|*:VratiSubjektSkraceniPrikazResponse|*:VratiSubjektSkraceniPrikazResult|*:Status_NBS")
    Status_CheckPoint.s = CkXml::ckGetChildContent(responseXml,"*:Body|*:VratiSubjektSkraceniPrikazResponse|*:VratiSubjektSkraceniPrikazResult|*:Status_CheckPoint")
    Pravna_Forma.s = CkXml::ckGetChildContent(responseXml,"*:Body|*:VratiSubjektSkraceniPrikazResponse|*:VratiSubjektSkraceniPrikazResult|*:Pravna_Forma")
    Delatnost_Sifra.s = CkXml::ckGetChildContent(responseXml,"*:Body|*:VratiSubjektSkraceniPrikazResponse|*:VratiSubjektSkraceniPrikazResult|*:Delatnost_Sifra")
    Delatnost_Region.s = CkXml::ckGetChildContent(responseXml,"*:Body|*:VratiSubjektSkraceniPrikazResponse|*:VratiSubjektSkraceniPrikazResult|*:Delatnost_Region")
    Delatnost_Naziv.s = CkXml::ckGetChildContent(responseXml,"*:Body|*:VratiSubjektSkraceniPrikazResponse|*:VratiSubjektSkraceniPrikazResult|*:Delatnost_Naziv")
    Poslednji_FI.i = CkXml::ckGetChildIntValue(responseXml,"*:Body|*:VratiSubjektSkraceniPrikazResponse|*:VratiSubjektSkraceniPrikazResult|*:Poslednji_FI")
    Velicina.s = CkXml::ckGetChildContent(responseXml,"*:Body|*:VratiSubjektSkraceniPrikazResponse|*:VratiSubjektSkraceniPrikazResult|*:Velicina")
    Insolventan.s = CkXml::ckGetChildContent(responseXml,"*:Body|*:VratiSubjektSkraceniPrikazResponse|*:VratiSubjektSkraceniPrikazResult|*:Insolventan")
    Pdv_Broj.s = CkXml::ckGetChildContent(responseXml,"*:Body|*:VratiSubjektSkraceniPrikazResponse|*:VratiSubjektSkraceniPrikazResult|*:Pdv_Broj")


    CkXml::ckDispose(xml)
    CkHttp::ckDispose(http)
    CkXml::ckDispose(responseXml)


    ProcedureReturn
EndProcedure

Request XML

<soapenv:Envelope xmlns:soapenv="http://schemas.xmlsoap.org/soap/envelope/" xmlns:ser="service.checkpoint.rs">
    <soapenv:Header/>
    <soapenv:Body>
        <ser:VratiSubjektSkraceniPrikaz>
            <ser:subjekt_ID>1042</ser:subjekt_ID>
            <ser:token>string</ser:token>
        </ser:VratiSubjektSkraceniPrikaz>
    </soapenv:Body>
</soapenv:Envelope>

Response XML

<soapenv:Envelope xmlns:soapenv="http://schemas.xmlsoap.org/soap/envelope/" xmlns:ser="service.checkpoint.rs">
    <soapenv:Header/>
    <soapenv:Body>
        <ser:VratiSubjektSkraceniPrikazResponse>
            <ser:VratiSubjektSkraceniPrikazResult>
                <ser:Subjekt_ID>1042</ser:Subjekt_ID>
                <ser:MBR>string</ser:MBR>
                <ser:PIB>string</ser:PIB>
                <ser:Datum_Osnivanja>dateTime</ser:Datum_Osnivanja>
                <ser:Datum_Brisanja>dateTime</ser:Datum_Brisanja>
                <ser:Naziv_skraceni>string</ser:Naziv_skraceni>
                <ser:Naziv_pun>string</ser:Naziv_pun>
                <ser:Sediste_mesto>string</ser:Sediste_mesto>
                <ser:Sediste_opstina>string</ser:Sediste_opstina>
                <ser:Sediste_region>string</ser:Sediste_region>
                <ser:Sediste_drzava>string</ser:Sediste_drzava>
                <ser:Sediste_ulica>string</ser:Sediste_ulica>
                <ser:Sediste_postanski_broj>string</ser:Sediste_postanski_broj>
                <ser:Status_APR>string</ser:Status_APR>
                <ser:Status_NBS>string</ser:Status_NBS>
                <ser:Status_CheckPoint>string</ser:Status_CheckPoint>
                <ser:Pravna_Forma>string</ser:Pravna_Forma>
                <ser:Delatnost_Sifra>string</ser:Delatnost_Sifra>
                <ser:Delatnost_Region>unsignedShort</ser:Delatnost_Region>
                <ser:Delatnost_Naziv>string</ser:Delatnost_Naziv>
                <ser:Poslednji_FI>1042</ser:Poslednji_FI>
                <ser:Velicina>string</ser:Velicina>
                <ser:Insolventan>string</ser:Insolventan>
                <ser:Pdv_Broj>string</ser:Pdv_Broj>
            </ser:VratiSubjektSkraceniPrikazResult>
        </ser:VratiSubjektSkraceniPrikazResponse>
    </soapenv:Body>
</soapenv:Envelope>

SOAP WSDL Generate Code

CheckpointServiceSoap / VratiSubjektSkraceniPrikaz

Request XML

Response XML