{-# LANGUAGE ExplicitForAll #-}
{-# LANGUAGE MultiWayIf #-}
-- CHANGE WITH CAUTION: This is a generated code file generated by https://github.com/Haskell-OpenAPI-Code-Generator/Haskell-OpenAPI-Client-Code-Generator.
{-# LANGUAGE OverloadedStrings #-}

-- | Contains the different functions to run the operation postIssuingDisputesDispute
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

-- | > POST /v1/issuing/disputes/{dispute}
--
-- \<p>Updates the specified Issuing \<code>Dispute\<\/code> object by setting the values of the parameters passed. Any parameters not provided will be left unchanged. Properties on the \<code>evidence\<\/code> object can be unset by passing in an empty string.\<\/p>
postIssuingDisputesDispute ::
  forall m.
  StripeAPI.Common.MonadHTTP m =>
  -- | dispute | Constraints: Maximum length of 5000
  Data.Text.Internal.Text ->
  -- | The request body to send
  GHC.Maybe.Maybe PostIssuingDisputesDisputeRequestBody ->
  -- | Monadic computation which returns the result of the operation
  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)

-- | Defines the object schema located at @paths.\/v1\/issuing\/disputes\/{dispute}.POST.requestBody.content.application\/x-www-form-urlencoded.schema@ in the specification.
data PostIssuingDisputesDisputeRequestBody = PostIssuingDisputesDisputeRequestBody
  { -- | evidence: Evidence provided for the dispute.
    PostIssuingDisputesDisputeRequestBody
-> Maybe PostIssuingDisputesDisputeRequestBodyEvidence'
postIssuingDisputesDisputeRequestBodyEvidence :: (GHC.Maybe.Maybe PostIssuingDisputesDisputeRequestBodyEvidence'),
    -- | expand: Specifies which fields in the response should be expanded.
    PostIssuingDisputesDisputeRequestBody -> Maybe [Text]
postIssuingDisputesDisputeRequestBodyExpand :: (GHC.Maybe.Maybe ([Data.Text.Internal.Text])),
    -- | metadata: Set of [key-value pairs](https:\/\/stripe.com\/docs\/api\/metadata) that you can attach to an object. This can be useful for storing additional information about the object in a structured format. Individual keys can be unset by posting an empty value to them. All keys can be unset by posting an empty value to \`metadata\`.
    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"))

-- | Create a new 'PostIssuingDisputesDisputeRequestBody' with all required fields.
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
    }

-- | Defines the object schema located at @paths.\/v1\/issuing\/disputes\/{dispute}.POST.requestBody.content.application\/x-www-form-urlencoded.schema.properties.evidence@ in the specification.
--
-- Evidence provided for the dispute.
data PostIssuingDisputesDisputeRequestBodyEvidence' = PostIssuingDisputesDisputeRequestBodyEvidence'
  { -- | canceled
    PostIssuingDisputesDisputeRequestBodyEvidence'
-> Maybe
     PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'Variants
postIssuingDisputesDisputeRequestBodyEvidence'Canceled :: (GHC.Maybe.Maybe PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'Variants),
    -- | duplicate
    PostIssuingDisputesDisputeRequestBodyEvidence'
-> Maybe
     PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'Variants
postIssuingDisputesDisputeRequestBodyEvidence'Duplicate :: (GHC.Maybe.Maybe PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'Variants),
    -- | fraudulent
    PostIssuingDisputesDisputeRequestBodyEvidence'
-> Maybe
     PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'Variants
postIssuingDisputesDisputeRequestBodyEvidence'Fraudulent :: (GHC.Maybe.Maybe PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'Variants),
    -- | merchandise_not_as_described
    PostIssuingDisputesDisputeRequestBodyEvidence'
-> Maybe
     PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'Variants
postIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed :: (GHC.Maybe.Maybe PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'Variants),
    -- | not_received
    PostIssuingDisputesDisputeRequestBodyEvidence'
-> Maybe
     PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'Variants
postIssuingDisputesDisputeRequestBodyEvidence'NotReceived :: (GHC.Maybe.Maybe PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'Variants),
    -- | other
    PostIssuingDisputesDisputeRequestBodyEvidence'
-> Maybe
     PostIssuingDisputesDisputeRequestBodyEvidence'Other'Variants
postIssuingDisputesDisputeRequestBodyEvidence'Other :: (GHC.Maybe.Maybe PostIssuingDisputesDisputeRequestBodyEvidence'Other'Variants),
    -- | reason
    PostIssuingDisputesDisputeRequestBodyEvidence'
-> Maybe PostIssuingDisputesDisputeRequestBodyEvidence'Reason'
postIssuingDisputesDisputeRequestBodyEvidence'Reason :: (GHC.Maybe.Maybe PostIssuingDisputesDisputeRequestBodyEvidence'Reason'),
    -- | service_not_as_described
    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"))

-- | Create a new 'PostIssuingDisputesDisputeRequestBodyEvidence'' with all required fields.
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
    }

-- | Defines the object schema located at @paths.\/v1\/issuing\/disputes\/{dispute}.POST.requestBody.content.application\/x-www-form-urlencoded.schema.properties.evidence.properties.canceled.anyOf@ in the specification.
data PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1 = PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
  { -- | additional_documentation
    PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
-> Maybe
     PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1AdditionalDocumentation'Variants
postIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1AdditionalDocumentation :: (GHC.Maybe.Maybe PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1AdditionalDocumentation'Variants),
    -- | canceled_at
    PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
-> Maybe
     PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CanceledAt'Variants
postIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CanceledAt :: (GHC.Maybe.Maybe PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CanceledAt'Variants),
    -- | cancellation_policy_provided
    PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
-> Maybe
     PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationPolicyProvided'Variants
postIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationPolicyProvided :: (GHC.Maybe.Maybe PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationPolicyProvided'Variants),
    -- | cancellation_reason
    --
    -- Constraints:
    --
    -- * Maximum length of 1500
    PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
-> Maybe Text
postIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationReason :: (GHC.Maybe.Maybe Data.Text.Internal.Text),
    -- | expected_at
    PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
-> Maybe
     PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt'Variants
postIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt :: (GHC.Maybe.Maybe PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt'Variants),
    -- | explanation
    --
    -- Constraints:
    --
    -- * Maximum length of 1500
    PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
-> Maybe Text
postIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1Explanation :: (GHC.Maybe.Maybe Data.Text.Internal.Text),
    -- | product_description
    --
    -- Constraints:
    --
    -- * Maximum length of 1500
    PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
-> Maybe Text
postIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductDescription :: (GHC.Maybe.Maybe Data.Text.Internal.Text),
    -- | product_type
    PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
-> Maybe
     PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType'
postIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType :: (GHC.Maybe.Maybe PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType'),
    -- | return_status
    PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1
-> Maybe
     PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'
postIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus :: (GHC.Maybe.Maybe PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'),
    -- | returned_at
    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"))

-- | Create a new 'PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1' with all required fields.
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
    }

-- | Defines the oneOf schema located at @paths.\/v1\/issuing\/disputes\/{dispute}.POST.requestBody.content.application\/x-www-form-urlencoded.schema.properties.evidence.properties.canceled.anyOf.properties.additional_documentation.anyOf@ in the specification.
data PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1AdditionalDocumentation'Variants
  = -- | Represents the JSON value @""@
    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

-- | Defines the oneOf schema located at @paths.\/v1\/issuing\/disputes\/{dispute}.POST.requestBody.content.application\/x-www-form-urlencoded.schema.properties.evidence.properties.canceled.anyOf.properties.canceled_at.anyOf@ in the specification.
data PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CanceledAt'Variants
  = -- | Represents the JSON value @""@
    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

-- | Defines the oneOf schema located at @paths.\/v1\/issuing\/disputes\/{dispute}.POST.requestBody.content.application\/x-www-form-urlencoded.schema.properties.evidence.properties.canceled.anyOf.properties.cancellation_policy_provided.anyOf@ in the specification.
data PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1CancellationPolicyProvided'Variants
  = -- | Represents the JSON value @""@
    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

-- | Defines the oneOf schema located at @paths.\/v1\/issuing\/disputes\/{dispute}.POST.requestBody.content.application\/x-www-form-urlencoded.schema.properties.evidence.properties.canceled.anyOf.properties.expected_at.anyOf@ in the specification.
data PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ExpectedAt'Variants
  = -- | Represents the JSON value @""@
    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

-- | Defines the enum schema located at @paths.\/v1\/issuing\/disputes\/{dispute}.POST.requestBody.content.application\/x-www-form-urlencoded.schema.properties.evidence.properties.canceled.anyOf.properties.product_type@ in the specification.
data PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType'
  = -- | This case is used if the value encountered during decoding does not match any of the provided cases in the specification.
    PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType'Other Data.Aeson.Types.Internal.Value
  | -- | This constructor can be used to send values to the server which are not present in the specification yet.
    PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType'Typed Data.Text.Internal.Text
  | -- | Represents the JSON value @""@
    PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType'EnumEmptyString
  | -- | Represents the JSON value @"merchandise"@
    PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ProductType'EnumMerchandise
  | -- | Represents the JSON value @"service"@
    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
      )

-- | Defines the enum schema located at @paths.\/v1\/issuing\/disputes\/{dispute}.POST.requestBody.content.application\/x-www-form-urlencoded.schema.properties.evidence.properties.canceled.anyOf.properties.return_status@ in the specification.
data PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'
  = -- | This case is used if the value encountered during decoding does not match any of the provided cases in the specification.
    PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'Other Data.Aeson.Types.Internal.Value
  | -- | This constructor can be used to send values to the server which are not present in the specification yet.
    PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'Typed Data.Text.Internal.Text
  | -- | Represents the JSON value @""@
    PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'EnumEmptyString
  | -- | Represents the JSON value @"merchant_rejected"@
    PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnStatus'EnumMerchantRejected
  | -- | Represents the JSON value @"successful"@
    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
      )

-- | Defines the oneOf schema located at @paths.\/v1\/issuing\/disputes\/{dispute}.POST.requestBody.content.application\/x-www-form-urlencoded.schema.properties.evidence.properties.canceled.anyOf.properties.returned_at.anyOf@ in the specification.
data PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'OneOf1ReturnedAt'Variants
  = -- | Represents the JSON value @""@
    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

-- | Defines the oneOf schema located at @paths.\/v1\/issuing\/disputes\/{dispute}.POST.requestBody.content.application\/x-www-form-urlencoded.schema.properties.evidence.properties.canceled.anyOf@ in the specification.
data PostIssuingDisputesDisputeRequestBodyEvidence'Canceled'Variants
  = -- | Represents the JSON value @""@
    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

-- | Defines the object schema located at @paths.\/v1\/issuing\/disputes\/{dispute}.POST.requestBody.content.application\/x-www-form-urlencoded.schema.properties.evidence.properties.duplicate.anyOf@ in the specification.
data PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1 = PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1
  { -- | additional_documentation
    PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1
-> Maybe
     PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1AdditionalDocumentation'Variants
postIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1AdditionalDocumentation :: (GHC.Maybe.Maybe PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1AdditionalDocumentation'Variants),
    -- | card_statement
    PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1
-> Maybe
     PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CardStatement'Variants
postIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CardStatement :: (GHC.Maybe.Maybe PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CardStatement'Variants),
    -- | cash_receipt
    PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1
-> Maybe
     PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CashReceipt'Variants
postIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CashReceipt :: (GHC.Maybe.Maybe PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CashReceipt'Variants),
    -- | check_image
    PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1
-> Maybe
     PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage'Variants
postIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage :: (GHC.Maybe.Maybe PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage'Variants),
    -- | explanation
    --
    -- Constraints:
    --
    -- * Maximum length of 1500
    PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1
-> Maybe Text
postIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1Explanation :: (GHC.Maybe.Maybe Data.Text.Internal.Text),
    -- | original_transaction
    --
    -- Constraints:
    --
    -- * Maximum length of 5000
    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"))

-- | Create a new 'PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1' with all required fields.
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
    }

-- | Defines the oneOf schema located at @paths.\/v1\/issuing\/disputes\/{dispute}.POST.requestBody.content.application\/x-www-form-urlencoded.schema.properties.evidence.properties.duplicate.anyOf.properties.additional_documentation.anyOf@ in the specification.
data PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1AdditionalDocumentation'Variants
  = -- | Represents the JSON value @""@
    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

-- | Defines the oneOf schema located at @paths.\/v1\/issuing\/disputes\/{dispute}.POST.requestBody.content.application\/x-www-form-urlencoded.schema.properties.evidence.properties.duplicate.anyOf.properties.card_statement.anyOf@ in the specification.
data PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CardStatement'Variants
  = -- | Represents the JSON value @""@
    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

-- | Defines the oneOf schema located at @paths.\/v1\/issuing\/disputes\/{dispute}.POST.requestBody.content.application\/x-www-form-urlencoded.schema.properties.evidence.properties.duplicate.anyOf.properties.cash_receipt.anyOf@ in the specification.
data PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CashReceipt'Variants
  = -- | Represents the JSON value @""@
    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

-- | Defines the oneOf schema located at @paths.\/v1\/issuing\/disputes\/{dispute}.POST.requestBody.content.application\/x-www-form-urlencoded.schema.properties.evidence.properties.duplicate.anyOf.properties.check_image.anyOf@ in the specification.
data PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'OneOf1CheckImage'Variants
  = -- | Represents the JSON value @""@
    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

-- | Defines the oneOf schema located at @paths.\/v1\/issuing\/disputes\/{dispute}.POST.requestBody.content.application\/x-www-form-urlencoded.schema.properties.evidence.properties.duplicate.anyOf@ in the specification.
data PostIssuingDisputesDisputeRequestBodyEvidence'Duplicate'Variants
  = -- | Represents the JSON value @""@
    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

-- | Defines the object schema located at @paths.\/v1\/issuing\/disputes\/{dispute}.POST.requestBody.content.application\/x-www-form-urlencoded.schema.properties.evidence.properties.fraudulent.anyOf@ in the specification.
data PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1 = PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1
  { -- | additional_documentation
    PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1
-> Maybe
     PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1AdditionalDocumentation'Variants
postIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1AdditionalDocumentation :: (GHC.Maybe.Maybe PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1AdditionalDocumentation'Variants),
    -- | explanation
    --
    -- Constraints:
    --
    -- * Maximum length of 1500
    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"))

-- | Create a new 'PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1' with all required fields.
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
    }

-- | Defines the oneOf schema located at @paths.\/v1\/issuing\/disputes\/{dispute}.POST.requestBody.content.application\/x-www-form-urlencoded.schema.properties.evidence.properties.fraudulent.anyOf.properties.additional_documentation.anyOf@ in the specification.
data PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'OneOf1AdditionalDocumentation'Variants
  = -- | Represents the JSON value @""@
    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

-- | Defines the oneOf schema located at @paths.\/v1\/issuing\/disputes\/{dispute}.POST.requestBody.content.application\/x-www-form-urlencoded.schema.properties.evidence.properties.fraudulent.anyOf@ in the specification.
data PostIssuingDisputesDisputeRequestBodyEvidence'Fraudulent'Variants
  = -- | Represents the JSON value @""@
    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

-- | Defines the object schema located at @paths.\/v1\/issuing\/disputes\/{dispute}.POST.requestBody.content.application\/x-www-form-urlencoded.schema.properties.evidence.properties.merchandise_not_as_described.anyOf@ in the specification.
data PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1 = PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1
  { -- | additional_documentation
    PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1
-> Maybe
     PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1AdditionalDocumentation'Variants
postIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1AdditionalDocumentation :: (GHC.Maybe.Maybe PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1AdditionalDocumentation'Variants),
    -- | explanation
    --
    -- Constraints:
    --
    -- * Maximum length of 1500
    PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1
-> Maybe Text
postIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1Explanation :: (GHC.Maybe.Maybe Data.Text.Internal.Text),
    -- | received_at
    PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1
-> Maybe
     PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReceivedAt'Variants
postIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReceivedAt :: (GHC.Maybe.Maybe PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReceivedAt'Variants),
    -- | return_description
    --
    -- Constraints:
    --
    -- * Maximum length of 1500
    PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1
-> Maybe Text
postIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnDescription :: (GHC.Maybe.Maybe Data.Text.Internal.Text),
    -- | return_status
    PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1
-> Maybe
     PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus'
postIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus :: (GHC.Maybe.Maybe PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus'),
    -- | returned_at
    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"))

-- | Create a new 'PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1' with all required fields.
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
    }

-- | Defines the oneOf schema located at @paths.\/v1\/issuing\/disputes\/{dispute}.POST.requestBody.content.application\/x-www-form-urlencoded.schema.properties.evidence.properties.merchandise_not_as_described.anyOf.properties.additional_documentation.anyOf@ in the specification.
data PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1AdditionalDocumentation'Variants
  = -- | Represents the JSON value @""@
    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

-- | Defines the oneOf schema located at @paths.\/v1\/issuing\/disputes\/{dispute}.POST.requestBody.content.application\/x-www-form-urlencoded.schema.properties.evidence.properties.merchandise_not_as_described.anyOf.properties.received_at.anyOf@ in the specification.
data PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReceivedAt'Variants
  = -- | Represents the JSON value @""@
    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

-- | Defines the enum schema located at @paths.\/v1\/issuing\/disputes\/{dispute}.POST.requestBody.content.application\/x-www-form-urlencoded.schema.properties.evidence.properties.merchandise_not_as_described.anyOf.properties.return_status@ in the specification.
data PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus'
  = -- | This case is used if the value encountered during decoding does not match any of the provided cases in the specification.
    PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus'Other Data.Aeson.Types.Internal.Value
  | -- | This constructor can be used to send values to the server which are not present in the specification yet.
    PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus'Typed Data.Text.Internal.Text
  | -- | Represents the JSON value @""@
    PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus'EnumEmptyString
  | -- | Represents the JSON value @"merchant_rejected"@
    PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnStatus'EnumMerchantRejected
  | -- | Represents the JSON value @"successful"@
    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
      )

-- | Defines the oneOf schema located at @paths.\/v1\/issuing\/disputes\/{dispute}.POST.requestBody.content.application\/x-www-form-urlencoded.schema.properties.evidence.properties.merchandise_not_as_described.anyOf.properties.returned_at.anyOf@ in the specification.
data PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'OneOf1ReturnedAt'Variants
  = -- | Represents the JSON value @""@
    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

-- | Defines the oneOf schema located at @paths.\/v1\/issuing\/disputes\/{dispute}.POST.requestBody.content.application\/x-www-form-urlencoded.schema.properties.evidence.properties.merchandise_not_as_described.anyOf@ in the specification.
data PostIssuingDisputesDisputeRequestBodyEvidence'MerchandiseNotAsDescribed'Variants
  = -- | Represents the JSON value @""@
    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

-- | Defines the object schema located at @paths.\/v1\/issuing\/disputes\/{dispute}.POST.requestBody.content.application\/x-www-form-urlencoded.schema.properties.evidence.properties.not_received.anyOf@ in the specification.
data PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1 = PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1
  { -- | additional_documentation
    PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1
-> Maybe
     PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1AdditionalDocumentation'Variants
postIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1AdditionalDocumentation :: (GHC.Maybe.Maybe PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1AdditionalDocumentation'Variants),
    -- | expected_at
    PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1
-> Maybe
     PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ExpectedAt'Variants
postIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ExpectedAt :: (GHC.Maybe.Maybe PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ExpectedAt'Variants),
    -- | explanation
    --
    -- Constraints:
    --
    -- * Maximum length of 1500
    PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1
-> Maybe Text
postIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1Explanation :: (GHC.Maybe.Maybe Data.Text.Internal.Text),
    -- | product_description
    --
    -- Constraints:
    --
    -- * Maximum length of 1500
    PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1
-> Maybe Text
postIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductDescription :: (GHC.Maybe.Maybe Data.Text.Internal.Text),
    -- | product_type
    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"))

-- | Create a new 'PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1' with all required fields.
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
    }

-- | Defines the oneOf schema located at @paths.\/v1\/issuing\/disputes\/{dispute}.POST.requestBody.content.application\/x-www-form-urlencoded.schema.properties.evidence.properties.not_received.anyOf.properties.additional_documentation.anyOf@ in the specification.
data PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1AdditionalDocumentation'Variants
  = -- | Represents the JSON value @""@
    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

-- | Defines the oneOf schema located at @paths.\/v1\/issuing\/disputes\/{dispute}.POST.requestBody.content.application\/x-www-form-urlencoded.schema.properties.evidence.properties.not_received.anyOf.properties.expected_at.anyOf@ in the specification.
data PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ExpectedAt'Variants
  = -- | Represents the JSON value @""@
    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

-- | Defines the enum schema located at @paths.\/v1\/issuing\/disputes\/{dispute}.POST.requestBody.content.application\/x-www-form-urlencoded.schema.properties.evidence.properties.not_received.anyOf.properties.product_type@ in the specification.
data PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType'
  = -- | This case is used if the value encountered during decoding does not match any of the provided cases in the specification.
    PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType'Other Data.Aeson.Types.Internal.Value
  | -- | This constructor can be used to send values to the server which are not present in the specification yet.
    PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType'Typed Data.Text.Internal.Text
  | -- | Represents the JSON value @""@
    PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType'EnumEmptyString
  | -- | Represents the JSON value @"merchandise"@
    PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'OneOf1ProductType'EnumMerchandise
  | -- | Represents the JSON value @"service"@
    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
      )

-- | Defines the oneOf schema located at @paths.\/v1\/issuing\/disputes\/{dispute}.POST.requestBody.content.application\/x-www-form-urlencoded.schema.properties.evidence.properties.not_received.anyOf@ in the specification.
data PostIssuingDisputesDisputeRequestBodyEvidence'NotReceived'Variants
  = -- | Represents the JSON value @""@
    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

-- | Defines the object schema located at @paths.\/v1\/issuing\/disputes\/{dispute}.POST.requestBody.content.application\/x-www-form-urlencoded.schema.properties.evidence.properties.other.anyOf@ in the specification.
data PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1 = PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1
  { -- | additional_documentation
    PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1
-> Maybe
     PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1AdditionalDocumentation'Variants
postIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1AdditionalDocumentation :: (GHC.Maybe.Maybe PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1AdditionalDocumentation'Variants),
    -- | explanation
    --
    -- Constraints:
    --
    -- * Maximum length of 1500
    PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1
-> Maybe Text
postIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1Explanation :: (GHC.Maybe.Maybe Data.Text.Internal.Text),
    -- | product_description
    --
    -- Constraints:
    --
    -- * Maximum length of 1500
    PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1
-> Maybe Text
postIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductDescription :: (GHC.Maybe.Maybe Data.Text.Internal.Text),
    -- | product_type
    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"))

-- | Create a new 'PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1' with all required fields.
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
    }

-- | Defines the oneOf schema located at @paths.\/v1\/issuing\/disputes\/{dispute}.POST.requestBody.content.application\/x-www-form-urlencoded.schema.properties.evidence.properties.other.anyOf.properties.additional_documentation.anyOf@ in the specification.
data PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1AdditionalDocumentation'Variants
  = -- | Represents the JSON value @""@
    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

-- | Defines the enum schema located at @paths.\/v1\/issuing\/disputes\/{dispute}.POST.requestBody.content.application\/x-www-form-urlencoded.schema.properties.evidence.properties.other.anyOf.properties.product_type@ in the specification.
data PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType'
  = -- | This case is used if the value encountered during decoding does not match any of the provided cases in the specification.
    PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType'Other Data.Aeson.Types.Internal.Value
  | -- | This constructor can be used to send values to the server which are not present in the specification yet.
    PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType'Typed Data.Text.Internal.Text
  | -- | Represents the JSON value @""@
    PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType'EnumEmptyString
  | -- | Represents the JSON value @"merchandise"@
    PostIssuingDisputesDisputeRequestBodyEvidence'Other'OneOf1ProductType'EnumMerchandise
  | -- | Represents the JSON value @"service"@
    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
      )

-- | Defines the oneOf schema located at @paths.\/v1\/issuing\/disputes\/{dispute}.POST.requestBody.content.application\/x-www-form-urlencoded.schema.properties.evidence.properties.other.anyOf@ in the specification.
data PostIssuingDisputesDisputeRequestBodyEvidence'Other'Variants
  = -- | Represents the JSON value @""@
    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

-- | Defines the enum schema located at @paths.\/v1\/issuing\/disputes\/{dispute}.POST.requestBody.content.application\/x-www-form-urlencoded.schema.properties.evidence.properties.reason@ in the specification.
data PostIssuingDisputesDisputeRequestBodyEvidence'Reason'
  = -- | This case is used if the value encountered during decoding does not match any of the provided cases in the specification.
    PostIssuingDisputesDisputeRequestBodyEvidence'Reason'Other Data.Aeson.Types.Internal.Value
  | -- | This constructor can be used to send values to the server which are not present in the specification yet.
    PostIssuingDisputesDisputeRequestBodyEvidence'Reason'Typed Data.Text.Internal.Text
  | -- | Represents the JSON value @"canceled"@
    PostIssuingDisputesDisputeRequestBodyEvidence'Reason'EnumCanceled
  | -- | Represents the JSON value @"duplicate"@
    PostIssuingDisputesDisputeRequestBodyEvidence'Reason'EnumDuplicate
  | -- | Represents the JSON value @"fraudulent"@
    PostIssuingDisputesDisputeRequestBodyEvidence'Reason'EnumFraudulent
  | -- | Represents the JSON value @"merchandise_not_as_described"@
    PostIssuingDisputesDisputeRequestBodyEvidence'Reason'EnumMerchandiseNotAsDescribed
  | -- | Represents the JSON value @"not_received"@
    PostIssuingDisputesDisputeRequestBodyEvidence'Reason'EnumNotReceived
  | -- | Represents the JSON value @"other"@
    PostIssuingDisputesDisputeRequestBodyEvidence'Reason'EnumOther
  | -- | Represents the JSON value @"service_not_as_described"@
    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
      )

-- | Defines the object schema located at @paths.\/v1\/issuing\/disputes\/{dispute}.POST.requestBody.content.application\/x-www-form-urlencoded.schema.properties.evidence.properties.service_not_as_described.anyOf@ in the specification.
data PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1 = PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1
  { -- | additional_documentation
    PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1
-> Maybe
     PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1AdditionalDocumentation'Variants
postIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1AdditionalDocumentation :: (GHC.Maybe.Maybe PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1AdditionalDocumentation'Variants),
    -- | canceled_at
    PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1
-> Maybe
     PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CanceledAt'Variants
postIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CanceledAt :: (GHC.Maybe.Maybe PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CanceledAt'Variants),
    -- | cancellation_reason
    --
    -- Constraints:
    --
    -- * Maximum length of 1500
    PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1
-> Maybe Text
postIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CancellationReason :: (GHC.Maybe.Maybe Data.Text.Internal.Text),
    -- | explanation
    --
    -- Constraints:
    --
    -- * Maximum length of 1500
    PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1
-> Maybe Text
postIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1Explanation :: (GHC.Maybe.Maybe Data.Text.Internal.Text),
    -- | received_at
    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"))

-- | Create a new 'PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1' with all required fields.
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
    }

-- | Defines the oneOf schema located at @paths.\/v1\/issuing\/disputes\/{dispute}.POST.requestBody.content.application\/x-www-form-urlencoded.schema.properties.evidence.properties.service_not_as_described.anyOf.properties.additional_documentation.anyOf@ in the specification.
data PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1AdditionalDocumentation'Variants
  = -- | Represents the JSON value @""@
    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

-- | Defines the oneOf schema located at @paths.\/v1\/issuing\/disputes\/{dispute}.POST.requestBody.content.application\/x-www-form-urlencoded.schema.properties.evidence.properties.service_not_as_described.anyOf.properties.canceled_at.anyOf@ in the specification.
data PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1CanceledAt'Variants
  = -- | Represents the JSON value @""@
    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

-- | Defines the oneOf schema located at @paths.\/v1\/issuing\/disputes\/{dispute}.POST.requestBody.content.application\/x-www-form-urlencoded.schema.properties.evidence.properties.service_not_as_described.anyOf.properties.received_at.anyOf@ in the specification.
data PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'OneOf1ReceivedAt'Variants
  = -- | Represents the JSON value @""@
    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

-- | Defines the oneOf schema located at @paths.\/v1\/issuing\/disputes\/{dispute}.POST.requestBody.content.application\/x-www-form-urlencoded.schema.properties.evidence.properties.service_not_as_described.anyOf@ in the specification.
data PostIssuingDisputesDisputeRequestBodyEvidence'ServiceNotAsDescribed'Variants
  = -- | Represents the JSON value @""@
    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

-- | Defines the oneOf schema located at @paths.\/v1\/issuing\/disputes\/{dispute}.POST.requestBody.content.application\/x-www-form-urlencoded.schema.properties.metadata.anyOf@ in the specification.
--
-- Set of [key-value pairs](https:\/\/stripe.com\/docs\/api\/metadata) that you can attach to an object. This can be useful for storing additional information about the object in a structured format. Individual keys can be unset by posting an empty value to them. All keys can be unset by posting an empty value to \`metadata\`.
data PostIssuingDisputesDisputeRequestBodyMetadata'Variants
  = -- | Represents the JSON value @""@
    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

-- | Represents a response of the operation 'postIssuingDisputesDispute'.
--
-- The response constructor is chosen by the status code of the response. If no case matches (no specific case for the response code, no range case, no default case), 'PostIssuingDisputesDisputeResponseError' is used.
data PostIssuingDisputesDisputeResponse
  = -- | Means either no matching case available or a parse error
    PostIssuingDisputesDisputeResponseError GHC.Base.String
  | -- | Successful response.
    PostIssuingDisputesDisputeResponse200 Issuing'dispute
  | -- | Error response.
    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)