Delphi ActiveX Stripe: Retrieve a Dispute

Back to Index

Retrieves the dispute with the given ID.

Documentation: https://stripe.com/docs/api/curl#retrieve_dispute

CURL Command

curl https://api.stripe.com/v1/disputes/dp_1BnETJGswQrCoh0Xefx4zP2a \
   -u STRIPE_SECRET_KEY:

Delphi ActiveX Example

var
rest: TChilkatRest;
success: Integer;
bTls: Integer;
port: Integer;
bAutoReconnect: Integer;
sbResponseBody: TChilkatStringBuilder;
jsonResponse: TChilkatJsonObject;
id: WideString;
object: WideString;
amount: Integer;
balance_transaction: WideString;
charge: WideString;
created: Integer;
currency: WideString;
evidenceAccess_activity_log: Integer;
evidenceBilling_address: Integer;
evidenceCancellation_policy: Integer;
evidenceCancellation_policy_disclosure: Integer;
evidenceCancellation_rebuttal: Integer;
evidenceCustomer_communication: Integer;
evidenceCustomer_email_address: Integer;
evidenceCustomer_name: Integer;
evidenceCustomer_purchase_ip: Integer;
evidenceCustomer_signature: Integer;
evidenceDuplicate_charge_documentation: Integer;
evidenceDuplicate_charge_explanation: Integer;
evidenceDuplicate_charge_id: Integer;
evidenceProduct_description: Integer;
evidenceReceipt: Integer;
evidenceRefund_policy: Integer;
evidenceRefund_policy_disclosure: Integer;
evidenceRefund_refusal_explanation: Integer;
evidenceService_date: Integer;
evidenceService_documentation: Integer;
evidenceShipping_address: Integer;
evidenceShipping_carrier: Integer;
evidenceShipping_date: Integer;
evidenceShipping_documentation: Integer;
evidenceShipping_tracking_number: Integer;
evidenceUncategorized_file: Integer;
evidenceUncategorized_text: Integer;
evidence_detailsDue_by: Integer;
evidence_detailsHas_evidence: Integer;
evidence_detailsPast_due: Integer;
evidence_detailsSubmission_count: Integer;
is_charge_refundable: Integer;
livemode: Integer;
reason: WideString;
status: WideString;
i: Integer;
count_i: Integer;

begin
rest := TChilkatRest.Create(Self);

//  URL: https://api.stripe.com/v1/disputes/dp_1BnETJGswQrCoh0Xefx4zP2a
bTls := 1;
port := 443;
bAutoReconnect := 1;
success := rest.Connect('api.stripe.com',port,bTls,bAutoReconnect);
if (success <> 1) then
  begin
    Memo1.Lines.Add('ConnectFailReason: ' + IntToStr(rest.ConnectFailReason));
    Memo1.Lines.Add(rest.LastErrorText);
    Exit;
  end;

rest.SetAuthBasic('STRIPE_SECRET_KEY','');

sbResponseBody := TChilkatStringBuilder.Create(Self);
success := rest.FullRequestNoBodySb('GET','/v1/disputes/dp_1BnETJGswQrCoh0Xefx4zP2a',sbResponseBody.ControlInterface);
if (success <> 1) then
  begin
    Memo1.Lines.Add(rest.LastErrorText);
    Exit;
  end;

jsonResponse := TChilkatJsonObject.Create(Self);
jsonResponse.LoadSb(sbResponseBody.ControlInterface);

