Chilkat Online Tools

PureBasic / Coupa Postman Collection - OAuth - Master / Create A User

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"?>
    ; <user>
    ;     <login>coupasam1</login>
    ;     <email>coupasam1@coupa.com</email>
    ;     <firstname>Coupa</firstname>
    ;     <lastname>Sam 1</lastname>
    ;     <fullname>Coupa Sam 1</fullname>
    ;     <purchasing-user>true</purchasing-user>
    ;     <expense-user>false</expense-user>
    ;     <sourcing-user>false</sourcing-user>
    ;     <inventory-user>false</inventory-user>
    ;     <contracts-user>false</contracts-user>
    ;     <analytics-user>false</analytics-user>
    ;     <aic-user>false</aic-user>
    ;     <spend-guard-user>false</spend-guard-user>
    ;     <ccw-user>false</ccw-user>
    ;     <clm-advanced-user>false</clm-advanced-user>
    ;     <supply-chain-user>false</supply-chain-user>
    ;     <risk-assess-user>false</risk-assess-user>
    ;     <employee-number>123456789</employee-number>
    ;     <active>true</active>
    ;     <account-security-type>0</account-security-type>
    ;     <authentication-method>saml</authentication-method>
    ;     <sso-identifier>coupasam1@coupa.com</sso-identifier>
    ;     <default-locale nil="true"/>
    ;     <business-group-security-type>1</business-group-security-type>
    ;     <edit-invoice-on-quick-entry>false</edit-invoice-on-quick-entry>
    ;     <avatar-thumb-url nil="true"/>
    ;     <mention-name>coupasam1</mention-name>
    ;     <seniority-level nil="true"/>
    ;     <business-function nil="true"/>
    ;     <employee-payment-channel>ERP</employee-payment-channel>
    ;     <allow-employee-payment-account-creation>false</allow-employee-payment-account-creation>
    ;     <rank/>
    ;     <default-cost-center/>
    ;     <phone-work>
    ;         <country-code>1</country-code>
    ;         <area-code>650</area-code>
    ;         <number>5856306</number>
    ;         <extension nil="true"/>
    ;     </phone-work>
    ;     <roles>
    ;         <role>
    ;             <name>User</name>
    ;         </role>
    ;         <role>
    ;             <name>Central Receiving</name>
    ;         </role>
    ;         <role>
    ;             <name>Edit Requisition as Approver</name>
    ;         </role>
    ;         <role>
    ;             <name>Dashboard</name>
    ;         </role>
    ;         <role>
    ;             <name>Split Accounting</name>
    ;         </role>
    ;     </roles>
    ;     <manager>
    ;         <login>mjordan</login>
    ;     </manager>
    ;     <default-account>
    ;         <code>SF-Finance-Indirect</code>
    ;         <segment-1>SF</segment-1>
    ;         <segment-2>Finance</segment-2>
    ;         <segment-3>Indirect</segment-3>
    ;         <account-type>
    ;             <name>ERP 1</name>
    ;             <currency>
    ;                 <code>USD</code>
    ;             </currency>
    ;         </account-type>
    ;     </default-account>
    ;     <default-account-type>
    ;         <name>ERP 1</name>
    ;         <currency>
    ;             <code>USD</code>
    ;         </currency>
    ;     </default-account-type>
    ;     <default-currency>
    ;         <code>USD</code>
    ;     </default-currency>
    ;     <department>
    ;         <name>Marketing</name>
    ;     </department>
    ;     <requisition-approval-limit>
    ;         <amount>10000.00</amount>
    ;         <currency>
    ;             <code>USD</code>
    ;         </currency>
    ;     </requisition-approval-limit>
    ;     <invoice-approval-limit>
    ;         <amount>15000.00</amount>
    ;         <currency>
    ;             <code>USD</code>
    ;         </currency>
    ;     </invoice-approval-limit>
    ;     <requisition-self-approval-limit>
    ;         <amount>500.00</amount>
    ;         <currency>
    ;             <code>USD</code>
    ;         </currency>
    ;     </requisition-self-approval-limit>
    ;     <expenses-delegated-to/>
    ;     <can-expense-for/>
    ;     <content-groups/>
    ;     <account-groups/>
    ;     <approval-groups/>
    ;     <user-groups/>
    ;     <working-warehouses/>
    ;     <inventory-organizations/>
    ; </user>
    ; 

    xml.i = CkXml::ckCreate()
    If xml.i = 0
        Debug "Failed to create object."
        ProcedureReturn
    EndIf

    CkXml::setCkTag(xml, "user")
    CkXml::ckUpdateChildContent(xml,"login","coupasam1")
    CkXml::ckUpdateChildContent(xml,"email","coupasam1@coupa.com")
    CkXml::ckUpdateChildContent(xml,"firstname","Coupa")
    CkXml::ckUpdateChildContent(xml,"lastname","Sam 1")
    CkXml::ckUpdateChildContent(xml,"fullname","Coupa Sam 1")
    CkXml::ckUpdateChildContent(xml,"purchasing-user","true")
    CkXml::ckUpdateChildContent(xml,"expense-user","false")
    CkXml::ckUpdateChildContent(xml,"sourcing-user","false")
    CkXml::ckUpdateChildContent(xml,"inventory-user","false")
    CkXml::ckUpdateChildContent(xml,"contracts-user","false")
    CkXml::ckUpdateChildContent(xml,"analytics-user","false")
    CkXml::ckUpdateChildContent(xml,"aic-user","false")
    CkXml::ckUpdateChildContent(xml,"spend-guard-user","false")
    CkXml::ckUpdateChildContent(xml,"ccw-user","false")
    CkXml::ckUpdateChildContent(xml,"clm-advanced-user","false")
    CkXml::ckUpdateChildContent(xml,"supply-chain-user","false")
    CkXml::ckUpdateChildContent(xml,"risk-assess-user","false")
    CkXml::ckUpdateChildContentInt(xml,"employee-number",123456789)
    CkXml::ckUpdateChildContent(xml,"active","true")
    CkXml::ckUpdateChildContentInt(xml,"account-security-type",0)
    CkXml::ckUpdateChildContent(xml,"authentication-method","saml")
    CkXml::ckUpdateChildContent(xml,"sso-identifier","coupasam1@coupa.com")
    CkXml::ckUpdateAttrAt(xml,"default-locale",1,"nil","true")
    CkXml::ckUpdateChildContentInt(xml,"business-group-security-type",1)
    CkXml::ckUpdateChildContent(xml,"edit-invoice-on-quick-entry","false")
    CkXml::ckUpdateAttrAt(xml,"avatar-thumb-url",1,"nil","true")
    CkXml::ckUpdateChildContent(xml,"mention-name","coupasam1")
    CkXml::ckUpdateAttrAt(xml,"seniority-level",1,"nil","true")
    CkXml::ckUpdateAttrAt(xml,"business-function",1,"nil","true")
    CkXml::ckUpdateChildContent(xml,"employee-payment-channel","ERP")
    CkXml::ckUpdateChildContent(xml,"allow-employee-payment-account-creation","false")
    CkXml::ckUpdateChildContent(xml,"rank","")
    CkXml::ckUpdateChildContent(xml,"default-cost-center","")
    CkXml::ckUpdateChildContentInt(xml,"phone-work|country-code",1)
    CkXml::ckUpdateChildContentInt(xml,"phone-work|area-code",650)
    CkXml::ckUpdateChildContentInt(xml,"phone-work|number",5856306)
    CkXml::ckUpdateAttrAt(xml,"phone-work|extension",1,"nil","true")
    CkXml::ckUpdateChildContent(xml,"roles|role|name","User")
    CkXml::ckUpdateChildContent(xml,"roles|role[1]|name","Central Receiving")
    CkXml::ckUpdateChildContent(xml,"roles|role[2]|name","Edit Requisition as Approver")
    CkXml::ckUpdateChildContent(xml,"roles|role[3]|name","Dashboard")
    CkXml::ckUpdateChildContent(xml,"roles|role[4]|name","Split Accounting")
    CkXml::ckUpdateChildContent(xml,"manager|login","mjordan")
    CkXml::ckUpdateChildContent(xml,"default-account|code","SF-Finance-Indirect")
    CkXml::ckUpdateChildContent(xml,"default-account|segment-1","SF")
    CkXml::ckUpdateChildContent(xml,"default-account|segment-2","Finance")
    CkXml::ckUpdateChildContent(xml,"default-account|segment-3","Indirect")
    CkXml::ckUpdateChildContent(xml,"default-account|account-type|name","ERP 1")
    CkXml::ckUpdateChildContent(xml,"default-account|account-type|currency|code","USD")
    CkXml::ckUpdateChildContent(xml,"default-account-type|name","ERP 1")
    CkXml::ckUpdateChildContent(xml,"default-account-type|currency|code","USD")
    CkXml::ckUpdateChildContent(xml,"default-currency|code","USD")
    CkXml::ckUpdateChildContent(xml,"department|name","Marketing")
    CkXml::ckUpdateChildContent(xml,"requisition-approval-limit|amount","10000.00")
    CkXml::ckUpdateChildContent(xml,"requisition-approval-limit|currency|code","USD")
    CkXml::ckUpdateChildContent(xml,"invoice-approval-limit|amount","15000.00")
    CkXml::ckUpdateChildContent(xml,"invoice-approval-limit|currency|code","USD")
    CkXml::ckUpdateChildContent(xml,"requisition-self-approval-limit|amount","500.00")
    CkXml::ckUpdateChildContent(xml,"requisition-self-approval-limit|currency|code","USD")
    CkXml::ckUpdateChildContent(xml,"expenses-delegated-to","")
    CkXml::ckUpdateChildContent(xml,"can-expense-for","")
    CkXml::ckUpdateChildContent(xml,"content-groups","")
    CkXml::ckUpdateChildContent(xml,"account-groups","")
    CkXml::ckUpdateChildContent(xml,"approval-groups","")
    CkXml::ckUpdateChildContent(xml,"user-groups","")
    CkXml::ckUpdateChildContent(xml,"working-warehouses","")
    CkXml::ckUpdateChildContent(xml,"inventory-organizations","")

    ; 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/users?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 '<?xml version="1.0" encoding="UTF-8"?>
