CAPSoapHttp / postCAP
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
#include <C_CkXmlW.h>
#include <C_CkHttpW.h>
#include <C_CkHttpResponseW.h>
void ChilkatSample(void)
{
HCkXmlW xml;
const wchar_t *soapRequestBody;
const wchar_t *endpoint;
const wchar_t *soapAction;
const wchar_t *contentType;
HCkHttpW http;
HCkHttpResponseW resp;
HCkXmlW responseXml;
int statusCode;
const wchar_t *parameterName;
const wchar_t *parameterValue;
const wchar_t *subParameterName;
const wchar_t *subParameterValue;
const wchar_t *ResponseOperation;
const wchar_t *ResponseType;
xml = CkXmlW_Create();
CkXmlW_putTag(xml,L"soapenv:Envelope");
CkXmlW_AddAttribute(xml,L"xmlns:soapenv",L"http://schemas.xmlsoap.org/soap/envelope/");
CkXmlW_AddAttribute(xml,L"xmlns:WL5G3N1",L"http://gov.fema.ipaws.services/IPAWS_CAPService/");
CkXmlW_AddAttribute(xml,L"xmlns:cap",L"urn:oasis:names:tc:emergency:cap:1.2");
CkXmlW_UpdateChildContent(xml,L"soapenv:Header|WL5G3N1:request_Header|WL5G3N1:logonUser",L"xml");
CkXmlW_UpdateChildContent(xml,L"soapenv:Header|WL5G3N1:request_Header|WL5G3N1:logonCogId",L"xml");
CkXmlW_UpdateChildContent(xml,L"soapenv:Body|WL5G3N1:postCAPRequestTypeDef|cap:alert|cap:identifier",L"xml");
CkXmlW_UpdateChildContent(xml,L"soapenv:Body|WL5G3N1:postCAPRequestTypeDef|cap:alert|cap:sender",L"xml");
CkXmlW_UpdateChildContent(xml,L"soapenv:Body|WL5G3N1:postCAPRequestTypeDef|cap:alert|cap:sent",L"dateTime");
CkXmlW_UpdateChildContent(xml,L"soapenv:Body|WL5G3N1:postCAPRequestTypeDef|cap:alert|cap:status",L"Actual");
CkXmlW_UpdateChildContent(xml,L"soapenv:Body|WL5G3N1:postCAPRequestTypeDef|cap:alert|cap:msgType",L"Alert");
CkXmlW_UpdateChildContent(xml,L"soapenv:Body|WL5G3N1:postCAPRequestTypeDef|cap:alert|cap:source",L"xml");
CkXmlW_UpdateChildContent(xml,L"soapenv:Body|WL5G3N1:postCAPRequestTypeDef|cap:alert|cap:scope",L"Public");
CkXmlW_UpdateChildContent(xml,L"soapenv:Body|WL5G3N1:postCAPRequestTypeDef|cap:alert|cap:restriction",L"xml");
CkXmlW_UpdateChildContent(xml,L"soapenv:Body|WL5G3N1:postCAPRequestTypeDef|cap:alert|cap:addresses",L"xml");
CkXmlW_UpdateChildContent(xml,L"soapenv:Body|WL5G3N1:postCAPRequestTypeDef|cap:alert|cap:code",L"xml");
CkXmlW_UpdateChildContent(xml,L"soapenv:Body|WL5G3N1:postCAPRequestTypeDef|cap:alert|cap:note",L"xml");
CkXmlW_UpdateChildContent(xml,L"soapenv:Body|WL5G3N1:postCAPRequestTypeDef|cap:alert|cap:references",L"xml");
CkXmlW_UpdateChildContent(xml,L"soapenv:Body|WL5G3N1:postCAPRequestTypeDef|cap:alert|cap:incidents",L"xml");
CkXmlW_UpdateChildContent(xml,L"soapenv:Body|WL5G3N1:postCAPRequestTypeDef|cap:alert|cap:info|cap:language",L"xml");
CkXmlW_UpdateChildContent(xml,L"soapenv:Body|WL5G3N1:postCAPRequestTypeDef|cap:alert|cap:info|cap:category",L"Geo");
CkXmlW_UpdateChildContent(xml,L"soapenv:Body|WL5G3N1:postCAPRequestTypeDef|cap:alert|cap:info|cap:event",L"xml");
CkXmlW_UpdateChildContent(xml,L"soapenv:Body|WL5G3N1:postCAPRequestTypeDef|cap:alert|cap:info|cap:responseType",L"Shelter");
CkXmlW_UpdateChildContent(xml,L"soapenv:Body|WL5G3N1:postCAPRequestTypeDef|cap:alert|cap:info|cap:urgency",L"Immediate");
CkXmlW_UpdateChildContent(xml,L"soapenv:Body|WL5G3N1:postCAPRequestTypeDef|cap:alert|cap:info|cap:severity",L"Extreme");
CkXmlW_UpdateChildContent(xml,L"soapenv:Body|WL5G3N1:postCAPRequestTypeDef|cap:alert|cap:info|cap:certainty",L"Observed");
CkXmlW_UpdateChildContent(xml,L"soapenv:Body|WL5G3N1:postCAPRequestTypeDef|cap:alert|cap:info|cap:audience",L"xml");
CkXmlW_UpdateChildContent(xml,L"soapenv:Body|WL5G3N1:postCAPRequestTypeDef|cap:alert|cap:info|cap:eventCode|cap:valueName",L"xml");
CkXmlW_UpdateChildContent(xml,L"soapenv:Body|WL5G3N1:postCAPRequestTypeDef|cap:alert|cap:info|cap:eventCode|cap:value",L"xml");
CkXmlW_UpdateChildContent(xml,L"soapenv:Body|WL5G3N1:postCAPRequestTypeDef|cap:alert|cap:info|cap:effective",L"dateTime");
CkXmlW_UpdateChildContent(xml,L"soapenv:Body|WL5G3N1:postCAPRequestTypeDef|cap:alert|cap:info|cap:onset",L"dateTime");
CkXmlW_UpdateChildContent(xml,L"soapenv:Body|WL5G3N1:postCAPRequestTypeDef|cap:alert|cap:info|cap:expires",L"dateTime");
CkXmlW_UpdateChildContent(xml,L"soapenv:Body|WL5G3N1:postCAPRequestTypeDef|cap:alert|cap:info|cap:senderName",L"xml");
CkXmlW_UpdateChildContent(xml,L"soapenv:Body|WL5G3N1:postCAPRequestTypeDef|cap:alert|cap:info|cap:headline",L"xml");
CkXmlW_UpdateChildContent(xml,L"soapenv:Body|WL5G3N1:postCAPRequestTypeDef|cap:alert|cap:info|cap:description",L"xml");
CkXmlW_UpdateChildContent(xml,L"soapenv:Body|WL5G3N1:postCAPRequestTypeDef|cap:alert|cap:info|cap:instruction",L"xml");
CkXmlW_UpdateChildContent(xml,L"soapenv:Body|WL5G3N1:postCAPRequestTypeDef|cap:alert|cap:info|cap:web",L"xml");
CkXmlW_UpdateChildContent(xml,L"soapenv:Body|WL5G3N1:postCAPRequestTypeDef|cap:alert|cap:info|cap:contact",L"xml");
CkXmlW_UpdateChildContent(xml,L"soapenv:Body|WL5G3N1:postCAPRequestTypeDef|cap:alert|cap:info|cap:parameter|cap:valueName",L"xml");
CkXmlW_UpdateChildContent(xml,L"soapenv:Body|WL5G3N1:postCAPRequestTypeDef|cap:alert|cap:info|cap:parameter|cap:value",L"xml");
CkXmlW_UpdateChildContent(xml,L"soapenv:Body|WL5G3N1:postCAPRequestTypeDef|cap:alert|cap:info|cap:resource|cap:resourceDesc",L"xml");
CkXmlW_UpdateChildContent(xml,L"soapenv:Body|WL5G3N1:postCAPRequestTypeDef|cap:alert|cap:info|cap:resource|cap:mimeType",L"xml");
CkXmlW_UpdateChildContent(xml,L"soapenv:Body|WL5G3N1:postCAPRequestTypeDef|cap:alert|cap:info|cap:resource|cap:size",L"xml");
CkXmlW_UpdateChildContent(xml,L"soapenv:Body|WL5G3N1:postCAPRequestTypeDef|cap:alert|cap:info|cap:resource|cap:uri",L"xml");
CkXmlW_UpdateChildContent(xml,L"soapenv:Body|WL5G3N1:postCAPRequestTypeDef|cap:alert|cap:info|cap:resource|cap:derefUri",L"xml");
CkXmlW_UpdateChildContent(xml,L"soapenv:Body|WL5G3N1:postCAPRequestTypeDef|cap:alert|cap:info|cap:resource|cap:digest",L"xml");
CkXmlW_UpdateChildContent(xml,L"soapenv:Body|WL5G3N1:postCAPRequestTypeDef|cap:alert|cap:info|cap:area|cap:areaDesc",L"xml");
CkXmlW_UpdateChildContent(xml,L"soapenv:Body|WL5G3N1:postCAPRequestTypeDef|cap:alert|cap:info|cap:area|cap:polygon",L"xml");
CkXmlW_UpdateChildContent(xml,L"soapenv:Body|WL5G3N1:postCAPRequestTypeDef|cap:alert|cap:info|cap:area|cap:circle",L"xml");
CkXmlW_UpdateChildContent(xml,L"soapenv:Body|WL5G3N1:postCAPRequestTypeDef|cap:alert|cap:info|cap:area|cap:geocode|cap:valueName",L"xml");
CkXmlW_UpdateChildContent(xml,L"soapenv:Body|WL5G3N1:postCAPRequestTypeDef|cap:alert|cap:info|cap:area|cap:geocode|cap:value",L"xml");
CkXmlW_UpdateChildContent(xml,L"soapenv:Body|WL5G3N1:postCAPRequestTypeDef|cap:alert|cap:info|cap:area|cap:altitude",L"xml");
CkXmlW_UpdateChildContent(xml,L"soapenv:Body|WL5G3N1:postCAPRequestTypeDef|cap:alert|cap:info|cap:area|cap:ceiling",L"xml");
// In a SOAP HTTP request, including the XML declaration (<?xml version="1.0" encoding="UTF-8"?>) in the XML body is generally not required.
CkXmlW_putEmitXmlDecl(xml,FALSE);
soapRequestBody = CkXmlW_getXml(xml);
endpoint = L"http://tdl.integration.aws.fema.gov/IPAWS_CAPService/IPAWS";
soapAction = L"http://gov.fema.ipaws.services/IPAWS_CAPService/postCAP";
// For SOAP requests, the standard Content-Type is usually set to "text/xml" or "application/soap+xml"
contentType = L"text/xml";
http = CkHttpW_Create();
CkHttpW_ClearHeaders(http);
CkHttpW_SetRequestHeader(http,L"Content-Type",contentType);
CkHttpW_SetRequestHeader(http,L"SOAPAction",soapAction);
resp = CkHttpResponseW_Create();
ERROR: Undefined variable(success)
ERROR: Undefined variable(success)
if (success == FALSE) {
wprintf(L"%s\n",CkHttpW_lastErrorText(http));
wprintf(L"Failed to send SOAP request.\n");
CkXmlW_Dispose(xml);
CkHttpW_Dispose(http);
CkHttpResponseW_Dispose(resp);
return;
}
// Get the XML response body.
responseXml = CkXmlW_Create();
CkHttpResponseW_GetBodyXml(resp,responseXml);
statusCode = CkHttpResponseW_getStatusCode(resp);
wprintf(L"response status code: %d\n",statusCode);
// If the status code does not indicate succcess, then show the response XML,
// which probably contains error information.
if (statusCode != 200) {
wprintf(L"%s\n",CkXmlW_getXml(responseXml));
CkXmlW_Dispose(xml);
CkHttpW_Dispose(http);
CkHttpResponseW_Dispose(resp);
CkXmlW_Dispose(responseXml);
return;
}
wprintf(L"%s\n",CkXmlW_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).
parameterName = CkXmlW_getChildContent(responseXml,L"*:Body|*:postCAPResponseTypeDef|*:parameterListItem|*:parameterName");
parameterValue = CkXmlW_getChildContent(responseXml,L"*:Body|*:postCAPResponseTypeDef|*:parameterListItem|*:parameterValue");
subParameterName = CkXmlW_getChildContent(responseXml,L"*:Body|*:postCAPResponseTypeDef|*:parameterListItem|*:subParaListItem|*:subParameterName");
subParameterValue = CkXmlW_getChildContent(responseXml,L"*:Body|*:postCAPResponseTypeDef|*:parameterListItem|*:subParaListItem|*:subParameterValue");
ResponseOperation = CkXmlW_getChildContent(responseXml,L"*:Body|*:postCAPResponseTypeDef|*:ResponseOperation");
ResponseType = CkXmlW_getChildContent(responseXml,L"*:Body|*:postCAPResponseTypeDef|*:ResponseType");
CkXmlW_Dispose(xml);
CkHttpW_Dispose(http);
CkHttpResponseW_Dispose(resp);
CkXmlW_Dispose(responseXml);
}