Back to Collection Items
Dim fso, outFile
Set fso = CreateObject("Scripting.FileSystemObject")
'Create a Unicode (utf-16) output text file.
Set outFile = fso.CreateTextFile("output.txt", True, True)
' This example assumes the Chilkat API to have been previously unlocked.
' See Global Unlock Sample for sample code.
' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.Http")
set http = CreateObject("Chilkat.Http")
' Use this online tool to generate code from sample JSON: Generate Code to Create JSON
' The following JSON is sent in the request body.
' {
' "upsellRules": [
' {
' "description": "New Rule Description",
' "upsellByRoomType": true,
' "fromRoomTypeOrFromRoomClass": "STDK",
' "toRoomTypeOrToRoomClass": "SUPK",
' "startDate": "2022-03-03",
' "endDate": "2023-12-31",
' "rateCodes": [
' "BARBB",
' "BAR"
' ],
' "marketCodes": [
' ],
' "upsellByOccupancyLevels": false,
' "formula": "FlatAmountAddedToOriginalRate",
' "upsellAmount": "5",
' "currencyCode": "USD",
' "roundingRule": "Down",
' "occupancyLevelsType": [
' ],
' "useDefaultTrxCode": true,
' "transactionCode": {
' "description": "Room Upsell",
' "transactionCode": "1500",
' "hotelId": "{{HotelId}}"
' },
' "hotelId": "{{HotelId}}",
' "upsellRuleCode": "UPSELLRULECODE1"
' }
' ]
' }
' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.JsonObject")
set json = CreateObject("Chilkat.JsonObject")
success = json.UpdateString("upsellRules[0].description","New Rule Description")
success = json.UpdateBool("upsellRules[0].upsellByRoomType",1)
success = json.UpdateString("upsellRules[0].fromRoomTypeOrFromRoomClass","STDK")
success = json.UpdateString("upsellRules[0].toRoomTypeOrToRoomClass","SUPK")
success = json.UpdateString("upsellRules[0].startDate","2022-03-03")
success = json.UpdateString("upsellRules[0].endDate","2023-12-31")
success = json.UpdateString("upsellRules[0].rateCodes[0]","BARBB")
success = json.UpdateString("upsellRules[0].rateCodes[1]","BAR")
success = json.UpdateNewArray("upsellRules[0].marketCodes")
success = json.UpdateBool("upsellRules[0].upsellByOccupancyLevels",0)
success = json.UpdateString("upsellRules[0].formula","FlatAmountAddedToOriginalRate")
success = json.UpdateString("upsellRules[0].upsellAmount","5")
success = json.UpdateString("upsellRules[0].currencyCode","USD")
success = json.UpdateString("upsellRules[0].roundingRule","Down")
success = json.UpdateNewArray("upsellRules[0].occupancyLevelsType")
success = json.UpdateBool("upsellRules[0].useDefaultTrxCode",1)
success = json.UpdateString("upsellRules[0].transactionCode.description","Room Upsell")
success = json.UpdateString("upsellRules[0].transactionCode.transactionCode","1500")
success = json.UpdateString("upsellRules[0].transactionCode.hotelId","{{HotelId}}")
success = json.UpdateString("upsellRules[0].hotelId","{{HotelId}}")
success = json.UpdateString("upsellRules[0].upsellRuleCode","UPSELLRULECODE1")
http.SetRequestHeader "Content-Type","application/json"
http.SetRequestHeader "x-hotelid","{{HotelId}}"
' Adds the "Authorization: Bearer <access_token>" header.
http.AuthToken = "<access_token>"
http.SetRequestHeader "x-app-key","{{AppKey}}"
' resp is a Chilkat.HttpResponse
Set resp = http.PostJson3("https://domain.com/rsv/config/v0/hotels/{{HotelId}}/upsellRules","application/json",json)
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>"
-H "Content-Type: application/json"
-H "x-hotelid: {{HotelId}}"
-H "x-app-key: {{AppKey}}"
-d '{
"upsellRules": [
{
"description": "New Rule Description",
"upsellByRoomType": true,
"fromRoomTypeOrFromRoomClass": "STDK",
"toRoomTypeOrToRoomClass": "SUPK",
"startDate": "2022-03-03",
"endDate": "2023-12-31",
"rateCodes": [
"BARBB",
"BAR"
],
"marketCodes": [],
"upsellByOccupancyLevels": false,
"formula": "FlatAmountAddedToOriginalRate",
"upsellAmount": "5",
"currencyCode": "USD",
"roundingRule": "Down",
"occupancyLevelsType": [],
"useDefaultTrxCode": true,
"transactionCode": {
"description": "Room Upsell",
"transactionCode": "1500",
"hotelId": "{{HotelId}}"
},
"hotelId": "{{HotelId}}",
"upsellRuleCode": "UPSELLRULECODE1"
}
]
}'
https://domain.com/rsv/config/v0/hotels/{{HotelId}}/upsellRules
Postman Collection Item JSON
{
"name": "Create a new upsell rule",
"request": {
"auth": {
"type": "bearer",
"bearer": [
{
"key": "token",
"value": "{{Token}}",
"type": "string"
}
]
},
"method": "POST",
"header": [
{
"key": "Content-Type",
"name": "Content-Type",
"type": "text",
"value": "application/json"
},
{
"key": "x-hotelid",
"type": "text",
"value": "{{HotelId}}"
},
{
"key": "x-app-key",
"type": "text",
"value": "{{AppKey}}"
}
],
"body": {
"mode": "raw",
"raw": "{\r\n \"upsellRules\": [\r\n {\r\n \"description\": \"New Rule Description\",\r\n \"upsellByRoomType\": true,\r\n \"fromRoomTypeOrFromRoomClass\": \"STDK\",\r\n \"toRoomTypeOrToRoomClass\": \"SUPK\",\r\n \"startDate\": \"2022-03-03\",\r\n \"endDate\": \"2023-12-31\",\r\n \"rateCodes\": [\r\n \"BARBB\",\r\n \"BAR\"\r\n ],\r\n \"marketCodes\": [],\r\n \"upsellByOccupancyLevels\": false,\r\n \"formula\": \"FlatAmountAddedToOriginalRate\",\r\n \"upsellAmount\": \"5\",\r\n \"currencyCode\": \"USD\",\r\n \"roundingRule\": \"Down\",\r\n \"occupancyLevelsType\": [],\r\n \"useDefaultTrxCode\": true,\r\n \"transactionCode\": {\r\n \"description\": \"Room Upsell\",\r\n \"transactionCode\": \"1500\",\r\n \"hotelId\": \"{{HotelId}}\"\r\n },\r\n \"hotelId\": \"{{HotelId}}\",\r\n \"upsellRuleCode\": \"UPSELLRULECODE1\"\r\n }\r\n ]\r\n}",
"options": {
"raw": {
"language": "json"
}
}
},
"url": {
"raw": "{{HostName}}/rsv/config/v0/hotels/{{HotelId}}/upsellRules",
"host": [
"{{HostName}}"
],
"path": [
"rsv",
"config",
"v0",
"hotels",
"{{HotelId}}",
"upsellRules"
]
}
},
"response": [
]
}