|
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
(PowerBuilder) PayPal - Show Payment DetailsShows details for a payment by ID. Note: This example requires Chilkat v9.5.0.65 or greater.
integer li_rc oleobject loo_JsonToken oleobject loo_SbAuth oleobject loo_Rest integer li_BAutoReconnect integer li_Success oleobject loo_SbPath integer li_NumReplaced oleobject loo_SbJsonResponse oleobject loo_Json oleobject loo_DateTime oleobject loo_DtUtc // Note: Requires Chilkat v9.5.0.65 or greater. // This requires the Chilkat API to have been previously unlocked. // See Global Unlock Sample for sample code. // Load our previously obtained access token. (see PayPal OAuth2 Access Token) loo_JsonToken = create oleobject // Use "Chilkat_9_5_0.JsonObject" for versions of Chilkat < 10.0.0 li_rc = loo_JsonToken.ConnectToNewObject("Chilkat.JsonObject") if li_rc < 0 then destroy loo_JsonToken MessageBox("Error","Connecting to COM object failed") return end if loo_JsonToken.LoadFile("qa_data/tokens/paypal.json") // Build the Authorization request header field value. loo_SbAuth = create oleobject // Use "Chilkat_9_5_0.StringBuilder" for versions of Chilkat < 10.0.0 li_rc = loo_SbAuth.ConnectToNewObject("Chilkat.StringBuilder") // token_type should be "Bearer" loo_SbAuth.Append(loo_JsonToken.StringOf("token_type")) loo_SbAuth.Append(" ") loo_SbAuth.Append(loo_JsonToken.StringOf("access_token")) // Make the initial connection. // A single REST object, once connected, can be used for many PayPal REST API calls. // The auto-reconnect indicates that if the already-established HTTPS connection is closed, // then it will be automatically re-established as needed. loo_Rest = create oleobject // Use "Chilkat_9_5_0.Rest" for versions of Chilkat < 10.0.0 li_rc = loo_Rest.ConnectToNewObject("Chilkat.Rest") li_BAutoReconnect = 1 li_Success = loo_Rest.Connect("api.sandbox.paypal.com",443,1,li_BAutoReconnect) if li_Success <> 1 then Write-Debug loo_Rest.LastErrorText destroy loo_JsonToken destroy loo_SbAuth destroy loo_Rest return end if // ---------------------------------------------------------------------------------------------- // The code above this comment could be placed inside a function/subroutine within the application // because the connection does not need to be made for every request. Once the connection is made // the app may send many requests.. // ---------------------------------------------------------------------------------------------- // Clear the REST object of any headers or query params from previous requests. loo_Rest.ClearAllHeaders() loo_Rest.ClearAllQueryParams() loo_Rest.AddHeader("Authorization",loo_SbAuth.GetAsString()) // The payment ID is added to the path. loo_SbPath = create oleobject // Use "Chilkat_9_5_0.StringBuilder" for versions of Chilkat < 10.0.0 li_rc = loo_SbPath.ConnectToNewObject("Chilkat.StringBuilder") loo_SbPath.Append("/v1/payments/payment/payment_id") li_NumReplaced = loo_SbPath.Replace("payment_id","PAY-62106714J93631829LA44NWI") // Send the GET request and get the JSON response. loo_SbJsonResponse = create oleobject // Use "Chilkat_9_5_0.StringBuilder" for versions of Chilkat < 10.0.0 li_rc = loo_SbJsonResponse.ConnectToNewObject("Chilkat.StringBuilder") li_Success = loo_Rest.FullRequestNoBodySb("GET",loo_SbPath.GetAsString(),loo_SbJsonResponse) if li_Success <> 1 then Write-Debug loo_Rest.LastErrorText destroy loo_JsonToken destroy loo_SbAuth destroy loo_Rest destroy loo_SbPath destroy loo_SbJsonResponse return end if loo_Json = create oleobject // Use "Chilkat_9_5_0.JsonObject" for versions of Chilkat < 10.0.0 li_rc = loo_Json.ConnectToNewObject("Chilkat.JsonObject") loo_Json.EmitCompact = 0 loo_Json.LoadSb(loo_SbJsonResponse) Write-Debug "Response Status Code = " + string(loo_Rest.ResponseStatusCode) // Did we get a 200 success response? if loo_Rest.ResponseStatusCode <> 200 then Write-Debug loo_Json.Emit() Write-Debug "Failed." destroy loo_JsonToken destroy loo_SbAuth destroy loo_Rest destroy loo_SbPath destroy loo_SbJsonResponse destroy loo_Json return end if // Sample JSON response is shown below. Write-Debug loo_Json.Emit() Write-Debug "----------------------" // Show how to get a timestamp, such as update_time. loo_DateTime = create oleobject // Use "Chilkat_9_5_0.CkDateTime" for versions of Chilkat < 10.0.0 li_rc = loo_DateTime.ConnectToNewObject("Chilkat.CkDateTime") li_Success = loo_DateTime.SetFromTimestamp(loo_Json.StringOf("update_time")) Write-Debug "utc update_time: " + loo_DateTime.GetAsTimestamp(0) Write-Debug "local update_time: " + loo_DateTime.GetAsTimestamp(1) Write-Debug "utc rfc822: " + loo_DateTime.GetAsRfc822(0) Write-Debug "local rfc822: " + loo_DateTime.GetAsRfc822(1) loo_DtUtc = loo_DateTime.GetDtObj(0) Write-Debug string(loo_DtUtc.Month) + "/" + string(loo_DtUtc.Day) + "/" + string(loo_DtUtc.Year) destroy loo_DtUtc Write-Debug "success" // ------------------------------------------------ // A sample JSON response: // { // "id": "PAY-2CY489250W145633HLA3DK3Y", // "create_time": "2016-11-24T00:33:51Z", // "update_time": "2016-11-24T00:40:54Z", // "state": "approved", // "intent": "authorize", // "payer": { // "payment_method": "credit_card", // "funding_instruments": [ // { // "credit_card_token": { // "credit_card_id": "CARD-52W84623JH8043102LA3CLGA", // "payer_id": "user12345", // "last4": "9974", // "type": "visa", // "expire_month": "9", // "expire_year": "2021" // } // } // ] // }, // "transactions": [ // { // "amount": { // "total": "6.70", // "currency": "USD", // "details": { // "subtotal": "6.70" // } // }, // "description": "This is the payment transaction description.", // "related_resources": [ // { // "authorization": { // "id": "7X8332687A4929542", // "create_time": "2016-11-24T00:33:51Z", // "update_time": "2016-11-24T00:33:58Z", // "amount": { // "total": "6.70", // "currency": "USD", // "details": { // "subtotal": "6.70" // } // }, // "state": "captured", // "parent_payment": "PAY-2CY489250W145633HLA3DK3Y", // "valid_until": "2016-12-23T00:33:51Z", // "links": [ // { // "href": "https://api.sandbox.paypal.com/v1/payments/authorization/7X8332687A4929542", // "rel": "self", // "method": "GET" // }, // { // "href": "https://api.sandbox.paypal.com/v1/payments/payment/PAY-2CY489250W145633HLA3DK3Y", // "rel": "parent_payment", // "method": "GET" // } // ] // } // }, // { // "capture": { // "id": "1LY5310469661362J", // "create_time": "2016-11-24T00:40:50Z", // "update_time": "2016-11-24T00:40:54Z", // "amount": { // "total": "4.54", // "currency": "USD" // }, // "state": "completed", // "parent_payment": "PAY-2CY489250W145633HLA3DK3Y", // "transaction_fee": { // "value": "0.43", // "currency": "USD" // }, // "links": [ // { // "href": "https://api.sandbox.paypal.com/v1/payments/capture/1LY5310469661362J", // "rel": "self", // "method": "GET" // }, // { // "href": "https://api.sandbox.paypal.com/v1/payments/capture/1LY5310469661362J/refund", // "rel": "refund", // "method": "POST" // }, // { // "href": "https://api.sandbox.paypal.com/v1/payments/payment/PAY-2CY489250W145633HLA3DK3Y", // "rel": "parent_payment", // "method": "GET" // } // ] // } // } // ] // } // ], // "links": [ // { // "href": "https://api.sandbox.paypal.com/v1/payments/payment/PAY-2CY489250W145633HLA3DK3Y", // "rel": "self", // "method": "GET" // } // ] // } destroy loo_JsonToken destroy loo_SbAuth destroy loo_Rest destroy loo_SbPath destroy loo_SbJsonResponse destroy loo_Json destroy loo_DateTime |
||||
© 2000-2024 Chilkat Software, Inc. All Rights Reserved.