<user>
    <login>coupasam1</login>
    <email>coupasam1@coupa.com</email>
    <firstname>Coupa</firstname>
    <lastname>Sam 1</lastname>
    <fullname>Coupa Sam 1</fullname>
    <purchasing-user>true</purchasing-user>
    <expense-user>false</expense-user>
    <sourcing-user>false</sourcing-user>
    <inventory-user>false</inventory-user>
    <contracts-user>false</contracts-user>
    <analytics-user>false</analytics-user>
    <aic-user>false</aic-user>
    <spend-guard-user>false</spend-guard-user>
    <ccw-user>false</ccw-user>
    <clm-advanced-user>false</clm-advanced-user>
    <supply-chain-user>false</supply-chain-user>
    <risk-assess-user>false</risk-assess-user>
    <employee-number>123456789</employee-number>
    <active>true</active>
    <account-security-type>0</account-security-type>
    <authentication-method>saml</authentication-method>
    <sso-identifier>coupasam1@coupa.com</sso-identifier>
    <default-locale nil="true"/>
    <business-group-security-type>1</business-group-security-type>
    <edit-invoice-on-quick-entry>false</edit-invoice-on-quick-entry>
    <avatar-thumb-url nil="true"/>
    <mention-name>coupasam1</mention-name>
    <seniority-level nil="true"/>
    <business-function nil="true"/>
    <employee-payment-channel>ERP</employee-payment-channel>
    <allow-employee-payment-account-creation>false</allow-employee-payment-account-creation>
    <rank></rank>
    <default-cost-center></default-cost-center>
    <phone-work>
        <country-code>1</country-code>
        <area-code>650</area-code>
        <number>5856306</number>
        <extension nil="true"/>
    </phone-work>
    <roles>
        <role>
            <name>User</name>
        </role>
        <role>
            <name>Central Receiving</name>
        </role>
        <role>
            <name>Edit Requisition as Approver</name>
        </role>
        <role>
            <name>Dashboard</name>
        </role>
        <role>
            <name>Split Accounting</name>
        </role>
    </roles>
    <manager>
        <login>mjordan</login>
    </manager>
    <default-account>
        <code>SF-Finance-Indirect</code>
        <segment-1>SF</segment-1>
        <segment-2>Finance</segment-2>
        <segment-3>Indirect</segment-3>
        <account-type>
            <name>ERP 1</name>
            <currency>
                <code>USD</code>
            </currency>
        </account-type>
    </default-account>
    <default-account-type>
        <name>ERP 1</name>
        <currency>
            <code>USD</code>
        </currency>
    </default-account-type>
    <default-currency>
        <code>USD</code>
    </default-currency>
    <department>
        <name>Marketing</name>
    </department>
    <requisition-approval-limit>
        <amount>10000.00</amount>
        <currency>
            <code>USD</code>
        </currency>
    </requisition-approval-limit>
    <invoice-approval-limit>
        <amount>15000.00</amount>
        <currency>
            <code>USD</code>
        </currency>
    </invoice-approval-limit>
    <requisition-self-approval-limit>
        <amount>500.00</amount>
        <currency>
            <code>USD</code>
        </currency>
    </requisition-self-approval-limit>
    <expenses-delegated-to/>
    <can-expense-for/>
    <content-groups/>
    <account-groups/>
    <approval-groups/>
    <user-groups/>
    <working-warehouses/>
    <inventory-organizations/>
