PureBasic / New FreshBooks / Create Single Project
Back to Collection Items
IncludeFile "CkJsonObject.pb"
IncludeFile "CkStringBuilder.pb"
IncludeFile "CkHttp.pb"
IncludeFile "CkHttpResponse.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 JSON: Generate Code to Create JSON
; The following JSON is sent in the request body.
; {
; "project": {
; "title": "Titikaka Hiking Guide",
; "client_id": 123,
; "project_type": "fixed_price",
; "fixed_price": "3000",
; "due_date": "2019-04-18",
; "services": [
; {
; "id": 123,
; "billable": true,
; "vis_state": 0
; },
; {
; "id": 123,
; "billable": true,
; "vis_state": 0
; },
; {
; "id": 123,
; "billable": true,
; "vis_state": 0
; },
; {
; "id": 123,
; "billable": true,
; "vis_state": 0
; }
; ]
; }
; }
json.i = CkJsonObject::ckCreate()
If json.i = 0
Debug "Failed to create object."
ProcedureReturn
EndIf
CkJsonObject::ckUpdateString(json,"project.title","Titikaka Hiking Guide")
CkJsonObject::ckUpdateInt(json,"project.client_id",123)
CkJsonObject::ckUpdateString(json,"project.project_type","fixed_price")
CkJsonObject::ckUpdateString(json,"project.fixed_price","3000")
CkJsonObject::ckUpdateString(json,"project.due_date","2019-04-18")
CkJsonObject::ckUpdateInt(json,"project.services[0].id",123)
CkJsonObject::ckUpdateBool(json,"project.services[0].billable",1)
CkJsonObject::ckUpdateInt(json,"project.services[0].vis_state",0)
CkJsonObject::ckUpdateInt(json,"project.services[1].id",123)
CkJsonObject::ckUpdateBool(json,"project.services[1].billable",1)
CkJsonObject::ckUpdateInt(json,"project.services[1].vis_state",0)
CkJsonObject::ckUpdateInt(json,"project.services[2].id",123)
CkJsonObject::ckUpdateBool(json,"project.services[2].billable",1)
CkJsonObject::ckUpdateInt(json,"project.services[2].vis_state",0)
CkJsonObject::ckUpdateInt(json,"project.services[3].id",123)
CkJsonObject::ckUpdateBool(json,"project.services[3].billable",1)
CkJsonObject::ckUpdateInt(json,"project.services[3].vis_state",0)
; Adds the "Authorization: Bearer <access_token>" header.
CkHttp::setCkAuthToken(http, "<access_token>")
CkHttp::ckSetRequestHeader(http,"Content-Type","application/json")
resp.i = CkHttp::ckPostJson3(http,"https://api.freshbooks.com/projects/business/{{businessId}}/projects","application/json",json)
If CkHttp::ckLastMethodSuccess(http) = 0
Debug CkHttp::ckLastErrorText(http)
CkHttp::ckDispose(http)
CkJsonObject::ckDispose(json)
ProcedureReturn
EndIf
sbResponseBody.i = CkStringBuilder::ckCreate()
If sbResponseBody.i = 0
Debug "Failed to create object."
ProcedureReturn
EndIf
CkHttpResponse::ckGetBodySb(resp,sbResponseBody)
jResp.i = CkJsonObject::ckCreate()
If jResp.i = 0
Debug "Failed to create object."
ProcedureReturn
EndIf
CkJsonObject::ckLoadSb(jResp,sbResponseBody)
CkJsonObject::setCkEmitCompact(jResp, 0)
Debug "Response Body:"
Debug CkJsonObject::ckEmit(jResp)
respStatusCode.i = CkHttpResponse::ckStatusCode(resp)
Debug "Response Status Code = " + Str(respStatusCode)
If respStatusCode >= 400
Debug "Response Header:"
Debug CkHttpResponse::ckHeader(resp)
Debug "Failed."
CkHttpResponse::ckDispose(resp)
CkHttp::ckDispose(http)
CkJsonObject::ckDispose(json)
CkStringBuilder::ckDispose(sbResponseBody)
CkJsonObject::ckDispose(jResp)
ProcedureReturn
EndIf
CkHttpResponse::ckDispose(resp)
; Sample JSON response:
; (Sample code for parsing the JSON response is shown below)
; {
; "project": {
; "id": 3018266,
; "title": "Titikaka Hiking Guide",
; "description": null,
; "due_date": "2019-04-18",
; "client_id": 31006,
; "internal": false,
; "budget": null,
; "fixed_price": "3000.00",
; "rate": null,
; "billing_method": null,
; "project_type": "fixed_price",
; "active": true,
; "complete": false,
; "sample": false,
; "created_at": "2019-05-08T20:06:55",
; "updated_at": "2019-05-08T20:06:55",
; "logged_duration": null,
; "services": [
; ],
; "billed_amount": "0.00",
; "billed_status": "unbilled",
; "retainer_id": null,
; "group": {
; "id": 5049390,
; "members": [
; {
; "id": 6578346,
; "identity_id": 37256,
; "role": "owner",
; "first_name": "Marshall",
; "last_name": "Johnston",
; "email": "api.freshbooks@freshbooks.com",
; "company": "Postman Sandbox",
; "active": true
; }
; ],
; "pending_invitations": null
; }
; }
; }
; Sample code for parsing the JSON response...
; Use this online tool to generate parsing code from sample JSON: Generate JSON Parsing Code
id.i
identity_id.i
role.s
first_name.s
last_name.s
email.s
company.s
active.i
Id.i = CkJsonObject::ckIntOf(jResp,"project.id")
Title.s = CkJsonObject::ckStringOf(jResp,"project.title")
Description.s = CkJsonObject::ckStringOf(jResp,"project.description")
Due_date.s = CkJsonObject::ckStringOf(jResp,"project.due_date")
Client_id.i = CkJsonObject::ckIntOf(jResp,"project.client_id")
Internal.i = CkJsonObject::ckBoolOf(jResp,"project.internal")
Budget.s = CkJsonObject::ckStringOf(jResp,"project.budget")
Fixed_price.s = CkJsonObject::ckStringOf(jResp,"project.fixed_price")
Rate.s = CkJsonObject::ckStringOf(jResp,"project.rate")
Billing_method.s = CkJsonObject::ckStringOf(jResp,"project.billing_method")
Project_type.s = CkJsonObject::ckStringOf(jResp,"project.project_type")
Active.i = CkJsonObject::ckBoolOf(jResp,"project.active")
Complete.i = CkJsonObject::ckBoolOf(jResp,"project.complete")
Sample.i = CkJsonObject::ckBoolOf(jResp,"project.sample")
Created_at.s = CkJsonObject::ckStringOf(jResp,"project.created_at")
Updated_at.s = CkJsonObject::ckStringOf(jResp,"project.updated_at")
Logged_duration.s = CkJsonObject::ckStringOf(jResp,"project.logged_duration")
Billed_amount.s = CkJsonObject::ckStringOf(jResp,"project.billed_amount")
Billed_status.s = CkJsonObject::ckStringOf(jResp,"project.billed_status")
Retainer_id.s = CkJsonObject::ckStringOf(jResp,"project.retainer_id")
GroupId.i = CkJsonObject::ckIntOf(jResp,"project.group.id")
Pending_invitations.s = CkJsonObject::ckStringOf(jResp,"project.group.pending_invitations")
i.i = 0
count_i.i = CkJsonObject::ckSizeOfArray(jResp,"project.services")
While i < count_i
CkJsonObject::setCkI(jResp, i)
i = i + 1
Wend
i = 0
count_i = CkJsonObject::ckSizeOfArray(jResp,"project.group.members")
While i < count_i
CkJsonObject::setCkI(jResp, i)
id = CkJsonObject::ckIntOf(jResp,"project.group.members[i].id")
identity_id = CkJsonObject::ckIntOf(jResp,"project.group.members[i].identity_id")
role = CkJsonObject::ckStringOf(jResp,"project.group.members[i].role")
first_name = CkJsonObject::ckStringOf(jResp,"project.group.members[i].first_name")
last_name = CkJsonObject::ckStringOf(jResp,"project.group.members[i].last_name")
email = CkJsonObject::ckStringOf(jResp,"project.group.members[i].email")
company = CkJsonObject::ckStringOf(jResp,"project.group.members[i].company")
active = CkJsonObject::ckBoolOf(jResp,"project.group.members[i].active")
i = i + 1
Wend
CkHttp::ckDispose(http)
CkJsonObject::ckDispose(json)
CkStringBuilder::ckDispose(sbResponseBody)
CkJsonObject::ckDispose(jResp)
ProcedureReturn
EndProcedure
Curl Command
curl -X POST
-H "Authorization: Bearer <access_token>"
-H "Content-Type: application/json"
-d '{
"project": {
"title": "Titikaka Hiking Guide",
"client_id": {{customerId}},
"project_type": "fixed_price",
"fixed_price": "3000",
"due_date": "2019-04-18",
"services":
[
{"id": {{serviceid}}, "billable": true, "vis_state": 0}, {"id": {{serviceid}},"billable": true, "vis_state": 0}, {"id": {{serviceid}}, "billable": true, "vis_state": 0}, {"id": {{serviceid}}, "billable": true, "vis_state": 0}
]
}
}'
https://api.freshbooks.com/projects/business/{{businessId}}/projects
Postman Collection Item JSON
{
"name": "Create Single Project",
"event": [
{
"listen": "test",
"script": {
"exec": [
"let jsonData = JSON.parse(responseBody);",
"pm.environment.set(\"projectId\", jsonData.project.id);",
""
],
"type": "text/javascript"
}
}
],
"request": {
"method": "POST",
"header": [
{
"key": "Content-Type",
"type": "text",
"value": "application/json"
}
],
"body": {
"mode": "raw",
"raw": "{\n \"project\": {\n \"title\": \"Titikaka Hiking Guide\",\n \"client_id\": {{customerId}},\n \"project_type\": \"fixed_price\",\n \"fixed_price\": \"3000\",\n \"due_date\": \"2019-04-18\",\n \"services\": \n [\n \t{\"id\": {{serviceid}}, \"billable\": true, \"vis_state\": 0}, {\"id\": {{serviceid}},\"billable\": true, \"vis_state\": 0}, {\"id\": {{serviceid}}, \"billable\": true, \"vis_state\": 0}, {\"id\": {{serviceid}}, \"billable\": true, \"vis_state\": 0}\n \t]\n }\n}"
},
"url": {
"raw": "https://api.freshbooks.com/projects/business/{{businessId}}/projects",
"protocol": "https",
"host": [
"api",
"freshbooks",
"com"
],
"path": [
"projects",
"business",
"{{businessId}}",
"projects"
]
}
},
"response": [
{
"name": "Create Single Project",
"originalRequest": {
"method": "POST",
"header": [
{
"key": "Content-Type",
"type": "text",
"value": "application/json"
}
],
"body": {
"mode": "raw",
"raw": "{\n \"project\": {\n \"title\": \"Titikaka Hiking Guide\",\n \"client_id\": {{customerId}},\n \"project_type\": \"fixed_price\",\n \"fixed_price\": \"3000\",\n \"due_date\": \"2019-04-18\"\n }\n}"
},
"url": {
"raw": "https://api.freshbooks.com/projects/business/{{businessId}}/projects",
"protocol": "https",
"host": [
"api",
"freshbooks",
"com"
],
"path": [
"projects",
"business",
"{{businessId}}",
"projects"
]
}
},
"status": "OK",
"code": 200,
"_postman_previewlanguage": "json",
"header": [
{
"key": "Server",
"value": "nginx"
},
{
"key": "Content-Type",
"value": "application/vnd.api+json"
},
{
"key": "X-Version",
"value": "1905.7.0"
},
{
"key": "X-NewRelic-App-Data",
"value": "PxQBWV5TCBABVllUBAQOU10TGhE1AwE2QgNWEVlbQFtcCxYnRA9QFg1ZWU4FDFZFVRYSBxlDUhULRERQBxVNEkINUgdbTEccQQBKDkQTUAdeRkUODAZbR0NGTVIbARlUVAcEB1VTVVoBUQhWAQsFBB9UDlQdQ1dSVVBSBFFRD1dVVldVAAIVSgJQWkAHOw=="
},
{
"key": "X-RateLimit-Limit",
"value": "20"
},
{
"key": "X-RateLimit-Remaining",
"value": "8"
},
{
"key": "X-RateLimit-Reset",
"value": "1557346076"
},
{
"key": "Retry-After",
"value": "60"
},
{
"key": "Access-Control-Allow-Origin",
"value": "*"
},
{
"key": "Expires",
"value": "Tue, 08 May 2018 20:06:55 GMT"
},
{
"key": "Cache-Control",
"value": "no-cache"
},
{
"key": "Via",
"value": "1.1 google"
},
{
"key": "Via",
"value": "1.1 varnish"
},
{
"key": "Content-Length",
"value": "759"
},
{
"key": "Accept-Ranges",
"value": "bytes"
},
{
"key": "Date",
"value": "Wed, 08 May 2019 20:06:55 GMT"
},
{
"key": "Connection",
"value": "keep-alive"
},
{
"key": "X-Served-By",
"value": "cache-mdw17361-MDW"
},
{
"key": "X-Cache",
"value": "MISS"
},
{
"key": "X-Cache-Hits",
"value": "0"
},
{
"key": "Country",
"value": "CA"
},
{
"key": "Strict-Transport-Security",
"value": "max-age=31536000; includeSubDomains; preload"
}
],
"cookie": [
],
"body": "{\n \"project\": {\n \"id\": 3018266,\n \"title\": \"Titikaka Hiking Guide\",\n \"description\": null,\n \"due_date\": \"2019-04-18\",\n \"client_id\": 31006,\n \"internal\": false,\n \"budget\": null,\n \"fixed_price\": \"3000.00\",\n \"rate\": null,\n \"billing_method\": null,\n \"project_type\": \"fixed_price\",\n \"active\": true,\n \"complete\": false,\n \"sample\": false,\n \"created_at\": \"2019-05-08T20:06:55\",\n \"updated_at\": \"2019-05-08T20:06:55\",\n \"logged_duration\": null,\n \"services\": [],\n \"billed_amount\": \"0.00\",\n \"billed_status\": \"unbilled\",\n \"retainer_id\": null,\n \"group\": {\n \"id\": 5049390,\n \"members\": [\n {\n \"id\": 6578346,\n \"identity_id\": 37256,\n \"role\": \"owner\",\n \"first_name\": \"Marshall\",\n \"last_name\": \"Johnston\",\n \"email\": \"api.freshbooks@freshbooks.com\",\n \"company\": \"Postman Sandbox\",\n \"active\": true\n }\n ],\n \"pending_invitations\": null\n }\n }\n}"
}
]
}