Back to Collection Items
Use ChilkatAx-win32.pkg
Procedure Test
Handle hoHttp
Boolean iSuccess
Variant vJson
Handle hoJson
Variant vResp
Handle hoResp
String sTemp1
Integer iTemp1
Boolean bTemp1
// This example assumes the Chilkat API to have been previously unlocked.
// See Global Unlock Sample for sample code.
Get Create (RefClass(cComChilkatHttp)) To hoHttp
If (Not(IsComObjectCreated(hoHttp))) Begin
Send CreateComObject of hoHttp
End
// Use this online tool to generate code from sample JSON: Generate Code to Create JSON
// The following JSON is sent in the request body.
// {
// "blocks": {
// "blockInfo": [
// {
// "block": {
// "blockDetails": {
// "blockCode": "ORCLE0622",
// "blockName": "Oracle Conference 2022",
// "blockAliases": [
// ],
// "timeSpan": {
// "startDate": "2022-06-01",
// "endDate": "2022-06-02"
// },
// "shoulderDates": {},
// "blockStatus": {
// "bookingStatus": {
// "status": {
// "code": "TEN"
// }
// }
// },
// "reservationType": {
// "reservationType": "GRPGTD"
// },
// "marketCode": {
// "marketCode": "LEISURE"
// },
// "sourceOfSale": {
// "sourceCode": {
// "sourceCode": "WEB"
// }
// },
// "reservationMethod": {},
// "bookingType": {},
// "rateProtectionDetails": {
// "criteria": "None"
// },
// "nonCompeteDetails": {
// "criteria": "None"
// },
// "currencyCode": "USD",
// "blockClassification": "RegularBooking",
// "cateringOnlyBlock": false,
// "allowRateOverride": false,
// "manualCutOff": false,
// "wholesaleBlock": false,
// "controlBlockLocally": false
// },
// "blockOwners": {
// "owner": [
// {
// "ownership": "Block",
// "ownerCode": "ALL",
// "primary": true
// },
// {
// "ownership": "Catering",
// "ownerCode": "ALL",
// "primary": true
// },
// {
// "ownership": "Rooms",
// "ownerCode": "ALL",
// "primary": true
// }
// ],
// "lockBlockOwners": false,
// "lockRoomsOwners": false,
// "lockCateringOwners": false
// },
// "reservationDetails": {
// "ratePlanCode": [
// {
// "primary": true,
// "ratePlanCode": "BAR"
// }
// ],
// "traceCode": {},
// "breakfast": {
// "breakfastIncluded": false,
// "price": {
// "currencyCode": "USD"
// }
// },
// "porterage": {
// "porterageIncluded": false,
// "price": {
// "currencyCode": "USD"
// }
// },
// "elastic": "1",
// "suppressRate": false,
// "housing": true
// },
// "catering": {
// "cateringStatus": {
// "bookingStatus": {
// "status": {}
// }
// },
// "eventAttendees": {},
// "overrideEventsProcessingWarnings": true
// },
// "blockProfiles": {
// "fullOverlay": false
// },
// "blockPackages": [
// ],
// "externalAttributes": {
// "eventType": "Convention",
// "rollEndDate": false
// },
// "hotelId": "{{HotelId}}",
// "markAsRecentlyAccessed": true
// }
// }
// ]
// }
// }
Get Create (RefClass(cComChilkatJsonObject)) To hoJson
If (Not(IsComObjectCreated(hoJson))) Begin
Send CreateComObject of hoJson
End
Get ComUpdateString Of hoJson "blocks.blockInfo[0].block.blockDetails.blockCode" "ORCLE0622" To iSuccess
Get ComUpdateString Of hoJson "blocks.blockInfo[0].block.blockDetails.blockName" "Oracle Conference 2022" To iSuccess
Get ComUpdateNewArray Of hoJson "blocks.blockInfo[0].block.blockDetails.blockAliases" To iSuccess
Get ComUpdateString Of hoJson "blocks.blockInfo[0].block.blockDetails.timeSpan.startDate" "2022-06-01" To iSuccess
Get ComUpdateString Of hoJson "blocks.blockInfo[0].block.blockDetails.timeSpan.endDate" "2022-06-02" To iSuccess
Get ComUpdateNewObject Of hoJson "blocks.blockInfo[0].block.blockDetails.shoulderDates" To iSuccess
Get ComUpdateString Of hoJson "blocks.blockInfo[0].block.blockDetails.blockStatus.bookingStatus.status.code" "TEN" To iSuccess
Get ComUpdateString Of hoJson "blocks.blockInfo[0].block.blockDetails.reservationType.reservationType" "GRPGTD" To iSuccess
Get ComUpdateString Of hoJson "blocks.blockInfo[0].block.blockDetails.marketCode.marketCode" "LEISURE" To iSuccess
Get ComUpdateString Of hoJson "blocks.blockInfo[0].block.blockDetails.sourceOfSale.sourceCode.sourceCode" "WEB" To iSuccess
Get ComUpdateNewObject Of hoJson "blocks.blockInfo[0].block.blockDetails.reservationMethod" To iSuccess
Get ComUpdateNewObject Of hoJson "blocks.blockInfo[0].block.blockDetails.bookingType" To iSuccess
Get ComUpdateString Of hoJson "blocks.blockInfo[0].block.blockDetails.rateProtectionDetails.criteria" "None" To iSuccess
Get ComUpdateString Of hoJson "blocks.blockInfo[0].block.blockDetails.nonCompeteDetails.criteria" "None" To iSuccess
Get ComUpdateString Of hoJson "blocks.blockInfo[0].block.blockDetails.currencyCode" "USD" To iSuccess
Get ComUpdateString Of hoJson "blocks.blockInfo[0].block.blockDetails.blockClassification" "RegularBooking" To iSuccess
Get ComUpdateBool Of hoJson "blocks.blockInfo[0].block.blockDetails.cateringOnlyBlock" False To iSuccess
Get ComUpdateBool Of hoJson "blocks.blockInfo[0].block.blockDetails.allowRateOverride" False To iSuccess
Get ComUpdateBool Of hoJson "blocks.blockInfo[0].block.blockDetails.manualCutOff" False To iSuccess
Get ComUpdateBool Of hoJson "blocks.blockInfo[0].block.blockDetails.wholesaleBlock" False To iSuccess
Get ComUpdateBool Of hoJson "blocks.blockInfo[0].block.blockDetails.controlBlockLocally" False To iSuccess
Get ComUpdateString Of hoJson "blocks.blockInfo[0].block.blockOwners.owner[0].ownership" "Block" To iSuccess
Get ComUpdateString Of hoJson "blocks.blockInfo[0].block.blockOwners.owner[0].ownerCode" "ALL" To iSuccess
Get ComUpdateBool Of hoJson "blocks.blockInfo[0].block.blockOwners.owner[0].primary" True To iSuccess
Get ComUpdateString Of hoJson "blocks.blockInfo[0].block.blockOwners.owner[1].ownership" "Catering" To iSuccess
Get ComUpdateString Of hoJson "blocks.blockInfo[0].block.blockOwners.owner[1].ownerCode" "ALL" To iSuccess
Get ComUpdateBool Of hoJson "blocks.blockInfo[0].block.blockOwners.owner[1].primary" True To iSuccess
Get ComUpdateString Of hoJson "blocks.blockInfo[0].block.blockOwners.owner[2].ownership" "Rooms" To iSuccess
Get ComUpdateString Of hoJson "blocks.blockInfo[0].block.blockOwners.owner[2].ownerCode" "ALL" To iSuccess
Get ComUpdateBool Of hoJson "blocks.blockInfo[0].block.blockOwners.owner[2].primary" True To iSuccess
Get ComUpdateBool Of hoJson "blocks.blockInfo[0].block.blockOwners.lockBlockOwners" False To iSuccess
Get ComUpdateBool Of hoJson "blocks.blockInfo[0].block.blockOwners.lockRoomsOwners" False To iSuccess
Get ComUpdateBool Of hoJson "blocks.blockInfo[0].block.blockOwners.lockCateringOwners" False To iSuccess
Get ComUpdateBool Of hoJson "blocks.blockInfo[0].block.reservationDetails.ratePlanCode[0].primary" True To iSuccess
Get ComUpdateString Of hoJson "blocks.blockInfo[0].block.reservationDetails.ratePlanCode[0].ratePlanCode" "BAR" To iSuccess
Get ComUpdateNewObject Of hoJson "blocks.blockInfo[0].block.reservationDetails.traceCode" To iSuccess
Get ComUpdateBool Of hoJson "blocks.blockInfo[0].block.reservationDetails.breakfast.breakfastIncluded" False To iSuccess
Get ComUpdateString Of hoJson "blocks.blockInfo[0].block.reservationDetails.breakfast.price.currencyCode" "USD" To iSuccess
Get ComUpdateBool Of hoJson "blocks.blockInfo[0].block.reservationDetails.porterage.porterageIncluded" False To iSuccess
Get ComUpdateString Of hoJson "blocks.blockInfo[0].block.reservationDetails.porterage.price.currencyCode" "USD" To iSuccess
Get ComUpdateString Of hoJson "blocks.blockInfo[0].block.reservationDetails.elastic" "1" To iSuccess
Get ComUpdateBool Of hoJson "blocks.blockInfo[0].block.reservationDetails.suppressRate" False To iSuccess
Get ComUpdateBool Of hoJson "blocks.blockInfo[0].block.reservationDetails.housing" True To iSuccess
Get ComUpdateNewObject Of hoJson "blocks.blockInfo[0].block.catering.cateringStatus.bookingStatus.status" To iSuccess
Get ComUpdateNewObject Of hoJson "blocks.blockInfo[0].block.catering.eventAttendees" To iSuccess
Get ComUpdateBool Of hoJson "blocks.blockInfo[0].block.catering.overrideEventsProcessingWarnings" True To iSuccess
Get ComUpdateBool Of hoJson "blocks.blockInfo[0].block.blockProfiles.fullOverlay" False To iSuccess
Get ComUpdateNewArray Of hoJson "blocks.blockInfo[0].block.blockPackages" To iSuccess
Get ComUpdateString Of hoJson "blocks.blockInfo[0].block.externalAttributes.eventType" "Convention" To iSuccess
Get ComUpdateBool Of hoJson "blocks.blockInfo[0].block.externalAttributes.rollEndDate" False To iSuccess
Get ComUpdateString Of hoJson "blocks.blockInfo[0].block.hotelId" "{{HotelId}}" To iSuccess
Get ComUpdateBool Of hoJson "blocks.blockInfo[0].block.markAsRecentlyAccessed" True To iSuccess
Send ComSetRequestHeader To hoHttp "x-app-key" "{{AppKey}}"
Send ComSetRequestHeader To hoHttp "x-hotelid" "{{HotelId}}"
// Adds the "Authorization: Bearer <access_token>" header.
Set ComAuthToken Of hoHttp To "<access_token>"
Get pvComObject of hoJson to vJson
Get ComPostJson3 Of hoHttp "https://domain.com/blk/v0/hotels/{{HotelId}}/block" "application/json" vJson To vResp
If (IsComObject(vResp)) Begin
Get Create (RefClass(cComChilkatHttpResponse)) To hoResp
Set pvComObject Of hoResp To vResp
End
Get ComLastMethodSuccess Of hoHttp To bTemp1
If (bTemp1 = False) Begin
Get ComLastErrorText Of hoHttp To sTemp1
Showln sTemp1
Procedure_Return
End
Get ComStatusCode Of hoResp To iTemp1
Showln iTemp1
Get ComBodyStr Of hoResp To sTemp1
Showln sTemp1
Send Destroy of hoResp
End_Procedure
Curl Command
curl -X POST
-H "Authorization: Bearer <access_token>"
-H "x-hotelid: {{HotelId}}"
-H "x-app-key: {{AppKey}}"
-d '{
"blocks": {
"blockInfo": [
{
"block": {
"blockDetails": {
"blockCode": "ORCLE0622",
"blockName": "Oracle Conference 2022",
"blockAliases": [],
"timeSpan": {
"startDate": "2022-06-01",
"endDate": "2022-06-02"
},
"shoulderDates": {},
"blockStatus": {
"bookingStatus": {
"status": {
"code": "TEN"
}
}
},
"reservationType": {
"reservationType": "GRPGTD"
},
"marketCode": {
"marketCode": "LEISURE"
},
"sourceOfSale": {
"sourceCode": {
"sourceCode": "WEB"
}
},
"reservationMethod": {},
"bookingType": {},
"rateProtectionDetails": {
"criteria": "None"
},
"nonCompeteDetails": {
"criteria": "None"
},
"currencyCode": "USD",
"blockClassification": "RegularBooking",
"cateringOnlyBlock": false,
"allowRateOverride": false,
"manualCutOff": false,
"wholesaleBlock": false,
"controlBlockLocally": false
},
"blockOwners": {
"owner": [
{
"ownership": "Block",
"ownerCode": "ALL",
"primary": true
},
{
"ownership": "Catering",
"ownerCode": "ALL",
"primary": true
},
{
"ownership": "Rooms",
"ownerCode": "ALL",
"primary": true
}
],
"lockBlockOwners": false,
"lockRoomsOwners": false,
"lockCateringOwners": false
},
"reservationDetails": {
"ratePlanCode": [
{
"primary": true,
"ratePlanCode": "BAR"
}
],
"traceCode": {},
"breakfast": {
"breakfastIncluded": false,
"price": {
"currencyCode": "USD"
}
},
"porterage": {
"porterageIncluded": false,
"price": {
"currencyCode": "USD"
}
},
"elastic": "1",
"suppressRate": false,
"housing": true
},
"catering": {
"cateringStatus": {
"bookingStatus": {
"status": {}
}
},
"eventAttendees": {},
"overrideEventsProcessingWarnings": true
},
"blockProfiles": {
"fullOverlay": false
},
"blockPackages": [],
"externalAttributes": {
"eventType": "Convention",
"rollEndDate": false
},
"hotelId": "{{HotelId}}",
"markAsRecentlyAccessed": true
}
}
]
}
}'
https://domain.com/blk/v0/hotels/{{HotelId}}/block
Postman Collection Item JSON
{
"name": "Create a new Block",
"event": [
{
"listen": "test",
"script": {
"exec": [
"var data = pm.response.headers.get(\"Location\").split(\"/\").pop();\r",
"postman.setEnvironmentVariable(\"BlockId\", data);"
],
"type": "text/javascript"
}
}
],
"request": {
"auth": {
"type": "bearer",
"bearer": [
{
"key": "token",
"value": "{{Token}}",
"type": "string"
}
]
},
"method": "POST",
"header": [
{
"key": "x-hotelid",
"value": "{{HotelId}}"
},
{
"key": "x-app-key",
"value": "{{AppKey}}"
}
],
"body": {
"mode": "raw",
"raw": "{\r\n \"blocks\": {\r\n \"blockInfo\": [\r\n {\r\n \"block\": {\r\n \"blockDetails\": {\r\n \"blockCode\": \"ORCLE0622\",\r\n \"blockName\": \"Oracle Conference 2022\",\r\n \"blockAliases\": [],\r\n \"timeSpan\": {\r\n \"startDate\": \"2022-06-01\",\r\n \"endDate\": \"2022-06-02\"\r\n },\r\n \"shoulderDates\": {},\r\n \"blockStatus\": {\r\n \"bookingStatus\": {\r\n \"status\": {\r\n \"code\": \"TEN\"\r\n }\r\n }\r\n },\r\n \"reservationType\": {\r\n \"reservationType\": \"GRPGTD\"\r\n },\r\n \"marketCode\": {\r\n \"marketCode\": \"LEISURE\"\r\n },\r\n \"sourceOfSale\": {\r\n \"sourceCode\": {\r\n \"sourceCode\": \"WEB\"\r\n }\r\n },\r\n \"reservationMethod\": {},\r\n \"bookingType\": {},\r\n \"rateProtectionDetails\": {\r\n \"criteria\": \"None\"\r\n },\r\n \"nonCompeteDetails\": {\r\n \"criteria\": \"None\"\r\n },\r\n \"currencyCode\": \"USD\",\r\n \"blockClassification\": \"RegularBooking\",\r\n \"cateringOnlyBlock\": false,\r\n \"allowRateOverride\": false,\r\n \"manualCutOff\": false,\r\n \"wholesaleBlock\": false,\r\n \"controlBlockLocally\": false\r\n },\r\n \"blockOwners\": {\r\n \"owner\": [\r\n {\r\n \"ownership\": \"Block\",\r\n \"ownerCode\": \"ALL\",\r\n \"primary\": true\r\n },\r\n {\r\n \"ownership\": \"Catering\",\r\n \"ownerCode\": \"ALL\",\r\n \"primary\": true\r\n },\r\n {\r\n \"ownership\": \"Rooms\",\r\n \"ownerCode\": \"ALL\",\r\n \"primary\": true\r\n }\r\n ],\r\n \"lockBlockOwners\": false,\r\n \"lockRoomsOwners\": false,\r\n \"lockCateringOwners\": false\r\n },\r\n \"reservationDetails\": {\r\n \"ratePlanCode\": [\r\n {\r\n \"primary\": true,\r\n \"ratePlanCode\": \"BAR\"\r\n }\r\n ],\r\n \"traceCode\": {},\r\n \"breakfast\": {\r\n \"breakfastIncluded\": false,\r\n \"price\": {\r\n \"currencyCode\": \"USD\"\r\n }\r\n },\r\n \"porterage\": {\r\n \"porterageIncluded\": false,\r\n \"price\": {\r\n \"currencyCode\": \"USD\"\r\n }\r\n },\r\n \"elastic\": \"1\",\r\n \"suppressRate\": false,\r\n \"housing\": true\r\n },\r\n \"catering\": {\r\n \"cateringStatus\": {\r\n \"bookingStatus\": {\r\n \"status\": {}\r\n }\r\n },\r\n \"eventAttendees\": {},\r\n \"overrideEventsProcessingWarnings\": true\r\n },\r\n \"blockProfiles\": {\r\n \"fullOverlay\": false\r\n },\r\n \"blockPackages\": [],\r\n \"externalAttributes\": {\r\n \"eventType\": \"Convention\",\r\n \"rollEndDate\": false\r\n },\r\n \"hotelId\": \"{{HotelId}}\",\r\n \"markAsRecentlyAccessed\": true\r\n }\r\n }\r\n ]\r\n }\r\n}",
"options": {
"raw": {
"language": "json"
}
}
},
"url": {
"raw": "{{HostName}}/blk/v0/hotels/{{HotelId}}/block",
"host": [
"{{HostName}}"
],
"path": [
"blk",
"v0",
"hotels",
"{{HotelId}}",
"block"
]
}
},
"response": [
]
}
