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"?>
// <requisition-header>
// <justification>Test</justification>
// <ship-to-attention>Coupa Buyer</ship-to-attention>
// <currency>
// <code>USD</code>
// </currency>
// <requested-by>
// <login>CoupaSam</login>
// <email>CoupaSam@coupa.com</email>
// </requested-by>
// <ship-to-address>
// <location-code>DUMMYST</location-code>
// </ship-to-address>
// <requisition-lines type="array">
// <requisition-line>
// <id type="integer">5809</id>
// <description>Test</description>
// <line-num type="integer">1</line-num>
// <total type="decimal">12.00</total>
// <line-type>RequisitionAmountLine</line-type>
// <unit-price type="decimal">12.00</unit-price>
// <need-by-date type="dateTime">2020-05-15T00:00:00-05:00</need-by-date>
// <account>
// <code>DUM_SEG_1_LV_1-DUM_SEG_2_LV_1</code>
// <active type="boolean">true</active>
// <segment-1>DUM2_SEG_1_LV_1</segment-1>
// <segment-2>DUM2_SEG_2_LV_2</segment-2>
// <account-type>
// <name>Dummy 2 Chart of Accounts</name>
// <currency>
// <code>USD</code>
// </currency>
// </account-type>
// </account>
// <currency>
// <code>USD</code>
// </currency>
// <supplier>
// <name>CoupaTester</name>
// <number>123456</number>
// </supplier>
// </requisition-line>
// </requisition-lines>
// </requisition-header>
//
xml := CkXml_Create();
CkXml_putTag(xml,'requisition-header');
CkXml_UpdateChildContent(xml,'justification','Test');
CkXml_UpdateChildContent(xml,'ship-to-attention','Coupa Buyer');
CkXml_UpdateChildContent(xml,'currency|code','USD');
CkXml_UpdateChildContent(xml,'requested-by|login','CoupaSam');
CkXml_UpdateChildContent(xml,'requested-by|email','CoupaSam@coupa.com');
CkXml_UpdateChildContent(xml,'ship-to-address|location-code','DUMMYST');
CkXml_UpdateAttrAt(xml,'requisition-lines',True,'type','array');
CkXml_UpdateAttrAt(xml,'requisition-lines|requisition-line|id',True,'type','integer');
CkXml_UpdateChildContentInt(xml,'requisition-lines|requisition-line|id',5809);
CkXml_UpdateChildContent(xml,'requisition-lines|requisition-line|description','Test');
CkXml_UpdateAttrAt(xml,'requisition-lines|requisition-line|line-num',True,'type','integer');
CkXml_UpdateChildContentInt(xml,'requisition-lines|requisition-line|line-num',1);
CkXml_UpdateAttrAt(xml,'requisition-lines|requisition-line|total',True,'type','decimal');
CkXml_UpdateChildContent(xml,'requisition-lines|requisition-line|total','12.00');
CkXml_UpdateChildContent(xml,'requisition-lines|requisition-line|line-type','RequisitionAmountLine');
CkXml_UpdateAttrAt(xml,'requisition-lines|requisition-line|unit-price',True,'type','decimal');
CkXml_UpdateChildContent(xml,'requisition-lines|requisition-line|unit-price','12.00');
CkXml_UpdateAttrAt(xml,'requisition-lines|requisition-line|need-by-date',True,'type','dateTime');
CkXml_UpdateChildContent(xml,'requisition-lines|requisition-line|need-by-date','2020-05-15T00:00:00-05:00');
CkXml_UpdateChildContent(xml,'requisition-lines|requisition-line|account|code','DUM_SEG_1_LV_1-DUM_SEG_2_LV_1');
CkXml_UpdateAttrAt(xml,'requisition-lines|requisition-line|account|active',True,'type','boolean');
CkXml_UpdateChildContent(xml,'requisition-lines|requisition-line|account|active','true');
CkXml_UpdateChildContent(xml,'requisition-lines|requisition-line|account|segment-1','DUM2_SEG_1_LV_1');
CkXml_UpdateChildContent(xml,'requisition-lines|requisition-line|account|segment-2','DUM2_SEG_2_LV_2');
CkXml_UpdateChildContent(xml,'requisition-lines|requisition-line|account|account-type|name','Dummy 2 Chart of Accounts');
CkXml_UpdateChildContent(xml,'requisition-lines|requisition-line|account|account-type|currency|code','USD');
CkXml_UpdateChildContent(xml,'requisition-lines|requisition-line|currency|code','USD');
CkXml_UpdateChildContent(xml,'requisition-lines|requisition-line|supplier|name','CoupaTester');
CkXml_UpdateChildContentInt(xml,'requisition-lines|requisition-line|supplier|number',123456);
// Adds the "Authorization: Bearer <access_token>" header.
CkHttp_putAuthToken(http,'<access_token>');
sbRequestBody := CkStringBuilder_Create();
CkXml_GetXmlSb(xml,sbRequestBody);
resp := CkHttp_PTextSb(http,'PUT','https://domain.com/requisitions/:id?fields=["id"]',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 PUT
-H "Authorization: Bearer <access_token>"
-d '<?xml version="1.0" encoding="UTF-8"?>
<requisition-header>
<justification>Test</justification>
<ship-to-attention>Coupa Buyer</ship-to-attention>
<currency>
<code>USD</code>
</currency>
<requested-by>
<login>CoupaSam</login>
<email>CoupaSam@coupa.com</email>
</requested-by>
<ship-to-address>
<location-code>DUMMYST</location-code>
</ship-to-address>
<requisition-lines type="array">
<requisition-line>
<id type="integer">5809</id>
<description>Test</description>
<line-num type="integer">1</line-num>
<total type="decimal">12.00</total>
<line-type>RequisitionAmountLine</line-type>
<unit-price type="decimal">12.00</unit-price>
<need-by-date type="dateTime">2020-05-15T00:00:00-05:00</need-by-date>
<account>
<code>DUM_SEG_1_LV_1-DUM_SEG_2_LV_1</code>
<active type="boolean">true</active>
<segment-1>DUM2_SEG_1_LV_1</segment-1>
<segment-2>DUM2_SEG_2_LV_2</segment-2>
<account-type>
<name>Dummy 2 Chart of Accounts</name>
<currency>
<code>USD</code>
</currency>
</account-type>
</account>
<currency>
<code>USD</code>
</currency>
<supplier>
<name>CoupaTester</name>
<number>123456</number>
</supplier>
</requisition-line>
</requisition-lines>
</requisition-header>'
https://domain.com/requisitions/:id?fields=["id"]
Postman Collection Item JSON
{
"name": "Update a Requisition in Draft Status",
"request": {
"method": "PUT",
"header": [
],
"body": {
"mode": "raw",
"raw": "<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n<requisition-header>\n <justification>Test</justification>\n <ship-to-attention>Coupa Buyer</ship-to-attention>\n <currency>\n <code>USD</code>\n </currency>\n <requested-by>\n <login>CoupaSam</login>\n <email>CoupaSam@coupa.com</email>\n </requested-by>\n <ship-to-address>\n <location-code>DUMMYST</location-code>\n </ship-to-address>\n <requisition-lines type=\"array\">\n <requisition-line>\n \t<id type=\"integer\">5809</id>\n <description>Test</description>\n <line-num type=\"integer\">1</line-num>\n <total type=\"decimal\">12.00</total>\n <line-type>RequisitionAmountLine</line-type>\n <unit-price type=\"decimal\">12.00</unit-price>\n <need-by-date type=\"dateTime\">2020-05-15T00:00:00-05:00</need-by-date>\n <account>\n <code>DUM_SEG_1_LV_1-DUM_SEG_2_LV_1</code>\n <active type=\"boolean\">true</active>\n <segment-1>DUM2_SEG_1_LV_1</segment-1>\n <segment-2>DUM2_SEG_2_LV_2</segment-2>\n <account-type>\n <name>Dummy 2 Chart of Accounts</name>\n <currency>\n <code>USD</code>\n </currency>\n </account-type>\n </account>\n <currency>\n <code>USD</code>\n </currency>\n <supplier>\n <name>CoupaTester</name>\n <number>123456</number>\n </supplier>\n </requisition-line>\n </requisition-lines>\n</requisition-header>",
"options": {
"raw": {
"language": "xml"
}
}
},
"url": {
"raw": "{{URL}}/requisitions/:id?fields=[\"id\"]",
"host": [
"{{URL}}"
],
"path": [
"requisitions",
":id"
],
"query": [
{
"key": "fields",
"value": "[\"id\"]"
}
],
"variable": [
{
"key": "id",
"value": "3462",
"description": "Coupa Internal Requisition Id"
}
]
}
},
"response": [
]
}
