Telegram.Bot.API.Payments

Methods

sendInvoice

data SendInvoiceRequest

Constructors

SendInvoiceRequest

Fields

• sendInvoiceChatId :: ChatId

  Unique identifier for the target chat or username of the target channel (in the format @channelusername).

• sendInvoiceMessageThreadId :: Maybe MessageThreadId

  Unique identifier for the target message thread (topic) of the forum; for forum supergroups only.

• sendInvoiceTitle :: Text

  Product name, 1-32 characters.

• sendInvoiceDescription :: Text

  Product description, 1-255 characters.

• sendInvoicePayload :: Text

  Bot-defined invoice payload, 1-128 bytes. This will not be displayed to the user, use for your internal processes.

• sendInvoiceProviderToken :: Text

  Payments provider token, obtained via Botfather.

• sendInvoiceCurrency :: Text

  Three-letter ISO 4217 currency code, see more on currencies.

• sendInvoicePrices :: [LabeledPrice]

  Price breakdown, a JSON-serialized list of components (e.g. product price, tax, discount, delivery cost, delivery tax, bonus, etc.).

• sendInvoiceMaxTipAmount :: Maybe Integer

  The maximum accepted amount for tips in the smallest units of the currency (integer, not float/double). For example, for a maximum tip of US$ 1.45 pass max_tip_amount = 145. See the exp parameter in currencies.json, it shows the number of digits past the decimal point for each currency (2 for the majority of currencies). Defaults to 0.

• sendInvoiceequestSuggestedTipAmounts :: Maybe [Integer]

  A JSON-serialized array of suggested amounts of tips in the smallest units of the currency (integer, not float/double). At most 4 suggested tip amounts can be specified. The suggested tip amounts must be positive, passed in a strictly increased order and must not exceed max_tip_amount.

• sendInvoiceStartParameter :: Maybe Text

  Unique deep-linking parameter. If left empty, forwarded copies of the sent message will have a Pay button, allowing multiple users to pay directly from the forwarded message, using the same invoice. If non-empty, forwarded copies of the sent message will have a URL button with a deep link to the bot (instead of a Pay button), with the value used as the start parameter.

• sendInvoiceProviderData :: Maybe Text

  A JSON-serialized data about the invoice, which will be shared with the payment provider. A detailed description of required fields should be provided by the payment provider.

• sendInvoicePhotoUrl :: Maybe Text

  URL of the product photo for the invoice. Can be a photo of the goods or a marketing image for a service. People like it better when they see what they are paying for.

• sendInvoicePhotoSize :: Maybe Int

  Photo size.

• sendInvoicePhotoWidth :: Maybe Int

  Photo width.

• sendInvoicePhotoHeight :: Maybe Int

  Photo height.

• sendInvoiceNeedName :: Maybe Bool

  Pass True, if you require the user's full name to complete the order.

• sendInvoiceNeedPhoneNumber :: Maybe Bool

  Pass True, if you require the user's phone number to complete the order.

• sendInvoiceNeedEmail :: Maybe Bool

  Pass True, if you require the user's email address to complete the order.

• sendInvoiceNeedShippingAddress :: Maybe Bool

  Pass True, if you require the user's shipping address to complete the order.

• sendInvoiceSendPhoneNumberToProvider :: Maybe Bool

  Pass True, if you require the user's phone number to complete the order.

• sendInvoiceSendEmailToProvider :: Maybe Bool

  Pass True, if user's email address should be sent to provider.

• sendInvoiceIsFlexible :: Maybe Bool

  Pass True, if the final price depends on the shipping method.

• sendInvoiceDisableNotification :: Maybe Bool

  Sends the message silently. Users will receive a notification with no sound.

• sendInvoiceProtectContent :: Maybe Bool

  Protects the contents of the sent message from forwarding and saving.

• sendInvoiceReplyToMessageId :: Maybe MessageId

  If the message is a reply, ID of the original message.

