Dim xml As NewChilkat.Xml
xml.Tag = "soap:Envelope"Dim success As Boolean
success = xml.AddAttribute("xmlns:soap","http://www.w3.org/2003/05/soap-envelope")
success = xml.AddAttribute("xmlns:a031","http://sfera.sk/xmtrade/isom/types/2013/03")
success = xml.AddAttribute("xmlns:a03","http://sfera.sk/xmtrade/isom/services/MeasuredValuesOfSupplyAndDeliveryPoints/2013/03")
xml.UpdateChildContent"soap:Header",""
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:UNH|a031:REFERENCENUMBER","string"
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:UNH|a031:IDENTIFIER","UTILMD"
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:UNH|a031:VERSIONNUMBER","D"
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:UNH|a031:RELEASENUMBER","01C"
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:UNH|a031:CONTROLAGENCY","UN"
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:UNH|a031:ASSOCCODE","E4SK40"
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:UNH|a031:ACCESSREF","string"
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:BGM|a031:NAME","string"
xml.UpdateChildContentInt"soap:Body|a03:CancelRequest|a03:UTILMD|a031:BGM|a031:CODELISTAGENCY",260
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:BGM|a031:DOCUMENTNUMBER","string"
xml.UpdateChildContentInt"soap:Body|a03:CancelRequest|a03:UTILMD|a031:BGM|a031:DOCUMENTFUNC",9
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:BGM|a031:RESPONSETYPE","AB"
xml.UpdateChildContentInt"soap:Body|a03:CancelRequest|a03:UTILMD|a031:DTM|a031:DATUMQUALIFIER",92
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:DTM|a031:DATUM","string"
xml.UpdateChildContentInt"soap:Body|a03:CancelRequest|a03:UTILMD|a031:DTM|a031:FORMAT",203
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:RFF|a031:REFERENCEQUALIFIER","ACW"
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:RFF|a031:REFERENCENUMBER","string"
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:NAD|a031:ACTION","MR"
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:NAD|a031:PARTNER","string"
xml.UpdateChildContentInt"soap:Body|a03:CancelRequest|a03:UTILMD|a031:NAD|a031:CODELISTAGENCY",305
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:NAD|a031:PARTNERNAME1","string"
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:NAD|a031:PARTNERNAME2","string"
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:NAD|a031:STREET1","string"
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:NAD|a031:STREET2","string"
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:NAD|a031:STREET3","string"
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:NAD|a031:STREET4","string"
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:NAD|a031:CITY","string"
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:NAD|a031:COUNTRY","SK"
xml.UpdateChildContentInt"soap:Body|a03:CancelRequest|a03:UTILMD|a031:NAD|a031:LOC|a031:PLACE_QUALIFIER",172
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:NAD|a031:LOC|a031:PLACE_ID","string"
xml.UpdateChildContentInt"soap:Body|a03:CancelRequest|a03:UTILMD|a031:NAD|a031:LOC|a031:CODE_LIST_RESPONSIBLE_AGENCY",305
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:NAD|a031:LOC|a031:LIN|a031:LINE_ITEM_NUMBER","string"
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:NAD|a031:LOC|a031:LIN|a031:ITEM_NUMBER","string"
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:NAD|a031:LOC|a031:LIN|a031:CODE_LIST_RESPONSIBLE_AGENCY","SKE"
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:NAD|a031:LOC|a031:LIN|a031:MEA|a031:MEASURMENT_APPLICATION","AAZ"
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:NAD|a031:LOC|a031:LIN|a031:MEA|a031:MEASURMENT_UNIT_QUALIFIER","KWH"
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:NAD|a031:LOC|a031:LIN|a031:MEA|a031:MEASURMENT_VALUE","string"
xml.UpdateChildContentInt"soap:Body|a03:CancelRequest|a03:UTILMD|a031:NAD|a031:LOC|a031:LIN|a031:QTY|a031:QUANTITY_QUALIFIER",47
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:NAD|a031:LOC|a031:LIN|a031:QTY|a031:QUANTITY","string"
xml.UpdateChildContentInt"soap:Body|a03:CancelRequest|a03:UTILMD|a031:NAD|a031:LOC|a031:LIN|a031:QTY|a031:DTM|a031:DATUMQUALIFIER",92
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:NAD|a031:LOC|a031:LIN|a031:QTY|a031:DTM|a031:DATUM","string"
xml.UpdateChildContentInt"soap:Body|a03:CancelRequest|a03:UTILMD|a031:NAD|a031:LOC|a031:LIN|a031:QTY|a031:DTM|a031:FORMAT",203
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:NAD|a031:LOC|a031:LIN|a031:CCI|a031:CHARACTERISTIC_ID","Z03"
xml.UpdateChildContentInt"soap:Body|a03:CancelRequest|a03:UTILMD|a031:NAD|a031:LOC|a031:LIN|a031:CCI|a031:CODE_LIST_RESPONSIBLE_AGENCY",260
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:NAD|a031:LOC|a031:LIN|a031:CCI|a031:CAV|a031:CHARACTERISTIC_VALUE_CODED","string"
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:NAD|a031:LOC|a031:LIN|a031:CCI|a031:CAV|a031:AGENCY","SKE"
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:NAD|a031:LOC|a031:LIN|a031:CCI|a031:CAV|a031:CHARACTERISTIC_VALUE","string"
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:NAD|a031:LOC|a031:LIN|a031:CCI|a031:MEA|a031:MEASURMENT_APPLICATION","AAZ"
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:NAD|a031:LOC|a031:LIN|a031:CCI|a031:MEA|a031:MEASURMENT_UNIT_QUALIFIER","KWH"
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:NAD|a031:LOC|a031:LIN|a031:CCI|a031:MEA|a031:MEASURMENT_VALUE","string"
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:NAD|a031:RFF|a031:REFERENCEQUALIFIER","ACW"
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:NAD|a031:RFF|a031:REFERENCENUMBER","string"
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:NAD|a031:ZIPCODE","string"
xml.UpdateChildContentInt"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:OBJECT_TYPE",24
xml.UpdateChildContentInt"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:LOC|a031:PLACE_QUALIFIER",172
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:LOC|a031:PLACE_ID","string"
xml.UpdateChildContentInt"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:LOC|a031:CODE_LIST_RESPONSIBLE_AGENCY",305
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:LOC|a031:LIN|a031:LINE_ITEM_NUMBER","string"
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:LOC|a031:LIN|a031:ITEM_NUMBER","string"
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:LOC|a031:LIN|a031:CODE_LIST_RESPONSIBLE_AGENCY","SKE"
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:LOC|a031:LIN|a031:MEA|a031:MEASURMENT_APPLICATION","AAZ"
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:LOC|a031:LIN|a031:MEA|a031:MEASURMENT_UNIT_QUALIFIER","KWH"
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:LOC|a031:LIN|a031:MEA|a031:MEASURMENT_VALUE","string"
xml.UpdateChildContentInt"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:LOC|a031:LIN|a031:QTY|a031:QUANTITY_QUALIFIER",47
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:LOC|a031:LIN|a031:QTY|a031:QUANTITY","string"
xml.UpdateChildContentInt"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:LOC|a031:LIN|a031:QTY|a031:DTM|a031:DATUMQUALIFIER",92
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:LOC|a031:LIN|a031:QTY|a031:DTM|a031:DATUM","string"
xml.UpdateChildContentInt"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:LOC|a031:LIN|a031:QTY|a031:DTM|a031:FORMAT",203
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:LOC|a031:LIN|a031:CCI|a031:CHARACTERISTIC_ID","Z03"
xml.UpdateChildContentInt"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:LOC|a031:LIN|a031:CCI|a031:CODE_LIST_RESPONSIBLE_AGENCY",260
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:LOC|a031:LIN|a031:CCI|a031:CAV|a031:CHARACTERISTIC_VALUE_CODED","string"
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:LOC|a031:LIN|a031:CCI|a031:CAV|a031:AGENCY","SKE"
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:LOC|a031:LIN|a031:CCI|a031:CAV|a031:CHARACTERISTIC_VALUE","string"
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:LOC|a031:LIN|a031:CCI|a031:MEA|a031:MEASURMENT_APPLICATION","AAZ"
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:LOC|a031:LIN|a031:CCI|a031:MEA|a031:MEASURMENT_UNIT_QUALIFIER","KWH"
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:LOC|a031:LIN|a031:CCI|a031:MEA|a031:MEASURMENT_VALUE","string"
xml.UpdateChildContentInt"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:DTM|a031:DATUMQUALIFIER",92
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:DTM|a031:DATUM","string"
xml.UpdateChildContentInt"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:DTM|a031:FORMAT",203
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:PRC|a031:PROCESS_TYPE","MSG_DETAIL"
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:PRC|a031:CODELISTAGENCY","SKE"
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:FTX|a031:TEXT_SUBJECT_QUALIFIER","AAI"
xml.UpdateChildContentInt"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:FTX|a031:FREE_TEXT_CODE",3
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:FTX|a031:CODELISTAGENCY","SKE"
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:FTX|a031:FREE_TEXT_1","string"
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:FTX|a031:FREE_TEXT_2","string"
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:FTX|a031:FREE_TEXT_3","string"
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:FTX|a031:FREE_TEXT_4","string"
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:FTX|a031:FREE_TEXT_5","string"
xml.UpdateChildContentInt"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:AGR|a031:AGREE_TYPE_ID",11
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:AGR|a031:AGREE_TYPE_DESCRIPTION","E01"
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:AGR|a031:AGREE_TYPE_CODE_LIST","string"
xml.UpdateChildContentInt"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:AGR|a031:AGREE_TYPE_AGENCY",260
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:AGR|a031:AGREE_TYPE","string"
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:CCI|a031:CHARACTERISTIC_ID","Z03"
xml.UpdateChildContentInt"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:CCI|a031:CODE_LIST_RESPONSIBLE_AGENCY",260
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:CCI|a031:CAV|a031:CHARACTERISTIC_VALUE_CODED","string"
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:CCI|a031:CAV|a031:AGENCY","SKE"
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:CCI|a031:CAV|a031:CHARACTERISTIC_VALUE","string"
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:CCI|a031:MEA|a031:MEASURMENT_APPLICATION","AAZ"
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:CCI|a031:MEA|a031:MEASURMENT_UNIT_QUALIFIER","KWH"
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:CCI|a031:MEA|a031:MEASURMENT_VALUE","string"
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:NAD|a031:ACTION","MR"
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:NAD|a031:PARTNER","string"
xml.UpdateChildContentInt"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:NAD|a031:CODELISTAGENCY",305
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:NAD|a031:PARTNERNAME1","string"
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:NAD|a031:PARTNERNAME2","string"
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:NAD|a031:STREET1","string"
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:NAD|a031:STREET2","string"
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:NAD|a031:STREET3","string"
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:NAD|a031:STREET4","string"
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:NAD|a031:CITY","string"
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:NAD|a031:COUNTRY","SK"
xml.UpdateChildContentInt"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:NAD|a031:LOC|a031:PLACE_QUALIFIER",172
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:NAD|a031:LOC|a031:PLACE_ID","string"
xml.UpdateChildContentInt"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:NAD|a031:LOC|a031:CODE_LIST_RESPONSIBLE_AGENCY",305
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:NAD|a031:LOC|a031:LIN|a031:LINE_ITEM_NUMBER","string"
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:NAD|a031:LOC|a031:LIN|a031:ITEM_NUMBER","string"
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:NAD|a031:LOC|a031:LIN|a031:CODE_LIST_RESPONSIBLE_AGENCY","SKE"
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:NAD|a031:LOC|a031:LIN|a031:MEA|a031:MEASURMENT_APPLICATION","AAZ"
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:NAD|a031:LOC|a031:LIN|a031:MEA|a031:MEASURMENT_UNIT_QUALIFIER","KWH"
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:NAD|a031:LOC|a031:LIN|a031:MEA|a031:MEASURMENT_VALUE","string"
xml.UpdateChildContentInt"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:NAD|a031:LOC|a031:LIN|a031:QTY|a031:QUANTITY_QUALIFIER",47
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:NAD|a031:LOC|a031:LIN|a031:QTY|a031:QUANTITY","string"
xml.UpdateChildContentInt"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:NAD|a031:LOC|a031:LIN|a031:QTY|a031:DTM|a031:DATUMQUALIFIER",92
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:NAD|a031:LOC|a031:LIN|a031:QTY|a031:DTM|a031:DATUM","string"
xml.UpdateChildContentInt"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:NAD|a031:LOC|a031:LIN|a031:QTY|a031:DTM|a031:FORMAT",203
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:NAD|a031:LOC|a031:LIN|a031:CCI|a031:CHARACTERISTIC_ID","Z03"
xml.UpdateChildContentInt"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:NAD|a031:LOC|a031:LIN|a031:CCI|a031:CODE_LIST_RESPONSIBLE_AGENCY",260
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:NAD|a031:LOC|a031:LIN|a031:CCI|a031:CAV|a031:CHARACTERISTIC_VALUE_CODED","string"
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:NAD|a031:LOC|a031:LIN|a031:CCI|a031:CAV|a031:AGENCY","SKE"
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:NAD|a031:LOC|a031:LIN|a031:CCI|a031:CAV|a031:CHARACTERISTIC_VALUE","string"
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:NAD|a031:LOC|a031:LIN|a031:CCI|a031:MEA|a031:MEASURMENT_APPLICATION","AAZ"
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:NAD|a031:LOC|a031:LIN|a031:CCI|a031:MEA|a031:MEASURMENT_UNIT_QUALIFIER","KWH"
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:NAD|a031:LOC|a031:LIN|a031:CCI|a031:MEA|a031:MEASURMENT_VALUE","string"
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:NAD|a031:RFF|a031:REFERENCEQUALIFIER","ACW"
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:NAD|a031:RFF|a031:REFERENCENUMBER","string"
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:IDE|a031:NAD|a031:ZIPCODE","string"
xml.UpdateChildContent"soap:Body|a03:CancelRequest|a03:UTILMD|a031:UNT|a031:NUMSEG","string"
xml.UpdateChildContent"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.
xml.EmitXmlDecl = FalseDim soapRequestBody As String
soapRequestBody = xml.GetXml()
Dim endpoint As String
endpoint = "http://isom.okte.sk/interfaces/MeasuredValuesOfSupplyAndDeliveryPoints/Service.svc"Dim soapAction As String
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"Dim contentType As String
contentType = "text/xml"Dim http As NewChilkat.Http
http.ClearHeaders
http.SetRequestHeader"Content-Type",contentType
http.SetRequestHeader"SOAPAction",soapAction
Dim resp AsChilkat.HttpResponse
resp = http.PostXml(endpoint,soapRequestBody,"utf-8")
If (http.LastMethodSuccess = False) Then
System.DebugLog(http.LastErrorText)
System.DebugLog("Failed to send SOAP request.")
ReturnEnd If// Get the XML response body.Dim responseXml As NewChilkat.Xml
success = resp.GetBodyXml(responseXml)
Dim statusCode As Int32
statusCode = resp.StatusCode
System.DebugLog("response status code: " + Str(statusCode))
// If the status code does not indicate succcess, then show the response XML,
// which probably contains error information.If (statusCode <> 200) Then
System.DebugLog(responseXml.GetXml())
ReturnEnd If
System.DebugLog(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).Dim REFERENCEQUALIFIER As StringDim REFERENCENUMBER As String
REFERENCENUMBER = responseXml.GetChildContent("*:Body|*:CancelResponse|*:APERAK|*:UNH|*:REFERENCENUMBER")
Dim IDENTIFIER As String
IDENTIFIER = responseXml.GetChildContent("*:Body|*:CancelResponse|*:APERAK|*:UNH|*:IDENTIFIER")
Dim VERSIONNUMBER As String
VERSIONNUMBER = responseXml.GetChildContent("*:Body|*:CancelResponse|*:APERAK|*:UNH|*:VERSIONNUMBER")
Dim RELEASENUMBER As String
RELEASENUMBER = responseXml.GetChildContent("*:Body|*:CancelResponse|*:APERAK|*:UNH|*:RELEASENUMBER")
Dim CONTROLAGENCY As String
CONTROLAGENCY = responseXml.GetChildContent("*:Body|*:CancelResponse|*:APERAK|*:UNH|*:CONTROLAGENCY")
Dim ASSOCCODE As String
ASSOCCODE = responseXml.GetChildContent("*:Body|*:CancelResponse|*:APERAK|*:UNH|*:ASSOCCODE")
Dim ACCESSREF As String
ACCESSREF = responseXml.GetChildContent("*:Body|*:CancelResponse|*:APERAK|*:UNH|*:ACCESSREF")
Dim NAME As Int32
NAME = responseXml.GetChildIntValue("*:Body|*:CancelResponse|*:APERAK|*:BGM|*:NAME")
Dim CODELISTAGENCY As Int32
CODELISTAGENCY = responseXml.GetChildIntValue("*:Body|*:CancelResponse|*:APERAK|*:BGM|*:CODELISTAGENCY")
Dim DOCUMENTNUMBER As String
DOCUMENTNUMBER = responseXml.GetChildContent("*:Body|*:CancelResponse|*:APERAK|*:BGM|*:DOCUMENTNUMBER")
Dim DOCUMENTFUNC As Int32
DOCUMENTFUNC = responseXml.GetChildIntValue("*:Body|*:CancelResponse|*:APERAK|*:BGM|*:DOCUMENTFUNC")
Dim RESPONSETYPE As String
RESPONSETYPE = responseXml.GetChildContent("*:Body|*:CancelResponse|*:APERAK|*:BGM|*:RESPONSETYPE")
Dim DATUMQUALIFIER As Int32
DATUMQUALIFIER = responseXml.GetChildIntValue("*:Body|*:CancelResponse|*:APERAK|*:DTM|*:DATUMQUALIFIER")
Dim DATUM As String
DATUM = responseXml.GetChildContent("*:Body|*:CancelResponse|*:APERAK|*:DTM|*:DATUM")
Dim FORMAT As Int32
FORMAT = responseXml.GetChildIntValue("*:Body|*:CancelResponse|*:APERAK|*:DTM|*:FORMAT")
Dim i As Int32
i = 0Dim count_i As Int32
count_i = responseXml.NumChildrenHavingTag("*:Body|*:CancelResponse|*:APERAK|a031:RFF")
While i < count_i
responseXml.I = i
REFERENCEQUALIFIER = responseXml.GetChildContent("*:Body|*:CancelResponse|*:APERAK|*:RFF[i]|*:REFERENCEQUALIFIER")
REFERENCENUMBER = responseXml.GetChildContent("*:Body|*:CancelResponse|*:APERAK|*:RFF[i]|*:REFERENCENUMBER")
i = i + 1WendDim ACTION As String
ACTION = responseXml.GetChildContent("*:Body|*:CancelResponse|*:APERAK|*:NAD|*:ACTION")
Dim PARTNER As String
PARTNER = responseXml.GetChildContent("*:Body|*:CancelResponse|*:APERAK|*:NAD|*:PARTNER")
CODELISTAGENCY = responseXml.GetChildIntValue("*:Body|*:CancelResponse|*:APERAK|*:NAD|*:CODELISTAGENCY")
Dim ERROR_ID As String
ERROR_ID = responseXml.GetChildContent("*:Body|*:CancelResponse|*:APERAK|*:ERC|*:ERROR_ID")
Dim AGENCY As String
AGENCY = responseXml.GetChildContent("*:Body|*:CancelResponse|*:APERAK|*:ERC|*:AGENCY")
Dim TEXT_SUBJECT_QUALIFIER As String
TEXT_SUBJECT_QUALIFIER = responseXml.GetChildContent("*:Body|*:CancelResponse|*:APERAK|*:ERC|*:FTX|*:TEXT_SUBJECT_QUALIFIER")
Dim FREE_TEXT_CODE As Int32
FREE_TEXT_CODE = responseXml.GetChildIntValue("*:Body|*:CancelResponse|*:APERAK|*:ERC|*:FTX|*:FREE_TEXT_CODE")
Dim FREE_TEXT_VALUE_CODE As String
FREE_TEXT_VALUE_CODE = responseXml.GetChildContent("*:Body|*:CancelResponse|*:APERAK|*:ERC|*:FTX|*:FREE_TEXT_VALUE_CODE")
Dim CODE_LIST_ID As String
CODE_LIST_ID = responseXml.GetChildContent("*:Body|*:CancelResponse|*:APERAK|*:ERC|*:FTX|*:CODE_LIST_ID")
Dim strCODELISTAGENCY As String
strCODELISTAGENCY = responseXml.GetChildContent("*:Body|*:CancelResponse|*:APERAK|*:ERC|*:FTX|*:CODELISTAGENCY")
Dim FREE_TEXT_1 As String
FREE_TEXT_1 = responseXml.GetChildContent("*:Body|*:CancelResponse|*:APERAK|*:ERC|*:FTX|*:FREE_TEXT_1")
Dim FREE_TEXT_2 As String
FREE_TEXT_2 = responseXml.GetChildContent("*:Body|*:CancelResponse|*:APERAK|*:ERC|*:FTX|*:FREE_TEXT_2")
Dim FREE_TEXT_3 As String
FREE_TEXT_3 = responseXml.GetChildContent("*:Body|*:CancelResponse|*:APERAK|*:ERC|*:FTX|*:FREE_TEXT_3")
Dim FREE_TEXT_4 As String
FREE_TEXT_4 = responseXml.GetChildContent("*:Body|*:CancelResponse|*:APERAK|*:ERC|*:FTX|*:FREE_TEXT_4")
Dim FREE_TEXT_5 As String
FREE_TEXT_5 = responseXml.GetChildContent("*:Body|*:CancelResponse|*:APERAK|*:ERC|*:FTX|*:FREE_TEXT_5")
REFERENCEQUALIFIER = responseXml.GetChildContent("*:Body|*:CancelResponse|*:APERAK|*:ERC|*:RFF|*:REFERENCEQUALIFIER")
REFERENCENUMBER = responseXml.GetChildContent("*:Body|*:CancelResponse|*:APERAK|*:ERC|*:RFF|*:REFERENCENUMBER")
Dim NUMSEG As Int32
NUMSEG = responseXml.GetChildIntValue("*:Body|*:CancelResponse|*:APERAK|*:UNT|*:NUMSEG")
Dim REFNUM As String
REFNUM = responseXml.GetChildContent("*:Body|*:CancelResponse|*:APERAK|*:UNT|*:REFNUM")