Chilkat Online Tools

Foxpro / Coupa Postman Collection - OAuth - Master / Create a supplier in Draft

Back to Collection Items

LOCAL loHttp
LOCAL lnSuccess
LOCAL loXml
LOCAL loSbRequestBody
LOCAL loResp

* This example assumes the Chilkat API to have been previously unlocked.
* See Global Unlock Sample for sample code.

loHttp = CreateObject('Chilkat_9_5_0.Http')

* 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>
* 

loXml = CreateObject('Chilkat_9_5_0.Xml')
loXml.Tag = "supplier"
loXml.UpdateChildContent("name","Coupa Supplier Draft")
loXml.UpdateChildContent("display-name","Coupa Supplier")
loXml.UpdateChildContent("number","")
loXml.UpdateChildContent("status","draft")
loXml.UpdateChildContent("po-method","email")
loXml.UpdateChildContent("po-change-method","email")
loXml.UpdateChildContent("default-locale","en")
loXml.UpdateChildContent("payment-method","invoice")
loXml.UpdateChildContent("po-email","coupasupplier@coupa.com")
loXml.UpdateChildContent("invoice-matching-level","3-way")
loXml.UpdateChildContent("primary-contact|email","coupasupplierprimarycontact@gmail.com")
loXml.UpdateChildContent("primary-contact|name-given","Coupa Supplier Name")
loXml.UpdateChildContent("primary-contact|name-family","Coupa Supplier Family Name")
loXml.UpdateChildContent("primary-address|name","Coupa Supplier Name")
loXml.UpdateChildContent("primary-address|street1","Test Street")
loXml.UpdateChildContent("primary-address|city","Test City")
loXml.UpdateChildContent("primary-address|state","NC")
loXml.UpdateChildContentInt("primary-address|postal-code",27560)
loXml.UpdateChildContent("primary-address|country|code","US")
loXml.UpdateChildContent("enterprise|code","GLOBAL")
loXml.UpdateChildContent("payment-term|code","2/20 Net 30")
loXml.UpdateAttrAt("content-groups",1,"type","array")
loXml.UpdateChildContent("content-groups|content-group|name","IT")
loXml.UpdateAttrAt("supplier-addresses",1,"type","array")
loXml.UpdateChildContent("supplier-addresses|supplier-address|name","Coupa Supplier Address 1")
loXml.UpdateChildContent("supplier-addresses|supplier-address|street1","Test Street")
loXml.UpdateChildContent("supplier-addresses|supplier-address|city","Test City")
loXml.UpdateChildContent("supplier-addresses|supplier-address|state","NC")
loXml.UpdateChildContentInt("supplier-addresses|supplier-address|postal-code",27560)
loXml.UpdateChildContent("supplier-addresses|supplier-address|country|code","US")
loXml.UpdateChildContent("supplier-addresses|supplier-address[1]|name","Coupa Supplier Address 2")
loXml.UpdateChildContent("supplier-addresses|supplier-address[1]|street1","Test Street")
loXml.UpdateChildContent("supplier-addresses|supplier-address[1]|city","Test City")
loXml.UpdateChildContent("supplier-addresses|supplier-address[1]|state","NC")
loXml.UpdateChildContentInt("supplier-addresses|supplier-address[1]|postal-code",27560)
loXml.UpdateChildContent("supplier-addresses|supplier-address[1]|country|code","US")
loXml.UpdateAttrAt("supplier-addresses|supplier-address[1]|purposes",1,"type","array")
loXml.UpdateChildContent("supplier-addresses|supplier-address[1]|purposes|purpose|name","other_address")
loXml.UpdateAttrAt("contacts",1,"type","array")
loXml.UpdateChildContent("contacts|contact|email","coupasupplierprimarycontact@gmail.com")
loXml.UpdateChildContent("contacts|contact|name-given","Coupa Supplier Name")
loXml.UpdateChildContent("contacts|contact|name-family","Coupa Supplier Family Name")
loXml.UpdateChildContent("diversities|diversity|diversity-category|code","WBE")
loXml.UpdateChildContent("diversities|diversity|diversity-category|category","Woman Owned Business Enterprise")
loXml.UpdateChildContent("diversities|diversity|country|code","US")

* Adds the "Authorization: Bearer <access_token>" header.
loHttp.AuthToken = "<access_token>"

loSbRequestBody = CreateObject('Chilkat_9_5_0.StringBuilder')
loXml.GetXmlSb(loSbRequestBody)

loResp = loHttp.PTextSb("POST",'https://domain.com/suppliers?fields=["id"]',loSbRequestBody,"utf-8","application/xml",0,0)
IF (loHttp.LastMethodSuccess = 0) THEN
    ? loHttp.LastErrorText
    RELEASE loHttp
    RELEASE loXml
    RELEASE loSbRequestBody
    CANCEL
ENDIF

? STR(loResp.StatusCode)
? loResp.BodyStr
RELEASE loResp

RELEASE loHttp
RELEASE loXml
RELEASE loSbRequestBody

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": [
  ]
}