Back to Collection Items
var
http: TChilkatHttp;
success: Integer;
xml: TChilkatXml;
sbRequestBody: TChilkatStringBuilder;
resp: IChilkatHttpResponse;
begin
// This example assumes the Chilkat API to have been previously unlocked.
// See Global Unlock Sample for sample code.
http := TChilkatHttp.Create(Self);
// 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>
// <diversities/>
// </supplier>
//
xml := TChilkatXml.Create(Self);
xml.Tag := 'supplier';
xml.UpdateChildContent('diversities','');
// Adds the "Authorization: Bearer <access_token>" header.
http.AuthToken := '<access_token>';
sbRequestBody := TChilkatStringBuilder.Create(Self);
xml.GetXmlSb(sbRequestBody.ControlInterface);
resp := http.PTextSb('PUT','https://domain.com/suppliers/:id?fields=["id"]',sbRequestBody.ControlInterface,'utf-8','application/xml',0,0);
if (http.LastMethodSuccess = 0) then
begin
Memo1.Lines.Add(http.LastErrorText);
Exit;
end;
Memo1.Lines.Add(IntToStr(resp.StatusCode));
Memo1.Lines.Add(resp.BodyStr);
Curl Command
curl -X PUT
-H "Authorization: Bearer <access_token>"
-d '<supplier>
<diversities>
</diversities>
</supplier>'
https://domain.com/suppliers/:id?fields=["id"]
Postman Collection Item JSON
{
"name": "Remove Supplier Diversities",
"request": {
"method": "PUT",
"header": [
],
"body": {
"mode": "raw",
"raw": "<supplier>\n <diversities>\n </diversities>\n</supplier>"
},
"url": {
"raw": "{{URL}}/suppliers/:id?fields=[\"id\"]",
"host": [
"{{URL}}"
],
"path": [
"suppliers",
":id"
],
"query": [
{
"key": "fields",
"value": "[\"id\"]"
}
],
"variable": [
{
"key": "id",
"value": "2"
}
]
}
},
"response": [
]
}