Copyright | (c) David Johnson, 2014 |
---|---|
Maintainer | djohnson.m@gmail.com |
Stability | experimental |
Portability | POSIX |
Safe Haskell | None |
Language | Haskell2010 |
https://stripe.com/docs/api#fee_refunds
import Web.Stripe import Web.Stripe.ApplicationFeeRefund main :: IO () main = do let config = SecretKey "secret_key" result <- stripe config $ getApplicationFeeRefund (FeeId "fee_id") (RefundId "refund_id") case result of Right applicationFeeRefund -> print applicationFeeRefund Left stripeError -> print stripeError
- createApplicationFeeRefund :: FeeId -> Maybe Amount -> MetaData -> Stripe ApplicationFeeRefund
- getApplicationFeeRefund :: FeeId -> RefundId -> Stripe ApplicationFeeRefund
- getApplicationFeeRefundExpandable :: FeeId -> RefundId -> ExpandParams -> Stripe ApplicationFeeRefund
- getApplicationFeeRefunds :: FeeId -> Limit -> StartingAfter FeeId -> EndingBefore FeeId -> Stripe (StripeList ApplicationFeeRefund)
- getApplicationFeeRefundsExpandable :: FeeId -> Limit -> StartingAfter FeeId -> EndingBefore FeeId -> ExpandParams -> Stripe (StripeList ApplicationFeeRefund)
- updateApplicationFeeRefund :: FeeId -> RefundId -> MetaData -> Stripe (StripeList ApplicationFeeRefund)
- newtype FeeId = FeeId Text
- newtype RefundId = RefundId Text
- data ApplicationFee = ApplicationFee {
- 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
- data ApplicationFeeRefund = ApplicationFeeRefund {
- applicationFeeRefundId :: RefundId
- applicationFeeRefundAmount :: Int
- applicationFeeRefundCurrency :: Currency
- applicationFeeRefundCreated :: UTCTime
- applicationFeeRefundObject :: Text
- applicationFeeRefundBalanceTransaction :: Maybe TransactionId
- applicationFeeRefundFee :: FeeId
- applicationFeeRefundMetaData :: MetaData
- data StripeList a = StripeList {}
- type EndingBefore a = Maybe a
- type StartingAfter a = Maybe a
- type Limit = Maybe Int
- type ExpandParams = [Text]
- type MetaData = [(Text, Text)]
- type Amount = Int
API
createApplicationFeeRefund Source
:: FeeId | The |
-> Maybe Amount | The |
-> MetaData | The |
-> Stripe ApplicationFeeRefund |
Create a new ApplicationFeeRefund
getApplicationFeeRefund Source
:: FeeId | The |
-> RefundId | The |
-> Stripe ApplicationFeeRefund |
Retrieve an existing ApplicationFeeRefund
getApplicationFeeRefundExpandable Source
:: FeeId | The |
-> RefundId | The |
-> ExpandParams | The |
-> Stripe ApplicationFeeRefund |
Retrieve an existing ApplicationFeeRefund
getApplicationFeeRefunds Source
:: FeeId | The |
-> Limit |
|
-> StartingAfter FeeId | Lower bound on how many |
-> EndingBefore FeeId | Upper bound on how many |
-> Stripe (StripeList ApplicationFeeRefund) |
Retrieve a list of all ApplicationFeeRefund
s for a given Application FeeId
getApplicationFeeRefundsExpandable Source
:: FeeId | The |
-> Limit | Limit on how many Refunds to return (max 100, default 10) |
-> StartingAfter FeeId | Lower bound on how many Refunds to return |
-> EndingBefore FeeId | Upper bound on how many Refunds to return |
-> ExpandParams | The |
-> Stripe (StripeList ApplicationFeeRefund) |
Retrieve a list of all ApplicationFeeRefund
s for a given Application FeeId
updateApplicationFeeRefund Source
:: FeeId | The |
-> RefundId | The |
-> MetaData | The |
-> Stripe (StripeList ApplicationFeeRefund) |
Update an ApplicationFeeRefund
for a given Application FeeId
and RefundId
Types
data ApplicationFee Source
ApplicationFee Object
Eq ApplicationFee | |
Show ApplicationFee | |
FromJSON ApplicationFee | JSON Instance for |
data ApplicationFeeRefund Source
Application Fee Refunds
data StripeList a Source
Generic handling of Stripe JSON arrays
Eq a => Eq (StripeList a) | |
Show a => Show (StripeList a) | |
FromJSON a => FromJSON (StripeList a) | JSON Instance for |
type EndingBefore a = Maybe a Source
Pagination Option for StripeList
type StartingAfter a = Maybe a Source
Pagination Option for StripeList
Pagination Option for StripeList
type ExpandParams = [Text] Source
Type of Expansion Parameters for use on Stripe
objects