| Copyright | (c) David Johnson, 2015 |
|---|---|
| Maintainer | djohnson.m@gmail.com |
| Stability | experimental |
| Portability | POSIX |
| Safe Haskell | None |
| Language | Haskell2010 |
Web.Stripe.Bitcoin
Description
https://stripe.com/docs/api#bitcoin_receivers https://stripe.com/docs/guides/bitcoin
import Web.Stripe
import Web.Stripe.Bitcoin
main :: IO ()
main = do
let config = SecretKey "secret_key"
result <- stripe config listAllReceivers
case result of
Right receivers -> print receivers
Left stripeError -> print stripeError
- createReceiver :: Integer -> Email -> Stripe BitcoinReceiver
- getReceiver :: BitcoinReceiverId -> Stripe BitcoinReceiver
- listReceivers :: Maybe Limit -> StartingAfter BitcoinReceiverId -> EndingBefore BitcoinReceiverId -> Stripe (StripeList BitcoinReceiver)
- data BitcoinReceiver = BitcoinReceiver {
- btcId :: BitcoinReceiverId
- btcObject :: Text
- btcCreated :: UTCTime
- btcLiveMode :: Bool
- btcActive :: Bool
- btcAmount :: Integer
- btcAmountReceived :: Integer
- btcBitcoinAmount :: Integer
- btcBitcoinAmountReceived :: Integer
- btcBitcoinUri :: Text
- btcCurrency :: Currency
- btcFilled :: Bool
- btcInboundAddress :: Text
- btcUncapturedFunds :: Bool
- btcDescription :: Maybe Text
- btcEmail :: Text
- btcMetadata :: MetaData
- btcRefundAddress :: Maybe Text
- btcTransactions :: Maybe Transactions
- btcPayment :: Maybe PaymentId
- btcCustomer :: Maybe CustomerId
- newtype BitcoinReceiverId = BitcoinReceiverId Text
- data BitcoinTransaction = BitcoinTransaction {}
- newtype BitcoinTransactionId = BitcoinTransactionId Text
- newtype Email = Email Text
- data StripeList a = StripeList {}
API
Arguments
| :: Integer | Amount |
| -> Stripe BitcoinReceiver |
Retrieve the object that represents your Stripe account
getReceiver :: BitcoinReceiverId -> Stripe BitcoinReceiver Source
Retrieve a BitcoinReceiver
Arguments
| :: Maybe Limit | Defaults to 10 if |
| -> StartingAfter BitcoinReceiverId | Paginate starting after the following |
| -> EndingBefore BitcoinReceiverId | Paginate ending before the following |
| -> Stripe (StripeList BitcoinReceiver) |
Retrieve a list of BitcoinReceivers
Types
data BitcoinReceiver Source
BTC ReceiverObject
Constructors
| BitcoinReceiver | |
Fields
| |
Instances
| Eq BitcoinReceiver | |
| Show BitcoinReceiver | |
| FromJSON BitcoinReceiver | FromJSON for BitcoinReceiverId |
newtype BitcoinReceiverId Source
BTC ReceiverId
Constructors
| BitcoinReceiverId Text |
Instances
| Eq BitcoinReceiverId | |
| Show BitcoinReceiverId | |
| FromJSON BitcoinReceiverId | FromJSON for BitcoinReceiverId |
data BitcoinTransaction Source
Bitcoin Transaction
Constructors
| BitcoinTransaction | |
Instances
| Eq BitcoinTransaction | |
| Show BitcoinTransaction | |
| FromJSON BitcoinTransaction | FromJSON BitcoinTransaction |
newtype BitcoinTransactionId Source
BitcoinTransactionId
Constructors
| BitcoinTransactionId Text |
Instances
| Eq BitcoinTransactionId | |
| Show BitcoinTransactionId | |
| FromJSON BitcoinTransactionId | FromJSON BitcoinTransactionId |
data StripeList a Source
Generic handling of Stripe JSON arrays
Constructors
| StripeList | |
Instances
| Eq a => Eq (StripeList a) | |
| Show a => Show (StripeList a) | |
| FromJSON a => FromJSON (StripeList a) | JSON Instance for |