stripe-core-2.0.0: Stripe API for Haskell - Pure Core

Copyright(c) David Johnson, 2014
Maintainerdjohnson.m@gmail.com
Stabilityexperimental
PortabilityPOSIX
Safe HaskellNone
LanguageHaskell2010

Web.Stripe.Token

Contents

Description

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

{-# LANGUAGE OverloadedStrings #-}
import Web.Stripe
import Web.Stripe.Token

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 $ createCardToken (Just cardinfo)
  case result of
    Right token -> print token
    Left stripeError -> print stripeError

Synopsis

API

data CreateCardToken Source

Instances

createCardToken Source

Arguments

:: Maybe NewCard

optional NewCard data

-> StripeRequest CreateCardToken 

Create a Token by specifiying Credit Card information

data CreateBankAccountToken Source

Instances

createBankAccountToken Source

Arguments

:: Maybe NewBankAccount

option BankAccount information

-> StripeRequest CreateBankAccountToken 

Create a Token for a specific BankAccount

data GetCardToken Source

Instances

getCardToken Source

Arguments

:: TokenId

The TokenId of the Card Token to retrieve

-> StripeRequest GetCardToken 

Retrieve a Token by TokenId

data GetBankAccountToken Source

Instances

getBankAccountToken Source

Arguments

:: TokenId

The TokenId of the BankAccount Token to retrieve

-> StripeRequest GetBankAccountToken 

Retrieve a Token by TokenId

Types

data Account Source

Account Object

Constructors

Account 

Fields

accountId :: AccountId
 
accountEmail :: Email
 
accountStatementDescriptor :: Maybe Description
 
accountDisplayName :: Maybe Text
 
accountTimeZone :: Text
 
accountDetailsSubmitted :: Bool
 
accountChargeEnabled :: Bool
 
accountTransferEnabled :: Bool
 
accountCurrenciesSupported :: [Currency]
 
accountDefaultCurrency :: Currency
 
accountCountry :: Text
 
accountObject :: Text
 
accountBusinessName :: Maybe Text
 
accountBusinessURL :: Maybe Text
 
accountBusinessLogo :: Maybe Text
 
accountSupportPhone :: Maybe Text
 

Instances

newtype AccountNumber Source

Account Number of a Bank Account

Constructors

AccountNumber Text 

Instances

data BankAccount Source

BankAccount Object

Constructors

BankAccount 

Fields

bankAccountId :: BankAccountId
 
bankAccountObject :: Text
 
bankAccountLast4 :: Text
 
bankAccountCountry :: Country
 
bankAccountCurrency :: Currency
 
bankAccountStatus :: Maybe BankAccountStatus
 
bankAccountFingerprint :: Maybe Text
 
bankAccountName :: Text
 

Instances

data Card Source

Card Object

Constructors

Card 

Fields

cardId :: CardId
 
cardObject :: Text
 
cardLastFour :: Text
 
cardBrand :: Brand
 
cardFunding :: Text
 
cardExpMonth :: ExpMonth
 
cardExpYear :: ExpYear
 
cardFingerprint :: Text
 
cardCountry :: Text
 
cardName :: Maybe Name
 
cardAddressLine1 :: Maybe AddressLine1
 
cardAddressLine2 :: Maybe AddressLine2
 
cardAddressCity :: Maybe AddressCity
 
cardAddressState :: Maybe AddressState
 
cardAddressZip :: Maybe AddressZip
 
cardAddressCountry :: Maybe AddressCountry
 
cardCVCCheck :: Maybe Text
 
cardAddressLine1Check :: Maybe Text
 
cardAddressZipCheck :: Maybe Text
 
cardCustomerId :: Maybe (Expandable CustomerId)
 

Instances

newtype CardNumber Source

Number associated with a Card

Constructors

CardNumber Text 

Instances

newtype Country Source

Country

Constructors

Country Text 

Instances

newtype CustomerId Source

CustomerId for a Customer

Constructors

CustomerId Text 

Instances

newtype CVC Source

CVC for a Card

Constructors

CVC Text 

Instances

newtype ExpMonth Source

Expiration Month for a Card

Constructors

ExpMonth Int 

Instances

newtype ExpYear Source

Expiration Year for a Card

Constructors

ExpYear Int 

Instances

data NewBankAccount Source

create a new BankAccount

Constructors

NewBankAccount 

Fields

newBankAccountCountry :: Country
 
newBankAccountRoutingNumber :: RoutingNumber
 
newBankAccountAccountNumber :: AccountNumber
 

Instances

mkNewCard :: CardNumber -> ExpMonth -> ExpYear -> NewCard Source

create a NewCard with only the required fields

data NewCard Source

NewCard contains the data needed to create a new Card

Constructors

NewCard 

Fields

newCardCardNumber :: CardNumber
 
newCardExpMonth :: ExpMonth
 
newCardExpYear :: ExpYear
 
newCardCVC :: Maybe CVC
 
newCardName :: Maybe Name
 
newCardAddressLine1 :: Maybe AddressLine1
 
newCardAddressLine2 :: Maybe AddressLine2
 
newCardAddressCity :: Maybe AddressCity
 
newCardAddressZip :: Maybe AddressZip
 
newCardAddressState :: Maybe AddressState
 
newCardAddressCountry :: Maybe AddressCountry
 

Instances

newtype RoutingNumber Source

Routing Number for Bank Account

Constructors

RoutingNumber Text 

Instances

data Token a Source

Token Object

Constructors

Token 

Fields

tokenId :: TokenId
 
tokenLiveMode :: Bool
 
tokenCreated :: UTCTime
 
tokenUsed :: Bool
 
tokenObject :: Text
 
tokenType :: TokenType
 
tokenData :: a
 

Instances

Eq a => Eq (Token a) Source 
Data a => Data (Token a) Source 
Ord a => Ord (Token a) Source 
Read a => Read (Token a) Source 
Show a => Show (Token a) Source 
FromJSON a => FromJSON (Token a) Source

JSON Instance for Token

newtype TokenId Source

TokenId of a Token

Constructors

TokenId Text 

Instances

data TokenType Source

Type of Token

Constructors

TokenCard 
TokenBankAccount 

Instances