Chilkat Online Tools

delphiAx / Coupa Postman Collection - OAuth - Master / Create SIM Record against existing Supplier

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-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 := TChilkatXml.Create(Self);
xml.Tag := 'supplier-information';
xml.UpdateChildContent('supplier-id',':id');
xml.UpdateChildContent('status','approved');
xml.UpdateChildContent('name','SIM Company');
xml.UpdateChildContent('exported','true');
xml.UpdateChildContent('supplier-information-addresses|supplier-information-address|kind','RTA');
xml.UpdateChildContentInt('supplier-information-addresses|supplier-information-address|location-code',001);
xml.UpdateChildContent('supplier-information-addresses|supplier-information-address|street-address','59 Bank Avenue');
xml.UpdateChildContentInt('supplier-information-addresses|supplier-information-address|postal-code',15200);
xml.UpdateChildContent('supplier-information-addresses|supplier-information-address|city','Pittsburgh');
xml.UpdateChildContent('supplier-information-addresses|supplier-information-address|state-region','PA');
xml.UpdateChildContent('supplier-information-addresses|supplier-information-address|bank-name','Bank Inc.');
xml.UpdateChildContentInt('supplier-information-addresses|supplier-information-address|bank-account-number',9999325);
xml.UpdateChildContent('supplier-information-addresses|supplier-information-address|currency|code','USD');
xml.UpdateChildContent('supplier-information-addresses|supplier-information-address[1]|kind','RTA');
xml.UpdateChildContentInt('supplier-information-addresses|supplier-information-address[1]|location-code',002);
xml.UpdateChildContent('supplier-information-addresses|supplier-information-address[1]|street-address','71 Sample Street');
xml.UpdateChildContentInt('supplier-information-addresses|supplier-information-address[1]|postal-code',19100);
xml.UpdateChildContent('supplier-information-addresses|supplier-information-address[1]|city','Philadelphia');
xml.UpdateChildContent('supplier-information-addresses|supplier-information-address[1]|state-region','PA');
xml.UpdateChildContent('supplier-information-addresses|supplier-information-address[1]|bank-name','Cash Co.');
xml.UpdateChildContentInt('supplier-information-addresses|supplier-information-address[1]|bank-account-number',8888325);
xml.UpdateChildContent('supplier-information-addresses|supplier-information-address[1]|currency|code','USD');

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

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

resp := http.PTextSb('POST','https://domain.com/supplier_information/',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-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": [
  ]
}