Back to Collection Items
integer li_rc
oleobject loo_Http
integer li_Success
oleobject loo_Xml
oleobject loo_SbRequestBody
oleobject loo_Resp
// This example assumes the Chilkat API to have been previously unlocked.
// See Global Unlock Sample for sample code.
loo_Http = create oleobject
li_rc = loo_Http.ConnectToNewObject("Chilkat_9_5_0.Http")
if li_rc < 0 then
destroy loo_Http
MessageBox("Error","Connecting to COM object failed")
return
end if
// 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"?>
// <order-header>
// <type>ExternalOrderHeader</type>
// <po-number>PO-957645-14</po-number>
// <order-lines type="array">
// <order-line>
// <description>Testing Kit 2</description>
// <line-num>3</line-num>
// <price type="decimal">100.00</price>
// <quantity type="decimal">1.0</quantity>
// <type>OrderQuantityLine</type>
// <account-allocations type="array">
// <account-allocation>
// <amount type="decimal">10.00</amount>
// <pct type="decimal">10.0</pct>
// <account>
// <code>SF-IT-Assets</code>
// <account-type>
// <name>Ace Corporate</name>
// </account-type>
// </account>
// </account-allocation>
// <account-allocation>
// <amount type="decimal">90.00</amount>
// <pct type="decimal">90.0</pct>
// <account>
// <code>SF-Sales-Assets</code>
// <account-type>
// <name>Ace Corporate</name>
// </account-type>
// </account>
// </account-allocation>
// </account-allocations>
// <currency>
// <code>USD</code>
// </currency>
// <uom>
// <code>EA</code>
// </uom>
// </order-line>
// </order-lines>
// </order-header>
//
loo_Xml = create oleobject
li_rc = loo_Xml.ConnectToNewObject("Chilkat_9_5_0.Xml")
loo_Xml.Tag = "order-header"
loo_Xml.UpdateChildContent("type","ExternalOrderHeader")
loo_Xml.UpdateChildContent("po-number","PO-957645-14")
loo_Xml.UpdateAttrAt("order-lines",1,"type","array")
loo_Xml.UpdateChildContent("order-lines|order-line|description","Testing Kit 2")
loo_Xml.UpdateChildContentInt("order-lines|order-line|line-num",3)
loo_Xml.UpdateAttrAt("order-lines|order-line|price",1,"type","decimal")
loo_Xml.UpdateChildContent("order-lines|order-line|price","100.00")
loo_Xml.UpdateAttrAt("order-lines|order-line|quantity",1,"type","decimal")
loo_Xml.UpdateChildContent("order-lines|order-line|quantity","1.0")
loo_Xml.UpdateChildContent("order-lines|order-line|type","OrderQuantityLine")
loo_Xml.UpdateAttrAt("order-lines|order-line|account-allocations",1,"type","array")
loo_Xml.UpdateAttrAt("order-lines|order-line|account-allocations|account-allocation|amount",1,"type","decimal")
loo_Xml.UpdateChildContent("order-lines|order-line|account-allocations|account-allocation|amount","10.00")
loo_Xml.UpdateAttrAt("order-lines|order-line|account-allocations|account-allocation|pct",1,"type","decimal")
loo_Xml.UpdateChildContent("order-lines|order-line|account-allocations|account-allocation|pct","10.0")
loo_Xml.UpdateChildContent("order-lines|order-line|account-allocations|account-allocation|account|code","SF-IT-Assets")
loo_Xml.UpdateChildContent("order-lines|order-line|account-allocations|account-allocation|account|account-type|name","Ace Corporate")
loo_Xml.UpdateAttrAt("order-lines|order-line|account-allocations|account-allocation[1]|amount",1,"type","decimal")
loo_Xml.UpdateChildContent("order-lines|order-line|account-allocations|account-allocation[1]|amount","90.00")
loo_Xml.UpdateAttrAt("order-lines|order-line|account-allocations|account-allocation[1]|pct",1,"type","decimal")
loo_Xml.UpdateChildContent("order-lines|order-line|account-allocations|account-allocation[1]|pct","90.0")
loo_Xml.UpdateChildContent("order-lines|order-line|account-allocations|account-allocation[1]|account|code","SF-Sales-Assets")
loo_Xml.UpdateChildContent("order-lines|order-line|account-allocations|account-allocation[1]|account|account-type|name","Ace Corporate")
loo_Xml.UpdateChildContent("order-lines|order-line|currency|code","USD")
loo_Xml.UpdateChildContent("order-lines|order-line|uom|code","EA")
// Adds the "Authorization: Bearer <access_token>" header.
loo_Http.AuthToken = "<access_token>"
loo_Http.SetRequestHeader("Accept","application/json")
loo_SbRequestBody = create oleobject
li_rc = loo_SbRequestBody.ConnectToNewObject("Chilkat_9_5_0.StringBuilder")
loo_Xml.GetXmlSb(loo_SbRequestBody)
loo_Resp = loo_Http.PTextSb("PUT","https://domain.com/purchase_orders/:id?fields=[~"id~"]",loo_SbRequestBody,"utf-8","application/xml",0,0)
if loo_Http.LastMethodSuccess = 0 then
Write-Debug loo_Http.LastErrorText
destroy loo_Http
destroy loo_Xml
destroy loo_SbRequestBody
return
end if
Write-Debug string(loo_Resp.StatusCode)
Write-Debug loo_Resp.BodyStr
destroy loo_Resp
destroy loo_Http
destroy loo_Xml
destroy loo_SbRequestBody
Curl Command
curl -X PUT
-H "Authorization: Bearer <access_token>"
-H "Accept: application/json"
-d '<?xml version="1.0" encoding="UTF-8"?>
<order-header>
<type>ExternalOrderHeader</type>
<po-number>PO-957645-14</po-number>
<order-lines type="array">
<order-line>
<description>Testing Kit 2</description>
<line-num>3</line-num>
<price type="decimal">100.00</price>
<quantity type="decimal">1.0</quantity>
<type>OrderQuantityLine</type>
<account-allocations type="array">
<account-allocation>
<amount type="decimal">10.00</amount>
<pct type="decimal">10.0</pct>
<account>
<code>SF-IT-Assets</code>
<account-type>
<name>Ace Corporate</name>
</account-type>
</account>
</account-allocation>
<account-allocation>
<amount type="decimal">90.00</amount>
<pct type="decimal">90.0</pct>
<account>
<code>SF-Sales-Assets</code>
<account-type>
<name>Ace Corporate</name>
</account-type>
</account>
</account-allocation>
</account-allocations>
<currency>
<code>USD</code>
</currency>
<uom>
<code>EA</code>
</uom>
</order-line>
</order-lines>
</order-header>'
https://domain.com/purchase_orders/:id?fields=["id"]
Postman Collection Item JSON
{
"name": "Add line w/ allocations to external PO",
"request": {
"method": "PUT",
"header": [
{
"key": "Accept",
"value": "application/json",
"type": "text"
}
],
"body": {
"mode": "raw",
"raw": "<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n<order-header>\n <type>ExternalOrderHeader</type>\n <po-number>PO-957645-14</po-number>\n <order-lines type=\"array\">\n <order-line>\n <description>Testing Kit 2</description>\n <line-num>3</line-num>\n <price type=\"decimal\">100.00</price>\n <quantity type=\"decimal\">1.0</quantity>\n <type>OrderQuantityLine</type>\n <account-allocations type=\"array\">\n <account-allocation>\n <amount type=\"decimal\">10.00</amount>\n <pct type=\"decimal\">10.0</pct>\n <account>\n <code>SF-IT-Assets</code>\n <account-type>\n <name>Ace Corporate</name>\n </account-type>\n </account>\n </account-allocation>\n <account-allocation>\n <amount type=\"decimal\">90.00</amount>\n <pct type=\"decimal\">90.0</pct>\n <account>\n <code>SF-Sales-Assets</code>\n <account-type>\n <name>Ace Corporate</name>\n </account-type>\n </account>\n </account-allocation>\n </account-allocations>\n <currency>\n <code>USD</code>\n </currency>\n <uom>\n <code>EA</code>\n </uom>\n </order-line>\n </order-lines>\n</order-header>",
"options": {
"raw": {
"language": "xml"
}
}
},
"url": {
"raw": "{{URL}}/purchase_orders/:id?fields=[\"id\"]",
"host": [
"{{URL}}"
],
"path": [
"purchase_orders",
":id"
],
"query": [
{
"key": "fields",
"value": "[\"id\"]"
}
],
"variable": [
{
"key": "id",
"value": "3238"
}
]
}
},
"response": [
]
}
