Copyright	(c) David Johnson 2014
Maintainer	djohnson.m@gmail.com
Stability	experimental
Portability	POSIX
Safe Haskell	None
Language	Haskell2010

Web.Stripe.Refund

Contents

API
Types

Description

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

{-# LANGUAGE OverloadedStrings #-}
import Web.Stripe
import Web.Stripe.Customer
import Web.Stripe.Charge
import Web.Stripe.Refund

main :: IO ()
main = do
  let config = StripeConfig (StripeKey "secret_key")
      credit = CardNumber "4242424242424242"
      em  = ExpMonth 12
      ey  = ExpYear 2015
      cvc = CVC "123"
      cardinfo = (mkNewCard credit em ey) { newCardCVC = Just cvc }
  result <- stripe config $ createCustomer -&- cardinfo
  case result of
    (Left stripeError) -> print stripeError
    (Right (Customer { customerId = cid })) -> do
      result <- stripe config $ createCharge (Amount 100) USD -&- cid
      case result of
        (Left stripeError) -> print stripeError
        (Right (Charge { chargeId   = chid })) -> do
          result <- stripe config $ createRefund chid
          case result of
            (Left stripeError) -> print stripeError
            (Right refund)     -> print refund

Synopsis

API

createRefund #

Arguments

:: ChargeId	`ChargeId` associated with the `Charge` to be refunded
-> StripeRequest CreateRefund

create a Refund

data GetRefund #

Instances

StripeHasParam GetRefund ExpandParams #

type StripeReturn GetRefund #
type StripeReturn GetRefund = Refund

getRefund #

Arguments

:: ChargeId	`ChargeId` associated with the `Refund` to be retrieved
-> RefundId	`RefundId` associated with the `Refund` to be retrieved
-> StripeRequest GetRefund

Retrieve a Refund by ChargeId and RefundId

getRefunds #

Arguments

:: ChargeId	`ChargeId` associated with the `Refunds` to get
-> StripeRequest GetRefunds

Retrieve a lot of Refunds by ChargeId

data UpdateRefund #

Instances

StripeHasParam UpdateRefund MetaData #

type StripeReturn UpdateRefund #
type StripeReturn UpdateRefund = Refund

updateRefund #

Arguments

:: ChargeId	`ChargeId` associated with the `Charge` to be updated
-> RefundId	`RefundId` associated with the `Refund` to be retrieved
-> StripeRequest UpdateRefund

Update a Refund by ChargeId and RefundId

Types

newtype Amount #

Amount representing a monetary value. Stripe represents pennies as whole numbers i.e. 100 = $1

Constructors

Amount
Fields getAmount :: Int

Instances

Eq Amount #
Methods (==) :: Amount -> Amount -> Bool # (/=) :: Amount -> Amount -> Bool #
Data Amount #
Methods gfoldl :: (forall d b. Data d => c (d -> b) -> d -> c b) -> (forall g. g -> c g) -> Amount -> c Amount # gunfold :: (forall b r. Data b => c (b -> r) -> c r) -> (forall r. r -> c r) -> Constr -> c Amount # toConstr :: Amount -> Constr # dataTypeOf :: Amount -> DataType # dataCast1 :: Typeable (* -> ) t => (forall d. Data d => c (t d)) -> Maybe (c Amount) # dataCast2 :: Typeable ( -> * -> *) t => (forall d e. (Data d, Data e) => c (t d e)) -> Maybe (c Amount) # gmapT :: (forall b. Data b => b -> b) -> Amount -> Amount # gmapQl :: (r -> r' -> r) -> r -> (forall d. Data d => d -> r') -> Amount -> r # gmapQr :: (r' -> r -> r) -> r -> (forall d. Data d => d -> r') -> Amount -> r # gmapQ :: (forall d. Data d => d -> u) -> Amount -> [u] # gmapQi :: Int -> (forall d. Data d => d -> u) -> Amount -> u # gmapM :: Monad m => (forall d. Data d => d -> m d) -> Amount -> m Amount # gmapMp :: MonadPlus m => (forall d. Data d => d -> m d) -> Amount -> m Amount # gmapMo :: MonadPlus m => (forall d. Data d => d -> m d) -> Amount -> m Amount #
Ord Amount #
Methods compare :: Amount -> Amount -> Ordering # (<) :: Amount -> Amount -> Bool # (<=) :: Amount -> Amount -> Bool # (>) :: Amount -> Amount -> Bool # (>=) :: Amount -> Amount -> Bool # max :: Amount -> Amount -> Amount # min :: Amount -> Amount -> Amount #
Read Amount #
Methods readsPrec :: Int -> ReadS Amount # readList :: ReadS [Amount] # readPrec :: ReadPrec Amount # readListPrec :: ReadPrec [Amount] #
Show Amount #
Methods showsPrec :: Int -> Amount -> ShowS # show :: Amount -> String # showList :: [Amount] -> ShowS #
ToStripeParam Amount #
Methods toStripeParam :: Amount -> [(ByteString, ByteString)] -> [(ByteString, ByteString)] #
StripeHasParam CreateRefund Amount #

StripeHasParam UpdateInvoiceItem Amount #

StripeHasParam CaptureCharge Amount #

StripeHasParam CreateApplicationFeeRefund Amount #

data Charge #

Charge object in Stripe API

Constructors

Charge

Fields

chargeId :: ChargeId
chargeObject :: Text
chargeCreated :: UTCTime
chargeLiveMode :: Bool
chargePaid :: Bool
chargeAmount :: Amount
chargeCurrency :: Currency
chargeRefunded :: Bool
chargeCreditCard :: Maybe Card
chargeCaptured :: Bool
chargeRefunds :: StripeList Refund
chargeBalanceTransaction :: Maybe (Expandable TransactionId)
chargeFailureMessage :: Maybe Text
chargeFailureCode :: Maybe Text
chargeAmountRefunded :: Int
chargeCustomerId :: Maybe (Expandable CustomerId)
chargeInvoice :: Maybe (Expandable InvoiceId)
chargeDescription :: Maybe Description
chargeDispute :: Maybe Dispute
chargeMetaData :: MetaData
chargeStatementDescription :: Maybe StatementDescription
chargeReceiptEmail :: Maybe Text
chargeReceiptNumber :: Maybe Text

Instances

Eq Charge #
Methods (==) :: Charge -> Charge -> Bool # (/=) :: Charge -> Charge -> Bool #
Data Charge #
Methods gfoldl :: (forall d b. Data d => c (d -> b) -> d -> c b) -> (forall g. g -> c g) -> Charge -> c Charge # gunfold :: (forall b r. Data b => c (b -> r) -> c r) -> (forall r. r -> c r) -> Constr -> c Charge # toConstr :: Charge -> Constr # dataTypeOf :: Charge -> DataType # dataCast1 :: Typeable (* -> ) t => (forall d. Data d => c (t d)) -> Maybe (c Charge) # dataCast2 :: Typeable ( -> * -> *) t => (forall d e. (Data d, Data e) => c (t d e)) -> Maybe (c Charge) # gmapT :: (forall b. Data b => b -> b) -> Charge -> Charge # gmapQl :: (r -> r' -> r) -> r -> (forall d. Data d => d -> r') -> Charge -> r # gmapQr :: (r' -> r -> r) -> r -> (forall d. Data d => d -> r') -> Charge -> r # gmapQ :: (forall d. Data d => d -> u) -> Charge -> [u] # gmapQi :: Int -> (forall d. Data d => d -> u) -> Charge -> u # gmapM :: Monad m => (forall d. Data d => d -> m d) -> Charge -> m Charge # gmapMp :: MonadPlus m => (forall d. Data d => d -> m d) -> Charge -> m Charge # gmapMo :: MonadPlus m => (forall d. Data d => d -> m d) -> Charge -> m Charge #
Ord Charge #
Methods compare :: Charge -> Charge -> Ordering # (<) :: Charge -> Charge -> Bool # (<=) :: Charge -> Charge -> Bool # (>) :: Charge -> Charge -> Bool # (>=) :: Charge -> Charge -> Bool # max :: Charge -> Charge -> Charge # min :: Charge -> Charge -> Charge #
Read Charge #
Methods readsPrec :: Int -> ReadS Charge # readList :: ReadS [Charge] # readPrec :: ReadPrec Charge # readListPrec :: ReadPrec [Charge] #
Show Charge #
Methods showsPrec :: Int -> Charge -> ShowS # show :: Charge -> String # showList :: [Charge] -> ShowS #
FromJSON Charge #	JSON Instance for `Charge`
Methods parseJSON :: Value -> Parser Charge # parseJSONList :: Value -> Parser [Charge] #

newtype ChargeId #

ChargeId associated with a Charge

Constructors

ChargeId Text

Instances

Eq ChargeId #
Methods (==) :: ChargeId -> ChargeId -> Bool # (/=) :: ChargeId -> ChargeId -> Bool #
Data ChargeId #
Methods gfoldl :: (forall d b. Data d => c (d -> b) -> d -> c b) -> (forall g. g -> c g) -> ChargeId -> c ChargeId # gunfold :: (forall b r. Data b => c (b -> r) -> c r) -> (forall r. r -> c r) -> Constr -> c ChargeId # toConstr :: ChargeId -> Constr # dataTypeOf :: ChargeId -> DataType # dataCast1 :: Typeable (* -> ) t => (forall d. Data d => c (t d)) -> Maybe (c ChargeId) # dataCast2 :: Typeable ( -> * -> *) t => (forall d e. (Data d, Data e) => c (t d e)) -> Maybe (c ChargeId) # gmapT :: (forall b. Data b => b -> b) -> ChargeId -> ChargeId # gmapQl :: (r -> r' -> r) -> r -> (forall d. Data d => d -> r') -> ChargeId -> r # gmapQr :: (r' -> r -> r) -> r -> (forall d. Data d => d -> r') -> ChargeId -> r # gmapQ :: (forall d. Data d => d -> u) -> ChargeId -> [u] # gmapQi :: Int -> (forall d. Data d => d -> u) -> ChargeId -> u # gmapM :: Monad m => (forall d. Data d => d -> m d) -> ChargeId -> m ChargeId # gmapMp :: MonadPlus m => (forall d. Data d => d -> m d) -> ChargeId -> m ChargeId # gmapMo :: MonadPlus m => (forall d. Data d => d -> m d) -> ChargeId -> m ChargeId #
Ord ChargeId #
Methods compare :: ChargeId -> ChargeId -> Ordering # (<) :: ChargeId -> ChargeId -> Bool # (<=) :: ChargeId -> ChargeId -> Bool # (>) :: ChargeId -> ChargeId -> Bool # (>=) :: ChargeId -> ChargeId -> Bool # max :: ChargeId -> ChargeId -> ChargeId # min :: ChargeId -> ChargeId -> ChargeId #
Read ChargeId #
Methods readsPrec :: Int -> ReadS ChargeId # readList :: ReadS [ChargeId] # readPrec :: ReadPrec ChargeId # readListPrec :: ReadPrec [ChargeId] #
Show ChargeId #
Methods showsPrec :: Int -> ChargeId -> ShowS # show :: ChargeId -> String # showList :: [ChargeId] -> ShowS #
FromJSON ChargeId #	JSON Instance for `ChargeId`
Methods parseJSON :: Value -> Parser ChargeId # parseJSONList :: Value -> Parser [ChargeId] #
ToStripeParam ChargeId #
Methods toStripeParam :: ChargeId -> [(ByteString, ByteString)] -> [(ByteString, ByteString)] #
StripeHasParam GetApplicationFees ChargeId #

StripeHasParam GetCharges (EndingBefore ChargeId) #

StripeHasParam GetCharges (StartingAfter ChargeId) #

type ExpandsTo ChargeId #
type ExpandsTo ChargeId = Charge

newtype EndingBefore a #

Pagination Option for StripeList

Constructors

EndingBefore a

Instances

StripeHasParam GetTransfers (EndingBefore TransferId) #

StripeHasParam GetSubscriptionsByCustomerId (EndingBefore SubscriptionId) #

StripeHasParam GetSubscriptions (EndingBefore SubscriptionId) #

StripeHasParam GetRefunds (EndingBefore RefundId) #

StripeHasParam GetRecipients (EndingBefore RecipientId) #

StripeHasParam GetPlans (EndingBefore PlanId) #

StripeHasParam GetInvoiceItems (EndingBefore InvoiceItemId) #

StripeHasParam GetInvoiceLineItems (EndingBefore InvoiceLineItemId) #

StripeHasParam GetInvoices (EndingBefore InvoiceId) #

StripeHasParam GetEvents (EndingBefore EventId) #

StripeHasParam GetCustomers (EndingBefore CustomerId) #

StripeHasParam GetCoupons (EndingBefore CouponId) #

StripeHasParam GetCharges (EndingBefore ChargeId) #

StripeHasParam GetRecipientCards (EndingBefore CardId) #

StripeHasParam GetCustomerCards (EndingBefore CardId) #

StripeHasParam GetBalanceTransactionHistory (EndingBefore TransactionId) #

StripeHasParam GetApplicationFeeRefunds (EndingBefore RefundId) #

StripeHasParam GetApplicationFees (EndingBefore ApplicationFeeId) #

Eq a => Eq (EndingBefore a) #
Methods (==) :: EndingBefore a -> EndingBefore a -> Bool # (/=) :: EndingBefore a -> EndingBefore a -> Bool #
Data a => Data (EndingBefore a) #
Methods gfoldl :: (forall d b. Data d => c (d -> b) -> d -> c b) -> (forall g. g -> c g) -> EndingBefore a -> c (EndingBefore a) # gunfold :: (forall b r. Data b => c (b -> r) -> c r) -> (forall r. r -> c r) -> Constr -> c (EndingBefore a) # toConstr :: EndingBefore a -> Constr # dataTypeOf :: EndingBefore a -> DataType # dataCast1 :: Typeable (* -> ) t => (forall d. Data d => c (t d)) -> Maybe (c (EndingBefore a)) # dataCast2 :: Typeable ( -> * -> *) t => (forall d e. (Data d, Data e) => c (t d e)) -> Maybe (c (EndingBefore a)) # gmapT :: (forall b. Data b => b -> b) -> EndingBefore a -> EndingBefore a # gmapQl :: (r -> r' -> r) -> r -> (forall d. Data d => d -> r') -> EndingBefore a -> r # gmapQr :: (r' -> r -> r) -> r -> (forall d. Data d => d -> r') -> EndingBefore a -> r # gmapQ :: (forall d. Data d => d -> u) -> EndingBefore a -> [u] # gmapQi :: Int -> (forall d. Data d => d -> u) -> EndingBefore a -> u # gmapM :: Monad m => (forall d. Data d => d -> m d) -> EndingBefore a -> m (EndingBefore a) # gmapMp :: MonadPlus m => (forall d. Data d => d -> m d) -> EndingBefore a -> m (EndingBefore a) # gmapMo :: MonadPlus m => (forall d. Data d => d -> m d) -> EndingBefore a -> m (EndingBefore a) #
Ord a => Ord (EndingBefore a) #
Methods compare :: EndingBefore a -> EndingBefore a -> Ordering # (<) :: EndingBefore a -> EndingBefore a -> Bool # (<=) :: EndingBefore a -> EndingBefore a -> Bool # (>) :: EndingBefore a -> EndingBefore a -> Bool # (>=) :: EndingBefore a -> EndingBefore a -> Bool # max :: EndingBefore a -> EndingBefore a -> EndingBefore a # min :: EndingBefore a -> EndingBefore a -> EndingBefore a #
Read a => Read (EndingBefore a) #
Methods readsPrec :: Int -> ReadS (EndingBefore a) # readList :: ReadS [EndingBefore a] # readPrec :: ReadPrec (EndingBefore a) # readListPrec :: ReadPrec [EndingBefore a] #
Show a => Show (EndingBefore a) #
Methods showsPrec :: Int -> EndingBefore a -> ShowS # show :: EndingBefore a -> String # showList :: [EndingBefore a] -> ShowS #
ToStripeParam param => ToStripeParam (EndingBefore param) #
Methods toStripeParam :: EndingBefore param -> [(ByteString, ByteString)] -> [(ByteString, ByteString)] #

newtype ExpandParams #

Type of Expansion Parameters for use on Stripe objects

Constructors

ExpandParams
Fields getExpandParams :: [Text]

Instances

Eq ExpandParams #
Methods (==) :: ExpandParams -> ExpandParams -> Bool # (/=) :: ExpandParams -> ExpandParams -> Bool #
Data ExpandParams #
Methods gfoldl :: (forall d b. Data d => c (d -> b) -> d -> c b) -> (forall g. g -> c g) -> ExpandParams -> c ExpandParams # gunfold :: (forall b r. Data b => c (b -> r) -> c r) -> (forall r. r -> c r) -> Constr -> c ExpandParams # toConstr :: ExpandParams -> Constr # dataTypeOf :: ExpandParams -> DataType # dataCast1 :: Typeable (* -> ) t => (forall d. Data d => c (t d)) -> Maybe (c ExpandParams) # dataCast2 :: Typeable ( -> * -> *) t => (forall d e. (Data d, Data e) => c (t d e)) -> Maybe (c ExpandParams) # gmapT :: (forall b. Data b => b -> b) -> ExpandParams -> ExpandParams # gmapQl :: (r -> r' -> r) -> r -> (forall d. Data d => d -> r') -> ExpandParams -> r # gmapQr :: (r' -> r -> r) -> r -> (forall d. Data d => d -> r') -> ExpandParams -> r # gmapQ :: (forall d. Data d => d -> u) -> ExpandParams -> [u] # gmapQi :: Int -> (forall d. Data d => d -> u) -> ExpandParams -> u # gmapM :: Monad m => (forall d. Data d => d -> m d) -> ExpandParams -> m ExpandParams # gmapMp :: MonadPlus m => (forall d. Data d => d -> m d) -> ExpandParams -> m ExpandParams # gmapMo :: MonadPlus m => (forall d. Data d => d -> m d) -> ExpandParams -> m ExpandParams #
Ord ExpandParams #
Methods compare :: ExpandParams -> ExpandParams -> Ordering # (<) :: ExpandParams -> ExpandParams -> Bool # (<=) :: ExpandParams -> ExpandParams -> Bool # (>) :: ExpandParams -> ExpandParams -> Bool # (>=) :: ExpandParams -> ExpandParams -> Bool # max :: ExpandParams -> ExpandParams -> ExpandParams # min :: ExpandParams -> ExpandParams -> ExpandParams #
Read ExpandParams #
Methods readsPrec :: Int -> ReadS ExpandParams # readList :: ReadS [ExpandParams] # readPrec :: ReadPrec ExpandParams # readListPrec :: ReadPrec [ExpandParams] #
Show ExpandParams #
Methods showsPrec :: Int -> ExpandParams -> ShowS # show :: ExpandParams -> String # showList :: [ExpandParams] -> ShowS #
ToStripeParam ExpandParams #
Methods toStripeParam :: ExpandParams -> [(ByteString, ByteString)] -> [(ByteString, ByteString)] #
StripeHasParam GetTransfers ExpandParams #

StripeHasParam GetTransfer ExpandParams #

StripeHasParam GetSubscriptionsByCustomerId ExpandParams #

StripeHasParam GetSubscriptions ExpandParams #

StripeHasParam GetSubscription ExpandParams #

StripeHasParam GetRefunds ExpandParams #

StripeHasParam GetRefund ExpandParams #

StripeHasParam GetRecipients ExpandParams #

StripeHasParam GetRecipient ExpandParams #

StripeHasParam GetInvoiceItems ExpandParams #

StripeHasParam GetInvoiceItem ExpandParams #

StripeHasParam GetInvoices ExpandParams #

StripeHasParam GetInvoice ExpandParams #

StripeHasParam GetCustomers ExpandParams #

StripeHasParam GetCustomer ExpandParams #

StripeHasParam GetCharges ExpandParams #

StripeHasParam GetCharge ExpandParams #

StripeHasParam CreateCharge ExpandParams #

StripeHasParam GetRecipientCards ExpandParams #

StripeHasParam GetCustomerCards ExpandParams #

StripeHasParam GetRecipientCard ExpandParams #

StripeHasParam GetCustomerCard ExpandParams #

StripeHasParam GetBalanceTransaction ExpandParams #

StripeHasParam GetApplicationFeeRefunds ExpandParams #

StripeHasParam GetApplicationFeeRefund ExpandParams #

StripeHasParam GetApplicationFees ExpandParams #

StripeHasParam GetApplicationFee ExpandParams #

data Refund #

Refund Object

Constructors

Refund
Fields refundId :: RefundId refundAmount :: Int refundCurrency :: Currency refundCreated :: UTCTime refundObject :: Text refundCharge :: ChargeId refundBalanceTransaction :: Expandable TransactionId refundMetaData :: MetaData

Instances

Eq Refund #
Methods (==) :: Refund -> Refund -> Bool # (/=) :: Refund -> Refund -> Bool #
Data Refund #
Methods gfoldl :: (forall d b. Data d => c (d -> b) -> d -> c b) -> (forall g. g -> c g) -> Refund -> c Refund # gunfold :: (forall b r. Data b => c (b -> r) -> c r) -> (forall r. r -> c r) -> Constr -> c Refund # toConstr :: Refund -> Constr # dataTypeOf :: Refund -> DataType # dataCast1 :: Typeable (* -> ) t => (forall d. Data d => c (t d)) -> Maybe (c Refund) # dataCast2 :: Typeable ( -> * -> *) t => (forall d e. (Data d, Data e) => c (t d e)) -> Maybe (c Refund) # gmapT :: (forall b. Data b => b -> b) -> Refund -> Refund # gmapQl :: (r -> r' -> r) -> r -> (forall d. Data d => d -> r') -> Refund -> r # gmapQr :: (r' -> r -> r) -> r -> (forall d. Data d => d -> r') -> Refund -> r # gmapQ :: (forall d. Data d => d -> u) -> Refund -> [u] # gmapQi :: Int -> (forall d. Data d => d -> u) -> Refund -> u # gmapM :: Monad m => (forall d. Data d => d -> m d) -> Refund -> m Refund # gmapMp :: MonadPlus m => (forall d. Data d => d -> m d) -> Refund -> m Refund # gmapMo :: MonadPlus m => (forall d. Data d => d -> m d) -> Refund -> m Refund #
Ord Refund #
Methods compare :: Refund -> Refund -> Ordering # (<) :: Refund -> Refund -> Bool # (<=) :: Refund -> Refund -> Bool # (>) :: Refund -> Refund -> Bool # (>=) :: Refund -> Refund -> Bool # max :: Refund -> Refund -> Refund # min :: Refund -> Refund -> Refund #
Read Refund #
Methods readsPrec :: Int -> ReadS Refund # readList :: ReadS [Refund] # readPrec :: ReadPrec Refund # readListPrec :: ReadPrec [Refund] #
Show Refund #
Methods showsPrec :: Int -> Refund -> ShowS # show :: Refund -> String # showList :: [Refund] -> ShowS #
FromJSON Refund #	JSON Instance for `Refund`
Methods parseJSON :: Value -> Parser Refund # parseJSONList :: Value -> Parser [Refund] #

newtype RefundApplicationFee #

RefundApplicationFee

Constructors

RefundApplicationFee
Fields getRefundApplicationFee :: Bool

Instances

Eq RefundApplicationFee #
Methods (==) :: RefundApplicationFee -> RefundApplicationFee -> Bool # (/=) :: RefundApplicationFee -> RefundApplicationFee -> Bool #
Data RefundApplicationFee #
Methods gfoldl :: (forall d b. Data d => c (d -> b) -> d -> c b) -> (forall g. g -> c g) -> RefundApplicationFee -> c RefundApplicationFee # gunfold :: (forall b r. Data b => c (b -> r) -> c r) -> (forall r. r -> c r) -> Constr -> c RefundApplicationFee # toConstr :: RefundApplicationFee -> Constr # dataTypeOf :: RefundApplicationFee -> DataType # dataCast1 :: Typeable (* -> ) t => (forall d. Data d => c (t d)) -> Maybe (c RefundApplicationFee) # dataCast2 :: Typeable ( -> * -> *) t => (forall d e. (Data d, Data e) => c (t d e)) -> Maybe (c RefundApplicationFee) # gmapT :: (forall b. Data b => b -> b) -> RefundApplicationFee -> RefundApplicationFee # gmapQl :: (r -> r' -> r) -> r -> (forall d. Data d => d -> r') -> RefundApplicationFee -> r # gmapQr :: (r' -> r -> r) -> r -> (forall d. Data d => d -> r') -> RefundApplicationFee -> r # gmapQ :: (forall d. Data d => d -> u) -> RefundApplicationFee -> [u] # gmapQi :: Int -> (forall d. Data d => d -> u) -> RefundApplicationFee -> u # gmapM :: Monad m => (forall d. Data d => d -> m d) -> RefundApplicationFee -> m RefundApplicationFee # gmapMp :: MonadPlus m => (forall d. Data d => d -> m d) -> RefundApplicationFee -> m RefundApplicationFee # gmapMo :: MonadPlus m => (forall d. Data d => d -> m d) -> RefundApplicationFee -> m RefundApplicationFee #
Ord RefundApplicationFee #
Methods compare :: RefundApplicationFee -> RefundApplicationFee -> Ordering # (<) :: RefundApplicationFee -> RefundApplicationFee -> Bool # (<=) :: RefundApplicationFee -> RefundApplicationFee -> Bool # (>) :: RefundApplicationFee -> RefundApplicationFee -> Bool # (>=) :: RefundApplicationFee -> RefundApplicationFee -> Bool # max :: RefundApplicationFee -> RefundApplicationFee -> RefundApplicationFee # min :: RefundApplicationFee -> RefundApplicationFee -> RefundApplicationFee #
Read RefundApplicationFee #
Methods readsPrec :: Int -> ReadS RefundApplicationFee # readList :: ReadS [RefundApplicationFee] # readPrec :: ReadPrec RefundApplicationFee # readListPrec :: ReadPrec [RefundApplicationFee] #
Show RefundApplicationFee #
Methods showsPrec :: Int -> RefundApplicationFee -> ShowS # show :: RefundApplicationFee -> String # showList :: [RefundApplicationFee] -> ShowS #
ToStripeParam RefundApplicationFee #
Methods toStripeParam :: RefundApplicationFee -> [(ByteString, ByteString)] -> [(ByteString, ByteString)] #
StripeHasParam CreateRefund RefundApplicationFee #

data RefundReason #

RefundReason

Constructors

RefundDuplicate
RefundFraudulent
RefundRequestedByCustomer

Instances

Eq RefundReason #
Methods (==) :: RefundReason -> RefundReason -> Bool # (/=) :: RefundReason -> RefundReason -> Bool #
Data RefundReason #
Methods gfoldl :: (forall d b. Data d => c (d -> b) -> d -> c b) -> (forall g. g -> c g) -> RefundReason -> c RefundReason # gunfold :: (forall b r. Data b => c (b -> r) -> c r) -> (forall r. r -> c r) -> Constr -> c RefundReason # toConstr :: RefundReason -> Constr # dataTypeOf :: RefundReason -> DataType # dataCast1 :: Typeable (* -> ) t => (forall d. Data d => c (t d)) -> Maybe (c RefundReason) # dataCast2 :: Typeable ( -> * -> *) t => (forall d e. (Data d, Data e) => c (t d e)) -> Maybe (c RefundReason) # gmapT :: (forall b. Data b => b -> b) -> RefundReason -> RefundReason # gmapQl :: (r -> r' -> r) -> r -> (forall d. Data d => d -> r') -> RefundReason -> r # gmapQr :: (r' -> r -> r) -> r -> (forall d. Data d => d -> r') -> RefundReason -> r # gmapQ :: (forall d. Data d => d -> u) -> RefundReason -> [u] # gmapQi :: Int -> (forall d. Data d => d -> u) -> RefundReason -> u # gmapM :: Monad m => (forall d. Data d => d -> m d) -> RefundReason -> m RefundReason # gmapMp :: MonadPlus m => (forall d. Data d => d -> m d) -> RefundReason -> m RefundReason # gmapMo :: MonadPlus m => (forall d. Data d => d -> m d) -> RefundReason -> m RefundReason #
Ord RefundReason #
Methods compare :: RefundReason -> RefundReason -> Ordering # (<) :: RefundReason -> RefundReason -> Bool # (<=) :: RefundReason -> RefundReason -> Bool # (>) :: RefundReason -> RefundReason -> Bool # (>=) :: RefundReason -> RefundReason -> Bool # max :: RefundReason -> RefundReason -> RefundReason # min :: RefundReason -> RefundReason -> RefundReason #
Read RefundReason #
Methods readsPrec :: Int -> ReadS RefundReason # readList :: ReadS [RefundReason] # readPrec :: ReadPrec RefundReason # readListPrec :: ReadPrec [RefundReason] #
Show RefundReason #
Methods showsPrec :: Int -> RefundReason -> ShowS # show :: RefundReason -> String # showList :: [RefundReason] -> ShowS #
ToStripeParam RefundReason #
Methods toStripeParam :: RefundReason -> [(ByteString, ByteString)] -> [(ByteString, ByteString)] #
StripeHasParam CreateRefund RefundReason #

newtype RefundId #

RefundId for Refund

Constructors

RefundId Text

Instances

Eq RefundId #
Methods (==) :: RefundId -> RefundId -> Bool # (/=) :: RefundId -> RefundId -> Bool #
Data RefundId #
Methods gfoldl :: (forall d b. Data d => c (d -> b) -> d -> c b) -> (forall g. g -> c g) -> RefundId -> c RefundId # gunfold :: (forall b r. Data b => c (b -> r) -> c r) -> (forall r. r -> c r) -> Constr -> c RefundId # toConstr :: RefundId -> Constr # dataTypeOf :: RefundId -> DataType # dataCast1 :: Typeable (* -> ) t => (forall d. Data d => c (t d)) -> Maybe (c RefundId) # dataCast2 :: Typeable ( -> * -> *) t => (forall d e. (Data d, Data e) => c (t d e)) -> Maybe (c RefundId) # gmapT :: (forall b. Data b => b -> b) -> RefundId -> RefundId # gmapQl :: (r -> r' -> r) -> r -> (forall d. Data d => d -> r') -> RefundId -> r # gmapQr :: (r' -> r -> r) -> r -> (forall d. Data d => d -> r') -> RefundId -> r # gmapQ :: (forall d. Data d => d -> u) -> RefundId -> [u] # gmapQi :: Int -> (forall d. Data d => d -> u) -> RefundId -> u # gmapM :: Monad m => (forall d. Data d => d -> m d) -> RefundId -> m RefundId # gmapMp :: MonadPlus m => (forall d. Data d => d -> m d) -> RefundId -> m RefundId # gmapMo :: MonadPlus m => (forall d. Data d => d -> m d) -> RefundId -> m RefundId #
Ord RefundId #
Methods compare :: RefundId -> RefundId -> Ordering # (<) :: RefundId -> RefundId -> Bool # (<=) :: RefundId -> RefundId -> Bool # (>) :: RefundId -> RefundId -> Bool # (>=) :: RefundId -> RefundId -> Bool # max :: RefundId -> RefundId -> RefundId # min :: RefundId -> RefundId -> RefundId #
Read RefundId #
Methods readsPrec :: Int -> ReadS RefundId # readList :: ReadS [RefundId] # readPrec :: ReadPrec RefundId # readListPrec :: ReadPrec [RefundId] #
Show RefundId #
Methods showsPrec :: Int -> RefundId -> ShowS # show :: RefundId -> String # showList :: [RefundId] -> ShowS #
ToStripeParam RefundId #
Methods toStripeParam :: RefundId -> [(ByteString, ByteString)] -> [(ByteString, ByteString)] #
StripeHasParam GetRefunds (EndingBefore RefundId) #

StripeHasParam GetRefunds (StartingAfter RefundId) #

StripeHasParam GetApplicationFeeRefunds (EndingBefore RefundId) #

StripeHasParam GetApplicationFeeRefunds (StartingAfter RefundId) #

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) #
Methods (==) :: StripeList a -> StripeList a -> Bool # (/=) :: StripeList a -> StripeList a -> Bool #
Data a => Data (StripeList a) #
Methods gfoldl :: (forall d b. Data d => c (d -> b) -> d -> c b) -> (forall g. g -> c g) -> StripeList a -> c (StripeList a) # gunfold :: (forall b r. Data b => c (b -> r) -> c r) -> (forall r. r -> c r) -> Constr -> c (StripeList a) # toConstr :: StripeList a -> Constr # dataTypeOf :: StripeList a -> DataType # dataCast1 :: Typeable (* -> ) t => (forall d. Data d => c (t d)) -> Maybe (c (StripeList a)) # dataCast2 :: Typeable ( -> * -> *) t => (forall d e. (Data d, Data e) => c (t d e)) -> Maybe (c (StripeList a)) # gmapT :: (forall b. Data b => b -> b) -> StripeList a -> StripeList a # gmapQl :: (r -> r' -> r) -> r -> (forall d. Data d => d -> r') -> StripeList a -> r # gmapQr :: (r' -> r -> r) -> r -> (forall d. Data d => d -> r') -> StripeList a -> r # gmapQ :: (forall d. Data d => d -> u) -> StripeList a -> [u] # gmapQi :: Int -> (forall d. Data d => d -> u) -> StripeList a -> u # gmapM :: Monad m => (forall d. Data d => d -> m d) -> StripeList a -> m (StripeList a) # gmapMp :: MonadPlus m => (forall d. Data d => d -> m d) -> StripeList a -> m (StripeList a) # gmapMo :: MonadPlus m => (forall d. Data d => d -> m d) -> StripeList a -> m (StripeList a) #
Ord a => Ord (StripeList a) #
Methods compare :: StripeList a -> StripeList a -> Ordering # (<) :: StripeList a -> StripeList a -> Bool # (<=) :: StripeList a -> StripeList a -> Bool # (>) :: StripeList a -> StripeList a -> Bool # (>=) :: StripeList a -> StripeList a -> Bool # max :: StripeList a -> StripeList a -> StripeList a # min :: StripeList a -> StripeList a -> StripeList a #
Read a => Read (StripeList a) #
Methods readsPrec :: Int -> ReadS (StripeList a) # readList :: ReadS [StripeList a] # readPrec :: ReadPrec (StripeList a) # readListPrec :: ReadPrec [StripeList a] #
Show a => Show (StripeList a) #
Methods showsPrec :: Int -> StripeList a -> ShowS # show :: StripeList a -> String # showList :: [StripeList a] -> ShowS #
FromJSON a => FromJSON (StripeList a) #	JSON Instance for `StripeList`
Methods parseJSON :: Value -> Parser (StripeList a) # parseJSONList :: Value -> Parser [StripeList a] #

StripeHasParam CreateRefund MetaData #

StripeHasParam CreateRefund Amount #

StripeHasParam CreateRefund RefundReason #

StripeHasParam CreateRefund RefundApplicationFee #

type StripeReturn CreateRefund #
type StripeReturn CreateRefund = Refund

StripeHasParam GetRefunds ExpandParams #

StripeHasParam GetRefunds Limit #

StripeHasParam GetRefunds (EndingBefore RefundId) #

StripeHasParam GetRefunds (StartingAfter RefundId) #

type StripeReturn GetRefunds #
type StripeReturn GetRefunds = StripeList Refund