Back to Collection Items
Dim fso, outFile
Set fso = CreateObject("Scripting.FileSystemObject")
Set outFile = fso.CreateTextFile("output.txt", True)
' This example assumes the Chilkat API to have been previously unlocked.
' See Global Unlock Sample for sample code.
set http = 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-information>
' <supplier-id>:id</supplier-id>
' <status>approved</status>
' <name>SIM Company</name>
' <exported>true</exported>
' <supplier-information-addresses>
' <supplier-information-address>
' <kind>RTA</kind>
' <location-code>001</location-code>
' <street-address>59 Bank Avenue</street-address>
' <postal-code>15200</postal-code>
' <city>Pittsburgh</city>
' <state-region>PA</state-region>
' <bank-name>Bank Inc.</bank-name>
' <bank-account-number>9999325</bank-account-number>
' <currency>
' <code>USD</code>
' </currency>
' </supplier-information-address>
' <supplier-information-address>
' <kind>RTA</kind>
' <location-code>002</location-code>
' <street-address>71 Sample Street</street-address>
' <postal-code>19100</postal-code>
' <city>Philadelphia</city>
' <state-region>PA</state-region>
' <bank-name>Cash Co.</bank-name>
' <bank-account-number>8888325</bank-account-number>
' <currency>
' <code>USD</code>
' </currency>
' </supplier-information-address>
' </supplier-information-addresses>
' </supplier-information>
'
set xml = CreateObject("Chilkat_9_5_0.Xml")
xml.Tag = "supplier-information"
xml.UpdateChildContent "supplier-id",":id"
xml.UpdateChildContent "status","approved"
xml.UpdateChildContent "name","SIM Company"
xml.UpdateChildContent "exported","true"
xml.UpdateChildContent "supplier-information-addresses|supplier-information-address|kind","RTA"
xml.UpdateChildContentInt "supplier-information-addresses|supplier-information-address|location-code",001
xml.UpdateChildContent "supplier-information-addresses|supplier-information-address|street-address","59 Bank Avenue"
xml.UpdateChildContentInt "supplier-information-addresses|supplier-information-address|postal-code",15200
xml.UpdateChildContent "supplier-information-addresses|supplier-information-address|city","Pittsburgh"
xml.UpdateChildContent "supplier-information-addresses|supplier-information-address|state-region","PA"
xml.UpdateChildContent "supplier-information-addresses|supplier-information-address|bank-name","Bank Inc."
xml.UpdateChildContentInt "supplier-information-addresses|supplier-information-address|bank-account-number",9999325
xml.UpdateChildContent "supplier-information-addresses|supplier-information-address|currency|code","USD"
xml.UpdateChildContent "supplier-information-addresses|supplier-information-address[1]|kind","RTA"
xml.UpdateChildContentInt "supplier-information-addresses|supplier-information-address[1]|location-code",002
xml.UpdateChildContent "supplier-information-addresses|supplier-information-address[1]|street-address","71 Sample Street"
xml.UpdateChildContentInt "supplier-information-addresses|supplier-information-address[1]|postal-code",19100
xml.UpdateChildContent "supplier-information-addresses|supplier-information-address[1]|city","Philadelphia"
xml.UpdateChildContent "supplier-information-addresses|supplier-information-address[1]|state-region","PA"
xml.UpdateChildContent "supplier-information-addresses|supplier-information-address[1]|bank-name","Cash Co."
xml.UpdateChildContentInt "supplier-information-addresses|supplier-information-address[1]|bank-account-number",8888325
xml.UpdateChildContent "supplier-information-addresses|supplier-information-address[1]|currency|code","USD"
' Adds the "Authorization: Bearer <access_token>" header.
http.AuthToken = "<access_token>"
set sbRequestBody = CreateObject("Chilkat_9_5_0.StringBuilder")
success = xml.GetXmlSb(sbRequestBody)
' resp is a Chilkat_9_5_0.HttpResponse
Set resp = http.PTextSb("POST","https://domain.com/supplier_information/",sbRequestBody,"utf-8","application/xml",0,0)
If (http.LastMethodSuccess = 0) Then
outFile.WriteLine(http.LastErrorText)
WScript.Quit
End If
outFile.WriteLine(resp.StatusCode)
outFile.WriteLine(resp.BodyStr)
outFile.Close
Curl Command
curl -X POST
-H "Authorization: Bearer <access_token>"
-d '<supplier-information>
<supplier-id>:id</supplier-id>
<status>approved</status>
<name>SIM Company</name>
<exported>true</exported>
<supplier-information-addresses>
<supplier-information-address>
<kind>RTA</kind>
<location-code>001</location-code>
<street-address>59 Bank Avenue</street-address>
<postal-code>15200</postal-code>
<city>Pittsburgh</city>
<state-region>PA</state-region>
<bank-name>Bank Inc.</bank-name>
<bank-account-number>9999325</bank-account-number>
<currency>
<code>USD</code>
</currency>
</supplier-information-address>
<supplier-information-address>
<kind>RTA</kind>
<location-code>002</location-code>
<street-address>71 Sample Street</street-address>
<postal-code>19100</postal-code>
<city>Philadelphia</city>
<state-region>PA</state-region>
<bank-name>Cash Co.</bank-name>
<bank-account-number>8888325</bank-account-number>
<currency>
<code>USD</code>
</currency>
</supplier-information-address>
</supplier-information-addresses>
</supplier-information>'
https://domain.com/supplier_information/
Postman Collection Item JSON
{
"name": "Create SIM Record against existing Supplier",
"request": {
"method": "POST",
"header": [
],
"body": {
"mode": "raw",
"raw": "<supplier-information>\n <supplier-id>:id</supplier-id>\n <status>approved</status>\n <name>SIM Company</name>\n <exported>true</exported>\n <supplier-information-addresses>\n <supplier-information-address>\n <kind>RTA</kind>\n <location-code>001</location-code>\n <street-address>59 Bank Avenue</street-address>\n <postal-code>15200</postal-code>\n <city>Pittsburgh</city>\n <state-region>PA</state-region>\n <bank-name>Bank Inc.</bank-name>\n <bank-account-number>9999325</bank-account-number>\n <currency>\n <code>USD</code>\n </currency>\n </supplier-information-address>\n <supplier-information-address>\n <kind>RTA</kind>\n <location-code>002</location-code>\n <street-address>71 Sample Street</street-address>\n <postal-code>19100</postal-code>\n <city>Philadelphia</city>\n <state-region>PA</state-region>\n <bank-name>Cash Co.</bank-name>\n <bank-account-number>8888325</bank-account-number>\n <currency>\n <code>USD</code>\n </currency>\n </supplier-information-address>\n </supplier-information-addresses>\n</supplier-information>",
"options": {
"raw": {
"language": "xml"
}
}
},
"url": {
"raw": "{{URL}}/supplier_information/",
"host": [
"{{URL}}"
],
"path": [
"supplier_information",
""
]
},
"description": "This API is used for creating shell SIM records before importing legacy Suppliers. Status of SIM will be \"approved\" and exported flag will be marked as true."
},
"response": [
]
}