• sendInvoiceAllowSendingWithoutReply :: Maybe Bool

  Pass True, if the message should be sent even if the specified replied-to message is not found.

• sendInvoiceReplyMarkup :: Maybe InlineKeyboardMarkup

  A JSON-serialized object for an inline keyboard. If empty, one 'Pay total price' button will be shown. If not empty, the first button must be a Pay button.

Instances

FromJSON SendInvoiceRequest

Defined in Telegram.Bot.API.Payments

Methods

parseJSON :: Value -> Parser SendInvoiceRequest

parseJSONList :: Value -> Parser [SendInvoiceRequest]

ToJSON SendInvoiceRequest

Defined in Telegram.Bot.API.Payments

Methods

toJSON :: SendInvoiceRequest -> Value

toEncoding :: SendInvoiceRequest -> Encoding

toJSONList :: [SendInvoiceRequest] -> Value

toEncodingList :: [SendInvoiceRequest] -> Encoding

Generic SendInvoiceRequest

Defined in Telegram.Bot.API.Payments

Associated Types

type Rep SendInvoiceRequest :: Type -> Type

Methods

from :: SendInvoiceRequest -> Rep SendInvoiceRequest x

to :: Rep SendInvoiceRequest x -> SendInvoiceRequest

Show SendInvoiceRequest

Defined in Telegram.Bot.API.Payments

Methods

showsPrec :: Int -> SendInvoiceRequest -> ShowS

show :: SendInvoiceRequest -> String

showList :: [SendInvoiceRequest] -> ShowS

type Rep SendInvoiceRequest

Defined in Telegram.Bot.API.Payments

