Chilkat Online Tools

delphiDll / Coupa Postman Collection - OAuth - Master / Create a Project

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"?>
// <project>
//     <name>RR API Creation</name>
//     <active type="boolean">true</active>
//     <open type="boolean">true</open>
//     <description>Random Description comes from intake</description>
//     <start-date type="dateTime">2021-11-22T00:00:00-07:00</start-date>
//     <enabled-tabs type="array">
//         <enabled-tab>contracts</enabled-tab>
//         <enabled-tab>quote_requests</enabled-tab>
//         <enabled-tab>suppliers</enabled-tab>
//     </enabled-tabs>
//     <status>draft</status>
//     <template-group>
//         <id type="integer">1</id>
//         <name>Jason Test - Single Task</name>
//     </template-group>
//     <custom-fields>
//         <checkbox type="boolean">false</checkbox>
//         <cf15-analytics-test nil="true"/>
//         <custom-field-14 nil="true"/>
//         <date nil="true"/>
//         <projected-headcount nil="true"/>
//         <estimated-savings nil="true"/>
//         <evycustom-field-11>TESTING</evycustom-field-11>
//         <n2 nil="true"/>
//         <text-box/>
//         <multi-select nil="true"/>
//         <custom-attachment nil="true"/>
//         <custom-field-8 type="boolean">false</custom-field-8>
//         <cfproattachment nil="true"/>
//         <start-date1 nil="true"/>
//     </custom-fields>
// </project>
// 

xml := CkXml_Create();
CkXml_putTag(xml,'project');
CkXml_UpdateChildContent(xml,'name','RR API Creation');
CkXml_UpdateAttrAt(xml,'active',True,'type','boolean');
CkXml_UpdateChildContent(xml,'active','true');
CkXml_UpdateAttrAt(xml,'open',True,'type','boolean');
CkXml_UpdateChildContent(xml,'open','true');
CkXml_UpdateChildContent(xml,'description','Random Description comes from intake');
CkXml_UpdateAttrAt(xml,'start-date',True,'type','dateTime');
CkXml_UpdateChildContent(xml,'start-date','2021-11-22T00:00:00-07:00');
CkXml_UpdateAttrAt(xml,'enabled-tabs',True,'type','array');
CkXml_UpdateChildContent(xml,'enabled-tabs|enabled-tab','contracts');
CkXml_UpdateChildContent(xml,'enabled-tabs|enabled-tab[1]','quote_requests');
CkXml_UpdateChildContent(xml,'enabled-tabs|enabled-tab[2]','suppliers');
CkXml_UpdateChildContent(xml,'status','draft');
CkXml_UpdateAttrAt(xml,'template-group|id',True,'type','integer');
CkXml_UpdateChildContentInt(xml,'template-group|id',1);
CkXml_UpdateChildContent(xml,'template-group|name','Jason Test - Single Task');
CkXml_UpdateAttrAt(xml,'custom-fields|checkbox',True,'type','boolean');
CkXml_UpdateChildContent(xml,'custom-fields|checkbox','false');
CkXml_UpdateAttrAt(xml,'custom-fields|cf15-analytics-test',True,'nil','true');
CkXml_UpdateAttrAt(xml,'custom-fields|custom-field-14',True,'nil','true');
CkXml_UpdateAttrAt(xml,'custom-fields|date',True,'nil','true');
CkXml_UpdateAttrAt(xml,'custom-fields|projected-headcount',True,'nil','true');
CkXml_UpdateAttrAt(xml,'custom-fields|estimated-savings',True,'nil','true');
CkXml_UpdateChildContent(xml,'custom-fields|evycustom-field-11','TESTING');
CkXml_UpdateAttrAt(xml,'custom-fields|n2',True,'nil','true');
CkXml_UpdateChildContent(xml,'custom-fields|text-box','');
CkXml_UpdateAttrAt(xml,'custom-fields|multi-select',True,'nil','true');
CkXml_UpdateAttrAt(xml,'custom-fields|custom-attachment',True,'nil','true');
CkXml_UpdateAttrAt(xml,'custom-fields|custom-field-8',True,'type','boolean');
CkXml_UpdateChildContent(xml,'custom-fields|custom-field-8','false');
CkXml_UpdateAttrAt(xml,'custom-fields|cfproattachment',True,'nil','true');
CkXml_UpdateAttrAt(xml,'custom-fields|start-date1',True,'nil','true');

// Adds the "Authorization: Bearer <access_token>" header.
CkHttp_putAuthToken(http,'<access_token>');

sbRequestBody := CkStringBuilder_Create();
CkXml_GetXmlSb(xml,sbRequestBody);

