Back to Collection Items
IncludeFile "CkStringBuilder.pb"
IncludeFile "CkHttp.pb"
IncludeFile "CkHttpResponse.pb"
IncludeFile "CkXml.pb"
Procedure ChilkatExample()
; This example assumes the Chilkat API to have been previously unlocked.
; See Global Unlock Sample for sample code.
http.i = CkHttp::ckCreate()
If http.i = 0
Debug "Failed to create object."
ProcedureReturn
EndIf
success.i
; 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>
; <name>Coupa Supplier Draft</name>
; <display-name>Coupa Supplier</display-name>
; <number/>
; <status>draft</status>
; <po-method>email</po-method>
; <po-change-method>email</po-change-method>
; <default-locale>en</default-locale>
; <payment-method>invoice</payment-method>
; <po-email>coupasupplier@coupa.com</po-email>
; <invoice-matching-level>3-way</invoice-matching-level>
; <primary-contact>
; <email>coupasupplierprimarycontact@gmail.com</email>
; <name-given>Coupa Supplier Name</name-given>
; <name-family>Coupa Supplier Family Name</name-family>
; </primary-contact>
; <primary-address>
; <name>Coupa Supplier Name</name>
; <street1>Test Street</street1>
; <city>Test City</city>
; <state>NC</state>
; <postal-code>27560</postal-code>
; <country>
; <code>US</code>
; </country>
; </primary-address>
; <enterprise>
; <code>GLOBAL</code>
; </enterprise>
; <payment-term>
; <code>2/20 Net 30</code>
; </payment-term>
; <content-groups type="array">
; <content-group>
; <name>IT</name>
; </content-group>
; </content-groups>
; <supplier-addresses type="array">
; <supplier-address>
; <name>Coupa Supplier Address 1</name>
; <street1>Test Street</street1>
; <city>Test City</city>
; <state>NC</state>
; <postal-code>27560</postal-code>
; <country>
; <code>US</code>
; </country>
; </supplier-address>
; <supplier-address>
; <name>Coupa Supplier Address 2</name>
; <street1>Test Street</street1>
; <city>Test City</city>
; <state>NC</state>
; <postal-code>27560</postal-code>
; <country>
; <code>US</code>
; </country>
; <purposes type="array">
; <purpose>
; <name>other_address</name>
; </purpose>
; </purposes>
; </supplier-address>
; </supplier-addresses>
; <contacts type="array">
; <contact>
; <email>coupasupplierprimarycontact@gmail.com</email>
; <name-given>Coupa Supplier Name</name-given>
; <name-family>Coupa Supplier Family Name</name-family>
; </contact>
; </contacts>
; <diversities>
; <diversity>
; <diversity-category>
; <code>WBE</code>
; <category>Woman Owned Business Enterprise</category>
; </diversity-category>
; <country>
; <code>US</code>
; </country>
; </diversity>
; </diversities>
; </supplier>
;
xml.i = CkXml::ckCreate()
If xml.i = 0
Debug "Failed to create object."
ProcedureReturn
EndIf
CkXml::setCkTag(xml, "supplier")
CkXml::ckUpdateChildContent(xml,"name","Coupa Supplier Draft")
CkXml::ckUpdateChildContent(xml,"display-name","Coupa Supplier")
CkXml::ckUpdateChildContent(xml,"number","")
CkXml::ckUpdateChildContent(xml,"status","draft")
CkXml::ckUpdateChildContent(xml,"po-method","email")
CkXml::ckUpdateChildContent(xml,"po-change-method","email")
CkXml::ckUpdateChildContent(xml,"default-locale","en")
CkXml::ckUpdateChildContent(xml,"payment-method","invoice")
CkXml::ckUpdateChildContent(xml,"po-email","coupasupplier@coupa.com")
CkXml::ckUpdateChildContent(xml,"invoice-matching-level","3-way")
CkXml::ckUpdateChildContent(xml,"primary-contact|email","coupasupplierprimarycontact@gmail.com")
CkXml::ckUpdateChildContent(xml,"primary-contact|name-given","Coupa Supplier Name")
CkXml::ckUpdateChildContent(xml,"primary-contact|name-family","Coupa Supplier Family Name")
CkXml::ckUpdateChildContent(xml,"primary-address|name","Coupa Supplier Name")
CkXml::ckUpdateChildContent(xml,"primary-address|street1","Test Street")
CkXml::ckUpdateChildContent(xml,"primary-address|city","Test City")
CkXml::ckUpdateChildContent(xml,"primary-address|state","NC")
CkXml::ckUpdateChildContentInt(xml,"primary-address|postal-code",27560)
CkXml::ckUpdateChildContent(xml,"primary-address|country|code","US")
CkXml::ckUpdateChildContent(xml,"enterprise|code","GLOBAL")
CkXml::ckUpdateChildContent(xml,"payment-term|code","2/20 Net 30")
CkXml::ckUpdateAttrAt(xml,"content-groups",1,"type","array")
CkXml::ckUpdateChildContent(xml,"content-groups|content-group|name","IT")
CkXml::ckUpdateAttrAt(xml,"supplier-addresses",1,"type","array")
CkXml::ckUpdateChildContent(xml,"supplier-addresses|supplier-address|name","Coupa Supplier Address 1")
CkXml::ckUpdateChildContent(xml,"supplier-addresses|supplier-address|street1","Test Street")
CkXml::ckUpdateChildContent(xml,"supplier-addresses|supplier-address|city","Test City")
CkXml::ckUpdateChildContent(xml,"supplier-addresses|supplier-address|state","NC")
CkXml::ckUpdateChildContentInt(xml,"supplier-addresses|supplier-address|postal-code",27560)
CkXml::ckUpdateChildContent(xml,"supplier-addresses|supplier-address|country|code","US")
CkXml::ckUpdateChildContent(xml,"supplier-addresses|supplier-address[1]|name","Coupa Supplier Address 2")
CkXml::ckUpdateChildContent(xml,"supplier-addresses|supplier-address[1]|street1","Test Street")
CkXml::ckUpdateChildContent(xml,"supplier-addresses|supplier-address[1]|city","Test City")
CkXml::ckUpdateChildContent(xml,"supplier-addresses|supplier-address[1]|state","NC")
CkXml::ckUpdateChildContentInt(xml,"supplier-addresses|supplier-address[1]|postal-code",27560)
CkXml::ckUpdateChildContent(xml,"supplier-addresses|supplier-address[1]|country|code","US")
CkXml::ckUpdateAttrAt(xml,"supplier-addresses|supplier-address[1]|purposes",1,"type","array")
CkXml::ckUpdateChildContent(xml,"supplier-addresses|supplier-address[1]|purposes|purpose|name","other_address")
CkXml::ckUpdateAttrAt(xml,"contacts",1,"type","array")
CkXml::ckUpdateChildContent(xml,"contacts|contact|email","coupasupplierprimarycontact@gmail.com")
CkXml::ckUpdateChildContent(xml,"contacts|contact|name-given","Coupa Supplier Name")
CkXml::ckUpdateChildContent(xml,"contacts|contact|name-family","Coupa Supplier Family Name")
CkXml::ckUpdateChildContent(xml,"diversities|diversity|diversity-category|code","WBE")
CkXml::ckUpdateChildContent(xml,"diversities|diversity|diversity-category|category","Woman Owned Business Enterprise")
CkXml::ckUpdateChildContent(xml,"diversities|diversity|country|code","US")
; Adds the "Authorization: Bearer <access_token>" header.
CkHttp::setCkAuthToken(http, "<access_token>")
sbRequestBody.i = CkStringBuilder::ckCreate()
If sbRequestBody.i = 0
Debug "Failed to create object."
ProcedureReturn
EndIf
CkXml::ckGetXmlSb(xml,sbRequestBody)
resp.i = CkHttp::ckPTextSb(http,"POST","https://domain.com/suppliers?fields=[" + Chr(34) + "id" + Chr(34) + "]",sbRequestBody,"utf-8","application/xml",0,0)
If CkHttp::ckLastMethodSuccess(http) = 0
Debug CkHttp::ckLastErrorText(http)
CkHttp::ckDispose(http)
CkXml::ckDispose(xml)
CkStringBuilder::ckDispose(sbRequestBody)
ProcedureReturn
EndIf
Debug Str(CkHttpResponse::ckStatusCode(resp))
Debug CkHttpResponse::ckBodyStr(resp)
CkHttpResponse::ckDispose(resp)
CkHttp::ckDispose(http)
CkXml::ckDispose(xml)
CkStringBuilder::ckDispose(sbRequestBody)
ProcedureReturn
EndProcedure
Curl Command
curl -X POST
-H "Authorization: Bearer <access_token>"
-d '<supplier>
<name>Coupa Supplier Draft</name>
<display-name>Coupa Supplier</display-name>
<number></number>
<status>draft</status>
<po-method>email</po-method>
<po-change-method>email</po-change-method>
<default-locale>en</default-locale>
<payment-method>invoice</payment-method>
<po-email>coupasupplier@coupa.com</po-email>
<invoice-matching-level>3-way</invoice-matching-level>
<primary-contact>
<email>coupasupplierprimarycontact@gmail.com</email>
<name-given>Coupa Supplier Name</name-given>
<name-family>Coupa Supplier Family Name</name-family>
</primary-contact>
<primary-address>
<name>Coupa Supplier Name</name>
<street1>Test Street</street1>
<city>Test City</city>
<state>NC</state>
<postal-code>27560</postal-code>
<country>
<code>US</code>
</country>
</primary-address>
<enterprise>
<code>GLOBAL</code>
</enterprise>
<payment-term>
<code>2/20 Net 30</code>
</payment-term>
<content-groups type="array">
<content-group>
<name>IT</name>
</content-group>
</content-groups>
<supplier-addresses type="array">
<supplier-address>
<name>Coupa Supplier Address 1</name>
<street1>Test Street</street1>
<city>Test City</city>
<state>NC</state>
<postal-code>27560</postal-code>
<country>
<code>US</code>
</country>
</supplier-address>
<supplier-address>
<name>Coupa Supplier Address 2</name>
<street1>Test Street</street1>
<city>Test City</city>
<state>NC</state>
<postal-code>27560</postal-code>
<country>
<code>US</code>
</country>
<purposes type="array">
<purpose>
<name>other_address</name>
</purpose>
</purposes>
</supplier-address>
</supplier-addresses>
<contacts type="array">
<contact>
<email>coupasupplierprimarycontact@gmail.com</email>
<name-given>Coupa Supplier Name</name-given>
<name-family>Coupa Supplier Family Name</name-family>
</contact>
</contacts>
<diversities>
<diversity>
<diversity-category>
<code>WBE</code>
<category>Woman Owned Business Enterprise</category>
</diversity-category>
<country>
<code>US</code>
</country>
</diversity>
</diversities>
</supplier>'
https://domain.com/suppliers?fields=["id"]
Postman Collection Item JSON
{
"name": "Create a supplier in Draft",
"request": {
"method": "POST",
"header": [
],
"body": {
"mode": "raw",
"raw": "<supplier>\n <name>Coupa Supplier Draft</name>\n <display-name>Coupa Supplier</display-name>\n <number></number>\n <status>draft</status>\n <po-method>email</po-method>\n <po-change-method>email</po-change-method>\n <default-locale>en</default-locale>\n <payment-method>invoice</payment-method>\n <po-email>coupasupplier@coupa.com</po-email>\n <invoice-matching-level>3-way</invoice-matching-level>\n <primary-contact>\n <email>coupasupplierprimarycontact@gmail.com</email>\n <name-given>Coupa Supplier Name</name-given>\n <name-family>Coupa Supplier Family Name</name-family>\n </primary-contact>\n <primary-address>\n <name>Coupa Supplier Name</name>\n <street1>Test Street</street1>\n <city>Test City</city>\n <state>NC</state>\n <postal-code>27560</postal-code>\n <country>\n <code>US</code>\n </country>\n </primary-address>\n <enterprise>\n <code>GLOBAL</code>\n </enterprise>\n <payment-term>\n <code>2/20 Net 30</code>\n </payment-term>\n <content-groups type=\"array\">\n <content-group>\n <name>IT</name>\n </content-group>\n </content-groups>\n <supplier-addresses type=\"array\">\n <supplier-address>\n <name>Coupa Supplier Address 1</name>\n <street1>Test Street</street1>\n <city>Test City</city>\n <state>NC</state>\n <postal-code>27560</postal-code>\n <country>\n <code>US</code>\n </country>\n </supplier-address>\n <supplier-address>\n <name>Coupa Supplier Address 2</name>\n <street1>Test Street</street1>\n <city>Test City</city>\n <state>NC</state>\n <postal-code>27560</postal-code>\n <country>\n <code>US</code>\n </country>\n <purposes type=\"array\">\n <purpose>\n <name>other_address</name>\n </purpose>\n </purposes>\n </supplier-address>\n </supplier-addresses>\n <contacts type=\"array\">\n <contact>\n <email>coupasupplierprimarycontact@gmail.com</email>\n <name-given>Coupa Supplier Name</name-given>\n <name-family>Coupa Supplier Family Name</name-family>\n </contact>\n </contacts>\n <diversities>\n <diversity>\n <diversity-category>\n <code>WBE</code>\n <category>Woman Owned Business Enterprise</category>\n </diversity-category>\n <country>\n <code>US</code>\n </country>\n </diversity>\n </diversities>\n</supplier>",
"options": {
"raw": {
"language": "xml"
}
}
},
"url": {
"raw": "{{URL}}/suppliers?fields=[\"id\"]",
"host": [
"{{URL}}"
],
"path": [
"suppliers"
],
"query": [
{
"key": "fields",
"value": "[\"id\"]"
}
]
}
},
"response": [
]
}