{-# LANGUAGE ExplicitForAll #-}
{-# LANGUAGE MultiWayIf #-}
{-# LANGUAGE OverloadedStrings #-}
module StripeAPI.Operations.PostIssuingDisputesDispute where
import qualified Control.Monad.Fail
import qualified Control.Monad.Trans.Reader
import qualified Data.Aeson
import qualified Data.Aeson as Data.Aeson.Encoding.Internal
import qualified Data.Aeson as Data.Aeson.Types
import qualified Data.Aeson as Data.Aeson.Types.FromJSON
import qualified Data.Aeson as Data.Aeson.Types.Internal
import qualified Data.Aeson as Data.Aeson.Types.ToJSON
import qualified Data.ByteString.Char8
import qualified Data.ByteString.Char8 as Data.ByteString.Internal
import qualified Data.Either
import qualified Data.Functor
import qualified Data.Scientific
import qualified Data.Text
import qualified Data.Text.Internal
import qualified Data.Time.Calendar as Data.Time.Calendar.Days
import qualified Data.Time.LocalTime as Data.Time.LocalTime.Internal.ZonedTime
import qualified Data.Vector
import qualified GHC.Base
import qualified GHC.Classes
import qualified GHC.Int
import qualified GHC.Show
import qualified GHC.Types
import qualified Network.HTTP.Client
import qualified Network.HTTP.Client as Network.HTTP.Client.Request
import qualified Network.HTTP.Client as Network.HTTP.Client.Types
import qualified Network.HTTP.Simple
import qualified Network.HTTP.Types
import qualified Network.HTTP.Types as Network.HTTP.Types.Status
import qualified Network.HTTP.Types as Network.HTTP.Types.URI
import qualified StripeAPI.Common
import StripeAPI.Types
import qualified Prelude as GHC.Integer.Type
import qualified Prelude as GHC.Maybe
postIssuingDisputesDispute ::
forall m.
StripeAPI.Common.MonadHTTP m =>
Data.Text.Internal.Text ->
GHC.Maybe.Maybe PostIssuingDisputesDisputeRequestBody ->
StripeAPI.Common.StripeT m (Network.HTTP.Client.Types.Response PostIssuingDisputesDisputeResponse)
postIssuingDisputesDispute :: Text
-> Maybe PostIssuingDisputesDisputeRequestBody
-> StripeT m (Response PostIssuingDisputesDisputeResponse)
postIssuingDisputesDispute
Text
dispute
Maybe PostIssuingDisputesDisputeRequestBody
body =
(Response ByteString
-> Response PostIssuingDisputesDisputeResponse)
-> StripeT m (Response ByteString)
-> StripeT m (Response PostIssuingDisputesDisputeResponse)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
GHC.Base.fmap
( \Response ByteString
response_0 ->
(ByteString -> PostIssuingDisputesDisputeResponse)
-> Response ByteString
-> Response PostIssuingDisputesDisputeResponse
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
GHC.Base.fmap
( (String -> PostIssuingDisputesDisputeResponse)
-> (PostIssuingDisputesDisputeResponse
-> PostIssuingDisputesDisputeResponse)
-> Either String PostIssuingDisputesDisputeResponse
-> PostIssuingDisputesDisputeResponse
forall a c b. (a -> c) -> (b -> c) -> Either a b -> c
Data.Either.either String -> PostIssuingDisputesDisputeResponse
PostIssuingDisputesDisputeResponseError PostIssuingDisputesDisputeResponse
-> PostIssuingDisputesDisputeResponse
forall a. a -> a
GHC.Base.id
(Either String PostIssuingDisputesDisputeResponse
-> PostIssuingDisputesDisputeResponse)
-> (ByteString -> Either String PostIssuingDisputesDisputeResponse)
-> ByteString
-> PostIssuingDisputesDisputeResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
GHC.Base.. ( \Response ByteString
response ByteString
body ->
if
| (\Status
status_1 -> Status -> Int
Network.HTTP.Types.Status.statusCode Status
status_1 Int -> Int -> Bool
forall a. Eq a => a -> a -> Bool
GHC.Classes.== Int
200) (Response ByteString -> Status
forall body. Response body -> Status
Network.HTTP.Client.Types.responseStatus Response ByteString
response) ->
Issuing'dispute -> PostIssuingDisputesDisputeResponse
PostIssuingDisputesDisputeResponse200
(Issuing'dispute -> PostIssuingDisputesDisputeResponse)
-> Either String Issuing'dispute
-> Either String PostIssuingDisputesDisputeResponse
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Data.Functor.<$> ( ByteString -> Either String Issuing'dispute
forall a. FromJSON a => ByteString -> Either String a
Data.Aeson.eitherDecodeStrict ByteString
body ::
Data.Either.Either
GHC.Base.String
Issuing'dispute
)
| Bool -> Status -> Bool
forall a b. a -> b -> a
GHC.Base.const Bool
GHC.Types.True (Response ByteString -> Status
forall body. Response body -> Status
Network.HTTP.Client.Types.responseStatus Response ByteString
response) ->
Error -> PostIssuingDisputesDisputeResponse
PostIssuingDisputesDisputeResponseDefault
(Error -> PostIssuingDisputesDisputeResponse)
-> Either String Error
-> Either String PostIssuingDisputesDisputeResponse
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Data.Functor.<$> ( ByteString -> Either String Error
forall a. FromJSON a => ByteString -> Either String a
Data.Aeson.eitherDecodeStrict ByteString
body ::
Data.Either.Either
GHC.Base.String
Error
)
| Bool
GHC.Base.otherwise -> String -> Either String PostIssuingDisputesDisputeResponse
forall a b. a -> Either a b
Data.Either.Left String
"Missing default response type"
)
Response ByteString
response_0
)
Response ByteString
response_0
)
(Text
-> Text
-> [QueryParameter]
-> Maybe PostIssuingDisputesDisputeRequestBody
-> RequestBodyEncoding
-> StripeT m (Response ByteString)
forall (m :: * -> *) body.
(MonadHTTP m, ToJSON body) =>
Text
-> Text
-> [QueryParameter]
-> Maybe body
-> RequestBodyEncoding
-> StripeT m (Response ByteString)
StripeAPI.Common.doBodyCallWithConfigurationM (Text -> Text
Data.Text.toUpper (Text -> Text) -> Text -> Text
forall a b. (a -> b) -> a -> b
GHC.Base.$ String -> Text
Data.Text.pack String
"POST") (String -> Text
Data.Text.pack (String
"/v1/issuing/disputes/" String -> String -> String
forall a. [a] -> [a] -> [a]
GHC.Base.++ (ByteString -> String
Data.ByteString.Char8.unpack (Bool -> ByteString -> ByteString
Network.HTTP.Types.URI.urlEncode Bool
GHC.Types.True (ByteString -> ByteString) -> ByteString -> ByteString
forall a b. (a -> b) -> a -> b
GHC.Base.$ (String -> ByteString
Data.ByteString.Char8.pack (String -> ByteString) -> String -> ByteString
forall a b. (a -> b) -> a -> b
GHC.Base.$ Text -> String
forall a. StringifyModel a => a -> String
StripeAPI.Common.stringifyModel Text
dispute)) String -> String -> String
forall a. [a] -> [a] -> [a]
GHC.Base.++ String
""))) [QueryParameter]
forall a. Monoid a => a
GHC.Base.mempty Maybe PostIssuingDisputesDisputeRequestBody
body RequestBodyEncoding
StripeAPI.Common.RequestBodyEncodingFormData)
data PostIssuingDisputesDisputeRequestBody = PostIssuingDisputesDisputeRequestBody
{
PostIssuingDisputesDisputeRequestBody
-> Maybe PostIssuingDisputesDisputeRequestBodyEvidence'
postIssuingDisputesDisputeRequestBodyEvidence :: (GHC.Maybe.Maybe PostIssuingDisputesDisputeRequestBodyEvidence'),
PostIssuingDisputesDisputeRequestBody -> Maybe [Text]
postIssuingDisputesDisputeRequestBodyExpand :: (GHC.Maybe.Maybe ([Data.Text.Internal.Text])),
PostIssuingDisputesDisputeRequestBody
-> Maybe PostIssuingDisputesDisputeRequestBodyMetadata'Variants
postIssuingDisputesDisputeRequestBodyMetadata :: (GHC.Maybe.Maybe PostIssuingDisputesDisputeRequestBodyMetadata'Variants)
}
deriving
( Int -> PostIssuingDisputesDisputeRequestBody -> String -> String
[PostIssuingDisputesDisputeRequestBody] -> String -> String
PostIssuingDisputesDisputeRequestBody -> String
(Int -> PostIssuingDisputesDisputeRequestBody -> String -> String)
-> (PostIssuingDisputesDisputeRequestBody -> String)
-> ([PostIssuingDisputesDisputeRequestBody] -> String -> String)
-> Show PostIssuingDisputesDisputeRequestBody
forall a.
(Int -> a -> String -> String)
-> (a -> String) -> ([a] -> String -> String) -> Show a
showList :: [PostIssuingDisputesDisputeRequestBody] -> String -> String
$cshowList :: [PostIssuingDisputesDisputeRequestBody] -> String -> String
show :: PostIssuingDisputesDisputeRequestBody -> String
$cshow :: PostIssuingDisputesDisputeRequestBody -> String
showsPrec :: Int -> PostIssuingDisputesDisputeRequestBody -> String -> String
$cshowsPrec :: Int -> PostIssuingDisputesDisputeRequestBody -> String -> String
GHC.Show.Show,
PostIssuingDisputesDisputeRequestBody
-> PostIssuingDisputesDisputeRequestBody -> Bool
(PostIssuingDisputesDisputeRequestBody
-> PostIssuingDisputesDisputeRequestBody -> Bool)
-> (PostIssuingDisputesDisputeRequestBody
-> PostIssuingDisputesDisputeRequestBody -> Bool)
-> Eq PostIssuingDisputesDisputeRequestBody
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: PostIssuingDisputesDisputeRequestBody
-> PostIssuingDisputesDisputeRequestBody -> Bool
$c/= :: PostIssuingDisputesDisputeRequestBody
-> PostIssuingDisputesDisputeRequestBody -> Bool
== :: PostIssuingDisputesDisputeRequestBody
-> PostIssuingDisputesDisputeRequestBody -> Bool
$c== :: PostIssuingDisputesDisputeRequestBody
-> PostIssuingDisputesDisputeRequestBody -> Bool
GHC.Classes.Eq
)
instance Data.Aeson.Types.ToJSON.ToJSON PostIssuingDisputesDisputeRequestBody where
toJSON :: PostIssuingDisputesDisputeRequestBody -> Value
toJSON PostIssuingDisputesDisputeRequestBody
obj = [Pair] -> Value
Data.Aeson.Types.Internal.object (Text
"evidence" Text
-> Maybe PostIssuingDisputesDisputeRequestBodyEvidence' -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBody
-> Maybe PostIssuingDisputesDisputeRequestBodyEvidence'
postIssuingDisputesDisputeRequestBodyEvidence PostIssuingDisputesDisputeRequestBody
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"expand" Text -> Maybe [Text] -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBody -> Maybe [Text]
postIssuingDisputesDisputeRequestBodyExpand PostIssuingDisputesDisputeRequestBody
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"metadata" Text
-> Maybe PostIssuingDisputesDisputeRequestBodyMetadata'Variants
-> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBody
-> Maybe PostIssuingDisputesDisputeRequestBodyMetadata'Variants
postIssuingDisputesDisputeRequestBodyMetadata PostIssuingDisputesDisputeRequestBody
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: [Pair]
forall a. Monoid a => a
GHC.Base.mempty)
toEncoding :: PostIssuingDisputesDisputeRequestBody -> Encoding
toEncoding PostIssuingDisputesDisputeRequestBody
obj = Series -> Encoding
Data.Aeson.Encoding.Internal.pairs ((Text
"evidence" Text
-> Maybe PostIssuingDisputesDisputeRequestBodyEvidence' -> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBody
-> Maybe PostIssuingDisputesDisputeRequestBodyEvidence'
postIssuingDisputesDisputeRequestBodyEvidence PostIssuingDisputesDisputeRequestBody
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> ((Text
"expand" Text -> Maybe [Text] -> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBody -> Maybe [Text]
postIssuingDisputesDisputeRequestBodyExpand PostIssuingDisputesDisputeRequestBody
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> (Text
"metadata" Text
-> Maybe PostIssuingDisputesDisputeRequestBodyMetadata'Variants
-> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBody
-> Maybe PostIssuingDisputesDisputeRequestBodyMetadata'Variants
postIssuingDisputesDisputeRequestBodyMetadata PostIssuingDisputesDisputeRequestBody
obj)))
instance Data.Aeson.Types.FromJSON.FromJSON PostIssuingDisputesDisputeRequestBody where
parseJSON :: Value -> Parser PostIssuingDisputesDisputeRequestBody
parseJSON = String
-> (Object -> Parser PostIssuingDisputesDisputeRequestBody)
-> Value
-> Parser PostIssuingDisputesDisputeRequestBody
forall a. String -> (Object -> Parser a) -> Value -> Parser a
Data.Aeson.Types.FromJSON.withObject String
"PostIssuingDisputesDisputeRequestBody" (\Object
obj -> (((Maybe PostIssuingDisputesDisputeRequestBodyEvidence'
-> Maybe [Text]
-> Maybe PostIssuingDisputesDisputeRequestBodyMetadata'Variants
-> PostIssuingDisputesDisputeRequestBody)
-> Parser
(Maybe PostIssuingDisputesDisputeRequestBodyEvidence'
-> Maybe [Text]
-> Maybe PostIssuingDisputesDisputeRequestBodyMetadata'Variants
-> PostIssuingDisputesDisputeRequestBody)
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure Maybe PostIssuingDisputesDisputeRequestBodyEvidence'
-> Maybe [Text]
-> Maybe PostIssuingDisputesDisputeRequestBodyMetadata'Variants
-> PostIssuingDisputesDisputeRequestBody
PostIssuingDisputesDisputeRequestBody Parser
(Maybe PostIssuingDisputesDisputeRequestBodyEvidence'
-> Maybe [Text]
-> Maybe PostIssuingDisputesDisputeRequestBodyMetadata'Variants
-> PostIssuingDisputesDisputeRequestBody)
-> Parser (Maybe PostIssuingDisputesDisputeRequestBodyEvidence')
-> Parser
(Maybe [Text]
-> Maybe PostIssuingDisputesDisputeRequestBodyMetadata'Variants
-> PostIssuingDisputesDisputeRequestBody)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object
-> Text
-> Parser (Maybe PostIssuingDisputesDisputeRequestBodyEvidence')
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Data.Aeson.Types.FromJSON..:? Text
"evidence")) Parser
(Maybe [Text]
-> Maybe PostIssuingDisputesDisputeRequestBodyMetadata'Variants
-> PostIssuingDisputesDisputeRequestBody)
-> Parser (Maybe [Text])
-> Parser
(Maybe PostIssuingDisputesDisputeRequestBodyMetadata'Variants
-> PostIssuingDisputesDisputeRequestBody)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object -> Text -> Parser (Maybe [Text])
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Data.Aeson.Types.FromJSON..:? Text
"expand")) Parser
(Maybe PostIssuingDisputesDisputeRequestBodyMetadata'Variants
-> PostIssuingDisputesDisputeRequestBody)
-> Parser
(Maybe PostIssuingDisputesDisputeRequestBodyMetadata'Variants)
-> Parser PostIssuingDisputesDisputeRequestBody
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object
-> Text
-> Parser
(Maybe PostIssuingDisputesDisputeRequestBodyMetadata'Variants)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Data.Aeson.Types.FromJSON..:? Text
"metadata"))
mkPostIssuingDisputesDisputeRequestBody :: PostIssuingDisputesDisputeRequestBody
mkPostIssuingDisputesDisputeRequestBody :: PostIssuingDisputesDisputeRequestBody
mkPostIssuingDisputesDisputeRequestBody =
PostIssuingDisputesDisputeRequestBody :: Maybe PostIssuingDisputesDisputeRequestBodyEvidence'
-> Maybe [Text]
-> Maybe PostIssuingDisputesDisputeRequestBodyMetadata'Variants
-> PostIssuingDisputesDisputeRequestBody
PostIssuingDisputesDisputeRequestBody
{ postIssuingDisputesDisputeRequestBodyEvidence :: Maybe PostIssuingDisputesDisputeRequestBodyEvidence'
postIssuingDisputesDisputeRequestBodyEvidence = Maybe PostIssuingDisputesDisputeRequestBodyEvidence'
forall a. Maybe a
GHC.Maybe.Nothing,
postIssuingDisputesDisputeRequestBodyExpand :: Maybe [Text]
postIssuingDisputesDisputeRequestBodyExpand = Maybe [Text]
forall a. Maybe a
GHC.Maybe.Nothing,
postIssuingDisputesDisputeRequestBodyMetadata :: Maybe PostIssuingDisputesDisputeRequestBodyMetadata'Variants
postIssuingDisputesDisputeRequestBodyMetadata = Maybe PostIssuingDisputesDisputeRequestBodyMetadata'Variants
forall a. Maybe a
GHC.Maybe.Nothing
}
data PostIssuingDisputesDisputeRequestBodyEvidence' = PostIssuingDisputesDisputeRequestBodyEvidence'
{
PostIssuingDisputesDisputeRequestBodyEvidence'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'Variants
postIssuingDisputesDisputeRequestBodyEvidence'Canceled :: (GHC.Maybe.Maybe PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'Variants),
PostIssuingDisputesDisputeRequestBodyEvidence'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'Variants
postIssuingDisputesDisputeRequestBodyEvidence'Duplicate :: (GHC.Maybe.Maybe PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'Variants),
PostIssuingDisputesDisputeRequestBodyEvidence'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'Variants
postIssuingDisputesDisputeRequestBodyEvidence'Fraudulent :: (GHC.Maybe.Maybe PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'Variants),
PostIssuingDisputesDisputeRequestBodyEvidence'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'Variants
postIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed :: (GHC.Maybe.Maybe PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'Variants),
PostIssuingDisputesDisputeRequestBodyEvidence'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'Variants
postIssuingDisputesDisputeRequestBodyEvidence'NotReceived :: (GHC.Maybe.Maybe PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'Variants),
PostIssuingDisputesDisputeRequestBodyEvidence'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Other'Variants
postIssuingDisputesDisputeRequestBodyEvidence'Other :: (GHC.Maybe.Maybe PostIssuingDisputesDisputeRequestBodyEvidence'Other'Variants),
PostIssuingDisputesDisputeRequestBodyEvidence'
-> Maybe PostIssuingDisputesDisputeRequestBodyEvidence'Reason'
postIssuingDisputesDisputeRequestBodyEvidence'Reason :: (GHC.Maybe.Maybe PostIssuingDisputesDisputeRequestBodyEvidence'Reason'),
PostIssuingDisputesDisputeRequestBodyEvidence'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'Variants
postIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed :: (GHC.Maybe.Maybe PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'Variants)
}
deriving
( Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'
-> String
-> String
[PostIssuingDisputesDisputeRequestBodyEvidence']
-> String -> String
PostIssuingDisputesDisputeRequestBodyEvidence' -> String
(Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'
-> String
-> String)
-> (PostIssuingDisputesDisputeRequestBodyEvidence' -> String)
-> ([PostIssuingDisputesDisputeRequestBodyEvidence']
-> String -> String)
-> Show PostIssuingDisputesDisputeRequestBodyEvidence'
forall a.
(Int -> a -> String -> String)
-> (a -> String) -> ([a] -> String -> String) -> Show a
showList :: [PostIssuingDisputesDisputeRequestBodyEvidence']
-> String -> String
$cshowList :: [PostIssuingDisputesDisputeRequestBodyEvidence']
-> String -> String
show :: PostIssuingDisputesDisputeRequestBodyEvidence' -> String
$cshow :: PostIssuingDisputesDisputeRequestBodyEvidence' -> String
showsPrec :: Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'
-> String
-> String
$cshowsPrec :: Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'
-> String
-> String
GHC.Show.Show,
PostIssuingDisputesDisputeRequestBodyEvidence'
-> PostIssuingDisputesDisputeRequestBodyEvidence' -> Bool
(PostIssuingDisputesDisputeRequestBodyEvidence'
-> PostIssuingDisputesDisputeRequestBodyEvidence' -> Bool)
-> (PostIssuingDisputesDisputeRequestBodyEvidence'
-> PostIssuingDisputesDisputeRequestBodyEvidence' -> Bool)
-> Eq PostIssuingDisputesDisputeRequestBodyEvidence'
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: PostIssuingDisputesDisputeRequestBodyEvidence'
-> PostIssuingDisputesDisputeRequestBodyEvidence' -> Bool
$c/= :: PostIssuingDisputesDisputeRequestBodyEvidence'
-> PostIssuingDisputesDisputeRequestBodyEvidence' -> Bool
== :: PostIssuingDisputesDisputeRequestBodyEvidence'
-> PostIssuingDisputesDisputeRequestBodyEvidence' -> Bool
$c== :: PostIssuingDisputesDisputeRequestBodyEvidence'
-> PostIssuingDisputesDisputeRequestBodyEvidence' -> Bool
GHC.Classes.Eq
)
instance Data.Aeson.Types.ToJSON.ToJSON PostIssuingDisputesDisputeRequestBodyEvidence' where
toJSON :: PostIssuingDisputesDisputeRequestBodyEvidence' -> Value
toJSON PostIssuingDisputesDisputeRequestBodyEvidence'
obj = [Pair] -> Value
Data.Aeson.Types.Internal.object (Text
"canceled" Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'Variants
-> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'Variants
postIssuingDisputesDisputeRequestBodyEvidence'Canceled PostIssuingDisputesDisputeRequestBodyEvidence'
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"duplicate" Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'Variants
-> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'Variants
postIssuingDisputesDisputeRequestBodyEvidence'Duplicate PostIssuingDisputesDisputeRequestBodyEvidence'
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"fraudulent" Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'Variants
-> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'Variants
postIssuingDisputesDisputeRequestBodyEvidence'Fraudulent PostIssuingDisputesDisputeRequestBodyEvidence'
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"merchandise_not_as_described" Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'Variants
-> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'Variants
postIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed PostIssuingDisputesDisputeRequestBodyEvidence'
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"not_received" Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'Variants
-> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'Variants
postIssuingDisputesDisputeRequestBodyEvidence'NotReceived PostIssuingDisputesDisputeRequestBodyEvidence'
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"other" Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Other'Variants
-> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Other'Variants
postIssuingDisputesDisputeRequestBodyEvidence'Other PostIssuingDisputesDisputeRequestBodyEvidence'
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"reason" Text
-> Maybe PostIssuingDisputesDisputeRequestBodyEvidence'Reason'
-> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'
-> Maybe PostIssuingDisputesDisputeRequestBodyEvidence'Reason'
postIssuingDisputesDisputeRequestBodyEvidence'Reason PostIssuingDisputesDisputeRequestBodyEvidence'
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"service_not_as_described" Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'Variants
-> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'Variants
postIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed PostIssuingDisputesDisputeRequestBodyEvidence'
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: [Pair]
forall a. Monoid a => a
GHC.Base.mempty)
toEncoding :: PostIssuingDisputesDisputeRequestBodyEvidence' -> Encoding
toEncoding PostIssuingDisputesDisputeRequestBodyEvidence'
obj = Series -> Encoding
Data.Aeson.Encoding.Internal.pairs ((Text
"canceled" Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'Variants
-> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'Variants
postIssuingDisputesDisputeRequestBodyEvidence'Canceled PostIssuingDisputesDisputeRequestBodyEvidence'
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> ((Text
"duplicate" Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'Variants
-> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'Variants
postIssuingDisputesDisputeRequestBodyEvidence'Duplicate PostIssuingDisputesDisputeRequestBodyEvidence'
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> ((Text
"fraudulent" Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'Variants
-> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'Variants
postIssuingDisputesDisputeRequestBodyEvidence'Fraudulent PostIssuingDisputesDisputeRequestBodyEvidence'
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> ((Text
"merchandise_not_as_described" Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'Variants
-> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'Variants
postIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed PostIssuingDisputesDisputeRequestBodyEvidence'
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> ((Text
"not_received" Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'Variants
-> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'Variants
postIssuingDisputesDisputeRequestBodyEvidence'NotReceived PostIssuingDisputesDisputeRequestBodyEvidence'
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> ((Text
"other" Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Other'Variants
-> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Other'Variants
postIssuingDisputesDisputeRequestBodyEvidence'Other PostIssuingDisputesDisputeRequestBodyEvidence'
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> ((Text
"reason" Text
-> Maybe PostIssuingDisputesDisputeRequestBodyEvidence'Reason'
-> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'
-> Maybe PostIssuingDisputesDisputeRequestBodyEvidence'Reason'
postIssuingDisputesDisputeRequestBodyEvidence'Reason PostIssuingDisputesDisputeRequestBodyEvidence'
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> (Text
"service_not_as_described" Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'Variants
-> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'Variants
postIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed PostIssuingDisputesDisputeRequestBodyEvidence'
obj))))))))
instance Data.Aeson.Types.FromJSON.FromJSON PostIssuingDisputesDisputeRequestBodyEvidence' where
parseJSON :: Value -> Parser PostIssuingDisputesDisputeRequestBodyEvidence'
parseJSON = String
-> (Object
-> Parser PostIssuingDisputesDisputeRequestBodyEvidence')
-> Value
-> Parser PostIssuingDisputesDisputeRequestBodyEvidence'
forall a. String -> (Object -> Parser a) -> Value -> Parser a
Data.Aeson.Types.FromJSON.withObject String
"PostIssuingDisputesDisputeRequestBodyEvidence'" (\Object
obj -> ((((((((Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Other'Variants
-> Maybe PostIssuingDisputesDisputeRequestBodyEvidence'Reason'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence')
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Other'Variants
-> Maybe PostIssuingDisputesDisputeRequestBodyEvidence'Reason'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence')
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Other'Variants
-> Maybe PostIssuingDisputesDisputeRequestBodyEvidence'Reason'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'
PostIssuingDisputesDisputeRequestBodyEvidence' Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Other'Variants
-> Maybe PostIssuingDisputesDisputeRequestBodyEvidence'Reason'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence')
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'Variants)
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Other'Variants
-> Maybe PostIssuingDisputesDisputeRequestBodyEvidence'Reason'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence')
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object
-> Text
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'Variants)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Data.Aeson.Types.FromJSON..:? Text
"canceled")) Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Other'Variants
-> Maybe PostIssuingDisputesDisputeRequestBodyEvidence'Reason'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence')
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'Variants)
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Other'Variants
-> Maybe PostIssuingDisputesDisputeRequestBodyEvidence'Reason'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence')
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object
-> Text
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'Variants)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Data.Aeson.Types.FromJSON..:? Text
"duplicate")) Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Other'Variants
-> Maybe PostIssuingDisputesDisputeRequestBodyEvidence'Reason'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence')
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'Variants)
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Other'Variants
-> Maybe PostIssuingDisputesDisputeRequestBodyEvidence'Reason'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence')
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object
-> Text
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'Variants)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Data.Aeson.Types.FromJSON..:? Text
"fraudulent")) Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Other'Variants
-> Maybe PostIssuingDisputesDisputeRequestBodyEvidence'Reason'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence')
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'Variants)
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Other'Variants
-> Maybe PostIssuingDisputesDisputeRequestBodyEvidence'Reason'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence')
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object
-> Text
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'Variants)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Data.Aeson.Types.FromJSON..:? Text
"merchandise_not_as_described")) Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Other'Variants
-> Maybe PostIssuingDisputesDisputeRequestBodyEvidence'Reason'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence')
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'Variants)
-> Parser
(Maybe PostIssuingDisputesDisputeRequestBodyEvidence'Other'Variants
-> Maybe PostIssuingDisputesDisputeRequestBodyEvidence'Reason'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence')
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object
-> Text
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'Variants)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Data.Aeson.Types.FromJSON..:? Text
"not_received")) Parser
(Maybe PostIssuingDisputesDisputeRequestBodyEvidence'Other'Variants
-> Maybe PostIssuingDisputesDisputeRequestBodyEvidence'Reason'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence')
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Other'Variants)
-> Parser
(Maybe PostIssuingDisputesDisputeRequestBodyEvidence'Reason'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence')
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object
-> Text
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Other'Variants)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Data.Aeson.Types.FromJSON..:? Text
"other")) Parser
(Maybe PostIssuingDisputesDisputeRequestBodyEvidence'Reason'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence')
-> Parser
(Maybe PostIssuingDisputesDisputeRequestBodyEvidence'Reason')
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence')
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object
-> Text
-> Parser
(Maybe PostIssuingDisputesDisputeRequestBodyEvidence'Reason')
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Data.Aeson.Types.FromJSON..:? Text
"reason")) Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence')
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'Variants)
-> Parser PostIssuingDisputesDisputeRequestBodyEvidence'
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object
-> Text
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'Variants)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Data.Aeson.Types.FromJSON..:? Text
"service_not_as_described"))
mkPostIssuingDisputesDisputeRequestBodyEvidence' :: PostIssuingDisputesDisputeRequestBodyEvidence'
mkPostIssuingDisputesDisputeRequestBodyEvidence' :: PostIssuingDisputesDisputeRequestBodyEvidence'
mkPostIssuingDisputesDisputeRequestBodyEvidence' =
PostIssuingDisputesDisputeRequestBodyEvidence' :: Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Other'Variants
-> Maybe PostIssuingDisputesDisputeRequestBodyEvidence'Reason'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'
PostIssuingDisputesDisputeRequestBodyEvidence'
{ postIssuingDisputesDisputeRequestBodyEvidence'Canceled :: Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'Variants
postIssuingDisputesDisputeRequestBodyEvidence'Canceled = Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'Variants
forall a. Maybe a
GHC.Maybe.Nothing,
postIssuingDisputesDisputeRequestBodyEvidence'Duplicate :: Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'Variants
postIssuingDisputesDisputeRequestBodyEvidence'Duplicate = Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'Variants
forall a. Maybe a
GHC.Maybe.Nothing,
postIssuingDisputesDisputeRequestBodyEvidence'Fraudulent :: Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'Variants
postIssuingDisputesDisputeRequestBodyEvidence'Fraudulent = Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'Variants
forall a. Maybe a
GHC.Maybe.Nothing,
postIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed :: Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'Variants
postIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed = Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'Variants
forall a. Maybe a
GHC.Maybe.Nothing,
postIssuingDisputesDisputeRequestBodyEvidence'NotReceived :: Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'Variants
postIssuingDisputesDisputeRequestBodyEvidence'NotReceived = Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'Variants
forall a. Maybe a
GHC.Maybe.Nothing,
postIssuingDisputesDisputeRequestBodyEvidence'Other :: Maybe PostIssuingDisputesDisputeRequestBodyEvidence'Other'Variants
postIssuingDisputesDisputeRequestBodyEvidence'Other = Maybe PostIssuingDisputesDisputeRequestBodyEvidence'Other'Variants
forall a. Maybe a
GHC.Maybe.Nothing,
postIssuingDisputesDisputeRequestBodyEvidence'Reason :: Maybe PostIssuingDisputesDisputeRequestBodyEvidence'Reason'
postIssuingDisputesDisputeRequestBodyEvidence'Reason = Maybe PostIssuingDisputesDisputeRequestBodyEvidence'Reason'
forall a. Maybe a
GHC.Maybe.Nothing,
postIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed :: Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'Variants
postIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed = Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'Variants
forall a. Maybe a
GHC.Maybe.Nothing
}
data PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1 = PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
{
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1AdditionalDocumentation'Variants
postIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1AdditionalDocumentation :: (GHC.Maybe.Maybe PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1AdditionalDocumentation'Variants),
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CanceledAt'Variants
postIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CanceledAt :: (GHC.Maybe.Maybe PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CanceledAt'Variants),
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationPolicyProvided'Variants
postIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationPolicyProvided :: (GHC.Maybe.Maybe PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationPolicyProvided'Variants),
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
-> Maybe Text
postIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationReason :: (GHC.Maybe.Maybe Data.Text.Internal.Text),
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt'Variants
postIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt :: (GHC.Maybe.Maybe PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt'Variants),
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
-> Maybe Text
postIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1Explanation :: (GHC.Maybe.Maybe Data.Text.Internal.Text),
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
-> Maybe Text
postIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductDescription :: (GHC.Maybe.Maybe Data.Text.Internal.Text),
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType'
postIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType :: (GHC.Maybe.Maybe PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType'),
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'
postIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus :: (GHC.Maybe.Maybe PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'),
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Variants
postIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt :: (GHC.Maybe.Maybe PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Variants)
}
deriving
( Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
-> String
-> String
[PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1]
-> String -> String
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
-> String
(Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
-> String
-> String)
-> (PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
-> String)
-> ([PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1]
-> String -> String)
-> Show
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
forall a.
(Int -> a -> String -> String)
-> (a -> String) -> ([a] -> String -> String) -> Show a
showList :: [PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1]
-> String -> String
$cshowList :: [PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1]
-> String -> String
show :: PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
-> String
$cshow :: PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
-> String
showsPrec :: Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
-> String
-> String
$cshowsPrec :: Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
-> String
-> String
GHC.Show.Show,
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
-> Bool
(PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
-> Bool)
-> (PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
-> Bool)
-> Eq PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
-> Bool
$c/= :: PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
-> Bool
== :: PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
-> Bool
$c== :: PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
-> Bool
GHC.Classes.Eq
)
instance Data.Aeson.Types.ToJSON.ToJSON PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1 where
toJSON :: PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
-> Value
toJSON PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
obj = [Pair] -> Value
Data.Aeson.Types.Internal.object (Text
"additional_documentation" Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1AdditionalDocumentation'Variants
-> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1AdditionalDocumentation'Variants
postIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1AdditionalDocumentation PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"canceled_at" Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CanceledAt'Variants
-> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CanceledAt'Variants
postIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CanceledAt PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"cancellation_policy_provided" Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationPolicyProvided'Variants
-> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationPolicyProvided'Variants
postIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationPolicyProvided PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"cancellation_reason" Text -> Maybe Text -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
-> Maybe Text
postIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationReason PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"expected_at" Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt'Variants
-> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt'Variants
postIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"explanation" Text -> Maybe Text -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
-> Maybe Text
postIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1Explanation PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"product_description" Text -> Maybe Text -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
-> Maybe Text
postIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductDescription PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"product_type" Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType'
-> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType'
postIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"return_status" Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'
-> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'
postIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"returned_at" Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Variants
-> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Variants
postIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: [Pair]
forall a. Monoid a => a
GHC.Base.mempty)
toEncoding :: PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
-> Encoding
toEncoding PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
obj = Series -> Encoding
Data.Aeson.Encoding.Internal.pairs ((Text
"additional_documentation" Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1AdditionalDocumentation'Variants
-> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1AdditionalDocumentation'Variants
postIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1AdditionalDocumentation PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> ((Text
"canceled_at" Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CanceledAt'Variants
-> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CanceledAt'Variants
postIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CanceledAt PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> ((Text
"cancellation_policy_provided" Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationPolicyProvided'Variants
-> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationPolicyProvided'Variants
postIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationPolicyProvided PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> ((Text
"cancellation_reason" Text -> Maybe Text -> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
-> Maybe Text
postIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationReason PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> ((Text
"expected_at" Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt'Variants
-> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt'Variants
postIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> ((Text
"explanation" Text -> Maybe Text -> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
-> Maybe Text
postIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1Explanation PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> ((Text
"product_description" Text -> Maybe Text -> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
-> Maybe Text
postIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductDescription PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> ((Text
"product_type" Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType'
-> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType'
postIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> ((Text
"return_status" Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'
-> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'
postIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> (Text
"returned_at" Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Variants
-> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Variants
postIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
obj))))))))))
instance Data.Aeson.Types.FromJSON.FromJSON PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1 where
parseJSON :: Value
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
parseJSON = String
-> (Object
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1)
-> Value
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
forall a. String -> (Object -> Parser a) -> Value -> Parser a
Data.Aeson.Types.FromJSON.withObject String
"PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1" (\Object
obj -> ((((((((((Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1AdditionalDocumentation'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CanceledAt'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationPolicyProvided'Variants
-> Maybe Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt'Variants
-> Maybe Text
-> Maybe Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1)
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1AdditionalDocumentation'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CanceledAt'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationPolicyProvided'Variants
-> Maybe Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt'Variants
-> Maybe Text
-> Maybe Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1)
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1AdditionalDocumentation'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CanceledAt'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationPolicyProvided'Variants
-> Maybe Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt'Variants
-> Maybe Text
-> Maybe Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1 Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1AdditionalDocumentation'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CanceledAt'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationPolicyProvided'Variants
-> Maybe Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt'Variants
-> Maybe Text
-> Maybe Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1)
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1AdditionalDocumentation'Variants)
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CanceledAt'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationPolicyProvided'Variants
-> Maybe Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt'Variants
-> Maybe Text
-> Maybe Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object
-> Text
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1AdditionalDocumentation'Variants)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Data.Aeson.Types.FromJSON..:? Text
"additional_documentation")) Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CanceledAt'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationPolicyProvided'Variants
-> Maybe Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt'Variants
-> Maybe Text
-> Maybe Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1)
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CanceledAt'Variants)
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationPolicyProvided'Variants
-> Maybe Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt'Variants
-> Maybe Text
-> Maybe Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object
-> Text
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CanceledAt'Variants)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Data.Aeson.Types.FromJSON..:? Text
"canceled_at")) Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationPolicyProvided'Variants
-> Maybe Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt'Variants
-> Maybe Text
-> Maybe Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1)
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationPolicyProvided'Variants)
-> Parser
(Maybe Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt'Variants
-> Maybe Text
-> Maybe Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object
-> Text
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationPolicyProvided'Variants)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Data.Aeson.Types.FromJSON..:? Text
"cancellation_policy_provided")) Parser
(Maybe Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt'Variants
-> Maybe Text
-> Maybe Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1)
-> Parser (Maybe Text)
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt'Variants
-> Maybe Text
-> Maybe Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object -> Text -> Parser (Maybe Text)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Data.Aeson.Types.FromJSON..:? Text
"cancellation_reason")) Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt'Variants
-> Maybe Text
-> Maybe Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1)
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt'Variants)
-> Parser
(Maybe Text
-> Maybe Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object
-> Text
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt'Variants)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Data.Aeson.Types.FromJSON..:? Text
"expected_at")) Parser
(Maybe Text
-> Maybe Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1)
-> Parser (Maybe Text)
-> Parser
(Maybe Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object -> Text -> Parser (Maybe Text)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Data.Aeson.Types.FromJSON..:? Text
"explanation")) Parser
(Maybe Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1)
-> Parser (Maybe Text)
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object -> Text -> Parser (Maybe Text)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Data.Aeson.Types.FromJSON..:? Text
"product_description")) Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1)
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType')
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object
-> Text
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType')
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Data.Aeson.Types.FromJSON..:? Text
"product_type")) Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1)
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus')
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object
-> Text
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus')
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Data.Aeson.Types.FromJSON..:? Text
"return_status")) Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1)
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Variants)
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object
-> Text
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Variants)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Data.Aeson.Types.FromJSON..:? Text
"returned_at"))
mkPostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1 :: PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
mkPostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1 :: PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
mkPostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1 =
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1 :: Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1AdditionalDocumentation'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CanceledAt'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationPolicyProvided'Variants
-> Maybe Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt'Variants
-> Maybe Text
-> Maybe Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
{ postIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1AdditionalDocumentation :: Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1AdditionalDocumentation'Variants
postIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1AdditionalDocumentation = Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1AdditionalDocumentation'Variants
forall a. Maybe a
GHC.Maybe.Nothing,
postIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CanceledAt :: Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CanceledAt'Variants
postIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CanceledAt = Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CanceledAt'Variants
forall a. Maybe a
GHC.Maybe.Nothing,
postIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationPolicyProvided :: Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationPolicyProvided'Variants
postIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationPolicyProvided = Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationPolicyProvided'Variants
forall a. Maybe a
GHC.Maybe.Nothing,
postIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationReason :: Maybe Text
postIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationReason = Maybe Text
forall a. Maybe a
GHC.Maybe.Nothing,
postIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt :: Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt'Variants
postIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt = Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt'Variants
forall a. Maybe a
GHC.Maybe.Nothing,
postIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1Explanation :: Maybe Text
postIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1Explanation = Maybe Text
forall a. Maybe a
GHC.Maybe.Nothing,
postIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductDescription :: Maybe Text
postIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductDescription = Maybe Text
forall a. Maybe a
GHC.Maybe.Nothing,
postIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType :: Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType'
postIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType = Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType'
forall a. Maybe a
GHC.Maybe.Nothing,
postIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus :: Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'
postIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus = Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'
forall a. Maybe a
GHC.Maybe.Nothing,
postIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt :: Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Variants
postIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt = Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Variants
forall a. Maybe a
GHC.Maybe.Nothing
}
data PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1AdditionalDocumentation'Variants
=
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1AdditionalDocumentation'EmptyString
| PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1AdditionalDocumentation'Text Data.Text.Internal.Text
deriving (Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1AdditionalDocumentation'Variants
-> String
-> String
[PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1AdditionalDocumentation'Variants]
-> String -> String
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1AdditionalDocumentation'Variants
-> String
(Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1AdditionalDocumentation'Variants
-> String
-> String)
-> (PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1AdditionalDocumentation'Variants
-> String)
-> ([PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1AdditionalDocumentation'Variants]
-> String -> String)
-> Show
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1AdditionalDocumentation'Variants
forall a.
(Int -> a -> String -> String)
-> (a -> String) -> ([a] -> String -> String) -> Show a
showList :: [PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1AdditionalDocumentation'Variants]
-> String -> String
$cshowList :: [PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1AdditionalDocumentation'Variants]
-> String -> String
show :: PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1AdditionalDocumentation'Variants
-> String
$cshow :: PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1AdditionalDocumentation'Variants
-> String
showsPrec :: Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1AdditionalDocumentation'Variants
-> String
-> String
$cshowsPrec :: Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1AdditionalDocumentation'Variants
-> String
-> String
GHC.Show.Show, PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1AdditionalDocumentation'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1AdditionalDocumentation'Variants
-> Bool
(PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1AdditionalDocumentation'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1AdditionalDocumentation'Variants
-> Bool)
-> (PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1AdditionalDocumentation'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1AdditionalDocumentation'Variants
-> Bool)
-> Eq
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1AdditionalDocumentation'Variants
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1AdditionalDocumentation'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1AdditionalDocumentation'Variants
-> Bool
$c/= :: PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1AdditionalDocumentation'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1AdditionalDocumentation'Variants
-> Bool
== :: PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1AdditionalDocumentation'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1AdditionalDocumentation'Variants
-> Bool
$c== :: PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1AdditionalDocumentation'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1AdditionalDocumentation'Variants
-> Bool
GHC.Classes.Eq)
instance Data.Aeson.Types.ToJSON.ToJSON PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1AdditionalDocumentation'Variants where
toJSON :: PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1AdditionalDocumentation'Variants
-> Value
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1AdditionalDocumentation'Text Text
a) = Text -> Value
forall a. ToJSON a => a -> Value
Data.Aeson.Types.ToJSON.toJSON Text
a
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1AdditionalDocumentation'Variants
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1AdditionalDocumentation'EmptyString) = Value
""
instance Data.Aeson.Types.FromJSON.FromJSON PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1AdditionalDocumentation'Variants where
parseJSON :: Value
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1AdditionalDocumentation'Variants
parseJSON Value
val =
if
| Value
val Value -> Value -> Bool
forall a. Eq a => a -> a -> Bool
GHC.Classes.== Value
"" -> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1AdditionalDocumentation'Variants
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1AdditionalDocumentation'Variants
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1AdditionalDocumentation'Variants
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1AdditionalDocumentation'EmptyString
| Bool
GHC.Base.otherwise -> case (Text
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1AdditionalDocumentation'Variants
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1AdditionalDocumentation'Text (Text
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1AdditionalDocumentation'Variants)
-> Result Text
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1AdditionalDocumentation'Variants
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Data.Functor.<$> Value -> Result Text
forall a. FromJSON a => Value -> Result a
Data.Aeson.Types.FromJSON.fromJSON Value
val) Result
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1AdditionalDocumentation'Variants
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1AdditionalDocumentation'Variants
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1AdditionalDocumentation'Variants
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
GHC.Base.<|> String
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1AdditionalDocumentation'Variants
forall a. String -> Result a
Data.Aeson.Types.Internal.Error String
"No variant matched" of
Data.Aeson.Types.Internal.Success PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1AdditionalDocumentation'Variants
a -> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1AdditionalDocumentation'Variants
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1AdditionalDocumentation'Variants
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1AdditionalDocumentation'Variants
a
Data.Aeson.Types.Internal.Error String
a -> String
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1AdditionalDocumentation'Variants
forall (m :: * -> *) a. MonadFail m => String -> m a
Control.Monad.Fail.fail String
a
data PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CanceledAt'Variants
=
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CanceledAt'EmptyString
| PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CanceledAt'Int GHC.Types.Int
deriving (Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CanceledAt'Variants
-> String
-> String
[PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CanceledAt'Variants]
-> String -> String
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CanceledAt'Variants
-> String
(Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CanceledAt'Variants
-> String
-> String)
-> (PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CanceledAt'Variants
-> String)
-> ([PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CanceledAt'Variants]
-> String -> String)
-> Show
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CanceledAt'Variants
forall a.
(Int -> a -> String -> String)
-> (a -> String) -> ([a] -> String -> String) -> Show a
showList :: [PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CanceledAt'Variants]
-> String -> String
$cshowList :: [PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CanceledAt'Variants]
-> String -> String
show :: PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CanceledAt'Variants
-> String
$cshow :: PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CanceledAt'Variants
-> String
showsPrec :: Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CanceledAt'Variants
-> String
-> String
$cshowsPrec :: Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CanceledAt'Variants
-> String
-> String
GHC.Show.Show, PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CanceledAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CanceledAt'Variants
-> Bool
(PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CanceledAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CanceledAt'Variants
-> Bool)
-> (PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CanceledAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CanceledAt'Variants
-> Bool)
-> Eq
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CanceledAt'Variants
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CanceledAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CanceledAt'Variants
-> Bool
$c/= :: PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CanceledAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CanceledAt'Variants
-> Bool
== :: PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CanceledAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CanceledAt'Variants
-> Bool
$c== :: PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CanceledAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CanceledAt'Variants
-> Bool
GHC.Classes.Eq)
instance Data.Aeson.Types.ToJSON.ToJSON PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CanceledAt'Variants where
toJSON :: PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CanceledAt'Variants
-> Value
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CanceledAt'Int Int
a) = Int -> Value
forall a. ToJSON a => a -> Value
Data.Aeson.Types.ToJSON.toJSON Int
a
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CanceledAt'Variants
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CanceledAt'EmptyString) = Value
""
instance Data.Aeson.Types.FromJSON.FromJSON PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CanceledAt'Variants where
parseJSON :: Value
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CanceledAt'Variants
parseJSON Value
val =
if
| Value
val Value -> Value -> Bool
forall a. Eq a => a -> a -> Bool
GHC.Classes.== Value
"" -> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CanceledAt'Variants
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CanceledAt'Variants
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CanceledAt'Variants
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CanceledAt'EmptyString
| Bool
GHC.Base.otherwise -> case (Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CanceledAt'Variants
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CanceledAt'Int (Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CanceledAt'Variants)
-> Result Int
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CanceledAt'Variants
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Data.Functor.<$> Value -> Result Int
forall a. FromJSON a => Value -> Result a
Data.Aeson.Types.FromJSON.fromJSON Value
val) Result
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CanceledAt'Variants
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CanceledAt'Variants
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CanceledAt'Variants
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
GHC.Base.<|> String
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CanceledAt'Variants
forall a. String -> Result a
Data.Aeson.Types.Internal.Error String
"No variant matched" of
Data.Aeson.Types.Internal.Success PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CanceledAt'Variants
a -> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CanceledAt'Variants
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CanceledAt'Variants
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CanceledAt'Variants
a
Data.Aeson.Types.Internal.Error String
a -> String
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CanceledAt'Variants
forall (m :: * -> *) a. MonadFail m => String -> m a
Control.Monad.Fail.fail String
a
data PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationPolicyProvided'Variants
=
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationPolicyProvided'EmptyString
| PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationPolicyProvided'Bool GHC.Types.Bool
deriving (Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationPolicyProvided'Variants
-> String
-> String
[PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationPolicyProvided'Variants]
-> String -> String
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationPolicyProvided'Variants
-> String
(Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationPolicyProvided'Variants
-> String
-> String)
-> (PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationPolicyProvided'Variants
-> String)
-> ([PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationPolicyProvided'Variants]
-> String -> String)
-> Show
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationPolicyProvided'Variants
forall a.
(Int -> a -> String -> String)
-> (a -> String) -> ([a] -> String -> String) -> Show a
showList :: [PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationPolicyProvided'Variants]
-> String -> String
$cshowList :: [PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationPolicyProvided'Variants]
-> String -> String
show :: PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationPolicyProvided'Variants
-> String
$cshow :: PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationPolicyProvided'Variants
-> String
showsPrec :: Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationPolicyProvided'Variants
-> String
-> String
$cshowsPrec :: Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationPolicyProvided'Variants
-> String
-> String
GHC.Show.Show, PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationPolicyProvided'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationPolicyProvided'Variants
-> Bool
(PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationPolicyProvided'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationPolicyProvided'Variants
-> Bool)
-> (PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationPolicyProvided'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationPolicyProvided'Variants
-> Bool)
-> Eq
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationPolicyProvided'Variants
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationPolicyProvided'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationPolicyProvided'Variants
-> Bool
$c/= :: PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationPolicyProvided'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationPolicyProvided'Variants
-> Bool
== :: PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationPolicyProvided'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationPolicyProvided'Variants
-> Bool
$c== :: PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationPolicyProvided'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationPolicyProvided'Variants
-> Bool
GHC.Classes.Eq)
instance Data.Aeson.Types.ToJSON.ToJSON PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationPolicyProvided'Variants where
toJSON :: PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationPolicyProvided'Variants
-> Value
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationPolicyProvided'Bool Bool
a) = Bool -> Value
forall a. ToJSON a => a -> Value
Data.Aeson.Types.ToJSON.toJSON Bool
a
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationPolicyProvided'Variants
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationPolicyProvided'EmptyString) = Value
""
instance Data.Aeson.Types.FromJSON.FromJSON PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationPolicyProvided'Variants where
parseJSON :: Value
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationPolicyProvided'Variants
parseJSON Value
val =
if
| Value
val Value -> Value -> Bool
forall a. Eq a => a -> a -> Bool
GHC.Classes.== Value
"" -> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationPolicyProvided'Variants
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationPolicyProvided'Variants
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationPolicyProvided'Variants
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationPolicyProvided'EmptyString
| Bool
GHC.Base.otherwise -> case (Bool
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationPolicyProvided'Variants
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationPolicyProvided'Bool (Bool
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationPolicyProvided'Variants)
-> Result Bool
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationPolicyProvided'Variants
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Data.Functor.<$> Value -> Result Bool
forall a. FromJSON a => Value -> Result a
Data.Aeson.Types.FromJSON.fromJSON Value
val) Result
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationPolicyProvided'Variants
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationPolicyProvided'Variants
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationPolicyProvided'Variants
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
GHC.Base.<|> String
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationPolicyProvided'Variants
forall a. String -> Result a
Data.Aeson.Types.Internal.Error String
"No variant matched" of
Data.Aeson.Types.Internal.Success PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationPolicyProvided'Variants
a -> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationPolicyProvided'Variants
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationPolicyProvided'Variants
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationPolicyProvided'Variants
a
Data.Aeson.Types.Internal.Error String
a -> String
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationPolicyProvided'Variants
forall (m :: * -> *) a. MonadFail m => String -> m a
Control.Monad.Fail.fail String
a
data PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt'Variants
=
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt'EmptyString
| PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt'Int GHC.Types.Int
deriving (Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt'Variants
-> String
-> String
[PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt'Variants]
-> String -> String
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt'Variants
-> String
(Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt'Variants
-> String
-> String)
-> (PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt'Variants
-> String)
-> ([PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt'Variants]
-> String -> String)
-> Show
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt'Variants
forall a.
(Int -> a -> String -> String)
-> (a -> String) -> ([a] -> String -> String) -> Show a
showList :: [PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt'Variants]
-> String -> String
$cshowList :: [PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt'Variants]
-> String -> String
show :: PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt'Variants
-> String
$cshow :: PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt'Variants
-> String
showsPrec :: Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt'Variants
-> String
-> String
$cshowsPrec :: Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt'Variants
-> String
-> String
GHC.Show.Show, PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt'Variants
-> Bool
(PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt'Variants
-> Bool)
-> (PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt'Variants
-> Bool)
-> Eq
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt'Variants
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt'Variants
-> Bool
$c/= :: PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt'Variants
-> Bool
== :: PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt'Variants
-> Bool
$c== :: PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt'Variants
-> Bool
GHC.Classes.Eq)
instance Data.Aeson.Types.ToJSON.ToJSON PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt'Variants where
toJSON :: PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt'Variants
-> Value
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt'Int Int
a) = Int -> Value
forall a. ToJSON a => a -> Value
Data.Aeson.Types.ToJSON.toJSON Int
a
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt'Variants
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt'EmptyString) = Value
""
instance Data.Aeson.Types.FromJSON.FromJSON PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt'Variants where
parseJSON :: Value
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt'Variants
parseJSON Value
val =
if
| Value
val Value -> Value -> Bool
forall a. Eq a => a -> a -> Bool
GHC.Classes.== Value
"" -> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt'Variants
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt'Variants
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt'Variants
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt'EmptyString
| Bool
GHC.Base.otherwise -> case (Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt'Variants
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt'Int (Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt'Variants)
-> Result Int
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt'Variants
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Data.Functor.<$> Value -> Result Int
forall a. FromJSON a => Value -> Result a
Data.Aeson.Types.FromJSON.fromJSON Value
val) Result
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt'Variants
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt'Variants
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt'Variants
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
GHC.Base.<|> String
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt'Variants
forall a. String -> Result a
Data.Aeson.Types.Internal.Error String
"No variant matched" of
Data.Aeson.Types.Internal.Success PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt'Variants
a -> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt'Variants
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt'Variants
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt'Variants
a
Data.Aeson.Types.Internal.Error String
a -> String
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt'Variants
forall (m :: * -> *) a. MonadFail m => String -> m a
Control.Monad.Fail.fail String
a
data PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType'
=
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType'Other Data.Aeson.Types.Internal.Value
|
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType'Typed Data.Text.Internal.Text
|
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType'EnumEmptyString
|
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType'EnumMerchandise
|
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType'EnumService
deriving (Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType'
-> String
-> String
[PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType']
-> String -> String
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType'
-> String
(Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType'
-> String
-> String)
-> (PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType'
-> String)
-> ([PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType']
-> String -> String)
-> Show
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType'
forall a.
(Int -> a -> String -> String)
-> (a -> String) -> ([a] -> String -> String) -> Show a
showList :: [PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType']
-> String -> String
$cshowList :: [PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType']
-> String -> String
show :: PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType'
-> String
$cshow :: PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType'
-> String
showsPrec :: Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType'
-> String
-> String
$cshowsPrec :: Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType'
-> String
-> String
GHC.Show.Show, PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType'
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType'
-> Bool
(PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType'
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType'
-> Bool)
-> (PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType'
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType'
-> Bool)
-> Eq
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType'
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType'
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType'
-> Bool
$c/= :: PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType'
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType'
-> Bool
== :: PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType'
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType'
-> Bool
$c== :: PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType'
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType'
-> Bool
GHC.Classes.Eq)
instance Data.Aeson.Types.ToJSON.ToJSON PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType' where
toJSON :: PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType'
-> Value
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType'Other Value
val) = Value
val
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType'Typed Text
val) = Text -> Value
forall a. ToJSON a => a -> Value
Data.Aeson.Types.ToJSON.toJSON Text
val
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType'
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType'EnumEmptyString) = Value
""
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType'
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType'EnumMerchandise) = Value
"merchandise"
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType'
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType'EnumService) = Value
"service"
instance Data.Aeson.Types.FromJSON.FromJSON PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType' where
parseJSON :: Value
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType'
parseJSON Value
val =
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType'
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType'
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure
( if
| Value
val Value -> Value -> Bool
forall a. Eq a => a -> a -> Bool
GHC.Classes.== Value
"" -> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType'
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType'EnumEmptyString
| Value
val Value -> Value -> Bool
forall a. Eq a => a -> a -> Bool
GHC.Classes.== Value
"merchandise" -> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType'
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType'EnumMerchandise
| Value
val Value -> Value -> Bool
forall a. Eq a => a -> a -> Bool
GHC.Classes.== Value
"service" -> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType'
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType'EnumService
| Bool
GHC.Base.otherwise -> Value
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType'
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType'Other Value
val
)
data PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'
=
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'Other Data.Aeson.Types.Internal.Value
|
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'Typed Data.Text.Internal.Text
|
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'EnumEmptyString
|
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'EnumMerchantRejected
|
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'EnumSuccessful
deriving (Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'
-> String
-> String
[PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus']
-> String -> String
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'
-> String
(Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'
-> String
-> String)
-> (PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'
-> String)
-> ([PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus']
-> String -> String)
-> Show
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'
forall a.
(Int -> a -> String -> String)
-> (a -> String) -> ([a] -> String -> String) -> Show a
showList :: [PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus']
-> String -> String
$cshowList :: [PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus']
-> String -> String
show :: PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'
-> String
$cshow :: PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'
-> String
showsPrec :: Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'
-> String
-> String
$cshowsPrec :: Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'
-> String
-> String
GHC.Show.Show, PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'
-> Bool
(PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'
-> Bool)
-> (PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'
-> Bool)
-> Eq
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'
-> Bool
$c/= :: PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'
-> Bool
== :: PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'
-> Bool
$c== :: PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'
-> Bool
GHC.Classes.Eq)
instance Data.Aeson.Types.ToJSON.ToJSON PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus' where
toJSON :: PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'
-> Value
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'Other Value
val) = Value
val
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'Typed Text
val) = Text -> Value
forall a. ToJSON a => a -> Value
Data.Aeson.Types.ToJSON.toJSON Text
val
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'EnumEmptyString) = Value
""
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'EnumMerchantRejected) = Value
"merchant_rejected"
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'EnumSuccessful) = Value
"successful"
instance Data.Aeson.Types.FromJSON.FromJSON PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus' where
parseJSON :: Value
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'
parseJSON Value
val =
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure
( if
| Value
val Value -> Value -> Bool
forall a. Eq a => a -> a -> Bool
GHC.Classes.== Value
"" -> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'EnumEmptyString
| Value
val Value -> Value -> Bool
forall a. Eq a => a -> a -> Bool
GHC.Classes.== Value
"merchant_rejected" -> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'EnumMerchantRejected
| Value
val Value -> Value -> Bool
forall a. Eq a => a -> a -> Bool
GHC.Classes.== Value
"successful" -> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'EnumSuccessful
| Bool
GHC.Base.otherwise -> Value
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'Other Value
val
)
data PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Variants
=
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'EmptyString
| PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Int GHC.Types.Int
deriving (Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Variants
-> String
-> String
[PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Variants]
-> String -> String
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Variants
-> String
(Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Variants
-> String
-> String)
-> (PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Variants
-> String)
-> ([PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Variants]
-> String -> String)
-> Show
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Variants
forall a.
(Int -> a -> String -> String)
-> (a -> String) -> ([a] -> String -> String) -> Show a
showList :: [PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Variants]
-> String -> String
$cshowList :: [PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Variants]
-> String -> String
show :: PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Variants
-> String
$cshow :: PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Variants
-> String
showsPrec :: Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Variants
-> String
-> String
$cshowsPrec :: Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Variants
-> String
-> String
GHC.Show.Show, PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Variants
-> Bool
(PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Variants
-> Bool)
-> (PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Variants
-> Bool)
-> Eq
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Variants
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Variants
-> Bool
$c/= :: PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Variants
-> Bool
== :: PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Variants
-> Bool
$c== :: PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Variants
-> Bool
GHC.Classes.Eq)
instance Data.Aeson.Types.ToJSON.ToJSON PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Variants where
toJSON :: PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Variants
-> Value
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Int Int
a) = Int -> Value
forall a. ToJSON a => a -> Value
Data.Aeson.Types.ToJSON.toJSON Int
a
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Variants
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'EmptyString) = Value
""
instance Data.Aeson.Types.FromJSON.FromJSON PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Variants where
parseJSON :: Value
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Variants
parseJSON Value
val =
if
| Value
val Value -> Value -> Bool
forall a. Eq a => a -> a -> Bool
GHC.Classes.== Value
"" -> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Variants
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Variants
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Variants
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'EmptyString
| Bool
GHC.Base.otherwise -> case (Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Variants
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Int (Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Variants)
-> Result Int
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Variants
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Data.Functor.<$> Value -> Result Int
forall a. FromJSON a => Value -> Result a
Data.Aeson.Types.FromJSON.fromJSON Value
val) Result
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Variants
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Variants
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Variants
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
GHC.Base.<|> String
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Variants
forall a. String -> Result a
Data.Aeson.Types.Internal.Error String
"No variant matched" of
Data.Aeson.Types.Internal.Success PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Variants
a -> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Variants
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Variants
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Variants
a
Data.Aeson.Types.Internal.Error String
a -> String
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Variants
forall (m :: * -> *) a. MonadFail m => String -> m a
Control.Monad.Fail.fail String
a
data PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'Variants
=
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'EmptyString
| PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1 PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
deriving (Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'Variants
-> String
-> String
[PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'Variants]
-> String -> String
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'Variants
-> String
(Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'Variants
-> String
-> String)
-> (PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'Variants
-> String)
-> ([PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'Variants]
-> String -> String)
-> Show
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'Variants
forall a.
(Int -> a -> String -> String)
-> (a -> String) -> ([a] -> String -> String) -> Show a
showList :: [PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'Variants]
-> String -> String
$cshowList :: [PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'Variants]
-> String -> String
show :: PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'Variants
-> String
$cshow :: PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'Variants
-> String
showsPrec :: Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'Variants
-> String
-> String
$cshowsPrec :: Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'Variants
-> String
-> String
GHC.Show.Show, PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'Variants
-> Bool
(PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'Variants
-> Bool)
-> (PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'Variants
-> Bool)
-> Eq
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'Variants
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'Variants
-> Bool
$c/= :: PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'Variants
-> Bool
== :: PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'Variants
-> Bool
$c== :: PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'Variants
-> Bool
GHC.Classes.Eq)
instance Data.Aeson.Types.ToJSON.ToJSON PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'Variants where
toJSON :: PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'Variants
-> Value
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1 PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
a) = PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
-> Value
forall a. ToJSON a => a -> Value
Data.Aeson.Types.ToJSON.toJSON PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
a
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'Variants
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'EmptyString) = Value
""
instance Data.Aeson.Types.FromJSON.FromJSON PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'Variants where
parseJSON :: Value
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'Variants
parseJSON Value
val =
if
| Value
val Value -> Value -> Bool
forall a. Eq a => a -> a -> Bool
GHC.Classes.== Value
"" -> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'Variants
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'Variants
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'Variants
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'EmptyString
| Bool
GHC.Base.otherwise -> case (PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'Variants
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1 (PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
-> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'Variants)
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'Variants
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Data.Functor.<$> Value
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
forall a. FromJSON a => Value -> Result a
Data.Aeson.Types.FromJSON.fromJSON Value
val) Result
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'Variants
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'Variants
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'Variants
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
GHC.Base.<|> String
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'Variants
forall a. String -> Result a
Data.Aeson.Types.Internal.Error String
"No variant matched" of
Data.Aeson.Types.Internal.Success PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'Variants
a -> PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'Variants
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'Variants
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'Variants
a
Data.Aeson.Types.Internal.Error String
a -> String
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'Variants
forall (m :: * -> *) a. MonadFail m => String -> m a
Control.Monad.Fail.fail String
a
data PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1 = PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1
{
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1AdditionalDocumentation'Variants
postIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1AdditionalDocumentation :: (GHC.Maybe.Maybe PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1AdditionalDocumentation'Variants),
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CardStatement'Variants
postIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CardStatement :: (GHC.Maybe.Maybe PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CardStatement'Variants),
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CashReceipt'Variants
postIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CashReceipt :: (GHC.Maybe.Maybe PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CashReceipt'Variants),
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage'Variants
postIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage :: (GHC.Maybe.Maybe PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage'Variants),
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1
-> Maybe Text
postIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1Explanation :: (GHC.Maybe.Maybe Data.Text.Internal.Text),
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1
-> Maybe Text
postIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1OriginalTransaction :: (GHC.Maybe.Maybe Data.Text.Internal.Text)
}
deriving
( Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1
-> String
-> String
[PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1]
-> String -> String
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1
-> String
(Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1
-> String
-> String)
-> (PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1
-> String)
-> ([PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1]
-> String -> String)
-> Show
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1
forall a.
(Int -> a -> String -> String)
-> (a -> String) -> ([a] -> String -> String) -> Show a
showList :: [PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1]
-> String -> String
$cshowList :: [PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1]
-> String -> String
show :: PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1
-> String
$cshow :: PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1
-> String
showsPrec :: Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1
-> String
-> String
$cshowsPrec :: Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1
-> String
-> String
GHC.Show.Show,
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1
-> Bool
(PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1
-> Bool)
-> (PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1
-> Bool)
-> Eq
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1
-> Bool
$c/= :: PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1
-> Bool
== :: PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1
-> Bool
$c== :: PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1
-> Bool
GHC.Classes.Eq
)
instance Data.Aeson.Types.ToJSON.ToJSON PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1 where
toJSON :: PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1
-> Value
toJSON PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1
obj = [Pair] -> Value
Data.Aeson.Types.Internal.object (Text
"additional_documentation" Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1AdditionalDocumentation'Variants
-> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1AdditionalDocumentation'Variants
postIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1AdditionalDocumentation PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"card_statement" Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CardStatement'Variants
-> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CardStatement'Variants
postIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CardStatement PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"cash_receipt" Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CashReceipt'Variants
-> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CashReceipt'Variants
postIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CashReceipt PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"check_image" Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage'Variants
-> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage'Variants
postIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"explanation" Text -> Maybe Text -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1
-> Maybe Text
postIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1Explanation PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"original_transaction" Text -> Maybe Text -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1
-> Maybe Text
postIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1OriginalTransaction PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: [Pair]
forall a. Monoid a => a
GHC.Base.mempty)
toEncoding :: PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1
-> Encoding
toEncoding PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1
obj = Series -> Encoding
Data.Aeson.Encoding.Internal.pairs ((Text
"additional_documentation" Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1AdditionalDocumentation'Variants
-> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1AdditionalDocumentation'Variants
postIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1AdditionalDocumentation PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> ((Text
"card_statement" Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CardStatement'Variants
-> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CardStatement'Variants
postIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CardStatement PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> ((Text
"cash_receipt" Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CashReceipt'Variants
-> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CashReceipt'Variants
postIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CashReceipt PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> ((Text
"check_image" Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage'Variants
-> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage'Variants
postIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> ((Text
"explanation" Text -> Maybe Text -> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1
-> Maybe Text
postIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1Explanation PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> (Text
"original_transaction" Text -> Maybe Text -> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1
-> Maybe Text
postIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1OriginalTransaction PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1
obj))))))
instance Data.Aeson.Types.FromJSON.FromJSON PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1 where
parseJSON :: Value
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1
parseJSON = String
-> (Object
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1)
-> Value
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1
forall a. String -> (Object -> Parser a) -> Value -> Parser a
Data.Aeson.Types.FromJSON.withObject String
"PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1" (\Object
obj -> ((((((Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1AdditionalDocumentation'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CardStatement'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CashReceipt'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage'Variants
-> Maybe Text
-> Maybe Text
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1)
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1AdditionalDocumentation'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CardStatement'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CashReceipt'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage'Variants
-> Maybe Text
-> Maybe Text
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1)
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1AdditionalDocumentation'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CardStatement'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CashReceipt'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage'Variants
-> Maybe Text
-> Maybe Text
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1 Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1AdditionalDocumentation'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CardStatement'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CashReceipt'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage'Variants
-> Maybe Text
-> Maybe Text
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1)
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1AdditionalDocumentation'Variants)
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CardStatement'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CashReceipt'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage'Variants
-> Maybe Text
-> Maybe Text
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object
-> Text
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1AdditionalDocumentation'Variants)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Data.Aeson.Types.FromJSON..:? Text
"additional_documentation")) Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CardStatement'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CashReceipt'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage'Variants
-> Maybe Text
-> Maybe Text
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1)
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CardStatement'Variants)
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CashReceipt'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage'Variants
-> Maybe Text
-> Maybe Text
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object
-> Text
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CardStatement'Variants)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Data.Aeson.Types.FromJSON..:? Text
"card_statement")) Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CashReceipt'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage'Variants
-> Maybe Text
-> Maybe Text
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1)
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CashReceipt'Variants)
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage'Variants
-> Maybe Text
-> Maybe Text
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object
-> Text
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CashReceipt'Variants)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Data.Aeson.Types.FromJSON..:? Text
"cash_receipt")) Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage'Variants
-> Maybe Text
-> Maybe Text
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1)
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage'Variants)
-> Parser
(Maybe Text
-> Maybe Text
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object
-> Text
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage'Variants)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Data.Aeson.Types.FromJSON..:? Text
"check_image")) Parser
(Maybe Text
-> Maybe Text
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1)
-> Parser (Maybe Text)
-> Parser
(Maybe Text
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object -> Text -> Parser (Maybe Text)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Data.Aeson.Types.FromJSON..:? Text
"explanation")) Parser
(Maybe Text
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1)
-> Parser (Maybe Text)
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object -> Text -> Parser (Maybe Text)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Data.Aeson.Types.FromJSON..:? Text
"original_transaction"))
mkPostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1 :: PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1
mkPostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1 :: PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1
mkPostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1 =
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1 :: Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1AdditionalDocumentation'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CardStatement'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CashReceipt'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage'Variants
-> Maybe Text
-> Maybe Text
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1
{ postIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1AdditionalDocumentation :: Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1AdditionalDocumentation'Variants
postIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1AdditionalDocumentation = Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1AdditionalDocumentation'Variants
forall a. Maybe a
GHC.Maybe.Nothing,
postIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CardStatement :: Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CardStatement'Variants
postIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CardStatement = Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CardStatement'Variants
forall a. Maybe a
GHC.Maybe.Nothing,
postIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CashReceipt :: Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CashReceipt'Variants
postIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CashReceipt = Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CashReceipt'Variants
forall a. Maybe a
GHC.Maybe.Nothing,
postIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage :: Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage'Variants
postIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage = Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage'Variants
forall a. Maybe a
GHC.Maybe.Nothing,
postIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1Explanation :: Maybe Text
postIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1Explanation = Maybe Text
forall a. Maybe a
GHC.Maybe.Nothing,
postIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1OriginalTransaction :: Maybe Text
postIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1OriginalTransaction = Maybe Text
forall a. Maybe a
GHC.Maybe.Nothing
}
data PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1AdditionalDocumentation'Variants
=
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1AdditionalDocumentation'EmptyString
| PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1AdditionalDocumentation'Text Data.Text.Internal.Text
deriving (Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1AdditionalDocumentation'Variants
-> String
-> String
[PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1AdditionalDocumentation'Variants]
-> String -> String
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1AdditionalDocumentation'Variants
-> String
(Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1AdditionalDocumentation'Variants
-> String
-> String)
-> (PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1AdditionalDocumentation'Variants
-> String)
-> ([PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1AdditionalDocumentation'Variants]
-> String -> String)
-> Show
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1AdditionalDocumentation'Variants
forall a.
(Int -> a -> String -> String)
-> (a -> String) -> ([a] -> String -> String) -> Show a
showList :: [PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1AdditionalDocumentation'Variants]
-> String -> String
$cshowList :: [PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1AdditionalDocumentation'Variants]
-> String -> String
show :: PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1AdditionalDocumentation'Variants
-> String
$cshow :: PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1AdditionalDocumentation'Variants
-> String
showsPrec :: Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1AdditionalDocumentation'Variants
-> String
-> String
$cshowsPrec :: Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1AdditionalDocumentation'Variants
-> String
-> String
GHC.Show.Show, PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1AdditionalDocumentation'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1AdditionalDocumentation'Variants
-> Bool
(PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1AdditionalDocumentation'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1AdditionalDocumentation'Variants
-> Bool)
-> (PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1AdditionalDocumentation'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1AdditionalDocumentation'Variants
-> Bool)
-> Eq
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1AdditionalDocumentation'Variants
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1AdditionalDocumentation'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1AdditionalDocumentation'Variants
-> Bool
$c/= :: PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1AdditionalDocumentation'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1AdditionalDocumentation'Variants
-> Bool
== :: PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1AdditionalDocumentation'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1AdditionalDocumentation'Variants
-> Bool
$c== :: PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1AdditionalDocumentation'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1AdditionalDocumentation'Variants
-> Bool
GHC.Classes.Eq)
instance Data.Aeson.Types.ToJSON.ToJSON PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1AdditionalDocumentation'Variants where
toJSON :: PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1AdditionalDocumentation'Variants
-> Value
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1AdditionalDocumentation'Text Text
a) = Text -> Value
forall a. ToJSON a => a -> Value
Data.Aeson.Types.ToJSON.toJSON Text
a
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1AdditionalDocumentation'Variants
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1AdditionalDocumentation'EmptyString) = Value
""
instance Data.Aeson.Types.FromJSON.FromJSON PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1AdditionalDocumentation'Variants where
parseJSON :: Value
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1AdditionalDocumentation'Variants
parseJSON Value
val =
if
| Value
val Value -> Value -> Bool
forall a. Eq a => a -> a -> Bool
GHC.Classes.== Value
"" -> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1AdditionalDocumentation'Variants
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1AdditionalDocumentation'Variants
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1AdditionalDocumentation'Variants
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1AdditionalDocumentation'EmptyString
| Bool
GHC.Base.otherwise -> case (Text
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1AdditionalDocumentation'Variants
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1AdditionalDocumentation'Text (Text
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1AdditionalDocumentation'Variants)
-> Result Text
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1AdditionalDocumentation'Variants
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Data.Functor.<$> Value -> Result Text
forall a. FromJSON a => Value -> Result a
Data.Aeson.Types.FromJSON.fromJSON Value
val) Result
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1AdditionalDocumentation'Variants
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1AdditionalDocumentation'Variants
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1AdditionalDocumentation'Variants
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
GHC.Base.<|> String
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1AdditionalDocumentation'Variants
forall a. String -> Result a
Data.Aeson.Types.Internal.Error String
"No variant matched" of
Data.Aeson.Types.Internal.Success PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1AdditionalDocumentation'Variants
a -> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1AdditionalDocumentation'Variants
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1AdditionalDocumentation'Variants
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1AdditionalDocumentation'Variants
a
Data.Aeson.Types.Internal.Error String
a -> String
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1AdditionalDocumentation'Variants
forall (m :: * -> *) a. MonadFail m => String -> m a
Control.Monad.Fail.fail String
a
data PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CardStatement'Variants
=
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CardStatement'EmptyString
| PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CardStatement'Text Data.Text.Internal.Text
deriving (Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CardStatement'Variants
-> String
-> String
[PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CardStatement'Variants]
-> String -> String
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CardStatement'Variants
-> String
(Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CardStatement'Variants
-> String
-> String)
-> (PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CardStatement'Variants
-> String)
-> ([PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CardStatement'Variants]
-> String -> String)
-> Show
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CardStatement'Variants
forall a.
(Int -> a -> String -> String)
-> (a -> String) -> ([a] -> String -> String) -> Show a
showList :: [PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CardStatement'Variants]
-> String -> String
$cshowList :: [PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CardStatement'Variants]
-> String -> String
show :: PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CardStatement'Variants
-> String
$cshow :: PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CardStatement'Variants
-> String
showsPrec :: Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CardStatement'Variants
-> String
-> String
$cshowsPrec :: Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CardStatement'Variants
-> String
-> String
GHC.Show.Show, PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CardStatement'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CardStatement'Variants
-> Bool
(PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CardStatement'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CardStatement'Variants
-> Bool)
-> (PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CardStatement'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CardStatement'Variants
-> Bool)
-> Eq
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CardStatement'Variants
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CardStatement'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CardStatement'Variants
-> Bool
$c/= :: PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CardStatement'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CardStatement'Variants
-> Bool
== :: PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CardStatement'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CardStatement'Variants
-> Bool
$c== :: PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CardStatement'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CardStatement'Variants
-> Bool
GHC.Classes.Eq)
instance Data.Aeson.Types.ToJSON.ToJSON PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CardStatement'Variants where
toJSON :: PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CardStatement'Variants
-> Value
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CardStatement'Text Text
a) = Text -> Value
forall a. ToJSON a => a -> Value
Data.Aeson.Types.ToJSON.toJSON Text
a
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CardStatement'Variants
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CardStatement'EmptyString) = Value
""
instance Data.Aeson.Types.FromJSON.FromJSON PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CardStatement'Variants where
parseJSON :: Value
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CardStatement'Variants
parseJSON Value
val =
if
| Value
val Value -> Value -> Bool
forall a. Eq a => a -> a -> Bool
GHC.Classes.== Value
"" -> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CardStatement'Variants
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CardStatement'Variants
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CardStatement'Variants
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CardStatement'EmptyString
| Bool
GHC.Base.otherwise -> case (Text
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CardStatement'Variants
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CardStatement'Text (Text
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CardStatement'Variants)
-> Result Text
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CardStatement'Variants
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Data.Functor.<$> Value -> Result Text
forall a. FromJSON a => Value -> Result a
Data.Aeson.Types.FromJSON.fromJSON Value
val) Result
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CardStatement'Variants
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CardStatement'Variants
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CardStatement'Variants
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
GHC.Base.<|> String
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CardStatement'Variants
forall a. String -> Result a
Data.Aeson.Types.Internal.Error String
"No variant matched" of
Data.Aeson.Types.Internal.Success PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CardStatement'Variants
a -> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CardStatement'Variants
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CardStatement'Variants
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CardStatement'Variants
a
Data.Aeson.Types.Internal.Error String
a -> String
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CardStatement'Variants
forall (m :: * -> *) a. MonadFail m => String -> m a
Control.Monad.Fail.fail String
a
data PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CashReceipt'Variants
=
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CashReceipt'EmptyString
| PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CashReceipt'Text Data.Text.Internal.Text
deriving (Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CashReceipt'Variants
-> String
-> String
[PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CashReceipt'Variants]
-> String -> String
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CashReceipt'Variants
-> String
(Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CashReceipt'Variants
-> String
-> String)
-> (PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CashReceipt'Variants
-> String)
-> ([PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CashReceipt'Variants]
-> String -> String)
-> Show
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CashReceipt'Variants
forall a.
(Int -> a -> String -> String)
-> (a -> String) -> ([a] -> String -> String) -> Show a
showList :: [PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CashReceipt'Variants]
-> String -> String
$cshowList :: [PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CashReceipt'Variants]
-> String -> String
show :: PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CashReceipt'Variants
-> String
$cshow :: PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CashReceipt'Variants
-> String
showsPrec :: Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CashReceipt'Variants
-> String
-> String
$cshowsPrec :: Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CashReceipt'Variants
-> String
-> String
GHC.Show.Show, PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CashReceipt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CashReceipt'Variants
-> Bool
(PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CashReceipt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CashReceipt'Variants
-> Bool)
-> (PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CashReceipt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CashReceipt'Variants
-> Bool)
-> Eq
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CashReceipt'Variants
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CashReceipt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CashReceipt'Variants
-> Bool
$c/= :: PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CashReceipt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CashReceipt'Variants
-> Bool
== :: PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CashReceipt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CashReceipt'Variants
-> Bool
$c== :: PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CashReceipt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CashReceipt'Variants
-> Bool
GHC.Classes.Eq)
instance Data.Aeson.Types.ToJSON.ToJSON PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CashReceipt'Variants where
toJSON :: PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CashReceipt'Variants
-> Value
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CashReceipt'Text Text
a) = Text -> Value
forall a. ToJSON a => a -> Value
Data.Aeson.Types.ToJSON.toJSON Text
a
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CashReceipt'Variants
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CashReceipt'EmptyString) = Value
""
instance Data.Aeson.Types.FromJSON.FromJSON PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CashReceipt'Variants where
parseJSON :: Value
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CashReceipt'Variants
parseJSON Value
val =
if
| Value
val Value -> Value -> Bool
forall a. Eq a => a -> a -> Bool
GHC.Classes.== Value
"" -> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CashReceipt'Variants
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CashReceipt'Variants
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CashReceipt'Variants
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CashReceipt'EmptyString
| Bool
GHC.Base.otherwise -> case (Text
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CashReceipt'Variants
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CashReceipt'Text (Text
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CashReceipt'Variants)
-> Result Text
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CashReceipt'Variants
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Data.Functor.<$> Value -> Result Text
forall a. FromJSON a => Value -> Result a
Data.Aeson.Types.FromJSON.fromJSON Value
val) Result
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CashReceipt'Variants
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CashReceipt'Variants
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CashReceipt'Variants
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
GHC.Base.<|> String
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CashReceipt'Variants
forall a. String -> Result a
Data.Aeson.Types.Internal.Error String
"No variant matched" of
Data.Aeson.Types.Internal.Success PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CashReceipt'Variants
a -> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CashReceipt'Variants
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CashReceipt'Variants
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CashReceipt'Variants
a
Data.Aeson.Types.Internal.Error String
a -> String
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CashReceipt'Variants
forall (m :: * -> *) a. MonadFail m => String -> m a
Control.Monad.Fail.fail String
a
data PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage'Variants
=
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage'EmptyString
| PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage'Text Data.Text.Internal.Text
deriving (Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage'Variants
-> String
-> String
[PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage'Variants]
-> String -> String
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage'Variants
-> String
(Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage'Variants
-> String
-> String)
-> (PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage'Variants
-> String)
-> ([PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage'Variants]
-> String -> String)
-> Show
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage'Variants
forall a.
(Int -> a -> String -> String)
-> (a -> String) -> ([a] -> String -> String) -> Show a
showList :: [PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage'Variants]
-> String -> String
$cshowList :: [PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage'Variants]
-> String -> String
show :: PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage'Variants
-> String
$cshow :: PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage'Variants
-> String
showsPrec :: Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage'Variants
-> String
-> String
$cshowsPrec :: Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage'Variants
-> String
-> String
GHC.Show.Show, PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage'Variants
-> Bool
(PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage'Variants
-> Bool)
-> (PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage'Variants
-> Bool)
-> Eq
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage'Variants
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage'Variants
-> Bool
$c/= :: PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage'Variants
-> Bool
== :: PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage'Variants
-> Bool
$c== :: PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage'Variants
-> Bool
GHC.Classes.Eq)
instance Data.Aeson.Types.ToJSON.ToJSON PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage'Variants where
toJSON :: PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage'Variants
-> Value
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage'Text Text
a) = Text -> Value
forall a. ToJSON a => a -> Value
Data.Aeson.Types.ToJSON.toJSON Text
a
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage'Variants
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage'EmptyString) = Value
""
instance Data.Aeson.Types.FromJSON.FromJSON PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage'Variants where
parseJSON :: Value
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage'Variants
parseJSON Value
val =
if
| Value
val Value -> Value -> Bool
forall a. Eq a => a -> a -> Bool
GHC.Classes.== Value
"" -> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage'Variants
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage'Variants
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage'Variants
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage'EmptyString
| Bool
GHC.Base.otherwise -> case (Text
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage'Variants
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage'Text (Text
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage'Variants)
-> Result Text
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage'Variants
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Data.Functor.<$> Value -> Result Text
forall a. FromJSON a => Value -> Result a
Data.Aeson.Types.FromJSON.fromJSON Value
val) Result
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage'Variants
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage'Variants
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage'Variants
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
GHC.Base.<|> String
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage'Variants
forall a. String -> Result a
Data.Aeson.Types.Internal.Error String
"No variant matched" of
Data.Aeson.Types.Internal.Success PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage'Variants
a -> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage'Variants
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage'Variants
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage'Variants
a
Data.Aeson.Types.Internal.Error String
a -> String
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage'Variants
forall (m :: * -> *) a. MonadFail m => String -> m a
Control.Monad.Fail.fail String
a
data PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'Variants
=
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'EmptyString
| PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1 PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1
deriving (Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'Variants
-> String
-> String
[PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'Variants]
-> String -> String
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'Variants
-> String
(Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'Variants
-> String
-> String)
-> (PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'Variants
-> String)
-> ([PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'Variants]
-> String -> String)
-> Show
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'Variants
forall a.
(Int -> a -> String -> String)
-> (a -> String) -> ([a] -> String -> String) -> Show a
showList :: [PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'Variants]
-> String -> String
$cshowList :: [PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'Variants]
-> String -> String
show :: PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'Variants
-> String
$cshow :: PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'Variants
-> String
showsPrec :: Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'Variants
-> String
-> String
$cshowsPrec :: Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'Variants
-> String
-> String
GHC.Show.Show, PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'Variants
-> Bool
(PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'Variants
-> Bool)
-> (PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'Variants
-> Bool)
-> Eq
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'Variants
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'Variants
-> Bool
$c/= :: PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'Variants
-> Bool
== :: PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'Variants
-> Bool
$c== :: PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'Variants
-> Bool
GHC.Classes.Eq)
instance Data.Aeson.Types.ToJSON.ToJSON PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'Variants where
toJSON :: PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'Variants
-> Value
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1 PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1
a) = PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1
-> Value
forall a. ToJSON a => a -> Value
Data.Aeson.Types.ToJSON.toJSON PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1
a
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'Variants
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'EmptyString) = Value
""
instance Data.Aeson.Types.FromJSON.FromJSON PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'Variants where
parseJSON :: Value
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'Variants
parseJSON Value
val =
if
| Value
val Value -> Value -> Bool
forall a. Eq a => a -> a -> Bool
GHC.Classes.== Value
"" -> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'Variants
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'Variants
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'Variants
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'EmptyString
| Bool
GHC.Base.otherwise -> case (PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'Variants
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1 (PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1
-> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'Variants)
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'Variants
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Data.Functor.<$> Value
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1
forall a. FromJSON a => Value -> Result a
Data.Aeson.Types.FromJSON.fromJSON Value
val) Result
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'Variants
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'Variants
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'Variants
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
GHC.Base.<|> String
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'Variants
forall a. String -> Result a
Data.Aeson.Types.Internal.Error String
"No variant matched" of
Data.Aeson.Types.Internal.Success PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'Variants
a -> PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'Variants
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'Variants
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'Variants
a
Data.Aeson.Types.Internal.Error String
a -> String
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'Variants
forall (m :: * -> *) a. MonadFail m => String -> m a
Control.Monad.Fail.fail String
a
data PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1 = PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1
{
PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1AdditionalDocumentation'Variants
postIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1AdditionalDocumentation :: (GHC.Maybe.Maybe PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1AdditionalDocumentation'Variants),
PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1
-> Maybe Text
postIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1Explanation :: (GHC.Maybe.Maybe Data.Text.Internal.Text)
}
deriving
( Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1
-> String
-> String
[PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1]
-> String -> String
PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1
-> String
(Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1
-> String
-> String)
-> (PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1
-> String)
-> ([PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1]
-> String -> String)
-> Show
PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1
forall a.
(Int -> a -> String -> String)
-> (a -> String) -> ([a] -> String -> String) -> Show a
showList :: [PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1]
-> String -> String
$cshowList :: [PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1]
-> String -> String
show :: PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1
-> String
$cshow :: PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1
-> String
showsPrec :: Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1
-> String
-> String
$cshowsPrec :: Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1
-> String
-> String
GHC.Show.Show,
PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1
-> PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1
-> Bool
(PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1
-> PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1
-> Bool)
-> (PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1
-> PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1
-> Bool)
-> Eq
PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1
-> PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1
-> Bool
$c/= :: PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1
-> PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1
-> Bool
== :: PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1
-> PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1
-> Bool
$c== :: PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1
-> PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1
-> Bool
GHC.Classes.Eq
)
instance Data.Aeson.Types.ToJSON.ToJSON PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1 where
toJSON :: PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1
-> Value
toJSON PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1
obj = [Pair] -> Value
Data.Aeson.Types.Internal.object (Text
"additional_documentation" Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1AdditionalDocumentation'Variants
-> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1AdditionalDocumentation'Variants
postIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1AdditionalDocumentation PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"explanation" Text -> Maybe Text -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1
-> Maybe Text
postIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1Explanation PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: [Pair]
forall a. Monoid a => a
GHC.Base.mempty)
toEncoding :: PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1
-> Encoding
toEncoding PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1
obj = Series -> Encoding
Data.Aeson.Encoding.Internal.pairs ((Text
"additional_documentation" Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1AdditionalDocumentation'Variants
-> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1AdditionalDocumentation'Variants
postIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1AdditionalDocumentation PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> (Text
"explanation" Text -> Maybe Text -> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1
-> Maybe Text
postIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1Explanation PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1
obj))
instance Data.Aeson.Types.FromJSON.FromJSON PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1 where
parseJSON :: Value
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1
parseJSON = String
-> (Object
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1)
-> Value
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1
forall a. String -> (Object -> Parser a) -> Value -> Parser a
Data.Aeson.Types.FromJSON.withObject String
"PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1" (\Object
obj -> ((Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1AdditionalDocumentation'Variants
-> Maybe Text
-> PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1)
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1AdditionalDocumentation'Variants
-> Maybe Text
-> PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1)
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1AdditionalDocumentation'Variants
-> Maybe Text
-> PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1
PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1 Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1AdditionalDocumentation'Variants
-> Maybe Text
-> PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1)
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1AdditionalDocumentation'Variants)
-> Parser
(Maybe Text
-> PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object
-> Text
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1AdditionalDocumentation'Variants)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Data.Aeson.Types.FromJSON..:? Text
"additional_documentation")) Parser
(Maybe Text
-> PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1)
-> Parser (Maybe Text)
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object -> Text -> Parser (Maybe Text)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Data.Aeson.Types.FromJSON..:? Text
"explanation"))
mkPostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1 :: PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1
mkPostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1 :: PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1
mkPostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1 =
PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1 :: Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1AdditionalDocumentation'Variants
-> Maybe Text
-> PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1
PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1
{ postIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1AdditionalDocumentation :: Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1AdditionalDocumentation'Variants
postIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1AdditionalDocumentation = Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1AdditionalDocumentation'Variants
forall a. Maybe a
GHC.Maybe.Nothing,
postIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1Explanation :: Maybe Text
postIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1Explanation = Maybe Text
forall a. Maybe a
GHC.Maybe.Nothing
}
data PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1AdditionalDocumentation'Variants
=
PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1AdditionalDocumentation'EmptyString
| PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1AdditionalDocumentation'Text Data.Text.Internal.Text
deriving (Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1AdditionalDocumentation'Variants
-> String
-> String
[PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1AdditionalDocumentation'Variants]
-> String -> String
PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1AdditionalDocumentation'Variants
-> String
(Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1AdditionalDocumentation'Variants
-> String
-> String)
-> (PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1AdditionalDocumentation'Variants
-> String)
-> ([PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1AdditionalDocumentation'Variants]
-> String -> String)
-> Show
PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1AdditionalDocumentation'Variants
forall a.
(Int -> a -> String -> String)
-> (a -> String) -> ([a] -> String -> String) -> Show a
showList :: [PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1AdditionalDocumentation'Variants]
-> String -> String
$cshowList :: [PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1AdditionalDocumentation'Variants]
-> String -> String
show :: PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1AdditionalDocumentation'Variants
-> String
$cshow :: PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1AdditionalDocumentation'Variants
-> String
showsPrec :: Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1AdditionalDocumentation'Variants
-> String
-> String
$cshowsPrec :: Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1AdditionalDocumentation'Variants
-> String
-> String
GHC.Show.Show, PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1AdditionalDocumentation'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1AdditionalDocumentation'Variants
-> Bool
(PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1AdditionalDocumentation'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1AdditionalDocumentation'Variants
-> Bool)
-> (PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1AdditionalDocumentation'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1AdditionalDocumentation'Variants
-> Bool)
-> Eq
PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1AdditionalDocumentation'Variants
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1AdditionalDocumentation'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1AdditionalDocumentation'Variants
-> Bool
$c/= :: PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1AdditionalDocumentation'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1AdditionalDocumentation'Variants
-> Bool
== :: PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1AdditionalDocumentation'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1AdditionalDocumentation'Variants
-> Bool
$c== :: PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1AdditionalDocumentation'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1AdditionalDocumentation'Variants
-> Bool
GHC.Classes.Eq)
instance Data.Aeson.Types.ToJSON.ToJSON PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1AdditionalDocumentation'Variants where
toJSON :: PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1AdditionalDocumentation'Variants
-> Value
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1AdditionalDocumentation'Text Text
a) = Text -> Value
forall a. ToJSON a => a -> Value
Data.Aeson.Types.ToJSON.toJSON Text
a
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1AdditionalDocumentation'Variants
PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1AdditionalDocumentation'EmptyString) = Value
""
instance Data.Aeson.Types.FromJSON.FromJSON PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1AdditionalDocumentation'Variants where
parseJSON :: Value
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1AdditionalDocumentation'Variants
parseJSON Value
val =
if
| Value
val Value -> Value -> Bool
forall a. Eq a => a -> a -> Bool
GHC.Classes.== Value
"" -> PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1AdditionalDocumentation'Variants
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1AdditionalDocumentation'Variants
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1AdditionalDocumentation'Variants
PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1AdditionalDocumentation'EmptyString
| Bool
GHC.Base.otherwise -> case (Text
-> PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1AdditionalDocumentation'Variants
PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1AdditionalDocumentation'Text (Text
-> PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1AdditionalDocumentation'Variants)
-> Result Text
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1AdditionalDocumentation'Variants
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Data.Functor.<$> Value -> Result Text
forall a. FromJSON a => Value -> Result a
Data.Aeson.Types.FromJSON.fromJSON Value
val) Result
PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1AdditionalDocumentation'Variants
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1AdditionalDocumentation'Variants
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1AdditionalDocumentation'Variants
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
GHC.Base.<|> String
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1AdditionalDocumentation'Variants
forall a. String -> Result a
Data.Aeson.Types.Internal.Error String
"No variant matched" of
Data.Aeson.Types.Internal.Success PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1AdditionalDocumentation'Variants
a -> PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1AdditionalDocumentation'Variants
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1AdditionalDocumentation'Variants
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1AdditionalDocumentation'Variants
a
Data.Aeson.Types.Internal.Error String
a -> String
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1AdditionalDocumentation'Variants
forall (m :: * -> *) a. MonadFail m => String -> m a
Control.Monad.Fail.fail String
a
data PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'Variants
=
PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'EmptyString
| PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1 PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1
deriving (Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'Variants
-> String
-> String
[PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'Variants]
-> String -> String
PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'Variants
-> String
(Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'Variants
-> String
-> String)
-> (PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'Variants
-> String)
-> ([PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'Variants]
-> String -> String)
-> Show
PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'Variants
forall a.
(Int -> a -> String -> String)
-> (a -> String) -> ([a] -> String -> String) -> Show a
showList :: [PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'Variants]
-> String -> String
$cshowList :: [PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'Variants]
-> String -> String
show :: PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'Variants
-> String
$cshow :: PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'Variants
-> String
showsPrec :: Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'Variants
-> String
-> String
$cshowsPrec :: Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'Variants
-> String
-> String
GHC.Show.Show, PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'Variants
-> Bool
(PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'Variants
-> Bool)
-> (PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'Variants
-> Bool)
-> Eq
PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'Variants
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'Variants
-> Bool
$c/= :: PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'Variants
-> Bool
== :: PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'Variants
-> Bool
$c== :: PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'Variants
-> Bool
GHC.Classes.Eq)
instance Data.Aeson.Types.ToJSON.ToJSON PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'Variants where
toJSON :: PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'Variants
-> Value
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1 PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1
a) = PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1
-> Value
forall a. ToJSON a => a -> Value
Data.Aeson.Types.ToJSON.toJSON PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1
a
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'Variants
PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'EmptyString) = Value
""
instance Data.Aeson.Types.FromJSON.FromJSON PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'Variants where
parseJSON :: Value
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'Variants
parseJSON Value
val =
if
| Value
val Value -> Value -> Bool
forall a. Eq a => a -> a -> Bool
GHC.Classes.== Value
"" -> PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'Variants
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'Variants
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'Variants
PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'EmptyString
| Bool
GHC.Base.otherwise -> case (PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1
-> PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'Variants
PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1 (PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1
-> PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'Variants)
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'Variants
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Data.Functor.<$> Value
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1
forall a. FromJSON a => Value -> Result a
Data.Aeson.Types.FromJSON.fromJSON Value
val) Result
PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'Variants
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'Variants
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'Variants
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
GHC.Base.<|> String
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'Variants
forall a. String -> Result a
Data.Aeson.Types.Internal.Error String
"No variant matched" of
Data.Aeson.Types.Internal.Success PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'Variants
a -> PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'Variants
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'Variants
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'Variants
a
Data.Aeson.Types.Internal.Error String
a -> String
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'Variants
forall (m :: * -> *) a. MonadFail m => String -> m a
Control.Monad.Fail.fail String
a
data PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1 = PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1
{
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1AdditionalDocumentation'Variants
postIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1AdditionalDocumentation :: (GHC.Maybe.Maybe PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1AdditionalDocumentation'Variants),
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1
-> Maybe Text
postIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1Explanation :: (GHC.Maybe.Maybe Data.Text.Internal.Text),
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReceivedAt'Variants
postIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReceivedAt :: (GHC.Maybe.Maybe PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReceivedAt'Variants),
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1
-> Maybe Text
postIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnDescription :: (GHC.Maybe.Maybe Data.Text.Internal.Text),
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus'
postIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus :: (GHC.Maybe.Maybe PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus'),
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt'Variants
postIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt :: (GHC.Maybe.Maybe PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt'Variants)
}
deriving
( Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1
-> String
-> String
[PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1]
-> String -> String
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1
-> String
(Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1
-> String
-> String)
-> (PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1
-> String)
-> ([PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1]
-> String -> String)
-> Show
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1
forall a.
(Int -> a -> String -> String)
-> (a -> String) -> ([a] -> String -> String) -> Show a
showList :: [PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1]
-> String -> String
$cshowList :: [PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1]
-> String -> String
show :: PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1
-> String
$cshow :: PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1
-> String
showsPrec :: Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1
-> String
-> String
$cshowsPrec :: Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1
-> String
-> String
GHC.Show.Show,
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1
-> Bool
(PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1
-> Bool)
-> (PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1
-> Bool)
-> Eq
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1
-> Bool
$c/= :: PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1
-> Bool
== :: PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1
-> Bool
$c== :: PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1
-> Bool
GHC.Classes.Eq
)
instance Data.Aeson.Types.ToJSON.ToJSON PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1 where
toJSON :: PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1
-> Value
toJSON PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1
obj = [Pair] -> Value
Data.Aeson.Types.Internal.object (Text
"additional_documentation" Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1AdditionalDocumentation'Variants
-> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1AdditionalDocumentation'Variants
postIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1AdditionalDocumentation PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"explanation" Text -> Maybe Text -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1
-> Maybe Text
postIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1Explanation PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"received_at" Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReceivedAt'Variants
-> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReceivedAt'Variants
postIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReceivedAt PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"return_description" Text -> Maybe Text -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1
-> Maybe Text
postIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnDescription PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"return_status" Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus'
-> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus'
postIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"returned_at" Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt'Variants
-> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt'Variants
postIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: [Pair]
forall a. Monoid a => a
GHC.Base.mempty)
toEncoding :: PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1
-> Encoding
toEncoding PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1
obj = Series -> Encoding
Data.Aeson.Encoding.Internal.pairs ((Text
"additional_documentation" Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1AdditionalDocumentation'Variants
-> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1AdditionalDocumentation'Variants
postIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1AdditionalDocumentation PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> ((Text
"explanation" Text -> Maybe Text -> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1
-> Maybe Text
postIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1Explanation PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> ((Text
"received_at" Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReceivedAt'Variants
-> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReceivedAt'Variants
postIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReceivedAt PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> ((Text
"return_description" Text -> Maybe Text -> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1
-> Maybe Text
postIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnDescription PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> ((Text
"return_status" Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus'
-> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus'
postIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> (Text
"returned_at" Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt'Variants
-> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt'Variants
postIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1
obj))))))
instance Data.Aeson.Types.FromJSON.FromJSON PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1 where
parseJSON :: Value
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1
parseJSON = String
-> (Object
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1)
-> Value
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1
forall a. String -> (Object -> Parser a) -> Value -> Parser a
Data.Aeson.Types.FromJSON.withObject String
"PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1" (\Object
obj -> ((((((Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1AdditionalDocumentation'Variants
-> Maybe Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReceivedAt'Variants
-> Maybe Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1)
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1AdditionalDocumentation'Variants
-> Maybe Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReceivedAt'Variants
-> Maybe Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1)
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1AdditionalDocumentation'Variants
-> Maybe Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReceivedAt'Variants
-> Maybe Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1 Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1AdditionalDocumentation'Variants
-> Maybe Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReceivedAt'Variants
-> Maybe Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1)
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1AdditionalDocumentation'Variants)
-> Parser
(Maybe Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReceivedAt'Variants
-> Maybe Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object
-> Text
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1AdditionalDocumentation'Variants)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Data.Aeson.Types.FromJSON..:? Text
"additional_documentation")) Parser
(Maybe Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReceivedAt'Variants
-> Maybe Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1)
-> Parser (Maybe Text)
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReceivedAt'Variants
-> Maybe Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object -> Text -> Parser (Maybe Text)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Data.Aeson.Types.FromJSON..:? Text
"explanation")) Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReceivedAt'Variants
-> Maybe Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1)
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReceivedAt'Variants)
-> Parser
(Maybe Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object
-> Text
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReceivedAt'Variants)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Data.Aeson.Types.FromJSON..:? Text
"received_at")) Parser
(Maybe Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1)
-> Parser (Maybe Text)
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object -> Text -> Parser (Maybe Text)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Data.Aeson.Types.FromJSON..:? Text
"return_description")) Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1)
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus')
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object
-> Text
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus')
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Data.Aeson.Types.FromJSON..:? Text
"return_status")) Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1)
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt'Variants)
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object
-> Text
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt'Variants)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Data.Aeson.Types.FromJSON..:? Text
"returned_at"))
mkPostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1 :: PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1
mkPostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1 :: PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1
mkPostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1 =
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1 :: Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1AdditionalDocumentation'Variants
-> Maybe Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReceivedAt'Variants
-> Maybe Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus'
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1
{ postIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1AdditionalDocumentation :: Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1AdditionalDocumentation'Variants
postIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1AdditionalDocumentation = Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1AdditionalDocumentation'Variants
forall a. Maybe a
GHC.Maybe.Nothing,
postIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1Explanation :: Maybe Text
postIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1Explanation = Maybe Text
forall a. Maybe a
GHC.Maybe.Nothing,
postIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReceivedAt :: Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReceivedAt'Variants
postIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReceivedAt = Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReceivedAt'Variants
forall a. Maybe a
GHC.Maybe.Nothing,
postIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnDescription :: Maybe Text
postIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnDescription = Maybe Text
forall a. Maybe a
GHC.Maybe.Nothing,
postIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus :: Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus'
postIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus = Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus'
forall a. Maybe a
GHC.Maybe.Nothing,
postIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt :: Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt'Variants
postIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt = Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt'Variants
forall a. Maybe a
GHC.Maybe.Nothing
}
data PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1AdditionalDocumentation'Variants
=
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1AdditionalDocumentation'EmptyString
| PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1AdditionalDocumentation'Text Data.Text.Internal.Text
deriving (Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1AdditionalDocumentation'Variants
-> String
-> String
[PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1AdditionalDocumentation'Variants]
-> String -> String
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1AdditionalDocumentation'Variants
-> String
(Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1AdditionalDocumentation'Variants
-> String
-> String)
-> (PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1AdditionalDocumentation'Variants
-> String)
-> ([PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1AdditionalDocumentation'Variants]
-> String -> String)
-> Show
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1AdditionalDocumentation'Variants
forall a.
(Int -> a -> String -> String)
-> (a -> String) -> ([a] -> String -> String) -> Show a
showList :: [PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1AdditionalDocumentation'Variants]
-> String -> String
$cshowList :: [PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1AdditionalDocumentation'Variants]
-> String -> String
show :: PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1AdditionalDocumentation'Variants
-> String
$cshow :: PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1AdditionalDocumentation'Variants
-> String
showsPrec :: Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1AdditionalDocumentation'Variants
-> String
-> String
$cshowsPrec :: Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1AdditionalDocumentation'Variants
-> String
-> String
GHC.Show.Show, PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1AdditionalDocumentation'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1AdditionalDocumentation'Variants
-> Bool
(PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1AdditionalDocumentation'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1AdditionalDocumentation'Variants
-> Bool)
-> (PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1AdditionalDocumentation'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1AdditionalDocumentation'Variants
-> Bool)
-> Eq
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1AdditionalDocumentation'Variants
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1AdditionalDocumentation'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1AdditionalDocumentation'Variants
-> Bool
$c/= :: PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1AdditionalDocumentation'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1AdditionalDocumentation'Variants
-> Bool
== :: PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1AdditionalDocumentation'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1AdditionalDocumentation'Variants
-> Bool
$c== :: PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1AdditionalDocumentation'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1AdditionalDocumentation'Variants
-> Bool
GHC.Classes.Eq)
instance Data.Aeson.Types.ToJSON.ToJSON PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1AdditionalDocumentation'Variants where
toJSON :: PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1AdditionalDocumentation'Variants
-> Value
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1AdditionalDocumentation'Text Text
a) = Text -> Value
forall a. ToJSON a => a -> Value
Data.Aeson.Types.ToJSON.toJSON Text
a
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1AdditionalDocumentation'Variants
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1AdditionalDocumentation'EmptyString) = Value
""
instance Data.Aeson.Types.FromJSON.FromJSON PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1AdditionalDocumentation'Variants where
parseJSON :: Value
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1AdditionalDocumentation'Variants
parseJSON Value
val =
if
| Value
val Value -> Value -> Bool
forall a. Eq a => a -> a -> Bool
GHC.Classes.== Value
"" -> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1AdditionalDocumentation'Variants
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1AdditionalDocumentation'Variants
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1AdditionalDocumentation'Variants
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1AdditionalDocumentation'EmptyString
| Bool
GHC.Base.otherwise -> case (Text
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1AdditionalDocumentation'Variants
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1AdditionalDocumentation'Text (Text
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1AdditionalDocumentation'Variants)
-> Result Text
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1AdditionalDocumentation'Variants
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Data.Functor.<$> Value -> Result Text
forall a. FromJSON a => Value -> Result a
Data.Aeson.Types.FromJSON.fromJSON Value
val) Result
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1AdditionalDocumentation'Variants
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1AdditionalDocumentation'Variants
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1AdditionalDocumentation'Variants
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
GHC.Base.<|> String
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1AdditionalDocumentation'Variants
forall a. String -> Result a
Data.Aeson.Types.Internal.Error String
"No variant matched" of
Data.Aeson.Types.Internal.Success PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1AdditionalDocumentation'Variants
a -> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1AdditionalDocumentation'Variants
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1AdditionalDocumentation'Variants
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1AdditionalDocumentation'Variants
a
Data.Aeson.Types.Internal.Error String
a -> String
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1AdditionalDocumentation'Variants
forall (m :: * -> *) a. MonadFail m => String -> m a
Control.Monad.Fail.fail String
a
data PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReceivedAt'Variants
=
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReceivedAt'EmptyString
| PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReceivedAt'Int GHC.Types.Int
deriving (Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReceivedAt'Variants
-> String
-> String
[PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReceivedAt'Variants]
-> String -> String
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReceivedAt'Variants
-> String
(Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReceivedAt'Variants
-> String
-> String)
-> (PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReceivedAt'Variants
-> String)
-> ([PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReceivedAt'Variants]
-> String -> String)
-> Show
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReceivedAt'Variants
forall a.
(Int -> a -> String -> String)
-> (a -> String) -> ([a] -> String -> String) -> Show a
showList :: [PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReceivedAt'Variants]
-> String -> String
$cshowList :: [PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReceivedAt'Variants]
-> String -> String
show :: PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReceivedAt'Variants
-> String
$cshow :: PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReceivedAt'Variants
-> String
showsPrec :: Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReceivedAt'Variants
-> String
-> String
$cshowsPrec :: Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReceivedAt'Variants
-> String
-> String
GHC.Show.Show, PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReceivedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReceivedAt'Variants
-> Bool
(PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReceivedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReceivedAt'Variants
-> Bool)
-> (PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReceivedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReceivedAt'Variants
-> Bool)
-> Eq
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReceivedAt'Variants
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReceivedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReceivedAt'Variants
-> Bool
$c/= :: PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReceivedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReceivedAt'Variants
-> Bool
== :: PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReceivedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReceivedAt'Variants
-> Bool
$c== :: PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReceivedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReceivedAt'Variants
-> Bool
GHC.Classes.Eq)
instance Data.Aeson.Types.ToJSON.ToJSON PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReceivedAt'Variants where
toJSON :: PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReceivedAt'Variants
-> Value
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReceivedAt'Int Int
a) = Int -> Value
forall a. ToJSON a => a -> Value
Data.Aeson.Types.ToJSON.toJSON Int
a
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReceivedAt'Variants
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReceivedAt'EmptyString) = Value
""
instance Data.Aeson.Types.FromJSON.FromJSON PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReceivedAt'Variants where
parseJSON :: Value
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReceivedAt'Variants
parseJSON Value
val =
if
| Value
val Value -> Value -> Bool
forall a. Eq a => a -> a -> Bool
GHC.Classes.== Value
"" -> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReceivedAt'Variants
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReceivedAt'Variants
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReceivedAt'Variants
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReceivedAt'EmptyString
| Bool
GHC.Base.otherwise -> case (Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReceivedAt'Variants
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReceivedAt'Int (Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReceivedAt'Variants)
-> Result Int
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReceivedAt'Variants
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Data.Functor.<$> Value -> Result Int
forall a. FromJSON a => Value -> Result a
Data.Aeson.Types.FromJSON.fromJSON Value
val) Result
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReceivedAt'Variants
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReceivedAt'Variants
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReceivedAt'Variants
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
GHC.Base.<|> String
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReceivedAt'Variants
forall a. String -> Result a
Data.Aeson.Types.Internal.Error String
"No variant matched" of
Data.Aeson.Types.Internal.Success PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReceivedAt'Variants
a -> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReceivedAt'Variants
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReceivedAt'Variants
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReceivedAt'Variants
a
Data.Aeson.Types.Internal.Error String
a -> String
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReceivedAt'Variants
forall (m :: * -> *) a. MonadFail m => String -> m a
Control.Monad.Fail.fail String
a
data PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus'
=
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus'Other Data.Aeson.Types.Internal.Value
|
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus'Typed Data.Text.Internal.Text
|
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus'EnumEmptyString
|
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus'EnumMerchantRejected
|
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus'EnumSuccessful
deriving (Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus'
-> String
-> String
[PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus']
-> String -> String
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus'
-> String
(Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus'
-> String
-> String)
-> (PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus'
-> String)
-> ([PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus']
-> String -> String)
-> Show
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus'
forall a.
(Int -> a -> String -> String)
-> (a -> String) -> ([a] -> String -> String) -> Show a
showList :: [PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus']
-> String -> String
$cshowList :: [PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus']
-> String -> String
show :: PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus'
-> String
$cshow :: PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus'
-> String
showsPrec :: Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus'
-> String
-> String
$cshowsPrec :: Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus'
-> String
-> String
GHC.Show.Show, PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus'
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus'
-> Bool
(PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus'
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus'
-> Bool)
-> (PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus'
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus'
-> Bool)
-> Eq
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus'
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus'
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus'
-> Bool
$c/= :: PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus'
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus'
-> Bool
== :: PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus'
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus'
-> Bool
$c== :: PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus'
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus'
-> Bool
GHC.Classes.Eq)
instance Data.Aeson.Types.ToJSON.ToJSON PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus' where
toJSON :: PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus'
-> Value
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus'Other Value
val) = Value
val
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus'Typed Text
val) = Text -> Value
forall a. ToJSON a => a -> Value
Data.Aeson.Types.ToJSON.toJSON Text
val
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus'
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus'EnumEmptyString) = Value
""
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus'
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus'EnumMerchantRejected) = Value
"merchant_rejected"
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus'
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus'EnumSuccessful) = Value
"successful"
instance Data.Aeson.Types.FromJSON.FromJSON PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus' where
parseJSON :: Value
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus'
parseJSON Value
val =
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus'
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus'
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure
( if
| Value
val Value -> Value -> Bool
forall a. Eq a => a -> a -> Bool
GHC.Classes.== Value
"" -> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus'
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus'EnumEmptyString
| Value
val Value -> Value -> Bool
forall a. Eq a => a -> a -> Bool
GHC.Classes.== Value
"merchant_rejected" -> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus'
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus'EnumMerchantRejected
| Value
val Value -> Value -> Bool
forall a. Eq a => a -> a -> Bool
GHC.Classes.== Value
"successful" -> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus'
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus'EnumSuccessful
| Bool
GHC.Base.otherwise -> Value
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus'
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus'Other Value
val
)
data PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt'Variants
=
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt'EmptyString
| PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt'Int GHC.Types.Int
deriving (Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt'Variants
-> String
-> String
[PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt'Variants]
-> String -> String
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt'Variants
-> String
(Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt'Variants
-> String
-> String)
-> (PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt'Variants
-> String)
-> ([PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt'Variants]
-> String -> String)
-> Show
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt'Variants
forall a.
(Int -> a -> String -> String)
-> (a -> String) -> ([a] -> String -> String) -> Show a
showList :: [PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt'Variants]
-> String -> String
$cshowList :: [PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt'Variants]
-> String -> String
show :: PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt'Variants
-> String
$cshow :: PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt'Variants
-> String
showsPrec :: Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt'Variants
-> String
-> String
$cshowsPrec :: Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt'Variants
-> String
-> String
GHC.Show.Show, PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt'Variants
-> Bool
(PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt'Variants
-> Bool)
-> (PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt'Variants
-> Bool)
-> Eq
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt'Variants
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt'Variants
-> Bool
$c/= :: PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt'Variants
-> Bool
== :: PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt'Variants
-> Bool
$c== :: PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt'Variants
-> Bool
GHC.Classes.Eq)
instance Data.Aeson.Types.ToJSON.ToJSON PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt'Variants where
toJSON :: PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt'Variants
-> Value
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt'Int Int
a) = Int -> Value
forall a. ToJSON a => a -> Value
Data.Aeson.Types.ToJSON.toJSON Int
a
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt'Variants
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt'EmptyString) = Value
""
instance Data.Aeson.Types.FromJSON.FromJSON PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt'Variants where
parseJSON :: Value
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt'Variants
parseJSON Value
val =
if
| Value
val Value -> Value -> Bool
forall a. Eq a => a -> a -> Bool
GHC.Classes.== Value
"" -> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt'Variants
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt'Variants
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt'Variants
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt'EmptyString
| Bool
GHC.Base.otherwise -> case (Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt'Variants
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt'Int (Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt'Variants)
-> Result Int
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt'Variants
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Data.Functor.<$> Value -> Result Int
forall a. FromJSON a => Value -> Result a
Data.Aeson.Types.FromJSON.fromJSON Value
val) Result
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt'Variants
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt'Variants
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt'Variants
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
GHC.Base.<|> String
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt'Variants
forall a. String -> Result a
Data.Aeson.Types.Internal.Error String
"No variant matched" of
Data.Aeson.Types.Internal.Success PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt'Variants
a -> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt'Variants
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt'Variants
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt'Variants
a
Data.Aeson.Types.Internal.Error String
a -> String
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt'Variants
forall (m :: * -> *) a. MonadFail m => String -> m a
Control.Monad.Fail.fail String
a
data PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'Variants
=
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'EmptyString
| PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1 PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1
deriving (Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'Variants
-> String
-> String
[PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'Variants]
-> String -> String
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'Variants
-> String
(Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'Variants
-> String
-> String)
-> (PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'Variants
-> String)
-> ([PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'Variants]
-> String -> String)
-> Show
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'Variants
forall a.
(Int -> a -> String -> String)
-> (a -> String) -> ([a] -> String -> String) -> Show a
showList :: [PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'Variants]
-> String -> String
$cshowList :: [PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'Variants]
-> String -> String
show :: PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'Variants
-> String
$cshow :: PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'Variants
-> String
showsPrec :: Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'Variants
-> String
-> String
$cshowsPrec :: Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'Variants
-> String
-> String
GHC.Show.Show, PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'Variants
-> Bool
(PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'Variants
-> Bool)
-> (PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'Variants
-> Bool)
-> Eq
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'Variants
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'Variants
-> Bool
$c/= :: PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'Variants
-> Bool
== :: PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'Variants
-> Bool
$c== :: PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'Variants
-> Bool
GHC.Classes.Eq)
instance Data.Aeson.Types.ToJSON.ToJSON PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'Variants where
toJSON :: PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'Variants
-> Value
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1 PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1
a) = PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1
-> Value
forall a. ToJSON a => a -> Value
Data.Aeson.Types.ToJSON.toJSON PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1
a
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'Variants
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'EmptyString) = Value
""
instance Data.Aeson.Types.FromJSON.FromJSON PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'Variants where
parseJSON :: Value
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'Variants
parseJSON Value
val =
if
| Value
val Value -> Value -> Bool
forall a. Eq a => a -> a -> Bool
GHC.Classes.== Value
"" -> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'Variants
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'Variants
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'Variants
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'EmptyString
| Bool
GHC.Base.otherwise -> case (PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'Variants
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1 (PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1
-> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'Variants)
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'Variants
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Data.Functor.<$> Value
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1
forall a. FromJSON a => Value -> Result a
Data.Aeson.Types.FromJSON.fromJSON Value
val) Result
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'Variants
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'Variants
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'Variants
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
GHC.Base.<|> String
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'Variants
forall a. String -> Result a
Data.Aeson.Types.Internal.Error String
"No variant matched" of
Data.Aeson.Types.Internal.Success PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'Variants
a -> PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'Variants
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'Variants
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'Variants
a
Data.Aeson.Types.Internal.Error String
a -> String
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'Variants
forall (m :: * -> *) a. MonadFail m => String -> m a
Control.Monad.Fail.fail String
a
data PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1 = PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1
{
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1AdditionalDocumentation'Variants
postIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1AdditionalDocumentation :: (GHC.Maybe.Maybe PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1AdditionalDocumentation'Variants),
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ExpectedAt'Variants
postIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ExpectedAt :: (GHC.Maybe.Maybe PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ExpectedAt'Variants),
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1
-> Maybe Text
postIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1Explanation :: (GHC.Maybe.Maybe Data.Text.Internal.Text),
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1
-> Maybe Text
postIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductDescription :: (GHC.Maybe.Maybe Data.Text.Internal.Text),
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType'
postIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType :: (GHC.Maybe.Maybe PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType')
}
deriving
( Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1
-> String
-> String
[PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1]
-> String -> String
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1
-> String
(Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1
-> String
-> String)
-> (PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1
-> String)
-> ([PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1]
-> String -> String)
-> Show
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1
forall a.
(Int -> a -> String -> String)
-> (a -> String) -> ([a] -> String -> String) -> Show a
showList :: [PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1]
-> String -> String
$cshowList :: [PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1]
-> String -> String
show :: PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1
-> String
$cshow :: PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1
-> String
showsPrec :: Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1
-> String
-> String
$cshowsPrec :: Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1
-> String
-> String
GHC.Show.Show,
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1
-> PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1
-> Bool
(PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1
-> PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1
-> Bool)
-> (PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1
-> PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1
-> Bool)
-> Eq
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1
-> PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1
-> Bool
$c/= :: PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1
-> PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1
-> Bool
== :: PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1
-> PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1
-> Bool
$c== :: PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1
-> PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1
-> Bool
GHC.Classes.Eq
)
instance Data.Aeson.Types.ToJSON.ToJSON PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1 where
toJSON :: PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1
-> Value
toJSON PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1
obj = [Pair] -> Value
Data.Aeson.Types.Internal.object (Text
"additional_documentation" Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1AdditionalDocumentation'Variants
-> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1AdditionalDocumentation'Variants
postIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1AdditionalDocumentation PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"expected_at" Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ExpectedAt'Variants
-> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ExpectedAt'Variants
postIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ExpectedAt PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"explanation" Text -> Maybe Text -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1
-> Maybe Text
postIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1Explanation PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"product_description" Text -> Maybe Text -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1
-> Maybe Text
postIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductDescription PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"product_type" Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType'
-> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType'
postIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: [Pair]
forall a. Monoid a => a
GHC.Base.mempty)
toEncoding :: PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1
-> Encoding
toEncoding PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1
obj = Series -> Encoding
Data.Aeson.Encoding.Internal.pairs ((Text
"additional_documentation" Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1AdditionalDocumentation'Variants
-> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1AdditionalDocumentation'Variants
postIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1AdditionalDocumentation PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> ((Text
"expected_at" Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ExpectedAt'Variants
-> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ExpectedAt'Variants
postIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ExpectedAt PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> ((Text
"explanation" Text -> Maybe Text -> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1
-> Maybe Text
postIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1Explanation PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> ((Text
"product_description" Text -> Maybe Text -> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1
-> Maybe Text
postIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductDescription PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> (Text
"product_type" Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType'
-> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType'
postIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1
obj)))))
instance Data.Aeson.Types.FromJSON.FromJSON PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1 where
parseJSON :: Value
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1
parseJSON = String
-> (Object
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1)
-> Value
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1
forall a. String -> (Object -> Parser a) -> Value -> Parser a
Data.Aeson.Types.FromJSON.withObject String
"PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1" (\Object
obj -> (((((Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1AdditionalDocumentation'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ExpectedAt'Variants
-> Maybe Text
-> Maybe Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType'
-> PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1)
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1AdditionalDocumentation'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ExpectedAt'Variants
-> Maybe Text
-> Maybe Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType'
-> PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1)
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1AdditionalDocumentation'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ExpectedAt'Variants
-> Maybe Text
-> Maybe Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType'
-> PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1 Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1AdditionalDocumentation'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ExpectedAt'Variants
-> Maybe Text
-> Maybe Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType'
-> PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1)
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1AdditionalDocumentation'Variants)
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ExpectedAt'Variants
-> Maybe Text
-> Maybe Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType'
-> PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object
-> Text
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1AdditionalDocumentation'Variants)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Data.Aeson.Types.FromJSON..:? Text
"additional_documentation")) Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ExpectedAt'Variants
-> Maybe Text
-> Maybe Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType'
-> PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1)
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ExpectedAt'Variants)
-> Parser
(Maybe Text
-> Maybe Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType'
-> PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object
-> Text
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ExpectedAt'Variants)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Data.Aeson.Types.FromJSON..:? Text
"expected_at")) Parser
(Maybe Text
-> Maybe Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType'
-> PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1)
-> Parser (Maybe Text)
-> Parser
(Maybe Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType'
-> PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object -> Text -> Parser (Maybe Text)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Data.Aeson.Types.FromJSON..:? Text
"explanation")) Parser
(Maybe Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType'
-> PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1)
-> Parser (Maybe Text)
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType'
-> PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object -> Text -> Parser (Maybe Text)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Data.Aeson.Types.FromJSON..:? Text
"product_description")) Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType'
-> PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1)
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType')
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object
-> Text
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType')
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Data.Aeson.Types.FromJSON..:? Text
"product_type"))
mkPostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1 :: PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1
mkPostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1 :: PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1
mkPostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1 =
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1 :: Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1AdditionalDocumentation'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ExpectedAt'Variants
-> Maybe Text
-> Maybe Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType'
-> PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1
{ postIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1AdditionalDocumentation :: Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1AdditionalDocumentation'Variants
postIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1AdditionalDocumentation = Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1AdditionalDocumentation'Variants
forall a. Maybe a
GHC.Maybe.Nothing,
postIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ExpectedAt :: Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ExpectedAt'Variants
postIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ExpectedAt = Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ExpectedAt'Variants
forall a. Maybe a
GHC.Maybe.Nothing,
postIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1Explanation :: Maybe Text
postIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1Explanation = Maybe Text
forall a. Maybe a
GHC.Maybe.Nothing,
postIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductDescription :: Maybe Text
postIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductDescription = Maybe Text
forall a. Maybe a
GHC.Maybe.Nothing,
postIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType :: Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType'
postIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType = Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType'
forall a. Maybe a
GHC.Maybe.Nothing
}
data PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1AdditionalDocumentation'Variants
=
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1AdditionalDocumentation'EmptyString
| PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1AdditionalDocumentation'Text Data.Text.Internal.Text
deriving (Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1AdditionalDocumentation'Variants
-> String
-> String
[PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1AdditionalDocumentation'Variants]
-> String -> String
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1AdditionalDocumentation'Variants
-> String
(Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1AdditionalDocumentation'Variants
-> String
-> String)
-> (PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1AdditionalDocumentation'Variants
-> String)
-> ([PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1AdditionalDocumentation'Variants]
-> String -> String)
-> Show
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1AdditionalDocumentation'Variants
forall a.
(Int -> a -> String -> String)
-> (a -> String) -> ([a] -> String -> String) -> Show a
showList :: [PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1AdditionalDocumentation'Variants]
-> String -> String
$cshowList :: [PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1AdditionalDocumentation'Variants]
-> String -> String
show :: PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1AdditionalDocumentation'Variants
-> String
$cshow :: PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1AdditionalDocumentation'Variants
-> String
showsPrec :: Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1AdditionalDocumentation'Variants
-> String
-> String
$cshowsPrec :: Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1AdditionalDocumentation'Variants
-> String
-> String
GHC.Show.Show, PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1AdditionalDocumentation'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1AdditionalDocumentation'Variants
-> Bool
(PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1AdditionalDocumentation'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1AdditionalDocumentation'Variants
-> Bool)
-> (PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1AdditionalDocumentation'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1AdditionalDocumentation'Variants
-> Bool)
-> Eq
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1AdditionalDocumentation'Variants
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1AdditionalDocumentation'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1AdditionalDocumentation'Variants
-> Bool
$c/= :: PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1AdditionalDocumentation'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1AdditionalDocumentation'Variants
-> Bool
== :: PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1AdditionalDocumentation'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1AdditionalDocumentation'Variants
-> Bool
$c== :: PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1AdditionalDocumentation'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1AdditionalDocumentation'Variants
-> Bool
GHC.Classes.Eq)
instance Data.Aeson.Types.ToJSON.ToJSON PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1AdditionalDocumentation'Variants where
toJSON :: PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1AdditionalDocumentation'Variants
-> Value
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1AdditionalDocumentation'Text Text
a) = Text -> Value
forall a. ToJSON a => a -> Value
Data.Aeson.Types.ToJSON.toJSON Text
a
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1AdditionalDocumentation'Variants
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1AdditionalDocumentation'EmptyString) = Value
""
instance Data.Aeson.Types.FromJSON.FromJSON PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1AdditionalDocumentation'Variants where
parseJSON :: Value
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1AdditionalDocumentation'Variants
parseJSON Value
val =
if
| Value
val Value -> Value -> Bool
forall a. Eq a => a -> a -> Bool
GHC.Classes.== Value
"" -> PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1AdditionalDocumentation'Variants
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1AdditionalDocumentation'Variants
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1AdditionalDocumentation'Variants
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1AdditionalDocumentation'EmptyString
| Bool
GHC.Base.otherwise -> case (Text
-> PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1AdditionalDocumentation'Variants
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1AdditionalDocumentation'Text (Text
-> PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1AdditionalDocumentation'Variants)
-> Result Text
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1AdditionalDocumentation'Variants
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Data.Functor.<$> Value -> Result Text
forall a. FromJSON a => Value -> Result a
Data.Aeson.Types.FromJSON.fromJSON Value
val) Result
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1AdditionalDocumentation'Variants
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1AdditionalDocumentation'Variants
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1AdditionalDocumentation'Variants
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
GHC.Base.<|> String
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1AdditionalDocumentation'Variants
forall a. String -> Result a
Data.Aeson.Types.Internal.Error String
"No variant matched" of
Data.Aeson.Types.Internal.Success PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1AdditionalDocumentation'Variants
a -> PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1AdditionalDocumentation'Variants
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1AdditionalDocumentation'Variants
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1AdditionalDocumentation'Variants
a
Data.Aeson.Types.Internal.Error String
a -> String
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1AdditionalDocumentation'Variants
forall (m :: * -> *) a. MonadFail m => String -> m a
Control.Monad.Fail.fail String
a
data PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ExpectedAt'Variants
=
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ExpectedAt'EmptyString
| PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ExpectedAt'Int GHC.Types.Int
deriving (Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ExpectedAt'Variants
-> String
-> String
[PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ExpectedAt'Variants]
-> String -> String
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ExpectedAt'Variants
-> String
(Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ExpectedAt'Variants
-> String
-> String)
-> (PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ExpectedAt'Variants
-> String)
-> ([PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ExpectedAt'Variants]
-> String -> String)
-> Show
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ExpectedAt'Variants
forall a.
(Int -> a -> String -> String)
-> (a -> String) -> ([a] -> String -> String) -> Show a
showList :: [PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ExpectedAt'Variants]
-> String -> String
$cshowList :: [PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ExpectedAt'Variants]
-> String -> String
show :: PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ExpectedAt'Variants
-> String
$cshow :: PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ExpectedAt'Variants
-> String
showsPrec :: Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ExpectedAt'Variants
-> String
-> String
$cshowsPrec :: Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ExpectedAt'Variants
-> String
-> String
GHC.Show.Show, PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ExpectedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ExpectedAt'Variants
-> Bool
(PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ExpectedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ExpectedAt'Variants
-> Bool)
-> (PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ExpectedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ExpectedAt'Variants
-> Bool)
-> Eq
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ExpectedAt'Variants
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ExpectedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ExpectedAt'Variants
-> Bool
$c/= :: PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ExpectedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ExpectedAt'Variants
-> Bool
== :: PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ExpectedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ExpectedAt'Variants
-> Bool
$c== :: PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ExpectedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ExpectedAt'Variants
-> Bool
GHC.Classes.Eq)
instance Data.Aeson.Types.ToJSON.ToJSON PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ExpectedAt'Variants where
toJSON :: PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ExpectedAt'Variants
-> Value
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ExpectedAt'Int Int
a) = Int -> Value
forall a. ToJSON a => a -> Value
Data.Aeson.Types.ToJSON.toJSON Int
a
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ExpectedAt'Variants
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ExpectedAt'EmptyString) = Value
""
instance Data.Aeson.Types.FromJSON.FromJSON PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ExpectedAt'Variants where
parseJSON :: Value
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ExpectedAt'Variants
parseJSON Value
val =
if
| Value
val Value -> Value -> Bool
forall a. Eq a => a -> a -> Bool
GHC.Classes.== Value
"" -> PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ExpectedAt'Variants
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ExpectedAt'Variants
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ExpectedAt'Variants
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ExpectedAt'EmptyString
| Bool
GHC.Base.otherwise -> case (Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ExpectedAt'Variants
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ExpectedAt'Int (Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ExpectedAt'Variants)
-> Result Int
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ExpectedAt'Variants
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Data.Functor.<$> Value -> Result Int
forall a. FromJSON a => Value -> Result a
Data.Aeson.Types.FromJSON.fromJSON Value
val) Result
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ExpectedAt'Variants
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ExpectedAt'Variants
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ExpectedAt'Variants
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
GHC.Base.<|> String
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ExpectedAt'Variants
forall a. String -> Result a
Data.Aeson.Types.Internal.Error String
"No variant matched" of
Data.Aeson.Types.Internal.Success PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ExpectedAt'Variants
a -> PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ExpectedAt'Variants
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ExpectedAt'Variants
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ExpectedAt'Variants
a
Data.Aeson.Types.Internal.Error String
a -> String
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ExpectedAt'Variants
forall (m :: * -> *) a. MonadFail m => String -> m a
Control.Monad.Fail.fail String
a
data PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType'
=
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType'Other Data.Aeson.Types.Internal.Value
|
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType'Typed Data.Text.Internal.Text
|
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType'EnumEmptyString
|
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType'EnumMerchandise
|
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType'EnumService
deriving (Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType'
-> String
-> String
[PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType']
-> String -> String
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType'
-> String
(Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType'
-> String
-> String)
-> (PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType'
-> String)
-> ([PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType']
-> String -> String)
-> Show
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType'
forall a.
(Int -> a -> String -> String)
-> (a -> String) -> ([a] -> String -> String) -> Show a
showList :: [PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType']
-> String -> String
$cshowList :: [PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType']
-> String -> String
show :: PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType'
-> String
$cshow :: PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType'
-> String
showsPrec :: Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType'
-> String
-> String
$cshowsPrec :: Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType'
-> String
-> String
GHC.Show.Show, PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType'
-> PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType'
-> Bool
(PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType'
-> PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType'
-> Bool)
-> (PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType'
-> PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType'
-> Bool)
-> Eq
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType'
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType'
-> PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType'
-> Bool
$c/= :: PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType'
-> PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType'
-> Bool
== :: PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType'
-> PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType'
-> Bool
$c== :: PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType'
-> PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType'
-> Bool
GHC.Classes.Eq)
instance Data.Aeson.Types.ToJSON.ToJSON PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType' where
toJSON :: PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType'
-> Value
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType'Other Value
val) = Value
val
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType'Typed Text
val) = Text -> Value
forall a. ToJSON a => a -> Value
Data.Aeson.Types.ToJSON.toJSON Text
val
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType'
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType'EnumEmptyString) = Value
""
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType'
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType'EnumMerchandise) = Value
"merchandise"
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType'
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType'EnumService) = Value
"service"
instance Data.Aeson.Types.FromJSON.FromJSON PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType' where
parseJSON :: Value
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType'
parseJSON Value
val =
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType'
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType'
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure
( if
| Value
val Value -> Value -> Bool
forall a. Eq a => a -> a -> Bool
GHC.Classes.== Value
"" -> PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType'
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType'EnumEmptyString
| Value
val Value -> Value -> Bool
forall a. Eq a => a -> a -> Bool
GHC.Classes.== Value
"merchandise" -> PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType'
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType'EnumMerchandise
| Value
val Value -> Value -> Bool
forall a. Eq a => a -> a -> Bool
GHC.Classes.== Value
"service" -> PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType'
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType'EnumService
| Bool
GHC.Base.otherwise -> Value
-> PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType'
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType'Other Value
val
)
data PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'Variants
=
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'EmptyString
| PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1 PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1
deriving (Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'Variants
-> String
-> String
[PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'Variants]
-> String -> String
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'Variants
-> String
(Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'Variants
-> String
-> String)
-> (PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'Variants
-> String)
-> ([PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'Variants]
-> String -> String)
-> Show
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'Variants
forall a.
(Int -> a -> String -> String)
-> (a -> String) -> ([a] -> String -> String) -> Show a
showList :: [PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'Variants]
-> String -> String
$cshowList :: [PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'Variants]
-> String -> String
show :: PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'Variants
-> String
$cshow :: PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'Variants
-> String
showsPrec :: Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'Variants
-> String
-> String
$cshowsPrec :: Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'Variants
-> String
-> String
GHC.Show.Show, PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'Variants
-> Bool
(PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'Variants
-> Bool)
-> (PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'Variants
-> Bool)
-> Eq
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'Variants
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'Variants
-> Bool
$c/= :: PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'Variants
-> Bool
== :: PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'Variants
-> Bool
$c== :: PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'Variants
-> Bool
GHC.Classes.Eq)
instance Data.Aeson.Types.ToJSON.ToJSON PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'Variants where
toJSON :: PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'Variants
-> Value
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1 PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1
a) = PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1
-> Value
forall a. ToJSON a => a -> Value
Data.Aeson.Types.ToJSON.toJSON PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1
a
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'Variants
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'EmptyString) = Value
""
instance Data.Aeson.Types.FromJSON.FromJSON PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'Variants where
parseJSON :: Value
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'Variants
parseJSON Value
val =
if
| Value
val Value -> Value -> Bool
forall a. Eq a => a -> a -> Bool
GHC.Classes.== Value
"" -> PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'Variants
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'Variants
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'Variants
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'EmptyString
| Bool
GHC.Base.otherwise -> case (PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1
-> PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'Variants
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1 (PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1
-> PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'Variants)
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'Variants
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Data.Functor.<$> Value
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1
forall a. FromJSON a => Value -> Result a
Data.Aeson.Types.FromJSON.fromJSON Value
val) Result
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'Variants
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'Variants
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'Variants
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
GHC.Base.<|> String
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'Variants
forall a. String -> Result a
Data.Aeson.Types.Internal.Error String
"No variant matched" of
Data.Aeson.Types.Internal.Success PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'Variants
a -> PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'Variants
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'Variants
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'Variants
a
Data.Aeson.Types.Internal.Error String
a -> String
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'Variants
forall (m :: * -> *) a. MonadFail m => String -> m a
Control.Monad.Fail.fail String
a
data PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1 = PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1
{
PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1AdditionalDocumentation'Variants
postIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1AdditionalDocumentation :: (GHC.Maybe.Maybe PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1AdditionalDocumentation'Variants),
PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1
-> Maybe Text
postIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1Explanation :: (GHC.Maybe.Maybe Data.Text.Internal.Text),
PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1
-> Maybe Text
postIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductDescription :: (GHC.Maybe.Maybe Data.Text.Internal.Text),
PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType'
postIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType :: (GHC.Maybe.Maybe PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType')
}
deriving
( Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1
-> String
-> String
[PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1]
-> String -> String
PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1
-> String
(Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1
-> String
-> String)
-> (PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1
-> String)
-> ([PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1]
-> String -> String)
-> Show PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1
forall a.
(Int -> a -> String -> String)
-> (a -> String) -> ([a] -> String -> String) -> Show a
showList :: [PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1]
-> String -> String
$cshowList :: [PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1]
-> String -> String
show :: PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1
-> String
$cshow :: PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1
-> String
showsPrec :: Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1
-> String
-> String
$cshowsPrec :: Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1
-> String
-> String
GHC.Show.Show,
PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1
-> PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1
-> Bool
(PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1
-> PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1
-> Bool)
-> (PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1
-> PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1
-> Bool)
-> Eq PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1
-> PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1
-> Bool
$c/= :: PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1
-> PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1
-> Bool
== :: PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1
-> PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1
-> Bool
$c== :: PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1
-> PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1
-> Bool
GHC.Classes.Eq
)
instance Data.Aeson.Types.ToJSON.ToJSON PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1 where
toJSON :: PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1 -> Value
toJSON PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1
obj = [Pair] -> Value
Data.Aeson.Types.Internal.object (Text
"additional_documentation" Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1AdditionalDocumentation'Variants
-> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1AdditionalDocumentation'Variants
postIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1AdditionalDocumentation PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"explanation" Text -> Maybe Text -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1
-> Maybe Text
postIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1Explanation PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"product_description" Text -> Maybe Text -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1
-> Maybe Text
postIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductDescription PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"product_type" Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType'
-> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType'
postIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: [Pair]
forall a. Monoid a => a
GHC.Base.mempty)
toEncoding :: PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1
-> Encoding
toEncoding PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1
obj = Series -> Encoding
Data.Aeson.Encoding.Internal.pairs ((Text
"additional_documentation" Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1AdditionalDocumentation'Variants
-> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1AdditionalDocumentation'Variants
postIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1AdditionalDocumentation PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> ((Text
"explanation" Text -> Maybe Text -> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1
-> Maybe Text
postIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1Explanation PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> ((Text
"product_description" Text -> Maybe Text -> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1
-> Maybe Text
postIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductDescription PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> (Text
"product_type" Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType'
-> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType'
postIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1
obj))))
instance Data.Aeson.Types.FromJSON.FromJSON PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1 where
parseJSON :: Value
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1
parseJSON = String
-> (Object
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1)
-> Value
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1
forall a. String -> (Object -> Parser a) -> Value -> Parser a
Data.Aeson.Types.FromJSON.withObject String
"PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1" (\Object
obj -> ((((Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1AdditionalDocumentation'Variants
-> Maybe Text
-> Maybe Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType'
-> PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1)
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1AdditionalDocumentation'Variants
-> Maybe Text
-> Maybe Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType'
-> PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1)
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1AdditionalDocumentation'Variants
-> Maybe Text
-> Maybe Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType'
-> PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1
PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1 Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1AdditionalDocumentation'Variants
-> Maybe Text
-> Maybe Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType'
-> PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1)
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1AdditionalDocumentation'Variants)
-> Parser
(Maybe Text
-> Maybe Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType'
-> PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object
-> Text
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1AdditionalDocumentation'Variants)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Data.Aeson.Types.FromJSON..:? Text
"additional_documentation")) Parser
(Maybe Text
-> Maybe Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType'
-> PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1)
-> Parser (Maybe Text)
-> Parser
(Maybe Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType'
-> PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object -> Text -> Parser (Maybe Text)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Data.Aeson.Types.FromJSON..:? Text
"explanation")) Parser
(Maybe Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType'
-> PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1)
-> Parser (Maybe Text)
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType'
-> PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object -> Text -> Parser (Maybe Text)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Data.Aeson.Types.FromJSON..:? Text
"product_description")) Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType'
-> PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1)
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType')
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object
-> Text
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType')
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Data.Aeson.Types.FromJSON..:? Text
"product_type"))
mkPostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1 :: PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1
mkPostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1 :: PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1
mkPostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1 =
PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1 :: Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1AdditionalDocumentation'Variants
-> Maybe Text
-> Maybe Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType'
-> PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1
PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1
{ postIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1AdditionalDocumentation :: Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1AdditionalDocumentation'Variants
postIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1AdditionalDocumentation = Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1AdditionalDocumentation'Variants
forall a. Maybe a
GHC.Maybe.Nothing,
postIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1Explanation :: Maybe Text
postIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1Explanation = Maybe Text
forall a. Maybe a
GHC.Maybe.Nothing,
postIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductDescription :: Maybe Text
postIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductDescription = Maybe Text
forall a. Maybe a
GHC.Maybe.Nothing,
postIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType :: Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType'
postIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType = Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType'
forall a. Maybe a
GHC.Maybe.Nothing
}
data PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1AdditionalDocumentation'Variants
=
PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1AdditionalDocumentation'EmptyString
| PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1AdditionalDocumentation'Text Data.Text.Internal.Text
deriving (Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1AdditionalDocumentation'Variants
-> String
-> String
[PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1AdditionalDocumentation'Variants]
-> String -> String
PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1AdditionalDocumentation'Variants
-> String
(Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1AdditionalDocumentation'Variants
-> String
-> String)
-> (PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1AdditionalDocumentation'Variants
-> String)
-> ([PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1AdditionalDocumentation'Variants]
-> String -> String)
-> Show
PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1AdditionalDocumentation'Variants
forall a.
(Int -> a -> String -> String)
-> (a -> String) -> ([a] -> String -> String) -> Show a
showList :: [PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1AdditionalDocumentation'Variants]
-> String -> String
$cshowList :: [PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1AdditionalDocumentation'Variants]
-> String -> String
show :: PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1AdditionalDocumentation'Variants
-> String
$cshow :: PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1AdditionalDocumentation'Variants
-> String
showsPrec :: Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1AdditionalDocumentation'Variants
-> String
-> String
$cshowsPrec :: Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1AdditionalDocumentation'Variants
-> String
-> String
GHC.Show.Show, PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1AdditionalDocumentation'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1AdditionalDocumentation'Variants
-> Bool
(PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1AdditionalDocumentation'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1AdditionalDocumentation'Variants
-> Bool)
-> (PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1AdditionalDocumentation'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1AdditionalDocumentation'Variants
-> Bool)
-> Eq
PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1AdditionalDocumentation'Variants
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1AdditionalDocumentation'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1AdditionalDocumentation'Variants
-> Bool
$c/= :: PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1AdditionalDocumentation'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1AdditionalDocumentation'Variants
-> Bool
== :: PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1AdditionalDocumentation'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1AdditionalDocumentation'Variants
-> Bool
$c== :: PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1AdditionalDocumentation'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1AdditionalDocumentation'Variants
-> Bool
GHC.Classes.Eq)
instance Data.Aeson.Types.ToJSON.ToJSON PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1AdditionalDocumentation'Variants where
toJSON :: PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1AdditionalDocumentation'Variants
-> Value
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1AdditionalDocumentation'Text Text
a) = Text -> Value
forall a. ToJSON a => a -> Value
Data.Aeson.Types.ToJSON.toJSON Text
a
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1AdditionalDocumentation'Variants
PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1AdditionalDocumentation'EmptyString) = Value
""
instance Data.Aeson.Types.FromJSON.FromJSON PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1AdditionalDocumentation'Variants where
parseJSON :: Value
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1AdditionalDocumentation'Variants
parseJSON Value
val =
if
| Value
val Value -> Value -> Bool
forall a. Eq a => a -> a -> Bool
GHC.Classes.== Value
"" -> PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1AdditionalDocumentation'Variants
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1AdditionalDocumentation'Variants
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1AdditionalDocumentation'Variants
PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1AdditionalDocumentation'EmptyString
| Bool
GHC.Base.otherwise -> case (Text
-> PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1AdditionalDocumentation'Variants
PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1AdditionalDocumentation'Text (Text
-> PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1AdditionalDocumentation'Variants)
-> Result Text
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1AdditionalDocumentation'Variants
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Data.Functor.<$> Value -> Result Text
forall a. FromJSON a => Value -> Result a
Data.Aeson.Types.FromJSON.fromJSON Value
val) Result
PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1AdditionalDocumentation'Variants
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1AdditionalDocumentation'Variants
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1AdditionalDocumentation'Variants
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
GHC.Base.<|> String
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1AdditionalDocumentation'Variants
forall a. String -> Result a
Data.Aeson.Types.Internal.Error String
"No variant matched" of
Data.Aeson.Types.Internal.Success PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1AdditionalDocumentation'Variants
a -> PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1AdditionalDocumentation'Variants
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1AdditionalDocumentation'Variants
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1AdditionalDocumentation'Variants
a
Data.Aeson.Types.Internal.Error String
a -> String
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1AdditionalDocumentation'Variants
forall (m :: * -> *) a. MonadFail m => String -> m a
Control.Monad.Fail.fail String
a
data PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType'
=
PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType'Other Data.Aeson.Types.Internal.Value
|
PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType'Typed Data.Text.Internal.Text
|
PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType'EnumEmptyString
|
PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType'EnumMerchandise
|
PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType'EnumService
deriving (Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType'
-> String
-> String
[PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType']
-> String -> String
PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType'
-> String
(Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType'
-> String
-> String)
-> (PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType'
-> String)
-> ([PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType']
-> String -> String)
-> Show
PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType'
forall a.
(Int -> a -> String -> String)
-> (a -> String) -> ([a] -> String -> String) -> Show a
showList :: [PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType']
-> String -> String
$cshowList :: [PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType']
-> String -> String
show :: PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType'
-> String
$cshow :: PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType'
-> String
showsPrec :: Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType'
-> String
-> String
$cshowsPrec :: Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType'
-> String
-> String
GHC.Show.Show, PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType'
-> PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType'
-> Bool
(PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType'
-> PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType'
-> Bool)
-> (PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType'
-> PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType'
-> Bool)
-> Eq
PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType'
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType'
-> PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType'
-> Bool
$c/= :: PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType'
-> PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType'
-> Bool
== :: PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType'
-> PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType'
-> Bool
$c== :: PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType'
-> PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType'
-> Bool
GHC.Classes.Eq)
instance Data.Aeson.Types.ToJSON.ToJSON PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType' where
toJSON :: PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType'
-> Value
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType'Other Value
val) = Value
val
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType'Typed Text
val) = Text -> Value
forall a. ToJSON a => a -> Value
Data.Aeson.Types.ToJSON.toJSON Text
val
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType'
PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType'EnumEmptyString) = Value
""
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType'
PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType'EnumMerchandise) = Value
"merchandise"
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType'
PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType'EnumService) = Value
"service"
instance Data.Aeson.Types.FromJSON.FromJSON PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType' where
parseJSON :: Value
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType'
parseJSON Value
val =
PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType'
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType'
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure
( if
| Value
val Value -> Value -> Bool
forall a. Eq a => a -> a -> Bool
GHC.Classes.== Value
"" -> PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType'
PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType'EnumEmptyString
| Value
val Value -> Value -> Bool
forall a. Eq a => a -> a -> Bool
GHC.Classes.== Value
"merchandise" -> PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType'
PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType'EnumMerchandise
| Value
val Value -> Value -> Bool
forall a. Eq a => a -> a -> Bool
GHC.Classes.== Value
"service" -> PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType'
PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType'EnumService
| Bool
GHC.Base.otherwise -> Value
-> PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType'
PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType'Other Value
val
)
data PostIssuingDisputesDisputeRequestBodyEvidence'Other'Variants
=
PostIssuingDisputesDisputeRequestBodyEvidence'Other'EmptyString
| PostIssuingDisputesDisputeRequestBodyEvidence'Other'PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1 PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1
deriving (Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Other'Variants
-> String
-> String
[PostIssuingDisputesDisputeRequestBodyEvidence'Other'Variants]
-> String -> String
PostIssuingDisputesDisputeRequestBodyEvidence'Other'Variants
-> String
(Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Other'Variants
-> String
-> String)
-> (PostIssuingDisputesDisputeRequestBodyEvidence'Other'Variants
-> String)
-> ([PostIssuingDisputesDisputeRequestBodyEvidence'Other'Variants]
-> String -> String)
-> Show
PostIssuingDisputesDisputeRequestBodyEvidence'Other'Variants
forall a.
(Int -> a -> String -> String)
-> (a -> String) -> ([a] -> String -> String) -> Show a
showList :: [PostIssuingDisputesDisputeRequestBodyEvidence'Other'Variants]
-> String -> String
$cshowList :: [PostIssuingDisputesDisputeRequestBodyEvidence'Other'Variants]
-> String -> String
show :: PostIssuingDisputesDisputeRequestBodyEvidence'Other'Variants
-> String
$cshow :: PostIssuingDisputesDisputeRequestBodyEvidence'Other'Variants
-> String
showsPrec :: Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Other'Variants
-> String
-> String
$cshowsPrec :: Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Other'Variants
-> String
-> String
GHC.Show.Show, PostIssuingDisputesDisputeRequestBodyEvidence'Other'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Other'Variants
-> Bool
(PostIssuingDisputesDisputeRequestBodyEvidence'Other'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Other'Variants
-> Bool)
-> (PostIssuingDisputesDisputeRequestBodyEvidence'Other'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Other'Variants
-> Bool)
-> Eq PostIssuingDisputesDisputeRequestBodyEvidence'Other'Variants
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: PostIssuingDisputesDisputeRequestBodyEvidence'Other'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Other'Variants
-> Bool
$c/= :: PostIssuingDisputesDisputeRequestBodyEvidence'Other'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Other'Variants
-> Bool
== :: PostIssuingDisputesDisputeRequestBodyEvidence'Other'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Other'Variants
-> Bool
$c== :: PostIssuingDisputesDisputeRequestBodyEvidence'Other'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'Other'Variants
-> Bool
GHC.Classes.Eq)
instance Data.Aeson.Types.ToJSON.ToJSON PostIssuingDisputesDisputeRequestBodyEvidence'Other'Variants where
toJSON :: PostIssuingDisputesDisputeRequestBodyEvidence'Other'Variants
-> Value
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'Other'PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1 PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1
a) = PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1 -> Value
forall a. ToJSON a => a -> Value
Data.Aeson.Types.ToJSON.toJSON PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1
a
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'Other'Variants
PostIssuingDisputesDisputeRequestBodyEvidence'Other'EmptyString) = Value
""
instance Data.Aeson.Types.FromJSON.FromJSON PostIssuingDisputesDisputeRequestBodyEvidence'Other'Variants where
parseJSON :: Value
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'Other'Variants
parseJSON Value
val =
if
| Value
val Value -> Value -> Bool
forall a. Eq a => a -> a -> Bool
GHC.Classes.== Value
"" -> PostIssuingDisputesDisputeRequestBodyEvidence'Other'Variants
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'Other'Variants
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure PostIssuingDisputesDisputeRequestBodyEvidence'Other'Variants
PostIssuingDisputesDisputeRequestBodyEvidence'Other'EmptyString
| Bool
GHC.Base.otherwise -> case (PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1
-> PostIssuingDisputesDisputeRequestBodyEvidence'Other'Variants
PostIssuingDisputesDisputeRequestBodyEvidence'Other'PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1 (PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1
-> PostIssuingDisputesDisputeRequestBodyEvidence'Other'Variants)
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'Other'Variants
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Data.Functor.<$> Value
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1
forall a. FromJSON a => Value -> Result a
Data.Aeson.Types.FromJSON.fromJSON Value
val) Result PostIssuingDisputesDisputeRequestBodyEvidence'Other'Variants
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'Other'Variants
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'Other'Variants
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
GHC.Base.<|> String
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'Other'Variants
forall a. String -> Result a
Data.Aeson.Types.Internal.Error String
"No variant matched" of
Data.Aeson.Types.Internal.Success PostIssuingDisputesDisputeRequestBodyEvidence'Other'Variants
a -> PostIssuingDisputesDisputeRequestBodyEvidence'Other'Variants
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'Other'Variants
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure PostIssuingDisputesDisputeRequestBodyEvidence'Other'Variants
a
Data.Aeson.Types.Internal.Error String
a -> String
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'Other'Variants
forall (m :: * -> *) a. MonadFail m => String -> m a
Control.Monad.Fail.fail String
a
data PostIssuingDisputesDisputeRequestBodyEvidence'Reason'
=
PostIssuingDisputesDisputeRequestBodyEvidence'Reason'Other Data.Aeson.Types.Internal.Value
|
PostIssuingDisputesDisputeRequestBodyEvidence'Reason'Typed Data.Text.Internal.Text
|
PostIssuingDisputesDisputeRequestBodyEvidence'Reason'EnumCanceled
|
PostIssuingDisputesDisputeRequestBodyEvidence'Reason'EnumDuplicate
|
PostIssuingDisputesDisputeRequestBodyEvidence'Reason'EnumFraudulent
|
PostIssuingDisputesDisputeRequestBodyEvidence'Reason'EnumMerchandiseNotAsDescribed
|
PostIssuingDisputesDisputeRequestBodyEvidence'Reason'EnumNotReceived
|
PostIssuingDisputesDisputeRequestBodyEvidence'Reason'EnumOther
|
PostIssuingDisputesDisputeRequestBodyEvidence'Reason'EnumServiceNotAsDescribed
deriving (Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Reason'
-> String
-> String
[PostIssuingDisputesDisputeRequestBodyEvidence'Reason']
-> String -> String
PostIssuingDisputesDisputeRequestBodyEvidence'Reason' -> String
(Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Reason'
-> String
-> String)
-> (PostIssuingDisputesDisputeRequestBodyEvidence'Reason'
-> String)
-> ([PostIssuingDisputesDisputeRequestBodyEvidence'Reason']
-> String -> String)
-> Show PostIssuingDisputesDisputeRequestBodyEvidence'Reason'
forall a.
(Int -> a -> String -> String)
-> (a -> String) -> ([a] -> String -> String) -> Show a
showList :: [PostIssuingDisputesDisputeRequestBodyEvidence'Reason']
-> String -> String
$cshowList :: [PostIssuingDisputesDisputeRequestBodyEvidence'Reason']
-> String -> String
show :: PostIssuingDisputesDisputeRequestBodyEvidence'Reason' -> String
$cshow :: PostIssuingDisputesDisputeRequestBodyEvidence'Reason' -> String
showsPrec :: Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Reason'
-> String
-> String
$cshowsPrec :: Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'Reason'
-> String
-> String
GHC.Show.Show, PostIssuingDisputesDisputeRequestBodyEvidence'Reason'
-> PostIssuingDisputesDisputeRequestBodyEvidence'Reason' -> Bool
(PostIssuingDisputesDisputeRequestBodyEvidence'Reason'
-> PostIssuingDisputesDisputeRequestBodyEvidence'Reason' -> Bool)
-> (PostIssuingDisputesDisputeRequestBodyEvidence'Reason'
-> PostIssuingDisputesDisputeRequestBodyEvidence'Reason' -> Bool)
-> Eq PostIssuingDisputesDisputeRequestBodyEvidence'Reason'
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: PostIssuingDisputesDisputeRequestBodyEvidence'Reason'
-> PostIssuingDisputesDisputeRequestBodyEvidence'Reason' -> Bool
$c/= :: PostIssuingDisputesDisputeRequestBodyEvidence'Reason'
-> PostIssuingDisputesDisputeRequestBodyEvidence'Reason' -> Bool
== :: PostIssuingDisputesDisputeRequestBodyEvidence'Reason'
-> PostIssuingDisputesDisputeRequestBodyEvidence'Reason' -> Bool
$c== :: PostIssuingDisputesDisputeRequestBodyEvidence'Reason'
-> PostIssuingDisputesDisputeRequestBodyEvidence'Reason' -> Bool
GHC.Classes.Eq)
instance Data.Aeson.Types.ToJSON.ToJSON PostIssuingDisputesDisputeRequestBodyEvidence'Reason' where
toJSON :: PostIssuingDisputesDisputeRequestBodyEvidence'Reason' -> Value
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'Reason'Other Value
val) = Value
val
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'Reason'Typed Text
val) = Text -> Value
forall a. ToJSON a => a -> Value
Data.Aeson.Types.ToJSON.toJSON Text
val
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'Reason'
PostIssuingDisputesDisputeRequestBodyEvidence'Reason'EnumCanceled) = Value
"canceled"
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'Reason'
PostIssuingDisputesDisputeRequestBodyEvidence'Reason'EnumDuplicate) = Value
"duplicate"
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'Reason'
PostIssuingDisputesDisputeRequestBodyEvidence'Reason'EnumFraudulent) = Value
"fraudulent"
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'Reason'
PostIssuingDisputesDisputeRequestBodyEvidence'Reason'EnumMerchandiseNotAsDescribed) = Value
"merchandise_not_as_described"
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'Reason'
PostIssuingDisputesDisputeRequestBodyEvidence'Reason'EnumNotReceived) = Value
"not_received"
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'Reason'
PostIssuingDisputesDisputeRequestBodyEvidence'Reason'EnumOther) = Value
"other"
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'Reason'
PostIssuingDisputesDisputeRequestBodyEvidence'Reason'EnumServiceNotAsDescribed) = Value
"service_not_as_described"
instance Data.Aeson.Types.FromJSON.FromJSON PostIssuingDisputesDisputeRequestBodyEvidence'Reason' where
parseJSON :: Value
-> Parser PostIssuingDisputesDisputeRequestBodyEvidence'Reason'
parseJSON Value
val =
PostIssuingDisputesDisputeRequestBodyEvidence'Reason'
-> Parser PostIssuingDisputesDisputeRequestBodyEvidence'Reason'
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure
( if
| Value
val Value -> Value -> Bool
forall a. Eq a => a -> a -> Bool
GHC.Classes.== Value
"canceled" -> PostIssuingDisputesDisputeRequestBodyEvidence'Reason'
PostIssuingDisputesDisputeRequestBodyEvidence'Reason'EnumCanceled
| Value
val Value -> Value -> Bool
forall a. Eq a => a -> a -> Bool
GHC.Classes.== Value
"duplicate" -> PostIssuingDisputesDisputeRequestBodyEvidence'Reason'
PostIssuingDisputesDisputeRequestBodyEvidence'Reason'EnumDuplicate
| Value
val Value -> Value -> Bool
forall a. Eq a => a -> a -> Bool
GHC.Classes.== Value
"fraudulent" -> PostIssuingDisputesDisputeRequestBodyEvidence'Reason'
PostIssuingDisputesDisputeRequestBodyEvidence'Reason'EnumFraudulent
| Value
val Value -> Value -> Bool
forall a. Eq a => a -> a -> Bool
GHC.Classes.== Value
"merchandise_not_as_described" -> PostIssuingDisputesDisputeRequestBodyEvidence'Reason'
PostIssuingDisputesDisputeRequestBodyEvidence'Reason'EnumMerchandiseNotAsDescribed
| Value
val Value -> Value -> Bool
forall a. Eq a => a -> a -> Bool
GHC.Classes.== Value
"not_received" -> PostIssuingDisputesDisputeRequestBodyEvidence'Reason'
PostIssuingDisputesDisputeRequestBodyEvidence'Reason'EnumNotReceived
| Value
val Value -> Value -> Bool
forall a. Eq a => a -> a -> Bool
GHC.Classes.== Value
"other" -> PostIssuingDisputesDisputeRequestBodyEvidence'Reason'
PostIssuingDisputesDisputeRequestBodyEvidence'Reason'EnumOther
| Value
val Value -> Value -> Bool
forall a. Eq a => a -> a -> Bool
GHC.Classes.== Value
"service_not_as_described" -> PostIssuingDisputesDisputeRequestBodyEvidence'Reason'
PostIssuingDisputesDisputeRequestBodyEvidence'Reason'EnumServiceNotAsDescribed
| Bool
GHC.Base.otherwise -> Value -> PostIssuingDisputesDisputeRequestBodyEvidence'Reason'
PostIssuingDisputesDisputeRequestBodyEvidence'Reason'Other Value
val
)
data PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1 = PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1
{
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1AdditionalDocumentation'Variants
postIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1AdditionalDocumentation :: (GHC.Maybe.Maybe PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1AdditionalDocumentation'Variants),
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CanceledAt'Variants
postIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CanceledAt :: (GHC.Maybe.Maybe PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CanceledAt'Variants),
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1
-> Maybe Text
postIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CancellationReason :: (GHC.Maybe.Maybe Data.Text.Internal.Text),
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1
-> Maybe Text
postIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1Explanation :: (GHC.Maybe.Maybe Data.Text.Internal.Text),
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1ReceivedAt'Variants
postIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1ReceivedAt :: (GHC.Maybe.Maybe PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1ReceivedAt'Variants)
}
deriving
( Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1
-> String
-> String
[PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1]
-> String -> String
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1
-> String
(Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1
-> String
-> String)
-> (PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1
-> String)
-> ([PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1]
-> String -> String)
-> Show
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1
forall a.
(Int -> a -> String -> String)
-> (a -> String) -> ([a] -> String -> String) -> Show a
showList :: [PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1]
-> String -> String
$cshowList :: [PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1]
-> String -> String
show :: PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1
-> String
$cshow :: PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1
-> String
showsPrec :: Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1
-> String
-> String
$cshowsPrec :: Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1
-> String
-> String
GHC.Show.Show,
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1
-> PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1
-> Bool
(PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1
-> PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1
-> Bool)
-> (PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1
-> PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1
-> Bool)
-> Eq
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1
-> PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1
-> Bool
$c/= :: PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1
-> PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1
-> Bool
== :: PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1
-> PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1
-> Bool
$c== :: PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1
-> PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1
-> Bool
GHC.Classes.Eq
)
instance Data.Aeson.Types.ToJSON.ToJSON PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1 where
toJSON :: PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1
-> Value
toJSON PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1
obj = [Pair] -> Value
Data.Aeson.Types.Internal.object (Text
"additional_documentation" Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1AdditionalDocumentation'Variants
-> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1AdditionalDocumentation'Variants
postIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1AdditionalDocumentation PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"canceled_at" Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CanceledAt'Variants
-> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CanceledAt'Variants
postIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CanceledAt PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"cancellation_reason" Text -> Maybe Text -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1
-> Maybe Text
postIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CancellationReason PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"explanation" Text -> Maybe Text -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1
-> Maybe Text
postIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1Explanation PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"received_at" Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1ReceivedAt'Variants
-> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1ReceivedAt'Variants
postIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1ReceivedAt PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: [Pair]
forall a. Monoid a => a
GHC.Base.mempty)
toEncoding :: PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1
-> Encoding
toEncoding PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1
obj = Series -> Encoding
Data.Aeson.Encoding.Internal.pairs ((Text
"additional_documentation" Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1AdditionalDocumentation'Variants
-> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1AdditionalDocumentation'Variants
postIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1AdditionalDocumentation PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> ((Text
"canceled_at" Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CanceledAt'Variants
-> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CanceledAt'Variants
postIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CanceledAt PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> ((Text
"cancellation_reason" Text -> Maybe Text -> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1
-> Maybe Text
postIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CancellationReason PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> ((Text
"explanation" Text -> Maybe Text -> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1
-> Maybe Text
postIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1Explanation PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> (Text
"received_at" Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1ReceivedAt'Variants
-> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1ReceivedAt'Variants
postIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1ReceivedAt PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1
obj)))))
instance Data.Aeson.Types.FromJSON.FromJSON PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1 where
parseJSON :: Value
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1
parseJSON = String
-> (Object
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1)
-> Value
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1
forall a. String -> (Object -> Parser a) -> Value -> Parser a
Data.Aeson.Types.FromJSON.withObject String
"PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1" (\Object
obj -> (((((Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1AdditionalDocumentation'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CanceledAt'Variants
-> Maybe Text
-> Maybe Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1ReceivedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1)
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1AdditionalDocumentation'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CanceledAt'Variants
-> Maybe Text
-> Maybe Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1ReceivedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1)
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1AdditionalDocumentation'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CanceledAt'Variants
-> Maybe Text
-> Maybe Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1ReceivedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1 Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1AdditionalDocumentation'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CanceledAt'Variants
-> Maybe Text
-> Maybe Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1ReceivedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1)
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1AdditionalDocumentation'Variants)
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CanceledAt'Variants
-> Maybe Text
-> Maybe Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1ReceivedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object
-> Text
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1AdditionalDocumentation'Variants)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Data.Aeson.Types.FromJSON..:? Text
"additional_documentation")) Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CanceledAt'Variants
-> Maybe Text
-> Maybe Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1ReceivedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1)
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CanceledAt'Variants)
-> Parser
(Maybe Text
-> Maybe Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1ReceivedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object
-> Text
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CanceledAt'Variants)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Data.Aeson.Types.FromJSON..:? Text
"canceled_at")) Parser
(Maybe Text
-> Maybe Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1ReceivedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1)
-> Parser (Maybe Text)
-> Parser
(Maybe Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1ReceivedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object -> Text -> Parser (Maybe Text)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Data.Aeson.Types.FromJSON..:? Text
"cancellation_reason")) Parser
(Maybe Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1ReceivedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1)
-> Parser (Maybe Text)
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1ReceivedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object -> Text -> Parser (Maybe Text)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Data.Aeson.Types.FromJSON..:? Text
"explanation")) Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1ReceivedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1)
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1ReceivedAt'Variants)
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object
-> Text
-> Parser
(Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1ReceivedAt'Variants)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Data.Aeson.Types.FromJSON..:? Text
"received_at"))
mkPostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1 :: PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1
mkPostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1 :: PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1
mkPostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1 =
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1 :: Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1AdditionalDocumentation'Variants
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CanceledAt'Variants
-> Maybe Text
-> Maybe Text
-> Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1ReceivedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1
{ postIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1AdditionalDocumentation :: Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1AdditionalDocumentation'Variants
postIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1AdditionalDocumentation = Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1AdditionalDocumentation'Variants
forall a. Maybe a
GHC.Maybe.Nothing,
postIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CanceledAt :: Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CanceledAt'Variants
postIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CanceledAt = Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CanceledAt'Variants
forall a. Maybe a
GHC.Maybe.Nothing,
postIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CancellationReason :: Maybe Text
postIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CancellationReason = Maybe Text
forall a. Maybe a
GHC.Maybe.Nothing,
postIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1Explanation :: Maybe Text
postIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1Explanation = Maybe Text
forall a. Maybe a
GHC.Maybe.Nothing,
postIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1ReceivedAt :: Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1ReceivedAt'Variants
postIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1ReceivedAt = Maybe
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1ReceivedAt'Variants
forall a. Maybe a
GHC.Maybe.Nothing
}
data PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1AdditionalDocumentation'Variants
=
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1AdditionalDocumentation'EmptyString
| PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1AdditionalDocumentation'Text Data.Text.Internal.Text
deriving (Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1AdditionalDocumentation'Variants
-> String
-> String
[PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1AdditionalDocumentation'Variants]
-> String -> String
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1AdditionalDocumentation'Variants
-> String
(Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1AdditionalDocumentation'Variants
-> String
-> String)
-> (PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1AdditionalDocumentation'Variants
-> String)
-> ([PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1AdditionalDocumentation'Variants]
-> String -> String)
-> Show
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1AdditionalDocumentation'Variants
forall a.
(Int -> a -> String -> String)
-> (a -> String) -> ([a] -> String -> String) -> Show a
showList :: [PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1AdditionalDocumentation'Variants]
-> String -> String
$cshowList :: [PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1AdditionalDocumentation'Variants]
-> String -> String
show :: PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1AdditionalDocumentation'Variants
-> String
$cshow :: PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1AdditionalDocumentation'Variants
-> String
showsPrec :: Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1AdditionalDocumentation'Variants
-> String
-> String
$cshowsPrec :: Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1AdditionalDocumentation'Variants
-> String
-> String
GHC.Show.Show, PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1AdditionalDocumentation'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1AdditionalDocumentation'Variants
-> Bool
(PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1AdditionalDocumentation'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1AdditionalDocumentation'Variants
-> Bool)
-> (PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1AdditionalDocumentation'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1AdditionalDocumentation'Variants
-> Bool)
-> Eq
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1AdditionalDocumentation'Variants
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1AdditionalDocumentation'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1AdditionalDocumentation'Variants
-> Bool
$c/= :: PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1AdditionalDocumentation'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1AdditionalDocumentation'Variants
-> Bool
== :: PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1AdditionalDocumentation'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1AdditionalDocumentation'Variants
-> Bool
$c== :: PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1AdditionalDocumentation'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1AdditionalDocumentation'Variants
-> Bool
GHC.Classes.Eq)
instance Data.Aeson.Types.ToJSON.ToJSON PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1AdditionalDocumentation'Variants where
toJSON :: PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1AdditionalDocumentation'Variants
-> Value
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1AdditionalDocumentation'Text Text
a) = Text -> Value
forall a. ToJSON a => a -> Value
Data.Aeson.Types.ToJSON.toJSON Text
a
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1AdditionalDocumentation'Variants
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1AdditionalDocumentation'EmptyString) = Value
""
instance Data.Aeson.Types.FromJSON.FromJSON PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1AdditionalDocumentation'Variants where
parseJSON :: Value
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1AdditionalDocumentation'Variants
parseJSON Value
val =
if
| Value
val Value -> Value -> Bool
forall a. Eq a => a -> a -> Bool
GHC.Classes.== Value
"" -> PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1AdditionalDocumentation'Variants
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1AdditionalDocumentation'Variants
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1AdditionalDocumentation'Variants
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1AdditionalDocumentation'EmptyString
| Bool
GHC.Base.otherwise -> case (Text
-> PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1AdditionalDocumentation'Variants
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1AdditionalDocumentation'Text (Text
-> PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1AdditionalDocumentation'Variants)
-> Result Text
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1AdditionalDocumentation'Variants
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Data.Functor.<$> Value -> Result Text
forall a. FromJSON a => Value -> Result a
Data.Aeson.Types.FromJSON.fromJSON Value
val) Result
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1AdditionalDocumentation'Variants
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1AdditionalDocumentation'Variants
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1AdditionalDocumentation'Variants
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
GHC.Base.<|> String
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1AdditionalDocumentation'Variants
forall a. String -> Result a
Data.Aeson.Types.Internal.Error String
"No variant matched" of
Data.Aeson.Types.Internal.Success PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1AdditionalDocumentation'Variants
a -> PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1AdditionalDocumentation'Variants
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1AdditionalDocumentation'Variants
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1AdditionalDocumentation'Variants
a
Data.Aeson.Types.Internal.Error String
a -> String
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1AdditionalDocumentation'Variants
forall (m :: * -> *) a. MonadFail m => String -> m a
Control.Monad.Fail.fail String
a
data PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CanceledAt'Variants
=
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CanceledAt'EmptyString
| PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CanceledAt'Int GHC.Types.Int
deriving (Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CanceledAt'Variants
-> String
-> String
[PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CanceledAt'Variants]
-> String -> String
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CanceledAt'Variants
-> String
(Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CanceledAt'Variants
-> String
-> String)
-> (PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CanceledAt'Variants
-> String)
-> ([PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CanceledAt'Variants]
-> String -> String)
-> Show
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CanceledAt'Variants
forall a.
(Int -> a -> String -> String)
-> (a -> String) -> ([a] -> String -> String) -> Show a
showList :: [PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CanceledAt'Variants]
-> String -> String
$cshowList :: [PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CanceledAt'Variants]
-> String -> String
show :: PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CanceledAt'Variants
-> String
$cshow :: PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CanceledAt'Variants
-> String
showsPrec :: Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CanceledAt'Variants
-> String
-> String
$cshowsPrec :: Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CanceledAt'Variants
-> String
-> String
GHC.Show.Show, PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CanceledAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CanceledAt'Variants
-> Bool
(PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CanceledAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CanceledAt'Variants
-> Bool)
-> (PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CanceledAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CanceledAt'Variants
-> Bool)
-> Eq
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CanceledAt'Variants
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CanceledAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CanceledAt'Variants
-> Bool
$c/= :: PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CanceledAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CanceledAt'Variants
-> Bool
== :: PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CanceledAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CanceledAt'Variants
-> Bool
$c== :: PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CanceledAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CanceledAt'Variants
-> Bool
GHC.Classes.Eq)
instance Data.Aeson.Types.ToJSON.ToJSON PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CanceledAt'Variants where
toJSON :: PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CanceledAt'Variants
-> Value
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CanceledAt'Int Int
a) = Int -> Value
forall a. ToJSON a => a -> Value
Data.Aeson.Types.ToJSON.toJSON Int
a
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CanceledAt'Variants
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CanceledAt'EmptyString) = Value
""
instance Data.Aeson.Types.FromJSON.FromJSON PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CanceledAt'Variants where
parseJSON :: Value
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CanceledAt'Variants
parseJSON Value
val =
if
| Value
val Value -> Value -> Bool
forall a. Eq a => a -> a -> Bool
GHC.Classes.== Value
"" -> PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CanceledAt'Variants
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CanceledAt'Variants
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CanceledAt'Variants
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CanceledAt'EmptyString
| Bool
GHC.Base.otherwise -> case (Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CanceledAt'Variants
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CanceledAt'Int (Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CanceledAt'Variants)
-> Result Int
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CanceledAt'Variants
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Data.Functor.<$> Value -> Result Int
forall a. FromJSON a => Value -> Result a
Data.Aeson.Types.FromJSON.fromJSON Value
val) Result
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CanceledAt'Variants
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CanceledAt'Variants
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CanceledAt'Variants
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
GHC.Base.<|> String
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CanceledAt'Variants
forall a. String -> Result a
Data.Aeson.Types.Internal.Error String
"No variant matched" of
Data.Aeson.Types.Internal.Success PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CanceledAt'Variants
a -> PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CanceledAt'Variants
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CanceledAt'Variants
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CanceledAt'Variants
a
Data.Aeson.Types.Internal.Error String
a -> String
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CanceledAt'Variants
forall (m :: * -> *) a. MonadFail m => String -> m a
Control.Monad.Fail.fail String
a
data PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1ReceivedAt'Variants
=
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1ReceivedAt'EmptyString
| PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1ReceivedAt'Int GHC.Types.Int
deriving (Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1ReceivedAt'Variants
-> String
-> String
[PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1ReceivedAt'Variants]
-> String -> String
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1ReceivedAt'Variants
-> String
(Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1ReceivedAt'Variants
-> String
-> String)
-> (PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1ReceivedAt'Variants
-> String)
-> ([PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1ReceivedAt'Variants]
-> String -> String)
-> Show
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1ReceivedAt'Variants
forall a.
(Int -> a -> String -> String)
-> (a -> String) -> ([a] -> String -> String) -> Show a
showList :: [PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1ReceivedAt'Variants]
-> String -> String
$cshowList :: [PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1ReceivedAt'Variants]
-> String -> String
show :: PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1ReceivedAt'Variants
-> String
$cshow :: PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1ReceivedAt'Variants
-> String
showsPrec :: Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1ReceivedAt'Variants
-> String
-> String
$cshowsPrec :: Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1ReceivedAt'Variants
-> String
-> String
GHC.Show.Show, PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1ReceivedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1ReceivedAt'Variants
-> Bool
(PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1ReceivedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1ReceivedAt'Variants
-> Bool)
-> (PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1ReceivedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1ReceivedAt'Variants
-> Bool)
-> Eq
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1ReceivedAt'Variants
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1ReceivedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1ReceivedAt'Variants
-> Bool
$c/= :: PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1ReceivedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1ReceivedAt'Variants
-> Bool
== :: PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1ReceivedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1ReceivedAt'Variants
-> Bool
$c== :: PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1ReceivedAt'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1ReceivedAt'Variants
-> Bool
GHC.Classes.Eq)
instance Data.Aeson.Types.ToJSON.ToJSON PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1ReceivedAt'Variants where
toJSON :: PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1ReceivedAt'Variants
-> Value
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1ReceivedAt'Int Int
a) = Int -> Value
forall a. ToJSON a => a -> Value
Data.Aeson.Types.ToJSON.toJSON Int
a
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1ReceivedAt'Variants
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1ReceivedAt'EmptyString) = Value
""
instance Data.Aeson.Types.FromJSON.FromJSON PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1ReceivedAt'Variants where
parseJSON :: Value
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1ReceivedAt'Variants
parseJSON Value
val =
if
| Value
val Value -> Value -> Bool
forall a. Eq a => a -> a -> Bool
GHC.Classes.== Value
"" -> PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1ReceivedAt'Variants
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1ReceivedAt'Variants
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1ReceivedAt'Variants
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1ReceivedAt'EmptyString
| Bool
GHC.Base.otherwise -> case (Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1ReceivedAt'Variants
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1ReceivedAt'Int (Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1ReceivedAt'Variants)
-> Result Int
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1ReceivedAt'Variants
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Data.Functor.<$> Value -> Result Int
forall a. FromJSON a => Value -> Result a
Data.Aeson.Types.FromJSON.fromJSON Value
val) Result
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1ReceivedAt'Variants
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1ReceivedAt'Variants
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1ReceivedAt'Variants
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
GHC.Base.<|> String
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1ReceivedAt'Variants
forall a. String -> Result a
Data.Aeson.Types.Internal.Error String
"No variant matched" of
Data.Aeson.Types.Internal.Success PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1ReceivedAt'Variants
a -> PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1ReceivedAt'Variants
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1ReceivedAt'Variants
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1ReceivedAt'Variants
a
Data.Aeson.Types.Internal.Error String
a -> String
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1ReceivedAt'Variants
forall (m :: * -> *) a. MonadFail m => String -> m a
Control.Monad.Fail.fail String
a
data PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'Variants
=
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'EmptyString
| PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1 PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1
deriving (Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'Variants
-> String
-> String
[PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'Variants]
-> String -> String
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'Variants
-> String
(Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'Variants
-> String
-> String)
-> (PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'Variants
-> String)
-> ([PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'Variants]
-> String -> String)
-> Show
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'Variants
forall a.
(Int -> a -> String -> String)
-> (a -> String) -> ([a] -> String -> String) -> Show a
showList :: [PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'Variants]
-> String -> String
$cshowList :: [PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'Variants]
-> String -> String
show :: PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'Variants
-> String
$cshow :: PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'Variants
-> String
showsPrec :: Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'Variants
-> String
-> String
$cshowsPrec :: Int
-> PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'Variants
-> String
-> String
GHC.Show.Show, PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'Variants
-> Bool
(PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'Variants
-> Bool)
-> (PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'Variants
-> Bool)
-> Eq
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'Variants
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'Variants
-> Bool
$c/= :: PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'Variants
-> Bool
== :: PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'Variants
-> Bool
$c== :: PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'Variants
-> PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'Variants
-> Bool
GHC.Classes.Eq)
instance Data.Aeson.Types.ToJSON.ToJSON PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'Variants where
toJSON :: PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'Variants
-> Value
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1 PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1
a) = PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1
-> Value
forall a. ToJSON a => a -> Value
Data.Aeson.Types.ToJSON.toJSON PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1
a
toJSON (PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'Variants
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'EmptyString) = Value
""
instance Data.Aeson.Types.FromJSON.FromJSON PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'Variants where
parseJSON :: Value
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'Variants
parseJSON Value
val =
if
| Value
val Value -> Value -> Bool
forall a. Eq a => a -> a -> Bool
GHC.Classes.== Value
"" -> PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'Variants
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'Variants
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'Variants
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'EmptyString
| Bool
GHC.Base.otherwise -> case (PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1
-> PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'Variants
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1 (PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1
-> PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'Variants)
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'Variants
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Data.Functor.<$> Value
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1
forall a. FromJSON a => Value -> Result a
Data.Aeson.Types.FromJSON.fromJSON Value
val) Result
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'Variants
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'Variants
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'Variants
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
GHC.Base.<|> String
-> Result
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'Variants
forall a. String -> Result a
Data.Aeson.Types.Internal.Error String
"No variant matched" of
Data.Aeson.Types.Internal.Success PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'Variants
a -> PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'Variants
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'Variants
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'Variants
a
Data.Aeson.Types.Internal.Error String
a -> String
-> Parser
PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'Variants
forall (m :: * -> *) a. MonadFail m => String -> m a
Control.Monad.Fail.fail String
a
data PostIssuingDisputesDisputeRequestBodyMetadata'Variants
=
PostIssuingDisputesDisputeRequestBodyMetadata'EmptyString
| PostIssuingDisputesDisputeRequestBodyMetadata'Object Data.Aeson.Types.Internal.Object
deriving (Int
-> PostIssuingDisputesDisputeRequestBodyMetadata'Variants
-> String
-> String
[PostIssuingDisputesDisputeRequestBodyMetadata'Variants]
-> String -> String
PostIssuingDisputesDisputeRequestBodyMetadata'Variants -> String
(Int
-> PostIssuingDisputesDisputeRequestBodyMetadata'Variants
-> String
-> String)
-> (PostIssuingDisputesDisputeRequestBodyMetadata'Variants
-> String)
-> ([PostIssuingDisputesDisputeRequestBodyMetadata'Variants]
-> String -> String)
-> Show PostIssuingDisputesDisputeRequestBodyMetadata'Variants
forall a.
(Int -> a -> String -> String)
-> (a -> String) -> ([a] -> String -> String) -> Show a
showList :: [PostIssuingDisputesDisputeRequestBodyMetadata'Variants]
-> String -> String
$cshowList :: [PostIssuingDisputesDisputeRequestBodyMetadata'Variants]
-> String -> String
show :: PostIssuingDisputesDisputeRequestBodyMetadata'Variants -> String
$cshow :: PostIssuingDisputesDisputeRequestBodyMetadata'Variants -> String
showsPrec :: Int
-> PostIssuingDisputesDisputeRequestBodyMetadata'Variants
-> String
-> String
$cshowsPrec :: Int
-> PostIssuingDisputesDisputeRequestBodyMetadata'Variants
-> String
-> String
GHC.Show.Show, PostIssuingDisputesDisputeRequestBodyMetadata'Variants
-> PostIssuingDisputesDisputeRequestBodyMetadata'Variants -> Bool
(PostIssuingDisputesDisputeRequestBodyMetadata'Variants
-> PostIssuingDisputesDisputeRequestBodyMetadata'Variants -> Bool)
-> (PostIssuingDisputesDisputeRequestBodyMetadata'Variants
-> PostIssuingDisputesDisputeRequestBodyMetadata'Variants -> Bool)
-> Eq PostIssuingDisputesDisputeRequestBodyMetadata'Variants
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: PostIssuingDisputesDisputeRequestBodyMetadata'Variants
-> PostIssuingDisputesDisputeRequestBodyMetadata'Variants -> Bool
$c/= :: PostIssuingDisputesDisputeRequestBodyMetadata'Variants
-> PostIssuingDisputesDisputeRequestBodyMetadata'Variants -> Bool
== :: PostIssuingDisputesDisputeRequestBodyMetadata'Variants
-> PostIssuingDisputesDisputeRequestBodyMetadata'Variants -> Bool
$c== :: PostIssuingDisputesDisputeRequestBodyMetadata'Variants
-> PostIssuingDisputesDisputeRequestBodyMetadata'Variants -> Bool
GHC.Classes.Eq)
instance Data.Aeson.Types.ToJSON.ToJSON PostIssuingDisputesDisputeRequestBodyMetadata'Variants where
toJSON :: PostIssuingDisputesDisputeRequestBodyMetadata'Variants -> Value
toJSON (PostIssuingDisputesDisputeRequestBodyMetadata'Object Object
a) = Object -> Value
forall a. ToJSON a => a -> Value
Data.Aeson.Types.ToJSON.toJSON Object
a
toJSON (PostIssuingDisputesDisputeRequestBodyMetadata'Variants
PostIssuingDisputesDisputeRequestBodyMetadata'EmptyString) = Value
""
instance Data.Aeson.Types.FromJSON.FromJSON PostIssuingDisputesDisputeRequestBodyMetadata'Variants where
parseJSON :: Value
-> Parser PostIssuingDisputesDisputeRequestBodyMetadata'Variants
parseJSON Value
val =
if
| Value
val Value -> Value -> Bool
forall a. Eq a => a -> a -> Bool
GHC.Classes.== Value
"" -> PostIssuingDisputesDisputeRequestBodyMetadata'Variants
-> Parser PostIssuingDisputesDisputeRequestBodyMetadata'Variants
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure PostIssuingDisputesDisputeRequestBodyMetadata'Variants
PostIssuingDisputesDisputeRequestBodyMetadata'EmptyString
| Bool
GHC.Base.otherwise -> case (Object -> PostIssuingDisputesDisputeRequestBodyMetadata'Variants
PostIssuingDisputesDisputeRequestBodyMetadata'Object (Object -> PostIssuingDisputesDisputeRequestBodyMetadata'Variants)
-> Result Object
-> Result PostIssuingDisputesDisputeRequestBodyMetadata'Variants
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Data.Functor.<$> Value -> Result Object
forall a. FromJSON a => Value -> Result a
Data.Aeson.Types.FromJSON.fromJSON Value
val) Result PostIssuingDisputesDisputeRequestBodyMetadata'Variants
-> Result PostIssuingDisputesDisputeRequestBodyMetadata'Variants
-> Result PostIssuingDisputesDisputeRequestBodyMetadata'Variants
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
GHC.Base.<|> String
-> Result PostIssuingDisputesDisputeRequestBodyMetadata'Variants
forall a. String -> Result a
Data.Aeson.Types.Internal.Error String
"No variant matched" of
Data.Aeson.Types.Internal.Success PostIssuingDisputesDisputeRequestBodyMetadata'Variants
a -> PostIssuingDisputesDisputeRequestBodyMetadata'Variants
-> Parser PostIssuingDisputesDisputeRequestBodyMetadata'Variants
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure PostIssuingDisputesDisputeRequestBodyMetadata'Variants
a
Data.Aeson.Types.Internal.Error String
a -> String
-> Parser PostIssuingDisputesDisputeRequestBodyMetadata'Variants
forall (m :: * -> *) a. MonadFail m => String -> m a
Control.Monad.Fail.fail String
a
data PostIssuingDisputesDisputeResponse
=
PostIssuingDisputesDisputeResponseError GHC.Base.String
|
PostIssuingDisputesDisputeResponse200 Issuing'dispute
|
PostIssuingDisputesDisputeResponseDefault Error
deriving (Int -> PostIssuingDisputesDisputeResponse -> String -> String
[PostIssuingDisputesDisputeResponse] -> String -> String
PostIssuingDisputesDisputeResponse -> String
(Int -> PostIssuingDisputesDisputeResponse -> String -> String)
-> (PostIssuingDisputesDisputeResponse -> String)
-> ([PostIssuingDisputesDisputeResponse] -> String -> String)
-> Show PostIssuingDisputesDisputeResponse
forall a.
(Int -> a -> String -> String)
-> (a -> String) -> ([a] -> String -> String) -> Show a
showList :: [PostIssuingDisputesDisputeResponse] -> String -> String
$cshowList :: [PostIssuingDisputesDisputeResponse] -> String -> String
show :: PostIssuingDisputesDisputeResponse -> String
$cshow :: PostIssuingDisputesDisputeResponse -> String
showsPrec :: Int -> PostIssuingDisputesDisputeResponse -> String -> String
$cshowsPrec :: Int -> PostIssuingDisputesDisputeResponse -> String -> String
GHC.Show.Show, PostIssuingDisputesDisputeResponse
-> PostIssuingDisputesDisputeResponse -> Bool
(PostIssuingDisputesDisputeResponse
-> PostIssuingDisputesDisputeResponse -> Bool)
-> (PostIssuingDisputesDisputeResponse
-> PostIssuingDisputesDisputeResponse -> Bool)
-> Eq PostIssuingDisputesDisputeResponse
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: PostIssuingDisputesDisputeResponse
-> PostIssuingDisputesDisputeResponse -> Bool
$c/= :: PostIssuingDisputesDisputeResponse
-> PostIssuingDisputesDisputeResponse -> Bool
== :: PostIssuingDisputesDisputeResponse
-> PostIssuingDisputesDisputeResponse -> Bool
$c== :: PostIssuingDisputesDisputeResponse
-> PostIssuingDisputesDisputeResponse -> Bool
GHC.Classes.Eq)