<?phpinclude("chilkat.php");
// Use "chilkat_9_5_0.php" for versions of Chilkat < 10.0.0
$xml = newCkXml();
$xml->put_Tag('soapenv:Envelope');
$xml->AddAttribute('xmlns:soapenv','http://schemas.xmlsoap.org/soap/envelope/');
$xml->AddAttribute('xmlns','http://fina.hr/eracun/b2g/invoicewebservicecomponents/v0.1');
$xml->AddAttribute('xmlns:v0','http://fina.hr/eracun/b2g/ChangeB2GIncomingInvoiceStatus/v0.1');
$xml->AddAttribute('xmlns:b2gEracImpl','http://fina.hr/eracun/b2g/ws/erp/v0.1');
$xml->UpdateChildContent('soapenv:Header','');
$xml->UpdateChildContent('soapenv:Body|v0:ChangeB2GIncomingInvoiceStatusMsg|HeaderBuyer|MessageID','string');
$xml->UpdateChildContent('soapenv:Body|v0:ChangeB2GIncomingInvoiceStatusMsg|HeaderBuyer|BuyerID','string');
$xml->UpdateChildContent('soapenv:Body|v0:ChangeB2GIncomingInvoiceStatusMsg|HeaderBuyer|AdditionalBuyerID','string');
$xml->UpdateChildContentInt('soapenv:Body|v0:ChangeB2GIncomingInvoiceStatusMsg|HeaderBuyer|MessageType',123);
$xml->UpdateChildContent('soapenv:Body|v0:ChangeB2GIncomingInvoiceStatusMsg|HeaderBuyer|MessageAttributes','string');
$xml->UpdateChildContentInt('soapenv:Body|v0:ChangeB2GIncomingInvoiceStatusMsg|v0:Data|v0:B2GIncomingInvoiceStatus|v0:InvoiceID',123);
$xml->UpdateChildContent('soapenv:Body|v0:ChangeB2GIncomingInvoiceStatusMsg|v0:Data|v0:B2GIncomingInvoiceStatus|InvoiceStatus|StatusCode','RECEIVED');
$xml->UpdateChildContentInt('soapenv:Body|v0:ChangeB2GIncomingInvoiceStatusMsg|v0:Data|v0:B2GIncomingInvoiceStatus|InvoiceStatus|CodeReason',1042);
$xml->UpdateChildContent('soapenv:Body|v0:ChangeB2GIncomingInvoiceStatusMsg|v0:Data|v0:B2GIncomingInvoiceStatus|InvoiceStatus|Note','string');
$xml->UpdateChildContent('soapenv:Body|v0:ChangeB2GIncomingInvoiceStatusMsg|v0:Data|v0:B2GIncomingInvoiceStatus|InvoiceStatus|PartialAmount','99.0');
$xml->UpdateChildContent('soapenv:Body|v0:ChangeB2GIncomingInvoiceStatusMsg|v0:Data|v0:B2GIncomingInvoiceStatus|InvoiceStatus|DocumentCurrencyCode','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->put_EmitXmlDecl(false);
$soapRequestBody = $xml->getXml();
$endpoint = 'https://prez.fina.hr/B2GFinaInvoiceWebService/services/B2GFinaInvoiceWebService';
$soapAction = 'http://fina.hr/eracun/b2g/ChangeB2GIncomingInvoiceStatus';
// For SOAP requests, the standard Content-Type is usually set to "text/xml" or "application/soap+xml"
$contentType = 'text/xml';
$http = newCkHttp();
$http->ClearHeaders();
$http->SetRequestHeader('Content-Type',$contentType);
$http->SetRequestHeader('SOAPAction',$soapAction);
// resp is a CkHttpResponse
$resp = $http->PostXml($endpoint,$soapRequestBody,'utf-8');
if ($http->get_LastMethodSuccess() == false) {
print $http->lastErrorText() . "\n";
print'Failed to send SOAP request.' . "\n";
exit;
}
// Get the XML response body.
$responseXml = newCkXml();
$resp->GetBodyXml($responseXml);
$statusCode = $resp->get_StatusCode();
print'response status code: ' . $statusCode . "\n";
// If the status code does not indicate succcess, then show the response XML,
// which probably contains error information.if ($statusCode != 200) {
print $responseXml->getXml() . "\n";
exit;
}
print $responseXml->getXml() . "\n";
// 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).
$Envelope_xmlns = $responseXml->getAttrValue('xmlns');
$MessageID = $responseXml->getChildContent('*:Body|*:ChangeB2GIncomingInvoiceStatusAckMsg|MessageAck|MessageID');
$MessageAckID = $responseXml->getChildContent('*:Body|*:ChangeB2GIncomingInvoiceStatusAckMsg|MessageAck|MessageAckID');
$MessageType = $responseXml->GetChildIntValue('*:Body|*:ChangeB2GIncomingInvoiceStatusAckMsg|MessageAck|MessageType');
$AckStatus = $responseXml->getChildContent('*:Body|*:ChangeB2GIncomingInvoiceStatusAckMsg|MessageAck|AckStatus');
$AckStatusCode = $responseXml->GetChildIntValue('*:Body|*:ChangeB2GIncomingInvoiceStatusAckMsg|MessageAck|AckStatusCode');
$AckStatusText = $responseXml->getChildContent('*:Body|*:ChangeB2GIncomingInvoiceStatusAckMsg|MessageAck|AckStatusText');
$ErrorCode = $responseXml->getChildContent('*:Body|*:ChangeB2GIncomingInvoiceStatusAckMsg|Error|ErrorCode');
$ErrorMessage = $responseXml->getChildContent('*:Body|*:ChangeB2GIncomingInvoiceStatusAckMsg|Error|ErrorMessage');
$ErrorText = $responseXml->getChildContent('*:Body|*:ChangeB2GIncomingInvoiceStatusAckMsg|Error|ErrorText');
?>