id := jsonResponse.StringOf('id');
object := jsonResponse.StringOf('object');
amount := jsonResponse.IntOf('amount');
balance_transaction := jsonResponse.StringOf('balance_transaction');
charge := jsonResponse.StringOf('charge');
created := jsonResponse.IntOf('created');
currency := jsonResponse.StringOf('currency');
evidenceAccess_activity_log := jsonResponse.IsNullOf('evidence.access_activity_log');
evidenceBilling_address := jsonResponse.IsNullOf('evidence.billing_address');
evidenceCancellation_policy := jsonResponse.IsNullOf('evidence.cancellation_policy');
evidenceCancellation_policy_disclosure := jsonResponse.IsNullOf('evidence.cancellation_policy_disclosure');
evidenceCancellation_rebuttal := jsonResponse.IsNullOf('evidence.cancellation_rebuttal');
evidenceCustomer_communication := jsonResponse.IsNullOf('evidence.customer_communication');
evidenceCustomer_email_address := jsonResponse.IsNullOf('evidence.customer_email_address');
evidenceCustomer_name := jsonResponse.IsNullOf('evidence.customer_name');
evidenceCustomer_purchase_ip := jsonResponse.IsNullOf('evidence.customer_purchase_ip');
evidenceCustomer_signature := jsonResponse.IsNullOf('evidence.customer_signature');
evidenceDuplicate_charge_documentation := jsonResponse.IsNullOf('evidence.duplicate_charge_documentation');
evidenceDuplicate_charge_explanation := jsonResponse.IsNullOf('evidence.duplicate_charge_explanation');
evidenceDuplicate_charge_id := jsonResponse.IsNullOf('evidence.duplicate_charge_id');
evidenceProduct_description := jsonResponse.IsNullOf('evidence.product_description');
evidenceReceipt := jsonResponse.IsNullOf('evidence.receipt');
evidenceRefund_policy := jsonResponse.IsNullOf('evidence.refund_policy');
evidenceRefund_policy_disclosure := jsonResponse.IsNullOf('evidence.refund_policy_disclosure');
evidenceRefund_refusal_explanation := jsonResponse.IsNullOf('evidence.refund_refusal_explanation');
evidenceService_date := jsonResponse.IsNullOf('evidence.service_date');
evidenceService_documentation := jsonResponse.IsNullOf('evidence.service_documentation');
evidenceShipping_address := jsonResponse.IsNullOf('evidence.shipping_address');
evidenceShipping_carrier := jsonResponse.IsNullOf('evidence.shipping_carrier');
evidenceShipping_date := jsonResponse.IsNullOf('evidence.shipping_date');
evidenceShipping_documentation := jsonResponse.IsNullOf('evidence.shipping_documentation');
evidenceShipping_tracking_number := jsonResponse.IsNullOf('evidence.shipping_tracking_number');
evidenceUncategorized_file := jsonResponse.IsNullOf('evidence.uncategorized_file');
evidenceUncategorized_text := jsonResponse.IsNullOf('evidence.uncategorized_text');
evidence_detailsDue_by := jsonResponse.IntOf('evidence_details.due_by');
evidence_detailsHas_evidence := jsonResponse.BoolOf('evidence_details.has_evidence');
evidence_detailsPast_due := jsonResponse.BoolOf('evidence_details.past_due');
evidence_detailsSubmission_count := jsonResponse.IntOf('evidence_details.submission_count');
is_charge_refundable := jsonResponse.BoolOf('is_charge_refundable');
livemode := jsonResponse.BoolOf('livemode');
reason := jsonResponse.StringOf('reason');
status := jsonResponse.StringOf('status');
i := 0;
count_i := jsonResponse.SizeOfArray('balance_transactions');
while i < count_i do
  begin
    jsonResponse.I := i;
    i := i + 1;
  end;

Sample JSON Response Body

{
  "id": "dp_1BnETJGswQrCoh0Xefx4zP2a",
  "object": "dispute",
  "amount": 1000,
  "balance_transaction": "txn_1BnETJGswQrCoh0XPNBs9uW2",
  "balance_transactions": [
  ],
  "charge": "ch_1BnETJGswQrCoh0XlANDK278",
  "created": 1516662781,
  "currency": "usd",
  "evidence": {
    "access_activity_log": null,
    "billing_address": null,
    "cancellation_policy": null,
    "cancellation_policy_disclosure": null,
    "cancellation_rebuttal": null,
    "customer_communication": null,
    "customer_email_address": null,
    "customer_name": null,
    "customer_purchase_ip": null,
    "customer_signature": null,
    "duplicate_charge_documentation": null,
    "duplicate_charge_explanation": null,
    "duplicate_charge_id": null,
    "product_description": null,
    "receipt": null,
    "refund_policy": null,
    "refund_policy_disclosure": null,
    "refund_refusal_explanation": null,
    "service_date": null,
    "service_documentation": null,
    "shipping_address": null,
    "shipping_carrier": null,
    "shipping_date": null,
    "shipping_documentation": null,
    "shipping_tracking_number": null,
    "uncategorized_file": null,
    "uncategorized_text": null
  },
  "evidence_details": {
    "due_by": 1518307199,
    "has_evidence": false,
    "past_due": false,
    "submission_count": 0
  },
  "is_charge_refundable": false,
  "livemode": false,
  "metadata": {},
  "reason": "general",
  "status": "needs_response"
}