resp := CkHttp_PTextSb(http,'POST','{}}]',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 '<project>
    <name>RR API Creation</name>
    <active type="boolean">true</active>
    <open type="boolean">true</open>
    <description>Random Description comes from intake</description>
    <start-date type="dateTime">2021-11-22T00:00:00-07:00</start-date>
    <enabled-tabs type="array">
        <enabled-tab>contracts</enabled-tab>
        <enabled-tab>quote_requests</enabled-tab>
        <enabled-tab>suppliers</enabled-tab>
    </enabled-tabs>
    <status>draft</status>
    <template-group>
        <id type="integer">1</id>
        <name>Jason Test - Single Task</name>
    </template-group>
    <custom-fields>
        <checkbox type="boolean">false</checkbox>
        <cf15-analytics-test nil="true"/>
        <custom-field-14 nil="true"/>
        <date nil="true"/>
        <projected-headcount nil="true"/>
        <estimated-savings nil="true"/>
        <evycustom-field-11>TESTING</evycustom-field-11>
        <n2 nil="true"/>
        <text-box></text-box>
        <multi-select nil="true"/>
        <custom-attachment nil="true"/>
        <custom-field-8 type="boolean">false</custom-field-8>
        <cfproattachment nil="true"/>
        <start-date1 nil="true"/>
    </custom-fields>
</project>'
https://domain.com/projects?fields=["id","created_at","updated_at","name","active","open","description","mention-name","start-date","project-id","status",{"template-group": ["id","name"]},{"category": ["id","name","active"]},{"commodities": ["id","name"]},{"created_by": ["id","login","email"]},{"updated_by": ["id","login","email"]},{"custom_fields": {}}]

Postman Collection Item JSON

{
  "name": "Create a Project",
  "request": {
    "method": "POST",
    "header": [
    ],
    "body": {
      "mode": "raw",
      "raw": "<project>\n    <name>RR API Creation</name>\n    <active type=\"boolean\">true</active>\n    <open type=\"boolean\">true</open>\n    <description>Random Description comes from intake</description>\n    <start-date type=\"dateTime\">2021-11-22T00:00:00-07:00</start-date>\n    <enabled-tabs type=\"array\">\n        <enabled-tab>contracts</enabled-tab>\n        <enabled-tab>quote_requests</enabled-tab>\n        <enabled-tab>suppliers</enabled-tab>\n    </enabled-tabs>\n    <status>draft</status>\n    <template-group>\n        <id type=\"integer\">1</id>\n        <name>Jason Test - Single Task</name>\n    </template-group>\n    <custom-fields>\n        <checkbox type=\"boolean\">false</checkbox>\n        <cf15-analytics-test nil=\"true\"/>\n        <custom-field-14 nil=\"true\"/>\n        <date nil=\"true\"/>\n        <projected-headcount nil=\"true\"/>\n        <estimated-savings nil=\"true\"/>\n        <evycustom-field-11>TESTING</evycustom-field-11>\n        <n2 nil=\"true\"/>\n        <text-box></text-box>\n        <multi-select nil=\"true\"/>\n        <custom-attachment nil=\"true\"/>\n        <custom-field-8 type=\"boolean\">false</custom-field-8>\n        <cfproattachment nil=\"true\"/>\n        <start-date1 nil=\"true\"/>\n    </custom-fields>\n</project>",
      "options": {
        "raw": {
          "language": "xml"
        }
      }
    },
    "url": {
      "raw": "{{URL}}/projects?fields=[\"id\",\"created_at\",\"updated_at\",\"name\",\"active\",\"open\",\"description\",\"mention-name\",\"start-date\",\"project-id\",\"status\",{\"template-group\": [\"id\",\"name\"]},{\"category\": [\"id\",\"name\",\"active\"]},{\"commodities\": [\"id\",\"name\"]},{\"created_by\": [\"id\",\"login\",\"email\"]},{\"updated_by\": [\"id\",\"login\",\"email\"]},{\"custom_fields\": {}}]",
      "host": [
        "{{URL}}"
      ],
      "path": [
        "projects"
      ],
      "query": [
        {
          "key": "fields",
          "value": "[\"id\",\"created_at\",\"updated_at\",\"name\",\"active\",\"open\",\"description\",\"mention-name\",\"start-date\",\"project-id\",\"status\",{\"template-group\": [\"id\",\"name\"]},{\"category\": [\"id\",\"name\",\"active\"]},{\"commodities\": [\"id\",\"name\"]},{\"created_by\": [\"id\",\"login\",\"email\"]},{\"updated_by\": [\"id\",\"login\",\"email\"]},{\"custom_fields\": {}}]"
        }
      ]
    }
  },
  "response": [
  ]
}