type Rep SendInvoiceRequest = D1 ('MetaData "SendInvoiceRequest" "Telegram.Bot.API.Payments" "telegram-bot-api-6.7-8B5O9jcStFh8aacJiwZZeM" 'False) (C1 ('MetaCons "SendInvoiceRequest" 'PrefixI 'True) ((((S1 ('MetaSel ('Just "sendInvoiceChatId") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 ChatId) :*: (S1 ('MetaSel ('Just "sendInvoiceMessageThreadId") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe MessageThreadId)) :*: S1 ('MetaSel ('Just "sendInvoiceTitle") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text))) :*: ((S1 ('MetaSel ('Just "sendInvoiceDescription") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text) :*: S1 ('MetaSel ('Just "sendInvoicePayload") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text)) :*: (S1 ('MetaSel ('Just "sendInvoiceProviderToken") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text) :*: S1 ('MetaSel ('Just "sendInvoiceCurrency") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text)))) :*: ((S1 ('MetaSel ('Just "sendInvoicePrices") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 [LabeledPrice]) :*: (S1 ('MetaSel ('Just "sendInvoiceMaxTipAmount") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Integer)) :*: S1 ('MetaSel ('Just "sendInvoiceequestSuggestedTipAmounts") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe [Integer])))) :*: ((S1 ('MetaSel ('Just "sendInvoiceStartParameter") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Text)) :*: S1 ('MetaSel ('Just "sendInvoiceProviderData") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Text))) :*: (S1 ('MetaSel ('Just "sendInvoicePhotoUrl") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Text)) :*: S1 ('MetaSel ('Just "sendInvoicePhotoSize") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Int)))))) :*: (((S1 ('MetaSel ('Just "sendInvoicePhotoWidth") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Int)) :*: (S1 ('MetaSel ('Just "sendInvoicePhotoHeight") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Int)) :*: S1 ('MetaSel ('Just "sendInvoiceNeedName") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Bool)))) :*: ((S1 ('MetaSel ('Just "sendInvoiceNeedPhoneNumber") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Bool)) :*: S1 ('MetaSel ('Just "sendInvoiceNeedEmail") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Bool))) :*: (S1 ('MetaSel ('Just "sendInvoiceNeedShippingAddress") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Bool)) :*: S1 ('MetaSel ('Just "sendInvoiceSendPhoneNumberToProvider") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Bool))))) :*: ((S1 ('MetaSel ('Just "sendInvoiceSendEmailToProvider") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Bool)) :*: (S1 ('MetaSel ('Just "sendInvoiceIsFlexible") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Bool)) :*: S1 ('MetaSel ('Just "sendInvoiceDisableNotification") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Bool)))) :*: ((S1 ('MetaSel ('Just "sendInvoiceProtectContent") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Bool)) :*: S1 ('MetaSel ('Just "sendInvoiceReplyToMessageId") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe MessageId))) :*: (S1 ('MetaSel ('Just "sendInvoiceAllowSendingWithoutReply") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Bool)) :*: S1 ('MetaSel ('Just "sendInvoiceReplyMarkup") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe InlineKeyboardMarkup))))))))

type SendInvoice = "sendInvoice" :> (ReqBody '[JSON] SendInvoiceRequest :> Post '[JSON] (Response Message))

sendInvoice :: SendInvoiceRequest -> ClientM (Response Message)

Use this method to send invoices. On success, the sent Message is returned.

createInvoiceLink

data CreateInvoiceLinkRequest

Constructors

CreateInvoiceLinkRequest

Fields

• createInvoiceLinkTitle :: Text

  Product name, 1-32 characters.

• createInvoiceLinkDescription :: Text

  Product description, 1-255 characters.

• createInvoiceLinkPayload :: Text

  Bot-defined invoice payload, 1-128 bytes. This will not be displayed to the user, use for your internal processes.

• createInvoiceLinkProviderToken :: Text

  Payment provider token, obtained via BotFather.

• createInvoiceLinkCurrency :: Text

  Three-letter ISO 4217 currency code, see more on currencies.

• createInvoiceLinkPrices :: [LabeledPrice]

  Price breakdown, a JSON-serialized list of components (e.g. product price, tax, discount, delivery cost, delivery tax, bonus, etc.).

• createInvoiceLinkMaxTipAmount :: Maybe Integer

  The maximum accepted amount for tips in the smallest units of the currency (integer, not float/double). For example, for a maximum tip of US$ 1.45 pass max_tip_amount = 145. See the exp parameter in currencies.json, it shows the number of digits past the decimal point for each currency (2 for the majority of currencies). Defaults to 0.

• createInvoiceLinkSuggestedTipAmounts :: Maybe [Integer]

  A JSON-serialized array of suggested amounts of tips in the smallest units of the currency (integer, not float/double). At most 4 suggested tip amounts can be specified. The suggested tip amounts must be positive, passed in a strictly increased order and must not exceed max_tip_amount.

• createInvoiceLinkProviderData :: Maybe Text

  JSON-serialized data about the invoice, which will be shared with the payment provider. A detailed description of required fields should be provided by the payment provider.

• createInvoiceLinkPhotoUrl :: Maybe Text

  URL of the product photo for the invoice. Can be a photo of the goods or a marketing image for a service.

• createInvoiceLinkPhotoSize :: Maybe Int

  Photo size in bytes.

• createInvoiceLinkPhotoWidth :: Maybe Int

  Photo width.

• createInvoiceLinkPhotoHeight :: Maybe Int

  Photo height

• createInvoiceLinkNeedName :: Maybe Bool

  Pass True if you require the user's full name to complete the order.

• createInvoiceLinkNeedPhoneNumber :: Maybe Bool

  Pass True if you require the user's phone number to complete the order.

• createInvoiceLinkNeedEmail :: Maybe Bool

  Pass True if you require the user's email address to complete the order.

• createInvoiceLinkNeedShippingAddress :: Maybe Bool

  Pass True if you require the user's shipping address to complete the order.

• createInvoiceLinkSendPhoneNumberToProvider :: Maybe Bool

  Pass True if the user's phone number should be sent to the provider.

• createInvoiceLinkSendEmailToProvider :: Maybe Bool

  Pass True if the user's email address should be sent to the provider.

• createInvoiceLinkIsFlexible :: Maybe Bool

  Pass True if the final price depends on the shipping method.

Instances

FromJSON CreateInvoiceLinkRequest

Defined in Telegram.Bot.API.Payments

Methods

parseJSON :: Value -> Parser CreateInvoiceLinkRequest

parseJSONList :: Value -> Parser [CreateInvoiceLinkRequest]

ToJSON CreateInvoiceLinkRequest

Defined in Telegram.Bot.API.Payments

Methods

toJSON :: CreateInvoiceLinkRequest -> Value

toEncoding :: CreateInvoiceLinkRequest -> Encoding

toJSONList :: [CreateInvoiceLinkRequest] -> Value

toEncodingList :: [CreateInvoiceLinkRequest] -> Encoding

Generic CreateInvoiceLinkRequest

Defined in Telegram.Bot.API.Payments

Associated Types

type Rep CreateInvoiceLinkRequest :: Type -> Type

Methods

from :: CreateInvoiceLinkRequest -> Rep CreateInvoiceLinkRequest x

to :: Rep CreateInvoiceLinkRequest x -> CreateInvoiceLinkRequest

Show CreateInvoiceLinkRequest

Defined in Telegram.Bot.API.Payments

Methods

showsPrec :: Int -> CreateInvoiceLinkRequest -> ShowS

show :: CreateInvoiceLinkRequest -> String

showList :: [CreateInvoiceLinkRequest] -> ShowS

type Rep CreateInvoiceLinkRequest

Defined in Telegram.Bot.API.Payments

type Rep CreateInvoiceLinkRequest = D1 ('MetaData "CreateInvoiceLinkRequest" "Telegram.Bot.API.Payments" "telegram-bot-api-6.7-8B5O9jcStFh8aacJiwZZeM" 'False) (C1 ('MetaCons "CreateInvoiceLinkRequest" 'PrefixI 'True) ((((S1 ('MetaSel ('Just "createInvoiceLinkTitle") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text) :*: S1 ('MetaSel ('Just "createInvoiceLinkDescription") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text)) :*: (S1 ('MetaSel ('Just "createInvoiceLinkPayload") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text) :*: (S1 ('MetaSel ('Just "createInvoiceLinkProviderToken") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text) :*: S1 ('MetaSel ('Just "createInvoiceLinkCurrency") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text)))) :*: ((S1 ('MetaSel ('Just "createInvoiceLinkPrices") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 [LabeledPrice]) :*: S1 ('MetaSel ('Just "createInvoiceLinkMaxTipAmount") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Integer))) :*: (S1 ('MetaSel ('Just "createInvoiceLinkSuggestedTipAmounts") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe [Integer])) :*: (S1 ('MetaSel ('Just "createInvoiceLinkProviderData") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Text)) :*: S1 ('MetaSel ('Just "createInvoiceLinkPhotoUrl") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Text)))))) :*: (((S1 ('MetaSel ('Just "createInvoiceLinkPhotoSize") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Int)) :*: S1 ('MetaSel ('Just "createInvoiceLinkPhotoWidth") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Int))) :*: (S1 ('MetaSel ('Just "createInvoiceLinkPhotoHeight") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Int)) :*: (S1 ('MetaSel ('Just "createInvoiceLinkNeedName") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Bool)) :*: S1 ('MetaSel ('Just "createInvoiceLinkNeedPhoneNumber") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Bool))))) :*: ((S1 ('MetaSel ('Just "createInvoiceLinkNeedEmail") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Bool)) :*: S1 ('MetaSel ('Just "createInvoiceLinkNeedShippingAddress") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Bool))) :*: (S1 ('MetaSel ('Just "createInvoiceLinkSendPhoneNumberToProvider") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Bool)) :*: (S1 ('MetaSel ('Just "createInvoiceLinkSendEmailToProvider") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Bool)) :*: S1 ('MetaSel ('Just "createInvoiceLinkIsFlexible") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Bool))))))))

type CreateInvoiceLink = "createInvoiceLink" :> (ReqBody '[JSON] CreateInvoiceLinkRequest :> Post '[JSON] (Response Text))

createInvoiceLink :: CreateInvoiceLinkRequest -> ClientM (Response Text)

Use this method to create a link for an invoice. Returns the created invoice link as Text on success.

answerShippingQuery

data AnswerShippingQueryRequest

Constructors

AnswerShippingQueryRequest

Fields

• answerShippingQueryShippingQueryId :: Text

  Unique identifier for the query to be answered.

• answerShippingQueryOk :: Bool

  Specify True if delivery to the specified address is possible and False if there are any problems (for example, if delivery to the specified address is not possible).

• answerShippingQueryShippingOptions :: Maybe [ShippingOption]

  Required if ok is True. A JSON-serialized array of available shipping options.

• answerShippingQueryErrorMessage :: Maybe Text

  Required if ok is False. Error message in human readable form that explains why it is impossible to complete the order (e.g. "Sorry, delivery to your desired address is unavailable'). Telegram will display this message to the user.

Instances

FromJSON AnswerShippingQueryRequest

Defined in Telegram.Bot.API.Payments

Methods

parseJSON :: Value -> Parser AnswerShippingQueryRequest

parseJSONList :: Value -> Parser [AnswerShippingQueryRequest]

ToJSON AnswerShippingQueryRequest

Defined in Telegram.Bot.API.Payments

Methods

toJSON :: AnswerShippingQueryRequest -> Value

toEncoding :: AnswerShippingQueryRequest -> Encoding

toJSONList :: [AnswerShippingQueryRequest] -> Value

toEncodingList :: [AnswerShippingQueryRequest] -> Encoding

Generic AnswerShippingQueryRequest

Defined in Telegram.Bot.API.Payments

Associated Types

type Rep AnswerShippingQueryRequest :: Type -> Type

Methods

from :: AnswerShippingQueryRequest -> Rep AnswerShippingQueryRequest x

to :: Rep AnswerShippingQueryRequest x -> AnswerShippingQueryRequest

Show AnswerShippingQueryRequest

Defined in Telegram.Bot.API.Payments

Methods

showsPrec :: Int -> AnswerShippingQueryRequest -> ShowS

show :: AnswerShippingQueryRequest -> String

showList :: [AnswerShippingQueryRequest] -> ShowS

type Rep AnswerShippingQueryRequest

Defined in Telegram.Bot.API.Payments

type Rep AnswerShippingQueryRequest = D1 ('MetaData "AnswerShippingQueryRequest" "Telegram.Bot.API.Payments" "telegram-bot-api-6.7-8B5O9jcStFh8aacJiwZZeM" 'False) (C1 ('MetaCons "AnswerShippingQueryRequest" 'PrefixI 'True) ((S1 ('MetaSel ('Just "answerShippingQueryShippingQueryId") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text) :*: S1 ('MetaSel ('Just "answerShippingQueryOk") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Bool)) :*: (S1 ('MetaSel ('Just "answerShippingQueryShippingOptions") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe [ShippingOption])) :*: S1 ('MetaSel ('Just "answerShippingQueryErrorMessage") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Text)))))

type AnswerShippingQuery = "answerShippingQuery" :> (ReqBody '[JSON] AnswerShippingQueryRequest :> Post '[JSON] (Response Bool))

answerShippingQuery :: AnswerShippingQueryRequest -> ClientM (Response Bool)

If you sent an invoice requesting a shipping address and the parameter is_flexible was specified, the Bot API will send an Update with a shipping_query field to the bot. Use this method to reply to shipping queries. On success, True is returned.

answerPreCheckoutQuery

data AnswerPreCheckoutQueryRequest

Constructors

AnswerPreCheckoutQueryRequest

Fields

• answerPreCheckoutQueryPreCheckoutQueryId :: Text

  Unique identifier for the query to be answered.

• answerPreCheckoutQueryOk :: Bool

  Specify True if everything is alright (goods are available, etc.) and the bot is ready to proceed with the order. Use False if there are any problems.

• answerPreCheckoutQueryErrorMessage :: Maybe Text

  Required if ok is False. Error message in human readable form that explains the reason for failure to proceed with the checkout (e.g. "Sorry, somebody just bought the last of our amazing black T-shirts while you were busy filling out your payment details. Please choose a different color or garment!"). Telegram will display this message to the user.

Instances

FromJSON AnswerPreCheckoutQueryRequest

Defined in Telegram.Bot.API.Payments

Methods

parseJSON :: Value -> Parser AnswerPreCheckoutQueryRequest

parseJSONList :: Value -> Parser [AnswerPreCheckoutQueryRequest]

ToJSON AnswerPreCheckoutQueryRequest

Defined in Telegram.Bot.API.Payments

Methods

toJSON :: AnswerPreCheckoutQueryRequest -> Value

toEncoding :: AnswerPreCheckoutQueryRequest -> Encoding

toJSONList :: [AnswerPreCheckoutQueryRequest] -> Value

toEncodingList :: [AnswerPreCheckoutQueryRequest] -> Encoding

Generic AnswerPreCheckoutQueryRequest

Defined in Telegram.Bot.API.Payments

Associated Types

type Rep AnswerPreCheckoutQueryRequest :: Type -> Type

Methods

from :: AnswerPreCheckoutQueryRequest -> Rep AnswerPreCheckoutQueryRequest x

to :: Rep AnswerPreCheckoutQueryRequest x -> AnswerPreCheckoutQueryRequest

Show AnswerPreCheckoutQueryRequest

Defined in Telegram.Bot.API.Payments

Methods

showsPrec :: Int -> AnswerPreCheckoutQueryRequest -> ShowS

show :: AnswerPreCheckoutQueryRequest -> String

showList :: [AnswerPreCheckoutQueryRequest] -> ShowS

type Rep AnswerPreCheckoutQueryRequest

Defined in Telegram.Bot.API.Payments

type Rep AnswerPreCheckoutQueryRequest = D1 ('MetaData "AnswerPreCheckoutQueryRequest" "Telegram.Bot.API.Payments" "telegram-bot-api-6.7-8B5O9jcStFh8aacJiwZZeM" 'False) (C1 ('MetaCons "AnswerPreCheckoutQueryRequest" 'PrefixI 'True) (S1 ('MetaSel ('Just "answerPreCheckoutQueryPreCheckoutQueryId") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text) :*: (S1 ('MetaSel ('Just "answerPreCheckoutQueryOk") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Bool) :*: S1 ('MetaSel ('Just "answerPreCheckoutQueryErrorMessage") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Text)))))

type AnswerPreCheckoutQuery = "answerPreCheckoutQuery" :> (ReqBody '[JSON] AnswerPreCheckoutQueryRequest :> Post '[JSON] (Response Bool))

answerPreCheckoutQuery :: AnswerPreCheckoutQueryRequest -> ClientM (Response Bool)

Once the user has confirmed their payment and shipping details, the Bot API sends the final confirmation in the form of an Update with the field pre_checkout_query. Use this method to respond to such pre-checkout queries. On success, True is returned. Note: The Bot API must receive an answer within 10 seconds after the pre-checkout query was sent.

defAnswerPreCheckoutQuery :: Text -> Bool -> AnswerPreCheckoutQueryRequest

defAnswerShippingQuery :: Text -> Bool -> AnswerShippingQueryRequest

defCreateInvoiceLink :: Text -> Text -> Text -> Text -> Text -> [LabeledPrice] -> CreateInvoiceLinkRequest

defSendInvoice :: ChatId -> Text -> Text -> Text -> Text -> Text -> [LabeledPrice] -> SendInvoiceRequest