Back to Collection Items
var
http: HCkHttp;
success: Boolean;
xml: HCkXml;
sbRequestBody: HCkStringBuilder;
resp: HCkHttpResponse;
begin
// This example assumes the Chilkat API to have been previously unlocked.
// See Global Unlock Sample for sample code.
http := CkHttp_Create();
// Use this online tool to generate code from sample XML: Generate Code to Create XML
// The following XML is sent in the request body.
// <?xml version="1.0" encoding="utf-8"?>
// <supplier-information>
// <supplier-id>:id</supplier-id>
// <status>approved</status>
// <name>SIM Company</name>
// <exported>true</exported>
// <supplier-information-addresses>
// <supplier-information-address>
// <kind>RTA</kind>
// <location-code>001</location-code>
// <street-address>59 Bank Avenue</street-address>
// <postal-code>15200</postal-code>
// <city>Pittsburgh</city>
// <state-region>PA</state-region>
// <bank-name>Bank Inc.</bank-name>
// <bank-account-number>9999325</bank-account-number>
// <currency>
// <code>USD</code>
// </currency>
// </supplier-information-address>
// <supplier-information-address>
// <kind>RTA</kind>
// <location-code>002</location-code>
// <street-address>71 Sample Street</street-address>
// <postal-code>19100</postal-code>
// <city>Philadelphia</city>
// <state-region>PA</state-region>
// <bank-name>Cash Co.</bank-name>
// <bank-account-number>8888325</bank-account-number>
// <currency>
// <code>USD</code>
// </currency>
// </supplier-information-address>
// </supplier-information-addresses>
// </supplier-information>
//
xml := CkXml_Create();
CkXml_putTag(xml,'supplier-information');
CkXml_UpdateChildContent(xml,'supplier-id',':id');
CkXml_UpdateChildContent(xml,'status','approved');
CkXml_UpdateChildContent(xml,'name','SIM Company');
CkXml_UpdateChildContent(xml,'exported','true');
CkXml_UpdateChildContent(xml,'supplier-information-addresses|supplier-information-address|kind','RTA');
CkXml_UpdateChildContentInt(xml,'supplier-information-addresses|supplier-information-address|location-code',001);
CkXml_UpdateChildContent(xml,'supplier-information-addresses|supplier-information-address|street-address','59 Bank Avenue');
CkXml_UpdateChildContentInt(xml,'supplier-information-addresses|supplier-information-address|postal-code',15200);
CkXml_UpdateChildContent(xml,'supplier-information-addresses|supplier-information-address|city','Pittsburgh');
CkXml_UpdateChildContent(xml,'supplier-information-addresses|supplier-information-address|state-region','PA');
CkXml_UpdateChildContent(xml,'supplier-information-addresses|supplier-information-address|bank-name','Bank Inc.');
CkXml_UpdateChildContentInt(xml,'supplier-information-addresses|supplier-information-address|bank-account-number',9999325);
CkXml_UpdateChildContent(xml,'supplier-information-addresses|supplier-information-address|currency|code','USD');
CkXml_UpdateChildContent(xml,'supplier-information-addresses|supplier-information-address[1]|kind','RTA');
CkXml_UpdateChildContentInt(xml,'supplier-information-addresses|supplier-information-address[1]|location-code',002);
CkXml_UpdateChildContent(xml,'supplier-information-addresses|supplier-information-address[1]|street-address','71 Sample Street');
CkXml_UpdateChildContentInt(xml,'supplier-information-addresses|supplier-information-address[1]|postal-code',19100);
CkXml_UpdateChildContent(xml,'supplier-information-addresses|supplier-information-address[1]|city','Philadelphia');
CkXml_UpdateChildContent(xml,'supplier-information-addresses|supplier-information-address[1]|state-region','PA');
CkXml_UpdateChildContent(xml,'supplier-information-addresses|supplier-information-address[1]|bank-name','Cash Co.');
CkXml_UpdateChildContentInt(xml,'supplier-information-addresses|supplier-information-address[1]|bank-account-number',8888325);
CkXml_UpdateChildContent(xml,'supplier-information-addresses|supplier-information-address[1]|currency|code','USD');
// Adds the "Authorization: Bearer <access_token>" header.
CkHttp_putAuthToken(http,'<access_token>');
sbRequestBody := CkStringBuilder_Create();
CkXml_GetXmlSb(xml,sbRequestBody);
resp := CkHttp_PTextSb(http,'POST','https://domain.com/supplier_information/',sbRequestBody,'utf-8','application/xml',False,False);
if (CkHttp_getLastMethodSuccess(http) = False) then
begin
Memo1.Lines.Add(CkHttp__lastErrorText(http));
Exit;
end;
Memo1.Lines.Add(IntToStr(CkHttpResponse_getStatusCode(resp)));
Memo1.Lines.Add(CkHttpResponse__bodyStr(resp));
CkHttpResponse_Dispose(resp);
CkHttp_Dispose(http);
CkXml_Dispose(xml);
CkStringBuilder_Dispose(sbRequestBody);
Curl Command
curl -X POST
-H "Authorization: Bearer <access_token>"
-d '<supplier-information>
<supplier-id>:id</supplier-id>
<status>approved</status>
<name>SIM Company</name>
<exported>true</exported>
<supplier-information-addresses>
<supplier-information-address>
<kind>RTA</kind>
<location-code>001</location-code>
<street-address>59 Bank Avenue</street-address>
<postal-code>15200</postal-code>
<city>Pittsburgh</city>
<state-region>PA</state-region>
<bank-name>Bank Inc.</bank-name>
<bank-account-number>9999325</bank-account-number>
<currency>
<code>USD</code>
</currency>
</supplier-information-address>
<supplier-information-address>
<kind>RTA</kind>
<location-code>002</location-code>
<street-address>71 Sample Street</street-address>
<postal-code>19100</postal-code>
<city>Philadelphia</city>
<state-region>PA</state-region>
<bank-name>Cash Co.</bank-name>
<bank-account-number>8888325</bank-account-number>
<currency>
<code>USD</code>
</currency>
</supplier-information-address>
</supplier-information-addresses>
</supplier-information>'
https://domain.com/supplier_information/
Postman Collection Item JSON
{
"name": "Create SIM Record against existing Supplier",
"request": {
"method": "POST",
"header": [
],
"body": {
"mode": "raw",
"raw": "<supplier-information>\n <supplier-id>:id</supplier-id>\n <status>approved</status>\n <name>SIM Company</name>\n <exported>true</exported>\n <supplier-information-addresses>\n <supplier-information-address>\n <kind>RTA</kind>\n <location-code>001</location-code>\n <street-address>59 Bank Avenue</street-address>\n <postal-code>15200</postal-code>\n <city>Pittsburgh</city>\n <state-region>PA</state-region>\n <bank-name>Bank Inc.</bank-name>\n <bank-account-number>9999325</bank-account-number>\n <currency>\n <code>USD</code>\n </currency>\n </supplier-information-address>\n <supplier-information-address>\n <kind>RTA</kind>\n <location-code>002</location-code>\n <street-address>71 Sample Street</street-address>\n <postal-code>19100</postal-code>\n <city>Philadelphia</city>\n <state-region>PA</state-region>\n <bank-name>Cash Co.</bank-name>\n <bank-account-number>8888325</bank-account-number>\n <currency>\n <code>USD</code>\n </currency>\n </supplier-information-address>\n </supplier-information-addresses>\n</supplier-information>",
"options": {
"raw": {
"language": "xml"
}
}
},
"url": {
"raw": "{{URL}}/supplier_information/",
"host": [
"{{URL}}"
],
"path": [
"supplier_information",
""
]
},
"description": "This API is used for creating shell SIM records before importing legacy Suppliers. Status of SIM will be \"approved\" and exported flag will be marked as true."
},
"response": [
]
}