</user>'
https://domain.com/users?fields=["id"]

Postman Collection Item JSON

{
  "name": "Create A User",
  "request": {
    "method": "POST",
    "header": [
    ],
    "body": {
      "mode": "raw",
      "raw": "<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n<user>\n    <login>coupasam1</login>\n    <email>coupasam1@coupa.com</email>\n    <firstname>Coupa</firstname>\n    <lastname>Sam 1</lastname>\n    <fullname>Coupa Sam 1</fullname>\n    <purchasing-user>true</purchasing-user>\n    <expense-user>false</expense-user>\n    <sourcing-user>false</sourcing-user>\n    <inventory-user>false</inventory-user>\n    <contracts-user>false</contracts-user>\n    <analytics-user>false</analytics-user>\n    <aic-user>false</aic-user>\n    <spend-guard-user>false</spend-guard-user>\n    <ccw-user>false</ccw-user>\n    <clm-advanced-user>false</clm-advanced-user>\n    <supply-chain-user>false</supply-chain-user>\n    <risk-assess-user>false</risk-assess-user>\n    <employee-number>123456789</employee-number>\n    <active>true</active>\n    <account-security-type>0</account-security-type>\n    <authentication-method>saml</authentication-method>\n    <sso-identifier>coupasam1@coupa.com</sso-identifier>\n    <default-locale nil=\"true\"/>\n    <business-group-security-type>1</business-group-security-type>\n    <edit-invoice-on-quick-entry>false</edit-invoice-on-quick-entry>\n    <avatar-thumb-url nil=\"true\"/>\n    <mention-name>coupasam1</mention-name>\n    <seniority-level nil=\"true\"/>\n    <business-function nil=\"true\"/>\n    <employee-payment-channel>ERP</employee-payment-channel>\n    <allow-employee-payment-account-creation>false</allow-employee-payment-account-creation>\n    <rank></rank>\n    <default-cost-center></default-cost-center>\n    <phone-work>\n        <country-code>1</country-code>\n        <area-code>650</area-code>\n        <number>5856306</number>\n        <extension nil=\"true\"/>\n    </phone-work>\n    <roles>\n        <role>\n            <name>User</name>\n        </role>\n        <role>\n            <name>Central Receiving</name>\n        </role>\n        <role>\n            <name>Edit Requisition as Approver</name>\n        </role>\n        <role>\n            <name>Dashboard</name>\n        </role>\n        <role>\n            <name>Split Accounting</name>\n        </role>\n    </roles>\n    <manager>\n        <login>mjordan</login>\n    </manager>\n    <default-account>\n        <code>SF-Finance-Indirect</code>\n        <segment-1>SF</segment-1>\n        <segment-2>Finance</segment-2>\n        <segment-3>Indirect</segment-3>\n        <account-type>\n            <name>ERP 1</name>\n            <currency>\n                <code>USD</code>\n            </currency>\n        </account-type>\n    </default-account>\n    <default-account-type>\n        <name>ERP 1</name>\n        <currency>\n            <code>USD</code>\n        </currency>\n    </default-account-type>\n    <default-currency>\n        <code>USD</code>\n    </default-currency>\n    <department>\n        <name>Marketing</name>\n    </department>\n    <requisition-approval-limit>\n        <amount>10000.00</amount>\n        <currency>\n            <code>USD</code>\n        </currency>\n    </requisition-approval-limit>\n    <invoice-approval-limit>\n        <amount>15000.00</amount>\n        <currency>\n            <code>USD</code>\n        </currency>\n    </invoice-approval-limit>\n    <requisition-self-approval-limit>\n        <amount>500.00</amount>\n        <currency>\n            <code>USD</code>\n        </currency>\n    </requisition-self-approval-limit>\n    <expenses-delegated-to/>\n    <can-expense-for/>\n    <content-groups/>\n    <account-groups/>\n    <approval-groups/>\n    <user-groups/>\n    <working-warehouses/>\n    <inventory-organizations/>\n</user>",
      "options": {
        "raw": {
          "language": "xml"
        }
      }
    },
    "url": {
      "raw": "{{URL}}/users?fields=[\"id\"]",
      "host": [
        "{{URL}}"
      ],
      "path": [
        "users"
      ],
      "query": [
        {
          "key": "fields",
          "value": "[\"id\"]"
        }
      ]
    }
  },
  "response": [
  ]
}