Chilkat Online Tools

delphiAx / Coupa Postman Collection - OAuth - Master / Create New Supplier Item agaisnt an existing item

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-item>
//     <price type="decimal">34.50</price>
//     <supplier-part-num>PARTNUM1821</supplier-part-num>
//     <preferred type="boolean">false</preferred>
//     <currency>
//         <code>USD</code>
//     </currency>
//     <supplier>
//         <number>0001012212</number>
//     </supplier>
//     <contract>
//         <number>10001</number>
//     </contract>
//     <item>
//         <id>3522</id>
//     </item>
// </supplier-item>
// 

xml := TChilkatXml.Create(Self);
xml.Tag := 'supplier-item';
xml.UpdateAttrAt('price',1,'type','decimal');
xml.UpdateChildContent('price','34.50');
xml.UpdateChildContent('supplier-part-num','PARTNUM1821');
xml.UpdateAttrAt('preferred',1,'type','boolean');
xml.UpdateChildContent('preferred','false');
xml.UpdateChildContent('currency|code','USD');
xml.UpdateChildContentInt('supplier|number',0001012212);
xml.UpdateChildContentInt('contract|number',10001);
xml.UpdateChildContentInt('item|id',3522);

// Adds the "Authorization: Bearer <access_token>" header.
http.AuthToken := '<access_token>';

sbRequestBody := TChilkatStringBuilder.Create(Self);
xml.GetXmlSb(sbRequestBody.ControlInterface);

resp := http.PTextSb('POST','{}}]',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 POST
	-H "Authorization: Bearer <access_token>"
	-d '<supplier-item>
    <price type="decimal">34.50</price>
    <supplier-part-num>PARTNUM1821</supplier-part-num>
    <preferred type="boolean">false</preferred>
    <currency>
        <code>USD</code>
    </currency>
    <supplier>
        <number>0001012212</number>
    </supplier>
    <contract>
        <number>10001</number>
    </contract>
    <item>
    <id>3522</id>
    </item>
</supplier-item>'
https://domain.com/supplier_items?fields=["id","supplier-part-num","supplier-aux-part-num",{"supplier":["id","name","number"]},{"item": ["id","name","item-number","active"]},{"custom_fields": {}}]

Postman Collection Item JSON

{
  "name": "Create New Supplier Item agaisnt an existing item",
  "request": {
    "method": "POST",
    "header": [
    ],
    "body": {
      "mode": "raw",
      "raw": "<supplier-item>\n    <price type=\"decimal\">34.50</price>\n    <supplier-part-num>PARTNUM1821</supplier-part-num>\n    <preferred type=\"boolean\">false</preferred>\n    <currency>\n        <code>USD</code>\n    </currency>\n    <supplier>\n        <number>0001012212</number>\n    </supplier>\n    <contract>\n        <number>10001</number>\n    </contract>\n    <item>\n    <id>3522</id>\n    </item>\n</supplier-item>"
    },
    "url": {
      "raw": "{{URL}}/supplier_items?fields=[\"id\",\"supplier-part-num\",\"supplier-aux-part-num\",{\"supplier\":[\"id\",\"name\",\"number\"]},{\"item\": [\"id\",\"name\",\"item-number\",\"active\"]},{\"custom_fields\": {}}]",
      "host": [
        "{{URL}}"
      ],
      "path": [
        "supplier_items"
      ],
      "query": [
        {
          "key": "fields",
          "value": "[\"id\",\"supplier-part-num\",\"supplier-aux-part-num\",{\"supplier\":[\"id\",\"name\",\"number\"]},{\"item\": [\"id\",\"name\",\"item-number\",\"active\"]},{\"custom_fields\": {}}]"
        }
      ]
    }
  },
  "response": [
  ]
}