Chilkat HOME .NET Core C# Android™ AutoIt C C# C++ Chilkat2-Python CkPython Classic ASP DataFlex Delphi ActiveX Delphi DLL Go Java Lianja Mono C# Node.js Objective-C PHP ActiveX PHP Extension Perl PowerBuilder PowerShell PureBasic Ruby SQL Server Swift 2 Swift 3,4,5... Tcl Unicode C Unicode C++ VB.NET VBScript Visual Basic 6.0 Visual FoxPro Xojo Plugin
(DataFlex) GeoOp - Get all JobsGets all information about all jobs.
Use ChilkatAx-win32.pkg Procedure Test Token Handle hoJsonToken Boolean iSuccess Variant vOauth2 Handle hoOauth2 Handle hoRest Boolean iBAutoReconnect String sResponseBody Handle hoJson Handle hoDtime Boolean iBLocalTime Variant vDt Handle hoDt Integer iNumRecords Integer i String sTemp1 Integer iTemp1 Integer iTemp2 Integer iTemp3 Integer iTemp4 Integer iTemp5 Boolean bTemp1 // This example assumes the Chilkat API to have been previously unlocked. // See Global Unlock Sample for sample code. // This example also assumes an OAuth2 access token was previously fetched. // and saved in a JSON file. // First get our previously obtained access token. // {"access_token":"e6dqdG....mzjpT04w==","token_type":"Bearer","expires_in":2592000,"owner_id":999236} Get Create (RefClass(cComChilkatJsonObject)) To hoJsonToken If (Not(IsComObjectCreated(hoJsonToken))) Begin Send CreateComObject of hoJsonToken End Get ComLoadFile Of hoJsonToken "qa_data/tokens/geoop.json" To iSuccess // This example assumes we previously obtained an access token Get Create (RefClass(cComChilkatOAuth2)) To hoOauth2 If (Not(IsComObjectCreated(hoOauth2))) Begin Send CreateComObject of hoOauth2 End Get ComStringOf Of hoJsonToken "access_token" To sTemp1 Set ComAccessToken Of hoOauth2 To sTemp1 Get Create (RefClass(cComChilkatRest)) To hoRest If (Not(IsComObjectCreated(hoRest))) Begin Send CreateComObject of hoRest End // Connect to GeoOp and send the following GET request: // GET /users HTTP/1.1 // Host: api.geoop.com Move True To iBAutoReconnect Get ComConnect Of hoRest "api.geoop.com" 443 True iBAutoReconnect To iSuccess If (iSuccess <> True) Begin Get ComLastErrorText Of hoRest To sTemp1 Showln sTemp1 Procedure_Return End // Provide the authentication credentials (i.e. the access token) Get pvComObject of hoOauth2 to vOauth2 Get ComSetAuthOAuth2 Of hoRest vOauth2 To iSuccess // Set the X-Version header. Get ComAddHeader Of hoRest "X-Version" "1.0" To iSuccess Get ComFullRequestNoBody Of hoRest "GET" "/jobs" To sResponseBody Get ComLastMethodSuccess Of hoRest To bTemp1 If (bTemp1 <> True) Begin Get ComLastErrorText Of hoRest To sTemp1 Showln sTemp1 Procedure_Return End Get Create (RefClass(cComChilkatJsonObject)) To hoJson If (Not(IsComObjectCreated(hoJson))) Begin Send CreateComObject of hoJson End Set ComEmitCompact Of hoJson To False // If the response status code did not indicate success, then see what happened.. Get ComResponseStatusCode Of hoRest To iTemp1 If (iTemp1 <> 200) Begin Showln "Request Header: " Get ComLastRequestHeader Of hoRest To sTemp1 Showln sTemp1 Showln "----" Get ComResponseStatusCode Of hoRest To iTemp1 Showln "Response StatusCode = " iTemp1 Get ComResponseStatusText Of hoRest To sTemp1 Showln "Response StatusLine: " sTemp1 Showln "Response Header:" Get ComResponseHeader Of hoRest To sTemp1 Showln sTemp1 Get ComLoad Of hoJson sResponseBody To iSuccess Get ComEmit Of hoJson To sTemp1 Showln sTemp1 Procedure_Return End Get ComLoad Of hoJson sResponseBody To iSuccess // Show the full JSON response.. (see below) Get ComEmit Of hoJson To sTemp1 Showln sTemp1 // These will be used for parsing date/time strings.. Get Create (RefClass(cComCkDateTime)) To hoDtime If (Not(IsComObjectCreated(hoDtime))) Begin Send CreateComObject of hoDtime End Move True To iBLocalTime // Iterate over each job and get information.. Get ComSizeOfArray Of hoJson "jobs" To iNumRecords Move 0 To i While (i < iNumRecords) Set ComI Of hoJson To i Get ComStringOf Of hoJson "jobs[i].id" To sTemp1 Showln "job id: " sTemp1 Get ComStringOf Of hoJson "jobs[i].client.id" To sTemp1 Showln "client id: " sTemp1 Get ComStringOf Of hoJson "jobs[i].account.id" To sTemp1 Showln "account id: " sTemp1 Get ComStringOf Of hoJson "jobs[i].address.line1" To sTemp1 Showln "address line1: " sTemp1 Get ComStringOf Of hoJson "jobs[i].startTime" To sTemp1 Get ComSetFromTimestamp Of hoDtime sTemp1 To iSuccess Get ComGetDtObj Of hoDtime iBLocalTime To vDt If (IsComObject(vDt)) Begin Get Create (RefClass(cComChilkatDtObj)) To hoDt Set pvComObject Of hoDt To vDt End Get ComMonth Of hoDt To iTemp1 Get ComDay Of hoDt To iTemp2 Get ComYear Of hoDt To iTemp3 Get ComHour Of hoDt To iTemp4 Get ComMinute Of hoDt To iTemp5 Showln "created: " iTemp1 "/" iTemp2 "/" iTemp3 " " iTemp4 ":" iTemp5 Send Destroy of hoDt Showln "----" Move (i + 1) To i Loop // A sample jobs listing response: // // { // "result": "success", // "jobs": [ // { // "id": 17580761, // "reference": "1000", // "startTime": "2016-10-26T02:10:00+00:00", // "endTime": "2016-10-28T02:40:00+00:00", // "priority": 2, // "title": "[ Demo Job ]", // "description": "", // "jobNumber": null, // "deleted": false, // "type": "demo", // "created": "2015-09-03T02:11:32+00:00", // "modified": "2016-10-26T12:05:09+00:00", // "client": { // "id": 9555868 // }, // "billingClient": null, // "status": { // "id": 675900 // }, // "account": { // "id": 39409 // }, // "address": { // "line1": "21462 New York Avenue NW", // "line2": null, // "city": "Washington", // "postcode": "20005", // "latitude": 38.903959, // "longitude": -77.02137 // }, // "metadata": { // "visitsCount": 3, // "assignedVisitsCount": 3, // "unassignedVisitsCount": 0, // "partsCount": 1, // "chargesCount": 1, // "timersCount": 0, // "notesCount": 0, // "parcelsCount": 0, // "paymentsCount": 0, // "documentsCount": 1 // } // }, // { // "id": 17639295, // "reference": "1000", // "startTime": "2016-10-31T12:00:00+00:00", // "endTime": "2016-10-31T12:30:00+00:00", // "priority": 2, // "title": "Deliver Donuts", // "description": "Deliver donuts to the cafe.", // "jobNumber": "21122", // "deleted": false, // "type": "normal", // "created": "2016-10-31T12:07:14+00:00", // "modified": "2016-10-31T12:07:14+00:00", // "client": { // "id": 9555868 // }, // "billingClient": null, // "status": { // "id": 675900 // }, // "account": { // "id": 39409 // }, // "address": { // "line1": "1732 Pennsylvania Avenue NW", // "line2": null, // "city": "Washington", // "postcode": "20006", // "latitude": 38.8990534, // "longitude": -77.0401866 // }, // "metadata": { // "visitsCount": 1, // "assignedVisitsCount": 0, // "unassignedVisitsCount": 1, // "partsCount": 0, // "chargesCount": 0, // "timersCount": 0, // "notesCount": 0, // "parcelsCount": 0, // "paymentsCount": 0, // "documentsCount": 0 // } // } // ], // "metadata": { // "page": 1, // "pagesCount": 1, // "recordsPerPage": 20, // "recordsCount": 2 // } // } // End_Procedure |
© 2000-2024 Chilkat Software, Inc. All Rights Reserved.