Web.Stripe.ApplicationFee

https://stripe.com/docs/api#application_fees

import Web.Stripe         
import Web.Stripe.ApplicationFee

main :: IO ()
main = do
  let config = SecretKey "secret_key"
  result <- stripe config $ getApplicationFee (FeeId "fee_4xtEGZhPNDEt3w")
  case result of
    Right ApplicationFee {..} -> print accountId
    Left stripeError          -> print stripeError

API

getApplicationFee

Arguments

:: FeeId

The FeeId associated with the Application

-> Stripe ApplicationFee

ApplicationFee retrieval

getApplicationFeeExpanded

Arguments

:: FeeId

The FeeId associated with the application

-> ExpandParams

The ExpandParams for an ApplicationFee

-> Stripe ApplicationFee

ApplicationFee retrieval with ExpandParams

getApplicationFees

Arguments

:: Maybe Limit

Defaults to 10 if Nothing specified

-> StartingAfter FeeId

Paginate starting after the following FeeId

-> EndingBefore FeeId

Paginate ending before the following FeeId

-> Stripe (StripeList ApplicationFee)

ApplicationFees retrieval

getApplicationFeesExpanded

Arguments

:: Maybe Limit

Defaults to 10 if Nothing specified

-> StartingAfter FeeId

Paginate starting after the following FeeId

-> EndingBefore FeeId

Paginate ending before the following FeeId

-> ExpandParams

The ExpandParams for ApplicationFees

-> Stripe (StripeList ApplicationFee)

ApplicationFees retrieval with ExpandParams

Types

newtype ApplicationId

ApplicationId object

Constructors

ApplicationId Text

Instances

Eq ApplicationId

Show ApplicationId

data ApplicationFee

ApplicationFee Object

Constructors

ApplicationFee

Fields

applicationFeeId :: Text

applicationFeeObjecet :: Text

applicationFeeCreated :: UTCTime

applicationFeeLiveMode :: Bool

applicationFeeAmount :: Int

applicationFeeCurrency :: Currency

applicationFeeRefunded :: Bool

applicationFeeAmountRefunded :: Int

applicationFeeRefunds :: StripeList Refund

applicationFeeBalanceTransaction :: TransactionId

applicationFeeAccountId :: AccountId

applicationFeeApplicationId :: ApplicationId

applicationFeeChargeId :: ChargeId

applicationFeeMetaData :: MetaData

Instances

Eq ApplicationFee

Show ApplicationFee

FromJSON ApplicationFee

JSON Instance for ApplicationFee

newtype FeeId

FeeId for objects with Fees

Constructors

FeeId Text

Instances

Eq FeeId

Show FeeId

data StripeList a

Generic handling of Stripe JSON arrays

Constructors

StripeList

Fields

list :: [a]

stripeUrl :: Text

object :: Text

totalCount :: Maybe Int

hasMore :: Bool

Instances

Eq a => Eq (StripeList a)

Show a => Show (StripeList a)

FromJSON a => FromJSON (StripeList a)

JSON Instance for StripeList

type EndingBefore a = Maybe a

Pagination Option for StripeList

type StartingAfter a = Maybe a

Pagination Option for StripeList

type Limit = Maybe Int

Pagination Option for StripeList

type ExpandParams = [Text]

Type of Expansion Parameters for use on Stripe objects

data ConnectApp

Connect Application

Constructors

ConnectApp

Fields

connectAppId :: Maybe Text

connectAppObject :: Text

connectAppName :: Text

Instances

Eq ConnectApp

Show ConnectApp

FromJSON ConnectApp

Connect Application JSON instance