Go Requires Chilkat v11.0.0+

PayPal: Suspend an active subscription

See more PayPal Examples

Pause future billing after checking that the subscription is active. Save the reason with the customer support record.

PayPal documentation

Go

    success := false

    //  See Unlock Chilkat before making requests.
    //  For the merchant's internal backoffice application. Load the sandbox token
    //  from the merchant's credential store. Keep it out of publicly distributed apps.
    //  See Get a PayPal access token.
    http := chilkat.NewHttp()
    http.SetAuthToken("SANDBOX_ACCESS_TOKEN")
    resp := chilkat.NewHttpResponse()

    http.SetUrlVar("id","SUBSCRIPTION_ID")

    success = http.HttpNoBody("GET","https://api-m.sandbox.paypal.com/v1/billing/subscriptions/{$id}",resp)
    if success != true {
        fmt.Println("No HTTP response: ", http.LastErrorText())
        http.DisposeHttp()
        resp.DisposeHttpResponse()
        return
    }

    if (resp.StatusCode() < 200) || (resp.StatusCode() >= 300) {
        errorInfo := chilkat.NewJsonObject()
        errorInfo.Load(resp.BodyStr())
        fmt.Println("HTTP ", resp.StatusCode(), " ", *errorInfo.StringOf("name"), " ", *errorInfo.StringOf("details[0].issue"))
        fmt.Println("PayPal debug ID: ", *errorInfo.StringOf("debug_id"))
        http.DisposeHttp()
        resp.DisposeHttpResponse()
        errorInfo.DisposeJsonObject()
        return
    }

    result := chilkat.NewJsonObject()
    parsedResult := result.Load(resp.BodyStr())
    if parsedResult != true {
        fmt.Println("Expected a JSON response; HTTP ", resp.StatusCode())
        http.DisposeHttp()
        resp.DisposeHttpResponse()
        errorInfo.DisposeJsonObject()
        result.DisposeJsonObject()
        return
    }

    if result.StringOfEquals("status","ACTIVE",true) != true {
        fmt.Println("Subscription status is ", *result.StringOf("status"), ". No change made.")
        http.DisposeHttp()
        resp.DisposeHttpResponse()
        errorInfo.DisposeJsonObject()
        result.DisposeJsonObject()
        return
    }

    body := chilkat.NewJsonObject()
    body.UpdateString("reason","Customer requested a billing pause.")
    success = http.HttpJson("POST","https://api-m.sandbox.paypal.com/v1/billing/subscriptions/{$id}/suspend",body,"application/json",resp)
    if success != true {
        fmt.Println("No HTTP response: ", http.LastErrorText())
        http.DisposeHttp()
        resp.DisposeHttpResponse()
        errorInfo.DisposeJsonObject()
        result.DisposeJsonObject()
        body.DisposeJsonObject()
        return
    }

    if (resp.StatusCode() < 200) || (resp.StatusCode() >= 300) {
        changeError := chilkat.NewJsonObject()
        changeError.Load(resp.BodyStr())
        fmt.Println("HTTP ", resp.StatusCode(), " ", *changeError.StringOf("name"), " ", *changeError.StringOf("details[0].issue"))
        fmt.Println("PayPal debug ID: ", *changeError.StringOf("debug_id"))
        http.DisposeHttp()
        resp.DisposeHttpResponse()
        errorInfo.DisposeJsonObject()
        result.DisposeJsonObject()
        body.DisposeJsonObject()
        changeError.DisposeJsonObject()
        return
    }

    fmt.Println("PayPal accepted the subscription change.")

    http.DisposeHttp()
    resp.DisposeHttpResponse()
    errorInfo.DisposeJsonObject()
    result.DisposeJsonObject()
    body.DisposeJsonObject()
    changeError.DisposeJsonObject()