DefaultEndpoint / Cancel
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
var
xml: HCkXml;
soapRequestBody: PWideChar;
endpoint: PWideChar;
soapAction: PWideChar;
contentType: PWideChar;
http: HCkHttp;
resp: HCkHttpResponse;
responseXml: HCkXml;
statusCode: Integer;
REFERENCEQUALIFIER: PWideChar;
REFERENCENUMBER: PWideChar;
IDENTIFIER: PWideChar;
VERSIONNUMBER: PWideChar;
RELEASENUMBER: PWideChar;
CONTROLAGENCY: PWideChar;
ASSOCCODE: PWideChar;
ACCESSREF: PWideChar;
NAME: Integer;
CODELISTAGENCY: Integer;
DOCUMENTNUMBER: PWideChar;
DOCUMENTFUNC: Integer;
RESPONSETYPE: PWideChar;
DATUMQUALIFIER: Integer;
DATUM: PWideChar;
FORMAT: Integer;
i: Integer;
count_i: Integer;
ACTION: PWideChar;
PARTNER: PWideChar;
ERROR_ID: PWideChar;
AGENCY: PWideChar;
TEXT_SUBJECT_QUALIFIER: PWideChar;
FREE_TEXT_CODE: Integer;
FREE_TEXT_VALUE_CODE: PWideChar;
CODE_LIST_ID: PWideChar;
strCODELISTAGENCY: PWideChar;
FREE_TEXT_1: PWideChar;
FREE_TEXT_2: PWideChar;
FREE_TEXT_3: PWideChar;
FREE_TEXT_4: PWideChar;
FREE_TEXT_5: PWideChar;
NUMSEG: Integer;
REFNUM: PWideChar;
begin
xml := CkXml_Create();
CkXml_putTag(xml,'soap:Envelope');
CkXml_AddAttribute(xml,'xmlns:soap','http://www.w3.org/2003/05/soap-envelope');
CkXml_AddAttribute(xml,'xmlns:a031','http://sfera.sk/xmtrade/isom/types/2013/03');
CkXml_AddAttribute(xml,'xmlns:a03','http://sfera.sk/xmtrade/isom/services/MeasuredValuesOfSupplyAndDeliveryPoints/2013/03');
CkXml_UpdateChildContent(xml,'soap:Header','');
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:UNH|a031:REFERENCENUMBER','string');
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:UNH|a031:IDENTIFIER','UTILMD');
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:UNH|a031:VERSIONNUMBER','D');
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:UNH|a031:RELEASENUMBER','01C');
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:UNH|a031:CONTROLAGENCY','UN');
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:UNH|a031:ASSOCCODE','E4SK40');
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:UNH|a031:ACCESSREF','string');
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:BGM|a031:NAME','string');
CkXml_UpdateChildContentInt(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:BGM|a031:CODELISTAGENCY',260);
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:BGM|a031:DOCUMENTNUMBER','string');
CkXml_UpdateChildContentInt(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:BGM|a031:DOCUMENTFUNC',9);
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:BGM|a031:RESPONSETYPE','AB');
CkXml_UpdateChildContentInt(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:DTM|a031:DATUMQUALIFIER',92);
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:DTM|a031:DATUM','string');
CkXml_UpdateChildContentInt(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:DTM|a031:FORMAT',203);
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:RFF|a031:REFERENCEQUALIFIER','ACW');
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:RFF|a031:REFERENCENUMBER','string');
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:NAD|a031:ACTION','MR');
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:NAD|a031:PARTNER','string');
CkXml_UpdateChildContentInt(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:NAD|a031:CODELISTAGENCY',305);
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:NAD|a031:PARTNERNAME1','string');
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:NAD|a031:PARTNERNAME2','string');
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:NAD|a031:STREET1','string');
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:NAD|a031:STREET2','string');
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:NAD|a031:STREET3','string');
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:NAD|a031:STREET4','string');
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:NAD|a031:CITY','string');
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:NAD|a031:COUNTRY','SK');
CkXml_UpdateChildContentInt(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:NAD|a031:LOC|a031:PLACE_QUALIFIER',172);
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:NAD|a031:LOC|a031:PLACE_ID','string');
CkXml_UpdateChildContentInt(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:NAD|a031:LOC|a031:CODE_LIST_RESPONSIBLE_AGENCY',305);
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:NAD|a031:LOC|a031:LIN|a031:LINE_ITEM_NUMBER','string');
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:NAD|a031:LOC|a031:LIN|a031:ITEM_NUMBER','string');
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:NAD|a031:LOC|a031:LIN|a031:CODE_LIST_RESPONSIBLE_AGENCY','SKE');
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:NAD|a031:LOC|a031:LIN|a031:MEA|a031:MEASURMENT_APPLICATION','AAZ');
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:NAD|a031:LOC|a031:LIN|a031:MEA|a031:MEASURMENT_UNIT_QUALIFIER','KWH');
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:NAD|a031:LOC|a031:LIN|a031:MEA|a031:MEASURMENT_VALUE','string');
CkXml_UpdateChildContentInt(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:NAD|a031:LOC|a031:LIN|a031:QTY|a031:QUANTITY_QUALIFIER',47);
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:NAD|a031:LOC|a031:LIN|a031:QTY|a031:QUANTITY','string');
CkXml_UpdateChildContentInt(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:NAD|a031:LOC|a031:LIN|a031:QTY|a031:DTM|a031:DATUMQUALIFIER',92);
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:NAD|a031:LOC|a031:LIN|a031:QTY|a031:DTM|a031:DATUM','string');
CkXml_UpdateChildContentInt(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:NAD|a031:LOC|a031:LIN|a031:QTY|a031:DTM|a031:FORMAT',203);
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:NAD|a031:LOC|a031:LIN|a031:CCI|a031:CHARACTERISTIC_ID','Z03');
CkXml_UpdateChildContentInt(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:NAD|a031:LOC|a031:LIN|a031:CCI|a031:CODE_LIST_RESPONSIBLE_AGENCY',260);
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:NAD|a031:LOC|a031:LIN|a031:CCI|a031:CAV|a031:CHARACTERISTIC_VALUE_CODED','string');
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:NAD|a031:LOC|a031:LIN|a031:CCI|a031:CAV|a031:AGENCY','SKE');
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:NAD|a031:LOC|a031:LIN|a031:CCI|a031:CAV|a031:CHARACTERISTIC_VALUE','string');
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:NAD|a031:LOC|a031:LIN|a031:CCI|a031:MEA|a031:MEASURMENT_APPLICATION','AAZ');
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:NAD|a031:LOC|a031:LIN|a031:CCI|a031:MEA|a031:MEASURMENT_UNIT_QUALIFIER','KWH');
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:NAD|a031:LOC|a031:LIN|a031:CCI|a031:MEA|a031:MEASURMENT_VALUE','string');
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:NAD|a031:RFF|a031:REFERENCEQUALIFIER','ACW');
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:NAD|a031:RFF|a031:REFERENCENUMBER','string');
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:NAD|a031:ZIPCODE','string');
CkXml_UpdateChildContentInt(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:OBJECT_TYPE',24);
CkXml_UpdateChildContentInt(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:LOC|a031:PLACE_QUALIFIER',172);
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:LOC|a031:PLACE_ID','string');
CkXml_UpdateChildContentInt(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:LOC|a031:CODE_LIST_RESPONSIBLE_AGENCY',305);
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:LOC|a031:LIN|a031:LINE_ITEM_NUMBER','string');
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:LOC|a031:LIN|a031:ITEM_NUMBER','string');
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:LOC|a031:LIN|a031:CODE_LIST_RESPONSIBLE_AGENCY','SKE');
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:LOC|a031:LIN|a031:MEA|a031:MEASURMENT_APPLICATION','AAZ');
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:LOC|a031:LIN|a031:MEA|a031:MEASURMENT_UNIT_QUALIFIER','KWH');
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:LOC|a031:LIN|a031:MEA|a031:MEASURMENT_VALUE','string');
CkXml_UpdateChildContentInt(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:LOC|a031:LIN|a031:QTY|a031:QUANTITY_QUALIFIER',47);
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:LOC|a031:LIN|a031:QTY|a031:QUANTITY','string');
CkXml_UpdateChildContentInt(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:LOC|a031:LIN|a031:QTY|a031:DTM|a031:DATUMQUALIFIER',92);
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:LOC|a031:LIN|a031:QTY|a031:DTM|a031:DATUM','string');
CkXml_UpdateChildContentInt(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:LOC|a031:LIN|a031:QTY|a031:DTM|a031:FORMAT',203);
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:LOC|a031:LIN|a031:CCI|a031:CHARACTERISTIC_ID','Z03');
CkXml_UpdateChildContentInt(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:LOC|a031:LIN|a031:CCI|a031:CODE_LIST_RESPONSIBLE_AGENCY',260);
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:LOC|a031:LIN|a031:CCI|a031:CAV|a031:CHARACTERISTIC_VALUE_CODED','string');
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:LOC|a031:LIN|a031:CCI|a031:CAV|a031:AGENCY','SKE');
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:LOC|a031:LIN|a031:CCI|a031:CAV|a031:CHARACTERISTIC_VALUE','string');
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:LOC|a031:LIN|a031:CCI|a031:MEA|a031:MEASURMENT_APPLICATION','AAZ');
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:LOC|a031:LIN|a031:CCI|a031:MEA|a031:MEASURMENT_UNIT_QUALIFIER','KWH');
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:LOC|a031:LIN|a031:CCI|a031:MEA|a031:MEASURMENT_VALUE','string');
CkXml_UpdateChildContentInt(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:DTM|a031:DATUMQUALIFIER',92);
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:DTM|a031:DATUM','string');
CkXml_UpdateChildContentInt(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:DTM|a031:FORMAT',203);
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:PRC|a031:PROCESS_TYPE','MSG_DETAIL');
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:PRC|a031:CODELISTAGENCY','SKE');
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:FTX|a031:TEXT_SUBJECT_QUALIFIER','AAI');
CkXml_UpdateChildContentInt(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:FTX|a031:FREE_TEXT_CODE',3);
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:FTX|a031:CODELISTAGENCY','SKE');
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:FTX|a031:FREE_TEXT_1','string');
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:FTX|a031:FREE_TEXT_2','string');
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:FTX|a031:FREE_TEXT_3','string');
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:FTX|a031:FREE_TEXT_4','string');
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:FTX|a031:FREE_TEXT_5','string');
CkXml_UpdateChildContentInt(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:AGR|a031:AGREE_TYPE_ID',11);
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:AGR|a031:AGREE_TYPE_DESCRIPTION','E01');
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:AGR|a031:AGREE_TYPE_CODE_LIST','string');
CkXml_UpdateChildContentInt(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:AGR|a031:AGREE_TYPE_AGENCY',260);
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:AGR|a031:AGREE_TYPE','string');
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:CCI|a031:CHARACTERISTIC_ID','Z03');
CkXml_UpdateChildContentInt(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:CCI|a031:CODE_LIST_RESPONSIBLE_AGENCY',260);
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:CCI|a031:CAV|a031:CHARACTERISTIC_VALUE_CODED','string');
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:CCI|a031:CAV|a031:AGENCY','SKE');
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:CCI|a031:CAV|a031:CHARACTERISTIC_VALUE','string');
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:CCI|a031:MEA|a031:MEASURMENT_APPLICATION','AAZ');
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:CCI|a031:MEA|a031:MEASURMENT_UNIT_QUALIFIER','KWH');
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:CCI|a031:MEA|a031:MEASURMENT_VALUE','string');
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:NAD|a031:ACTION','MR');
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:NAD|a031:PARTNER','string');
CkXml_UpdateChildContentInt(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:NAD|a031:CODELISTAGENCY',305);
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:NAD|a031:PARTNERNAME1','string');
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:NAD|a031:PARTNERNAME2','string');
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:NAD|a031:STREET1','string');
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:NAD|a031:STREET2','string');
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:NAD|a031:STREET3','string');
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:NAD|a031:STREET4','string');
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:NAD|a031:CITY','string');
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:NAD|a031:COUNTRY','SK');
CkXml_UpdateChildContentInt(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:NAD|a031:LOC|a031:PLACE_QUALIFIER',172);
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:NAD|a031:LOC|a031:PLACE_ID','string');
CkXml_UpdateChildContentInt(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:NAD|a031:LOC|a031:CODE_LIST_RESPONSIBLE_AGENCY',305);
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:NAD|a031:LOC|a031:LIN|a031:LINE_ITEM_NUMBER','string');
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:NAD|a031:LOC|a031:LIN|a031:ITEM_NUMBER','string');
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:NAD|a031:LOC|a031:LIN|a031:CODE_LIST_RESPONSIBLE_AGENCY','SKE');
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:NAD|a031:LOC|a031:LIN|a031:MEA|a031:MEASURMENT_APPLICATION','AAZ');
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:NAD|a031:LOC|a031:LIN|a031:MEA|a031:MEASURMENT_UNIT_QUALIFIER','KWH');
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:NAD|a031:LOC|a031:LIN|a031:MEA|a031:MEASURMENT_VALUE','string');
CkXml_UpdateChildContentInt(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:NAD|a031:LOC|a031:LIN|a031:QTY|a031:QUANTITY_QUALIFIER',47);
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:NAD|a031:LOC|a031:LIN|a031:QTY|a031:QUANTITY','string');
CkXml_UpdateChildContentInt(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:NAD|a031:LOC|a031:LIN|a031:QTY|a031:DTM|a031:DATUMQUALIFIER',92);
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:NAD|a031:LOC|a031:LIN|a031:QTY|a031:DTM|a031:DATUM','string');
CkXml_UpdateChildContentInt(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:NAD|a031:LOC|a031:LIN|a031:QTY|a031:DTM|a031:FORMAT',203);
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:NAD|a031:LOC|a031:LIN|a031:CCI|a031:CHARACTERISTIC_ID','Z03');
CkXml_UpdateChildContentInt(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:NAD|a031:LOC|a031:LIN|a031:CCI|a031:CODE_LIST_RESPONSIBLE_AGENCY',260);
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:NAD|a031:LOC|a031:LIN|a031:CCI|a031:CAV|a031:CHARACTERISTIC_VALUE_CODED','string');
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:NAD|a031:LOC|a031:LIN|a031:CCI|a031:CAV|a031:AGENCY','SKE');
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:NAD|a031:LOC|a031:LIN|a031:CCI|a031:CAV|a031:CHARACTERISTIC_VALUE','string');
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:NAD|a031:LOC|a031:LIN|a031:CCI|a031:MEA|a031:MEASURMENT_APPLICATION','AAZ');
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:NAD|a031:LOC|a031:LIN|a031:CCI|a031:MEA|a031:MEASURMENT_UNIT_QUALIFIER','KWH');
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:NAD|a031:LOC|a031:LIN|a031:CCI|a031:MEA|a031:MEASURMENT_VALUE','string');
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:NAD|a031:RFF|a031:REFERENCEQUALIFIER','ACW');
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:NAD|a031:RFF|a031:REFERENCENUMBER','string');
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:NAD|a031:ZIPCODE','string');
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:UNT|a031:NUMSEG','string');
CkXml_UpdateChildContent(xml,'soap:Body|a03:CancelRequest|a03:UTILMD|a031:UNT|a031:REFNUM','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_putEmitXmlDecl(xml,False);
soapRequestBody := CkXml__getXml(xml);
endpoint := 'http://isom.okte.sk/interfaces/MeasuredValuesOfSupplyAndDeliveryPoints/Service.svc';
soapAction := 'http://sfera.sk/xmtrade/isom/services/MeasuredValuesOfSupplyAndDeliveryPoints/2013/03/MeasuredValuesOfSupplyAndDeliveryPointsContract/Cancel';
// For SOAP requests, the standard Content-Type is usually set to "text/xml" or "application/soap+xml"
contentType := 'text/xml';
http := CkHttp_Create();
CkHttp_ClearHeaders(http);
CkHttp_SetRequestHeader(http,'Content-Type',contentType);
CkHttp_SetRequestHeader(http,'SOAPAction',soapAction);
resp := CkHttp_PostXml(http,endpoint,soapRequestBody,'utf-8');
if (CkHttp_getLastMethodSuccess(http) = False) then
begin
Memo1.Lines.Add(CkHttp__lastErrorText(http));
Memo1.Lines.Add('Failed to send SOAP request.');
Exit;
end;
// Get the XML response body.
responseXml := CkXml_Create();
CkHttpResponse_GetBodyXml(resp,responseXml);
statusCode := CkHttpResponse_getStatusCode(resp);
Memo1.Lines.Add('response status code: ' + IntToStr(statusCode));
CkHttpResponse_Dispose(resp);
// If the status code does not indicate succcess, then show the response XML,
// which probably contains error information.
if (statusCode <> 200) then
begin
Memo1.Lines.Add(CkXml__getXml(responseXml));
Exit;
end;
Memo1.Lines.Add(CkXml__getXml(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).
REFERENCENUMBER := CkXml__getChildContent(responseXml,'*:Body|*:CancelResponse|*:APERAK|*:UNH|*:REFERENCENUMBER');
IDENTIFIER := CkXml__getChildContent(responseXml,'*:Body|*:CancelResponse|*:APERAK|*:UNH|*:IDENTIFIER');
VERSIONNUMBER := CkXml__getChildContent(responseXml,'*:Body|*:CancelResponse|*:APERAK|*:UNH|*:VERSIONNUMBER');
RELEASENUMBER := CkXml__getChildContent(responseXml,'*:Body|*:CancelResponse|*:APERAK|*:UNH|*:RELEASENUMBER');
CONTROLAGENCY := CkXml__getChildContent(responseXml,'*:Body|*:CancelResponse|*:APERAK|*:UNH|*:CONTROLAGENCY');
ASSOCCODE := CkXml__getChildContent(responseXml,'*:Body|*:CancelResponse|*:APERAK|*:UNH|*:ASSOCCODE');
ACCESSREF := CkXml__getChildContent(responseXml,'*:Body|*:CancelResponse|*:APERAK|*:UNH|*:ACCESSREF');
NAME := CkXml_GetChildIntValue(responseXml,'*:Body|*:CancelResponse|*:APERAK|*:BGM|*:NAME');
CODELISTAGENCY := CkXml_GetChildIntValue(responseXml,'*:Body|*:CancelResponse|*:APERAK|*:BGM|*:CODELISTAGENCY');
DOCUMENTNUMBER := CkXml__getChildContent(responseXml,'*:Body|*:CancelResponse|*:APERAK|*:BGM|*:DOCUMENTNUMBER');
DOCUMENTFUNC := CkXml_GetChildIntValue(responseXml,'*:Body|*:CancelResponse|*:APERAK|*:BGM|*:DOCUMENTFUNC');
RESPONSETYPE := CkXml__getChildContent(responseXml,'*:Body|*:CancelResponse|*:APERAK|*:BGM|*:RESPONSETYPE');
DATUMQUALIFIER := CkXml_GetChildIntValue(responseXml,'*:Body|*:CancelResponse|*:APERAK|*:DTM|*:DATUMQUALIFIER');
DATUM := CkXml__getChildContent(responseXml,'*:Body|*:CancelResponse|*:APERAK|*:DTM|*:DATUM');
FORMAT := CkXml_GetChildIntValue(responseXml,'*:Body|*:CancelResponse|*:APERAK|*:DTM|*:FORMAT');
i := 0;
count_i := CkXml_NumChildrenHavingTag(responseXml,'*:Body|*:CancelResponse|*:APERAK|a031:RFF');
while i < count_i do
begin
CkXml_putI(responseXml,i);
REFERENCEQUALIFIER := CkXml__getChildContent(responseXml,'*:Body|*:CancelResponse|*:APERAK|*:RFF[i]|*:REFERENCEQUALIFIER');
REFERENCENUMBER := CkXml__getChildContent(responseXml,'*:Body|*:CancelResponse|*:APERAK|*:RFF[i]|*:REFERENCENUMBER');
i := i + 1;
end;
ACTION := CkXml__getChildContent(responseXml,'*:Body|*:CancelResponse|*:APERAK|*:NAD|*:ACTION');
PARTNER := CkXml__getChildContent(responseXml,'*:Body|*:CancelResponse|*:APERAK|*:NAD|*:PARTNER');
CODELISTAGENCY := CkXml_GetChildIntValue(responseXml,'*:Body|*:CancelResponse|*:APERAK|*:NAD|*:CODELISTAGENCY');
ERROR_ID := CkXml__getChildContent(responseXml,'*:Body|*:CancelResponse|*:APERAK|*:ERC|*:ERROR_ID');
AGENCY := CkXml__getChildContent(responseXml,'*:Body|*:CancelResponse|*:APERAK|*:ERC|*:AGENCY');
TEXT_SUBJECT_QUALIFIER := CkXml__getChildContent(responseXml,'*:Body|*:CancelResponse|*:APERAK|*:ERC|*:FTX|*:TEXT_SUBJECT_QUALIFIER');
FREE_TEXT_CODE := CkXml_GetChildIntValue(responseXml,'*:Body|*:CancelResponse|*:APERAK|*:ERC|*:FTX|*:FREE_TEXT_CODE');
FREE_TEXT_VALUE_CODE := CkXml__getChildContent(responseXml,'*:Body|*:CancelResponse|*:APERAK|*:ERC|*:FTX|*:FREE_TEXT_VALUE_CODE');
CODE_LIST_ID := CkXml__getChildContent(responseXml,'*:Body|*:CancelResponse|*:APERAK|*:ERC|*:FTX|*:CODE_LIST_ID');
strCODELISTAGENCY := CkXml__getChildContent(responseXml,'*:Body|*:CancelResponse|*:APERAK|*:ERC|*:FTX|*:CODELISTAGENCY');
FREE_TEXT_1 := CkXml__getChildContent(responseXml,'*:Body|*:CancelResponse|*:APERAK|*:ERC|*:FTX|*:FREE_TEXT_1');
FREE_TEXT_2 := CkXml__getChildContent(responseXml,'*:Body|*:CancelResponse|*:APERAK|*:ERC|*:FTX|*:FREE_TEXT_2');
FREE_TEXT_3 := CkXml__getChildContent(responseXml,'*:Body|*:CancelResponse|*:APERAK|*:ERC|*:FTX|*:FREE_TEXT_3');
FREE_TEXT_4 := CkXml__getChildContent(responseXml,'*:Body|*:CancelResponse|*:APERAK|*:ERC|*:FTX|*:FREE_TEXT_4');
FREE_TEXT_5 := CkXml__getChildContent(responseXml,'*:Body|*:CancelResponse|*:APERAK|*:ERC|*:FTX|*:FREE_TEXT_5');
REFERENCEQUALIFIER := CkXml__getChildContent(responseXml,'*:Body|*:CancelResponse|*:APERAK|*:ERC|*:RFF|*:REFERENCEQUALIFIER');
REFERENCENUMBER := CkXml__getChildContent(responseXml,'*:Body|*:CancelResponse|*:APERAK|*:ERC|*:RFF|*:REFERENCENUMBER');
NUMSEG := CkXml_GetChildIntValue(responseXml,'*:Body|*:CancelResponse|*:APERAK|*:UNT|*:NUMSEG');
REFNUM := CkXml__getChildContent(responseXml,'*:Body|*:CancelResponse|*:APERAK|*:UNT|*:REFNUM');
CkXml_Dispose(xml);
CkHttp_Dispose(http);
CkXml_Dispose(responseXml);