{-# LANGUAGE ExplicitForAll #-}
{-# LANGUAGE MultiWayIf #-}
{-# LANGUAGE OverloadedStrings #-}
module StripeAPI.Operations.GetSubscriptionSchedules 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
getSubscriptionSchedules ::
forall m.
StripeAPI.Common.MonadHTTP m =>
GetSubscriptionSchedulesParameters ->
StripeAPI.Common.StripeT m (Network.HTTP.Client.Types.Response GetSubscriptionSchedulesResponse)
getSubscriptionSchedules :: GetSubscriptionSchedulesParameters
-> StripeT m (Response GetSubscriptionSchedulesResponse)
getSubscriptionSchedules GetSubscriptionSchedulesParameters
parameters =
(Response ByteString -> Response GetSubscriptionSchedulesResponse)
-> StripeT m (Response ByteString)
-> StripeT m (Response GetSubscriptionSchedulesResponse)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
GHC.Base.fmap
( \Response ByteString
response_0 ->
(ByteString -> GetSubscriptionSchedulesResponse)
-> Response ByteString -> Response GetSubscriptionSchedulesResponse
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
GHC.Base.fmap
( (String -> GetSubscriptionSchedulesResponse)
-> (GetSubscriptionSchedulesResponse
-> GetSubscriptionSchedulesResponse)
-> Either String GetSubscriptionSchedulesResponse
-> GetSubscriptionSchedulesResponse
forall a c b. (a -> c) -> (b -> c) -> Either a b -> c
Data.Either.either String -> GetSubscriptionSchedulesResponse
GetSubscriptionSchedulesResponseError GetSubscriptionSchedulesResponse
-> GetSubscriptionSchedulesResponse
forall a. a -> a
GHC.Base.id
(Either String GetSubscriptionSchedulesResponse
-> GetSubscriptionSchedulesResponse)
-> (ByteString -> Either String GetSubscriptionSchedulesResponse)
-> ByteString
-> GetSubscriptionSchedulesResponse
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) ->
GetSubscriptionSchedulesResponseBody200
-> GetSubscriptionSchedulesResponse
GetSubscriptionSchedulesResponse200
(GetSubscriptionSchedulesResponseBody200
-> GetSubscriptionSchedulesResponse)
-> Either String GetSubscriptionSchedulesResponseBody200
-> Either String GetSubscriptionSchedulesResponse
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Data.Functor.<$> ( ByteString -> Either String GetSubscriptionSchedulesResponseBody200
forall a. FromJSON a => ByteString -> Either String a
Data.Aeson.eitherDecodeStrict ByteString
body ::
Data.Either.Either
GHC.Base.String
GetSubscriptionSchedulesResponseBody200
)
| 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 -> GetSubscriptionSchedulesResponse
GetSubscriptionSchedulesResponseDefault
(Error -> GetSubscriptionSchedulesResponse)
-> Either String Error
-> Either String GetSubscriptionSchedulesResponse
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 GetSubscriptionSchedulesResponse
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] -> StripeT m (Response ByteString)
forall (m :: * -> *).
MonadHTTP m =>
Text -> Text -> [QueryParameter] -> StripeT m (Response ByteString)
StripeAPI.Common.doCallWithConfigurationM
(Text -> Text
Data.Text.toUpper (Text -> Text) -> Text -> Text
forall a b. (a -> b) -> a -> b
GHC.Base.$ String -> Text
Data.Text.pack String
"GET")
(String -> Text
Data.Text.pack String
"/v1/subscription_schedules")
[ Text -> Maybe Value -> Text -> Bool -> QueryParameter
StripeAPI.Common.QueryParameter (String -> Text
Data.Text.pack String
"canceled_at") (GetSubscriptionSchedulesParametersQueryCanceledAt'Variants -> Value
forall a. ToJSON a => a -> Value
Data.Aeson.Types.ToJSON.toJSON (GetSubscriptionSchedulesParametersQueryCanceledAt'Variants
-> Value)
-> Maybe GetSubscriptionSchedulesParametersQueryCanceledAt'Variants
-> Maybe Value
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Data.Functor.<$> GetSubscriptionSchedulesParameters
-> Maybe GetSubscriptionSchedulesParametersQueryCanceledAt'Variants
getSubscriptionSchedulesParametersQueryCanceledAt GetSubscriptionSchedulesParameters
parameters) (String -> Text
Data.Text.pack String
"deepObject") Bool
GHC.Types.True,
Text -> Maybe Value -> Text -> Bool -> QueryParameter
StripeAPI.Common.QueryParameter (String -> Text
Data.Text.pack String
"completed_at") (GetSubscriptionSchedulesParametersQueryCompletedAt'Variants
-> Value
forall a. ToJSON a => a -> Value
Data.Aeson.Types.ToJSON.toJSON (GetSubscriptionSchedulesParametersQueryCompletedAt'Variants
-> Value)
-> Maybe
GetSubscriptionSchedulesParametersQueryCompletedAt'Variants
-> Maybe Value
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Data.Functor.<$> GetSubscriptionSchedulesParameters
-> Maybe
GetSubscriptionSchedulesParametersQueryCompletedAt'Variants
getSubscriptionSchedulesParametersQueryCompletedAt GetSubscriptionSchedulesParameters
parameters) (String -> Text
Data.Text.pack String
"deepObject") Bool
GHC.Types.True,
Text -> Maybe Value -> Text -> Bool -> QueryParameter
StripeAPI.Common.QueryParameter (String -> Text
Data.Text.pack String
"created") (GetSubscriptionSchedulesParametersQueryCreated'Variants -> Value
forall a. ToJSON a => a -> Value
Data.Aeson.Types.ToJSON.toJSON (GetSubscriptionSchedulesParametersQueryCreated'Variants -> Value)
-> Maybe GetSubscriptionSchedulesParametersQueryCreated'Variants
-> Maybe Value
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Data.Functor.<$> GetSubscriptionSchedulesParameters
-> Maybe GetSubscriptionSchedulesParametersQueryCreated'Variants
getSubscriptionSchedulesParametersQueryCreated GetSubscriptionSchedulesParameters
parameters) (String -> Text
Data.Text.pack String
"deepObject") Bool
GHC.Types.True,
Text -> Maybe Value -> Text -> Bool -> QueryParameter
StripeAPI.Common.QueryParameter (String -> Text
Data.Text.pack String
"customer") (Text -> Value
forall a. ToJSON a => a -> Value
Data.Aeson.Types.ToJSON.toJSON (Text -> Value) -> Maybe Text -> Maybe Value
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Data.Functor.<$> GetSubscriptionSchedulesParameters -> Maybe Text
getSubscriptionSchedulesParametersQueryCustomer GetSubscriptionSchedulesParameters
parameters) (String -> Text
Data.Text.pack String
"form") Bool
GHC.Types.True,
Text -> Maybe Value -> Text -> Bool -> QueryParameter
StripeAPI.Common.QueryParameter (String -> Text
Data.Text.pack String
"ending_before") (Text -> Value
forall a. ToJSON a => a -> Value
Data.Aeson.Types.ToJSON.toJSON (Text -> Value) -> Maybe Text -> Maybe Value
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Data.Functor.<$> GetSubscriptionSchedulesParameters -> Maybe Text
getSubscriptionSchedulesParametersQueryEndingBefore GetSubscriptionSchedulesParameters
parameters) (String -> Text
Data.Text.pack String
"form") Bool
GHC.Types.True,
Text -> Maybe Value -> Text -> Bool -> QueryParameter
StripeAPI.Common.QueryParameter (String -> Text
Data.Text.pack String
"expand") ([Text] -> Value
forall a. ToJSON a => a -> Value
Data.Aeson.Types.ToJSON.toJSON ([Text] -> Value) -> Maybe [Text] -> Maybe Value
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Data.Functor.<$> GetSubscriptionSchedulesParameters -> Maybe [Text]
getSubscriptionSchedulesParametersQueryExpand GetSubscriptionSchedulesParameters
parameters) (String -> Text
Data.Text.pack String
"deepObject") Bool
GHC.Types.True,
Text -> Maybe Value -> Text -> Bool -> QueryParameter
StripeAPI.Common.QueryParameter (String -> Text
Data.Text.pack String
"limit") (Int -> Value
forall a. ToJSON a => a -> Value
Data.Aeson.Types.ToJSON.toJSON (Int -> Value) -> Maybe Int -> Maybe Value
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Data.Functor.<$> GetSubscriptionSchedulesParameters -> Maybe Int
getSubscriptionSchedulesParametersQueryLimit GetSubscriptionSchedulesParameters
parameters) (String -> Text
Data.Text.pack String
"form") Bool
GHC.Types.True,
Text -> Maybe Value -> Text -> Bool -> QueryParameter
StripeAPI.Common.QueryParameter (String -> Text
Data.Text.pack String
"released_at") (GetSubscriptionSchedulesParametersQueryReleasedAt'Variants -> Value
forall a. ToJSON a => a -> Value
Data.Aeson.Types.ToJSON.toJSON (GetSubscriptionSchedulesParametersQueryReleasedAt'Variants
-> Value)
-> Maybe GetSubscriptionSchedulesParametersQueryReleasedAt'Variants
-> Maybe Value
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Data.Functor.<$> GetSubscriptionSchedulesParameters
-> Maybe GetSubscriptionSchedulesParametersQueryReleasedAt'Variants
getSubscriptionSchedulesParametersQueryReleasedAt GetSubscriptionSchedulesParameters
parameters) (String -> Text
Data.Text.pack String
"deepObject") Bool
GHC.Types.True,
Text -> Maybe Value -> Text -> Bool -> QueryParameter
StripeAPI.Common.QueryParameter (String -> Text
Data.Text.pack String
"scheduled") (Bool -> Value
forall a. ToJSON a => a -> Value
Data.Aeson.Types.ToJSON.toJSON (Bool -> Value) -> Maybe Bool -> Maybe Value
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Data.Functor.<$> GetSubscriptionSchedulesParameters -> Maybe Bool
getSubscriptionSchedulesParametersQueryScheduled GetSubscriptionSchedulesParameters
parameters) (String -> Text
Data.Text.pack String
"form") Bool
GHC.Types.True,
Text -> Maybe Value -> Text -> Bool -> QueryParameter
StripeAPI.Common.QueryParameter (String -> Text
Data.Text.pack String
"starting_after") (Text -> Value
forall a. ToJSON a => a -> Value
Data.Aeson.Types.ToJSON.toJSON (Text -> Value) -> Maybe Text -> Maybe Value
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Data.Functor.<$> GetSubscriptionSchedulesParameters -> Maybe Text
getSubscriptionSchedulesParametersQueryStartingAfter GetSubscriptionSchedulesParameters
parameters) (String -> Text
Data.Text.pack String
"form") Bool
GHC.Types.True
]
)
data GetSubscriptionSchedulesParameters = GetSubscriptionSchedulesParameters
{
GetSubscriptionSchedulesParameters
-> Maybe GetSubscriptionSchedulesParametersQueryCanceledAt'Variants
getSubscriptionSchedulesParametersQueryCanceledAt :: (GHC.Maybe.Maybe GetSubscriptionSchedulesParametersQueryCanceledAt'Variants),
GetSubscriptionSchedulesParameters
-> Maybe
GetSubscriptionSchedulesParametersQueryCompletedAt'Variants
getSubscriptionSchedulesParametersQueryCompletedAt :: (GHC.Maybe.Maybe GetSubscriptionSchedulesParametersQueryCompletedAt'Variants),
GetSubscriptionSchedulesParameters
-> Maybe GetSubscriptionSchedulesParametersQueryCreated'Variants
getSubscriptionSchedulesParametersQueryCreated :: (GHC.Maybe.Maybe GetSubscriptionSchedulesParametersQueryCreated'Variants),
GetSubscriptionSchedulesParameters -> Maybe Text
getSubscriptionSchedulesParametersQueryCustomer :: (GHC.Maybe.Maybe Data.Text.Internal.Text),
GetSubscriptionSchedulesParameters -> Maybe Text
getSubscriptionSchedulesParametersQueryEndingBefore :: (GHC.Maybe.Maybe Data.Text.Internal.Text),
GetSubscriptionSchedulesParameters -> Maybe [Text]
getSubscriptionSchedulesParametersQueryExpand :: (GHC.Maybe.Maybe ([Data.Text.Internal.Text])),
GetSubscriptionSchedulesParameters -> Maybe Int
getSubscriptionSchedulesParametersQueryLimit :: (GHC.Maybe.Maybe GHC.Types.Int),
GetSubscriptionSchedulesParameters
-> Maybe GetSubscriptionSchedulesParametersQueryReleasedAt'Variants
getSubscriptionSchedulesParametersQueryReleasedAt :: (GHC.Maybe.Maybe GetSubscriptionSchedulesParametersQueryReleasedAt'Variants),
GetSubscriptionSchedulesParameters -> Maybe Bool
getSubscriptionSchedulesParametersQueryScheduled :: (GHC.Maybe.Maybe GHC.Types.Bool),
GetSubscriptionSchedulesParameters -> Maybe Text
getSubscriptionSchedulesParametersQueryStartingAfter :: (GHC.Maybe.Maybe Data.Text.Internal.Text)
}
deriving
( Int -> GetSubscriptionSchedulesParameters -> ShowS
[GetSubscriptionSchedulesParameters] -> ShowS
GetSubscriptionSchedulesParameters -> String
(Int -> GetSubscriptionSchedulesParameters -> ShowS)
-> (GetSubscriptionSchedulesParameters -> String)
-> ([GetSubscriptionSchedulesParameters] -> ShowS)
-> Show GetSubscriptionSchedulesParameters
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [GetSubscriptionSchedulesParameters] -> ShowS
$cshowList :: [GetSubscriptionSchedulesParameters] -> ShowS
show :: GetSubscriptionSchedulesParameters -> String
$cshow :: GetSubscriptionSchedulesParameters -> String
showsPrec :: Int -> GetSubscriptionSchedulesParameters -> ShowS
$cshowsPrec :: Int -> GetSubscriptionSchedulesParameters -> ShowS
GHC.Show.Show,
GetSubscriptionSchedulesParameters
-> GetSubscriptionSchedulesParameters -> Bool
(GetSubscriptionSchedulesParameters
-> GetSubscriptionSchedulesParameters -> Bool)
-> (GetSubscriptionSchedulesParameters
-> GetSubscriptionSchedulesParameters -> Bool)
-> Eq GetSubscriptionSchedulesParameters
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: GetSubscriptionSchedulesParameters
-> GetSubscriptionSchedulesParameters -> Bool
$c/= :: GetSubscriptionSchedulesParameters
-> GetSubscriptionSchedulesParameters -> Bool
== :: GetSubscriptionSchedulesParameters
-> GetSubscriptionSchedulesParameters -> Bool
$c== :: GetSubscriptionSchedulesParameters
-> GetSubscriptionSchedulesParameters -> Bool
GHC.Classes.Eq
)
instance Data.Aeson.Types.ToJSON.ToJSON GetSubscriptionSchedulesParameters where
toJSON :: GetSubscriptionSchedulesParameters -> Value
toJSON GetSubscriptionSchedulesParameters
obj = [Pair] -> Value
Data.Aeson.Types.Internal.object (Text
"queryCanceled_at" Text
-> Maybe GetSubscriptionSchedulesParametersQueryCanceledAt'Variants
-> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= GetSubscriptionSchedulesParameters
-> Maybe GetSubscriptionSchedulesParametersQueryCanceledAt'Variants
getSubscriptionSchedulesParametersQueryCanceledAt GetSubscriptionSchedulesParameters
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"queryCompleted_at" Text
-> Maybe
GetSubscriptionSchedulesParametersQueryCompletedAt'Variants
-> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= GetSubscriptionSchedulesParameters
-> Maybe
GetSubscriptionSchedulesParametersQueryCompletedAt'Variants
getSubscriptionSchedulesParametersQueryCompletedAt GetSubscriptionSchedulesParameters
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"queryCreated" Text
-> Maybe GetSubscriptionSchedulesParametersQueryCreated'Variants
-> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= GetSubscriptionSchedulesParameters
-> Maybe GetSubscriptionSchedulesParametersQueryCreated'Variants
getSubscriptionSchedulesParametersQueryCreated GetSubscriptionSchedulesParameters
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"queryCustomer" Text -> Maybe Text -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= GetSubscriptionSchedulesParameters -> Maybe Text
getSubscriptionSchedulesParametersQueryCustomer GetSubscriptionSchedulesParameters
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"queryEnding_before" Text -> Maybe Text -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= GetSubscriptionSchedulesParameters -> Maybe Text
getSubscriptionSchedulesParametersQueryEndingBefore GetSubscriptionSchedulesParameters
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"queryExpand" Text -> Maybe [Text] -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= GetSubscriptionSchedulesParameters -> Maybe [Text]
getSubscriptionSchedulesParametersQueryExpand GetSubscriptionSchedulesParameters
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"queryLimit" Text -> Maybe Int -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= GetSubscriptionSchedulesParameters -> Maybe Int
getSubscriptionSchedulesParametersQueryLimit GetSubscriptionSchedulesParameters
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"queryReleased_at" Text
-> Maybe GetSubscriptionSchedulesParametersQueryReleasedAt'Variants
-> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= GetSubscriptionSchedulesParameters
-> Maybe GetSubscriptionSchedulesParametersQueryReleasedAt'Variants
getSubscriptionSchedulesParametersQueryReleasedAt GetSubscriptionSchedulesParameters
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"queryScheduled" Text -> Maybe Bool -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= GetSubscriptionSchedulesParameters -> Maybe Bool
getSubscriptionSchedulesParametersQueryScheduled GetSubscriptionSchedulesParameters
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"queryStarting_after" Text -> Maybe Text -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= GetSubscriptionSchedulesParameters -> Maybe Text
getSubscriptionSchedulesParametersQueryStartingAfter GetSubscriptionSchedulesParameters
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: [Pair]
forall a. Monoid a => a
GHC.Base.mempty)
toEncoding :: GetSubscriptionSchedulesParameters -> Encoding
toEncoding GetSubscriptionSchedulesParameters
obj = Series -> Encoding
Data.Aeson.Encoding.Internal.pairs ((Text
"queryCanceled_at" Text
-> Maybe GetSubscriptionSchedulesParametersQueryCanceledAt'Variants
-> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= GetSubscriptionSchedulesParameters
-> Maybe GetSubscriptionSchedulesParametersQueryCanceledAt'Variants
getSubscriptionSchedulesParametersQueryCanceledAt GetSubscriptionSchedulesParameters
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> ((Text
"queryCompleted_at" Text
-> Maybe
GetSubscriptionSchedulesParametersQueryCompletedAt'Variants
-> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= GetSubscriptionSchedulesParameters
-> Maybe
GetSubscriptionSchedulesParametersQueryCompletedAt'Variants
getSubscriptionSchedulesParametersQueryCompletedAt GetSubscriptionSchedulesParameters
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> ((Text
"queryCreated" Text
-> Maybe GetSubscriptionSchedulesParametersQueryCreated'Variants
-> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= GetSubscriptionSchedulesParameters
-> Maybe GetSubscriptionSchedulesParametersQueryCreated'Variants
getSubscriptionSchedulesParametersQueryCreated GetSubscriptionSchedulesParameters
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> ((Text
"queryCustomer" Text -> Maybe Text -> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= GetSubscriptionSchedulesParameters -> Maybe Text
getSubscriptionSchedulesParametersQueryCustomer GetSubscriptionSchedulesParameters
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> ((Text
"queryEnding_before" Text -> Maybe Text -> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= GetSubscriptionSchedulesParameters -> Maybe Text
getSubscriptionSchedulesParametersQueryEndingBefore GetSubscriptionSchedulesParameters
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> ((Text
"queryExpand" Text -> Maybe [Text] -> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= GetSubscriptionSchedulesParameters -> Maybe [Text]
getSubscriptionSchedulesParametersQueryExpand GetSubscriptionSchedulesParameters
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> ((Text
"queryLimit" Text -> Maybe Int -> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= GetSubscriptionSchedulesParameters -> Maybe Int
getSubscriptionSchedulesParametersQueryLimit GetSubscriptionSchedulesParameters
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> ((Text
"queryReleased_at" Text
-> Maybe GetSubscriptionSchedulesParametersQueryReleasedAt'Variants
-> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= GetSubscriptionSchedulesParameters
-> Maybe GetSubscriptionSchedulesParametersQueryReleasedAt'Variants
getSubscriptionSchedulesParametersQueryReleasedAt GetSubscriptionSchedulesParameters
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> ((Text
"queryScheduled" Text -> Maybe Bool -> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= GetSubscriptionSchedulesParameters -> Maybe Bool
getSubscriptionSchedulesParametersQueryScheduled GetSubscriptionSchedulesParameters
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> (Text
"queryStarting_after" Text -> Maybe Text -> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= GetSubscriptionSchedulesParameters -> Maybe Text
getSubscriptionSchedulesParametersQueryStartingAfter GetSubscriptionSchedulesParameters
obj))))))))))
instance Data.Aeson.Types.FromJSON.FromJSON GetSubscriptionSchedulesParameters where
parseJSON :: Value -> Parser GetSubscriptionSchedulesParameters
parseJSON = String
-> (Object -> Parser GetSubscriptionSchedulesParameters)
-> Value
-> Parser GetSubscriptionSchedulesParameters
forall a. String -> (Object -> Parser a) -> Value -> Parser a
Data.Aeson.Types.FromJSON.withObject String
"GetSubscriptionSchedulesParameters" (\Object
obj -> ((((((((((Maybe GetSubscriptionSchedulesParametersQueryCanceledAt'Variants
-> Maybe
GetSubscriptionSchedulesParametersQueryCompletedAt'Variants
-> Maybe GetSubscriptionSchedulesParametersQueryCreated'Variants
-> Maybe Text
-> Maybe Text
-> Maybe [Text]
-> Maybe Int
-> Maybe GetSubscriptionSchedulesParametersQueryReleasedAt'Variants
-> Maybe Bool
-> Maybe Text
-> GetSubscriptionSchedulesParameters)
-> Parser
(Maybe GetSubscriptionSchedulesParametersQueryCanceledAt'Variants
-> Maybe
GetSubscriptionSchedulesParametersQueryCompletedAt'Variants
-> Maybe GetSubscriptionSchedulesParametersQueryCreated'Variants
-> Maybe Text
-> Maybe Text
-> Maybe [Text]
-> Maybe Int
-> Maybe GetSubscriptionSchedulesParametersQueryReleasedAt'Variants
-> Maybe Bool
-> Maybe Text
-> GetSubscriptionSchedulesParameters)
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure Maybe GetSubscriptionSchedulesParametersQueryCanceledAt'Variants
-> Maybe
GetSubscriptionSchedulesParametersQueryCompletedAt'Variants
-> Maybe GetSubscriptionSchedulesParametersQueryCreated'Variants
-> Maybe Text
-> Maybe Text
-> Maybe [Text]
-> Maybe Int
-> Maybe GetSubscriptionSchedulesParametersQueryReleasedAt'Variants
-> Maybe Bool
-> Maybe Text
-> GetSubscriptionSchedulesParameters
GetSubscriptionSchedulesParameters Parser
(Maybe GetSubscriptionSchedulesParametersQueryCanceledAt'Variants
-> Maybe
GetSubscriptionSchedulesParametersQueryCompletedAt'Variants
-> Maybe GetSubscriptionSchedulesParametersQueryCreated'Variants
-> Maybe Text
-> Maybe Text
-> Maybe [Text]
-> Maybe Int
-> Maybe GetSubscriptionSchedulesParametersQueryReleasedAt'Variants
-> Maybe Bool
-> Maybe Text
-> GetSubscriptionSchedulesParameters)
-> Parser
(Maybe GetSubscriptionSchedulesParametersQueryCanceledAt'Variants)
-> Parser
(Maybe GetSubscriptionSchedulesParametersQueryCompletedAt'Variants
-> Maybe GetSubscriptionSchedulesParametersQueryCreated'Variants
-> Maybe Text
-> Maybe Text
-> Maybe [Text]
-> Maybe Int
-> Maybe GetSubscriptionSchedulesParametersQueryReleasedAt'Variants
-> Maybe Bool
-> Maybe Text
-> GetSubscriptionSchedulesParameters)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object
-> Text
-> Parser
(Maybe GetSubscriptionSchedulesParametersQueryCanceledAt'Variants)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Data.Aeson.Types.FromJSON..:? Text
"queryCanceled_at")) Parser
(Maybe GetSubscriptionSchedulesParametersQueryCompletedAt'Variants
-> Maybe GetSubscriptionSchedulesParametersQueryCreated'Variants
-> Maybe Text
-> Maybe Text
-> Maybe [Text]
-> Maybe Int
-> Maybe GetSubscriptionSchedulesParametersQueryReleasedAt'Variants
-> Maybe Bool
-> Maybe Text
-> GetSubscriptionSchedulesParameters)
-> Parser
(Maybe GetSubscriptionSchedulesParametersQueryCompletedAt'Variants)
-> Parser
(Maybe GetSubscriptionSchedulesParametersQueryCreated'Variants
-> Maybe Text
-> Maybe Text
-> Maybe [Text]
-> Maybe Int
-> Maybe GetSubscriptionSchedulesParametersQueryReleasedAt'Variants
-> Maybe Bool
-> Maybe Text
-> GetSubscriptionSchedulesParameters)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object
-> Text
-> Parser
(Maybe GetSubscriptionSchedulesParametersQueryCompletedAt'Variants)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Data.Aeson.Types.FromJSON..:? Text
"queryCompleted_at")) Parser
(Maybe GetSubscriptionSchedulesParametersQueryCreated'Variants
-> Maybe Text
-> Maybe Text
-> Maybe [Text]
-> Maybe Int
-> Maybe GetSubscriptionSchedulesParametersQueryReleasedAt'Variants
-> Maybe Bool
-> Maybe Text
-> GetSubscriptionSchedulesParameters)
-> Parser
(Maybe GetSubscriptionSchedulesParametersQueryCreated'Variants)
-> Parser
(Maybe Text
-> Maybe Text
-> Maybe [Text]
-> Maybe Int
-> Maybe GetSubscriptionSchedulesParametersQueryReleasedAt'Variants
-> Maybe Bool
-> Maybe Text
-> GetSubscriptionSchedulesParameters)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object
-> Text
-> Parser
(Maybe GetSubscriptionSchedulesParametersQueryCreated'Variants)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Data.Aeson.Types.FromJSON..:? Text
"queryCreated")) Parser
(Maybe Text
-> Maybe Text
-> Maybe [Text]
-> Maybe Int
-> Maybe GetSubscriptionSchedulesParametersQueryReleasedAt'Variants
-> Maybe Bool
-> Maybe Text
-> GetSubscriptionSchedulesParameters)
-> Parser (Maybe Text)
-> Parser
(Maybe Text
-> Maybe [Text]
-> Maybe Int
-> Maybe GetSubscriptionSchedulesParametersQueryReleasedAt'Variants
-> Maybe Bool
-> Maybe Text
-> GetSubscriptionSchedulesParameters)
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
"queryCustomer")) Parser
(Maybe Text
-> Maybe [Text]
-> Maybe Int
-> Maybe GetSubscriptionSchedulesParametersQueryReleasedAt'Variants
-> Maybe Bool
-> Maybe Text
-> GetSubscriptionSchedulesParameters)
-> Parser (Maybe Text)
-> Parser
(Maybe [Text]
-> Maybe Int
-> Maybe GetSubscriptionSchedulesParametersQueryReleasedAt'Variants
-> Maybe Bool
-> Maybe Text
-> GetSubscriptionSchedulesParameters)
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
"queryEnding_before")) Parser
(Maybe [Text]
-> Maybe Int
-> Maybe GetSubscriptionSchedulesParametersQueryReleasedAt'Variants
-> Maybe Bool
-> Maybe Text
-> GetSubscriptionSchedulesParameters)
-> Parser (Maybe [Text])
-> Parser
(Maybe Int
-> Maybe GetSubscriptionSchedulesParametersQueryReleasedAt'Variants
-> Maybe Bool
-> Maybe Text
-> GetSubscriptionSchedulesParameters)
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
"queryExpand")) Parser
(Maybe Int
-> Maybe GetSubscriptionSchedulesParametersQueryReleasedAt'Variants
-> Maybe Bool
-> Maybe Text
-> GetSubscriptionSchedulesParameters)
-> Parser (Maybe Int)
-> Parser
(Maybe GetSubscriptionSchedulesParametersQueryReleasedAt'Variants
-> Maybe Bool -> Maybe Text -> GetSubscriptionSchedulesParameters)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object -> Text -> Parser (Maybe Int)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Data.Aeson.Types.FromJSON..:? Text
"queryLimit")) Parser
(Maybe GetSubscriptionSchedulesParametersQueryReleasedAt'Variants
-> Maybe Bool -> Maybe Text -> GetSubscriptionSchedulesParameters)
-> Parser
(Maybe GetSubscriptionSchedulesParametersQueryReleasedAt'Variants)
-> Parser
(Maybe Bool -> Maybe Text -> GetSubscriptionSchedulesParameters)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object
-> Text
-> Parser
(Maybe GetSubscriptionSchedulesParametersQueryReleasedAt'Variants)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Data.Aeson.Types.FromJSON..:? Text
"queryReleased_at")) Parser
(Maybe Bool -> Maybe Text -> GetSubscriptionSchedulesParameters)
-> Parser (Maybe Bool)
-> Parser (Maybe Text -> GetSubscriptionSchedulesParameters)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object -> Text -> Parser (Maybe Bool)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Data.Aeson.Types.FromJSON..:? Text
"queryScheduled")) Parser (Maybe Text -> GetSubscriptionSchedulesParameters)
-> Parser (Maybe Text) -> Parser GetSubscriptionSchedulesParameters
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
"queryStarting_after"))
mkGetSubscriptionSchedulesParameters :: GetSubscriptionSchedulesParameters
mkGetSubscriptionSchedulesParameters :: GetSubscriptionSchedulesParameters
mkGetSubscriptionSchedulesParameters =
GetSubscriptionSchedulesParameters :: Maybe GetSubscriptionSchedulesParametersQueryCanceledAt'Variants
-> Maybe
GetSubscriptionSchedulesParametersQueryCompletedAt'Variants
-> Maybe GetSubscriptionSchedulesParametersQueryCreated'Variants
-> Maybe Text
-> Maybe Text
-> Maybe [Text]
-> Maybe Int
-> Maybe GetSubscriptionSchedulesParametersQueryReleasedAt'Variants
-> Maybe Bool
-> Maybe Text
-> GetSubscriptionSchedulesParameters
GetSubscriptionSchedulesParameters
{ getSubscriptionSchedulesParametersQueryCanceledAt :: Maybe GetSubscriptionSchedulesParametersQueryCanceledAt'Variants
getSubscriptionSchedulesParametersQueryCanceledAt = Maybe GetSubscriptionSchedulesParametersQueryCanceledAt'Variants
forall a. Maybe a
GHC.Maybe.Nothing,
getSubscriptionSchedulesParametersQueryCompletedAt :: Maybe GetSubscriptionSchedulesParametersQueryCompletedAt'Variants
getSubscriptionSchedulesParametersQueryCompletedAt = Maybe GetSubscriptionSchedulesParametersQueryCompletedAt'Variants
forall a. Maybe a
GHC.Maybe.Nothing,
getSubscriptionSchedulesParametersQueryCreated :: Maybe GetSubscriptionSchedulesParametersQueryCreated'Variants
getSubscriptionSchedulesParametersQueryCreated = Maybe GetSubscriptionSchedulesParametersQueryCreated'Variants
forall a. Maybe a
GHC.Maybe.Nothing,
getSubscriptionSchedulesParametersQueryCustomer :: Maybe Text
getSubscriptionSchedulesParametersQueryCustomer = Maybe Text
forall a. Maybe a
GHC.Maybe.Nothing,
getSubscriptionSchedulesParametersQueryEndingBefore :: Maybe Text
getSubscriptionSchedulesParametersQueryEndingBefore = Maybe Text
forall a. Maybe a
GHC.Maybe.Nothing,
getSubscriptionSchedulesParametersQueryExpand :: Maybe [Text]
getSubscriptionSchedulesParametersQueryExpand = Maybe [Text]
forall a. Maybe a
GHC.Maybe.Nothing,
getSubscriptionSchedulesParametersQueryLimit :: Maybe Int
getSubscriptionSchedulesParametersQueryLimit = Maybe Int
forall a. Maybe a
GHC.Maybe.Nothing,
getSubscriptionSchedulesParametersQueryReleasedAt :: Maybe GetSubscriptionSchedulesParametersQueryReleasedAt'Variants
getSubscriptionSchedulesParametersQueryReleasedAt = Maybe GetSubscriptionSchedulesParametersQueryReleasedAt'Variants
forall a. Maybe a
GHC.Maybe.Nothing,
getSubscriptionSchedulesParametersQueryScheduled :: Maybe Bool
getSubscriptionSchedulesParametersQueryScheduled = Maybe Bool
forall a. Maybe a
GHC.Maybe.Nothing,
getSubscriptionSchedulesParametersQueryStartingAfter :: Maybe Text
getSubscriptionSchedulesParametersQueryStartingAfter = Maybe Text
forall a. Maybe a
GHC.Maybe.Nothing
}
data GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1 = GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1
{
GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1
-> Maybe Int
getSubscriptionSchedulesParametersQueryCanceledAt'OneOf1Gt :: (GHC.Maybe.Maybe GHC.Types.Int),
GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1
-> Maybe Int
getSubscriptionSchedulesParametersQueryCanceledAt'OneOf1Gte :: (GHC.Maybe.Maybe GHC.Types.Int),
GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1
-> Maybe Int
getSubscriptionSchedulesParametersQueryCanceledAt'OneOf1Lt :: (GHC.Maybe.Maybe GHC.Types.Int),
GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1
-> Maybe Int
getSubscriptionSchedulesParametersQueryCanceledAt'OneOf1Lte :: (GHC.Maybe.Maybe GHC.Types.Int)
}
deriving
( Int
-> GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1
-> ShowS
[GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1] -> ShowS
GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1 -> String
(Int
-> GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1
-> ShowS)
-> (GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1
-> String)
-> ([GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1]
-> ShowS)
-> Show GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1] -> ShowS
$cshowList :: [GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1] -> ShowS
show :: GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1 -> String
$cshow :: GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1 -> String
showsPrec :: Int
-> GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1
-> ShowS
$cshowsPrec :: Int
-> GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1
-> ShowS
GHC.Show.Show,
GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1
-> GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1 -> Bool
(GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1
-> GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1
-> Bool)
-> (GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1
-> GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1
-> Bool)
-> Eq GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1
-> GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1 -> Bool
$c/= :: GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1
-> GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1 -> Bool
== :: GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1
-> GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1 -> Bool
$c== :: GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1
-> GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1 -> Bool
GHC.Classes.Eq
)
instance Data.Aeson.Types.ToJSON.ToJSON GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1 where
toJSON :: GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1 -> Value
toJSON GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1
obj = [Pair] -> Value
Data.Aeson.Types.Internal.object (Text
"gt" Text -> Maybe Int -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1
-> Maybe Int
getSubscriptionSchedulesParametersQueryCanceledAt'OneOf1Gt GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"gte" Text -> Maybe Int -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1
-> Maybe Int
getSubscriptionSchedulesParametersQueryCanceledAt'OneOf1Gte GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"lt" Text -> Maybe Int -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1
-> Maybe Int
getSubscriptionSchedulesParametersQueryCanceledAt'OneOf1Lt GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"lte" Text -> Maybe Int -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1
-> Maybe Int
getSubscriptionSchedulesParametersQueryCanceledAt'OneOf1Lte GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: [Pair]
forall a. Monoid a => a
GHC.Base.mempty)
toEncoding :: GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1
-> Encoding
toEncoding GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1
obj = Series -> Encoding
Data.Aeson.Encoding.Internal.pairs ((Text
"gt" Text -> Maybe Int -> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1
-> Maybe Int
getSubscriptionSchedulesParametersQueryCanceledAt'OneOf1Gt GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> ((Text
"gte" Text -> Maybe Int -> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1
-> Maybe Int
getSubscriptionSchedulesParametersQueryCanceledAt'OneOf1Gte GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> ((Text
"lt" Text -> Maybe Int -> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1
-> Maybe Int
getSubscriptionSchedulesParametersQueryCanceledAt'OneOf1Lt GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> (Text
"lte" Text -> Maybe Int -> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1
-> Maybe Int
getSubscriptionSchedulesParametersQueryCanceledAt'OneOf1Lte GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1
obj))))
instance Data.Aeson.Types.FromJSON.FromJSON GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1 where
parseJSON :: Value
-> Parser GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1
parseJSON = String
-> (Object
-> Parser GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1)
-> Value
-> Parser GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1
forall a. String -> (Object -> Parser a) -> Value -> Parser a
Data.Aeson.Types.FromJSON.withObject String
"GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1" (\Object
obj -> ((((Maybe Int
-> Maybe Int
-> Maybe Int
-> Maybe Int
-> GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1)
-> Parser
(Maybe Int
-> Maybe Int
-> Maybe Int
-> Maybe Int
-> GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1)
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure Maybe Int
-> Maybe Int
-> Maybe Int
-> Maybe Int
-> GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1
GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1 Parser
(Maybe Int
-> Maybe Int
-> Maybe Int
-> Maybe Int
-> GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1)
-> Parser (Maybe Int)
-> Parser
(Maybe Int
-> Maybe Int
-> Maybe Int
-> GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object -> Text -> Parser (Maybe Int)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Data.Aeson.Types.FromJSON..:? Text
"gt")) Parser
(Maybe Int
-> Maybe Int
-> Maybe Int
-> GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1)
-> Parser (Maybe Int)
-> Parser
(Maybe Int
-> Maybe Int
-> GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object -> Text -> Parser (Maybe Int)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Data.Aeson.Types.FromJSON..:? Text
"gte")) Parser
(Maybe Int
-> Maybe Int
-> GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1)
-> Parser (Maybe Int)
-> Parser
(Maybe Int
-> GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object -> Text -> Parser (Maybe Int)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Data.Aeson.Types.FromJSON..:? Text
"lt")) Parser
(Maybe Int
-> GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1)
-> Parser (Maybe Int)
-> Parser GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object -> Text -> Parser (Maybe Int)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Data.Aeson.Types.FromJSON..:? Text
"lte"))
mkGetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1 :: GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1
mkGetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1 :: GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1
mkGetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1 =
GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1 :: Maybe Int
-> Maybe Int
-> Maybe Int
-> Maybe Int
-> GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1
GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1
{ getSubscriptionSchedulesParametersQueryCanceledAt'OneOf1Gt :: Maybe Int
getSubscriptionSchedulesParametersQueryCanceledAt'OneOf1Gt = Maybe Int
forall a. Maybe a
GHC.Maybe.Nothing,
getSubscriptionSchedulesParametersQueryCanceledAt'OneOf1Gte :: Maybe Int
getSubscriptionSchedulesParametersQueryCanceledAt'OneOf1Gte = Maybe Int
forall a. Maybe a
GHC.Maybe.Nothing,
getSubscriptionSchedulesParametersQueryCanceledAt'OneOf1Lt :: Maybe Int
getSubscriptionSchedulesParametersQueryCanceledAt'OneOf1Lt = Maybe Int
forall a. Maybe a
GHC.Maybe.Nothing,
getSubscriptionSchedulesParametersQueryCanceledAt'OneOf1Lte :: Maybe Int
getSubscriptionSchedulesParametersQueryCanceledAt'OneOf1Lte = Maybe Int
forall a. Maybe a
GHC.Maybe.Nothing
}
data GetSubscriptionSchedulesParametersQueryCanceledAt'Variants
= GetSubscriptionSchedulesParametersQueryCanceledAt'GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1 GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1
| GetSubscriptionSchedulesParametersQueryCanceledAt'Int GHC.Types.Int
deriving (Int
-> GetSubscriptionSchedulesParametersQueryCanceledAt'Variants
-> ShowS
[GetSubscriptionSchedulesParametersQueryCanceledAt'Variants]
-> ShowS
GetSubscriptionSchedulesParametersQueryCanceledAt'Variants
-> String
(Int
-> GetSubscriptionSchedulesParametersQueryCanceledAt'Variants
-> ShowS)
-> (GetSubscriptionSchedulesParametersQueryCanceledAt'Variants
-> String)
-> ([GetSubscriptionSchedulesParametersQueryCanceledAt'Variants]
-> ShowS)
-> Show GetSubscriptionSchedulesParametersQueryCanceledAt'Variants
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [GetSubscriptionSchedulesParametersQueryCanceledAt'Variants]
-> ShowS
$cshowList :: [GetSubscriptionSchedulesParametersQueryCanceledAt'Variants]
-> ShowS
show :: GetSubscriptionSchedulesParametersQueryCanceledAt'Variants
-> String
$cshow :: GetSubscriptionSchedulesParametersQueryCanceledAt'Variants
-> String
showsPrec :: Int
-> GetSubscriptionSchedulesParametersQueryCanceledAt'Variants
-> ShowS
$cshowsPrec :: Int
-> GetSubscriptionSchedulesParametersQueryCanceledAt'Variants
-> ShowS
GHC.Show.Show, GetSubscriptionSchedulesParametersQueryCanceledAt'Variants
-> GetSubscriptionSchedulesParametersQueryCanceledAt'Variants
-> Bool
(GetSubscriptionSchedulesParametersQueryCanceledAt'Variants
-> GetSubscriptionSchedulesParametersQueryCanceledAt'Variants
-> Bool)
-> (GetSubscriptionSchedulesParametersQueryCanceledAt'Variants
-> GetSubscriptionSchedulesParametersQueryCanceledAt'Variants
-> Bool)
-> Eq GetSubscriptionSchedulesParametersQueryCanceledAt'Variants
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: GetSubscriptionSchedulesParametersQueryCanceledAt'Variants
-> GetSubscriptionSchedulesParametersQueryCanceledAt'Variants
-> Bool
$c/= :: GetSubscriptionSchedulesParametersQueryCanceledAt'Variants
-> GetSubscriptionSchedulesParametersQueryCanceledAt'Variants
-> Bool
== :: GetSubscriptionSchedulesParametersQueryCanceledAt'Variants
-> GetSubscriptionSchedulesParametersQueryCanceledAt'Variants
-> Bool
$c== :: GetSubscriptionSchedulesParametersQueryCanceledAt'Variants
-> GetSubscriptionSchedulesParametersQueryCanceledAt'Variants
-> Bool
GHC.Classes.Eq)
instance Data.Aeson.Types.ToJSON.ToJSON GetSubscriptionSchedulesParametersQueryCanceledAt'Variants where
toJSON :: GetSubscriptionSchedulesParametersQueryCanceledAt'Variants -> Value
toJSON (GetSubscriptionSchedulesParametersQueryCanceledAt'GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1 GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1
a) = GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1 -> Value
forall a. ToJSON a => a -> Value
Data.Aeson.Types.ToJSON.toJSON GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1
a
toJSON (GetSubscriptionSchedulesParametersQueryCanceledAt'Int Int
a) = Int -> Value
forall a. ToJSON a => a -> Value
Data.Aeson.Types.ToJSON.toJSON Int
a
instance Data.Aeson.Types.FromJSON.FromJSON GetSubscriptionSchedulesParametersQueryCanceledAt'Variants where
parseJSON :: Value
-> Parser
GetSubscriptionSchedulesParametersQueryCanceledAt'Variants
parseJSON Value
val = case (GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1
-> GetSubscriptionSchedulesParametersQueryCanceledAt'Variants
GetSubscriptionSchedulesParametersQueryCanceledAt'GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1 (GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1
-> GetSubscriptionSchedulesParametersQueryCanceledAt'Variants)
-> Result GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1
-> Result
GetSubscriptionSchedulesParametersQueryCanceledAt'Variants
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Data.Functor.<$> Value
-> Result GetSubscriptionSchedulesParametersQueryCanceledAt'OneOf1
forall a. FromJSON a => Value -> Result a
Data.Aeson.Types.FromJSON.fromJSON Value
val) Result GetSubscriptionSchedulesParametersQueryCanceledAt'Variants
-> Result
GetSubscriptionSchedulesParametersQueryCanceledAt'Variants
-> Result
GetSubscriptionSchedulesParametersQueryCanceledAt'Variants
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
GHC.Base.<|> ((Int -> GetSubscriptionSchedulesParametersQueryCanceledAt'Variants
GetSubscriptionSchedulesParametersQueryCanceledAt'Int (Int -> GetSubscriptionSchedulesParametersQueryCanceledAt'Variants)
-> Result Int
-> Result
GetSubscriptionSchedulesParametersQueryCanceledAt'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 GetSubscriptionSchedulesParametersQueryCanceledAt'Variants
-> Result
GetSubscriptionSchedulesParametersQueryCanceledAt'Variants
-> Result
GetSubscriptionSchedulesParametersQueryCanceledAt'Variants
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
GHC.Base.<|> String
-> Result
GetSubscriptionSchedulesParametersQueryCanceledAt'Variants
forall a. String -> Result a
Data.Aeson.Types.Internal.Error String
"No variant matched") of
Data.Aeson.Types.Internal.Success GetSubscriptionSchedulesParametersQueryCanceledAt'Variants
a -> GetSubscriptionSchedulesParametersQueryCanceledAt'Variants
-> Parser
GetSubscriptionSchedulesParametersQueryCanceledAt'Variants
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure GetSubscriptionSchedulesParametersQueryCanceledAt'Variants
a
Data.Aeson.Types.Internal.Error String
a -> String
-> Parser
GetSubscriptionSchedulesParametersQueryCanceledAt'Variants
forall (m :: * -> *) a. MonadFail m => String -> m a
Control.Monad.Fail.fail String
a
data GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1 = GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1
{
GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1
-> Maybe Int
getSubscriptionSchedulesParametersQueryCompletedAt'OneOf1Gt :: (GHC.Maybe.Maybe GHC.Types.Int),
GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1
-> Maybe Int
getSubscriptionSchedulesParametersQueryCompletedAt'OneOf1Gte :: (GHC.Maybe.Maybe GHC.Types.Int),
GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1
-> Maybe Int
getSubscriptionSchedulesParametersQueryCompletedAt'OneOf1Lt :: (GHC.Maybe.Maybe GHC.Types.Int),
GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1
-> Maybe Int
getSubscriptionSchedulesParametersQueryCompletedAt'OneOf1Lte :: (GHC.Maybe.Maybe GHC.Types.Int)
}
deriving
( Int
-> GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1
-> ShowS
[GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1]
-> ShowS
GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1 -> String
(Int
-> GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1
-> ShowS)
-> (GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1
-> String)
-> ([GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1]
-> ShowS)
-> Show GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1]
-> ShowS
$cshowList :: [GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1]
-> ShowS
show :: GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1 -> String
$cshow :: GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1 -> String
showsPrec :: Int
-> GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1
-> ShowS
$cshowsPrec :: Int
-> GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1
-> ShowS
GHC.Show.Show,
GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1
-> GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1
-> Bool
(GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1
-> GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1
-> Bool)
-> (GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1
-> GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1
-> Bool)
-> Eq GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1
-> GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1
-> Bool
$c/= :: GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1
-> GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1
-> Bool
== :: GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1
-> GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1
-> Bool
$c== :: GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1
-> GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1
-> Bool
GHC.Classes.Eq
)
instance Data.Aeson.Types.ToJSON.ToJSON GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1 where
toJSON :: GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1 -> Value
toJSON GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1
obj = [Pair] -> Value
Data.Aeson.Types.Internal.object (Text
"gt" Text -> Maybe Int -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1
-> Maybe Int
getSubscriptionSchedulesParametersQueryCompletedAt'OneOf1Gt GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"gte" Text -> Maybe Int -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1
-> Maybe Int
getSubscriptionSchedulesParametersQueryCompletedAt'OneOf1Gte GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"lt" Text -> Maybe Int -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1
-> Maybe Int
getSubscriptionSchedulesParametersQueryCompletedAt'OneOf1Lt GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"lte" Text -> Maybe Int -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1
-> Maybe Int
getSubscriptionSchedulesParametersQueryCompletedAt'OneOf1Lte GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: [Pair]
forall a. Monoid a => a
GHC.Base.mempty)
toEncoding :: GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1
-> Encoding
toEncoding GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1
obj = Series -> Encoding
Data.Aeson.Encoding.Internal.pairs ((Text
"gt" Text -> Maybe Int -> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1
-> Maybe Int
getSubscriptionSchedulesParametersQueryCompletedAt'OneOf1Gt GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> ((Text
"gte" Text -> Maybe Int -> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1
-> Maybe Int
getSubscriptionSchedulesParametersQueryCompletedAt'OneOf1Gte GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> ((Text
"lt" Text -> Maybe Int -> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1
-> Maybe Int
getSubscriptionSchedulesParametersQueryCompletedAt'OneOf1Lt GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> (Text
"lte" Text -> Maybe Int -> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1
-> Maybe Int
getSubscriptionSchedulesParametersQueryCompletedAt'OneOf1Lte GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1
obj))))
instance Data.Aeson.Types.FromJSON.FromJSON GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1 where
parseJSON :: Value
-> Parser GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1
parseJSON = String
-> (Object
-> Parser
GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1)
-> Value
-> Parser GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1
forall a. String -> (Object -> Parser a) -> Value -> Parser a
Data.Aeson.Types.FromJSON.withObject String
"GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1" (\Object
obj -> ((((Maybe Int
-> Maybe Int
-> Maybe Int
-> Maybe Int
-> GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1)
-> Parser
(Maybe Int
-> Maybe Int
-> Maybe Int
-> Maybe Int
-> GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1)
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure Maybe Int
-> Maybe Int
-> Maybe Int
-> Maybe Int
-> GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1
GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1 Parser
(Maybe Int
-> Maybe Int
-> Maybe Int
-> Maybe Int
-> GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1)
-> Parser (Maybe Int)
-> Parser
(Maybe Int
-> Maybe Int
-> Maybe Int
-> GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object -> Text -> Parser (Maybe Int)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Data.Aeson.Types.FromJSON..:? Text
"gt")) Parser
(Maybe Int
-> Maybe Int
-> Maybe Int
-> GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1)
-> Parser (Maybe Int)
-> Parser
(Maybe Int
-> Maybe Int
-> GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object -> Text -> Parser (Maybe Int)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Data.Aeson.Types.FromJSON..:? Text
"gte")) Parser
(Maybe Int
-> Maybe Int
-> GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1)
-> Parser (Maybe Int)
-> Parser
(Maybe Int
-> GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object -> Text -> Parser (Maybe Int)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Data.Aeson.Types.FromJSON..:? Text
"lt")) Parser
(Maybe Int
-> GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1)
-> Parser (Maybe Int)
-> Parser GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object -> Text -> Parser (Maybe Int)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Data.Aeson.Types.FromJSON..:? Text
"lte"))
mkGetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1 :: GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1
mkGetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1 :: GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1
mkGetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1 =
GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1 :: Maybe Int
-> Maybe Int
-> Maybe Int
-> Maybe Int
-> GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1
GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1
{ getSubscriptionSchedulesParametersQueryCompletedAt'OneOf1Gt :: Maybe Int
getSubscriptionSchedulesParametersQueryCompletedAt'OneOf1Gt = Maybe Int
forall a. Maybe a
GHC.Maybe.Nothing,
getSubscriptionSchedulesParametersQueryCompletedAt'OneOf1Gte :: Maybe Int
getSubscriptionSchedulesParametersQueryCompletedAt'OneOf1Gte = Maybe Int
forall a. Maybe a
GHC.Maybe.Nothing,
getSubscriptionSchedulesParametersQueryCompletedAt'OneOf1Lt :: Maybe Int
getSubscriptionSchedulesParametersQueryCompletedAt'OneOf1Lt = Maybe Int
forall a. Maybe a
GHC.Maybe.Nothing,
getSubscriptionSchedulesParametersQueryCompletedAt'OneOf1Lte :: Maybe Int
getSubscriptionSchedulesParametersQueryCompletedAt'OneOf1Lte = Maybe Int
forall a. Maybe a
GHC.Maybe.Nothing
}
data GetSubscriptionSchedulesParametersQueryCompletedAt'Variants
= GetSubscriptionSchedulesParametersQueryCompletedAt'GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1 GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1
| GetSubscriptionSchedulesParametersQueryCompletedAt'Int GHC.Types.Int
deriving (Int
-> GetSubscriptionSchedulesParametersQueryCompletedAt'Variants
-> ShowS
[GetSubscriptionSchedulesParametersQueryCompletedAt'Variants]
-> ShowS
GetSubscriptionSchedulesParametersQueryCompletedAt'Variants
-> String
(Int
-> GetSubscriptionSchedulesParametersQueryCompletedAt'Variants
-> ShowS)
-> (GetSubscriptionSchedulesParametersQueryCompletedAt'Variants
-> String)
-> ([GetSubscriptionSchedulesParametersQueryCompletedAt'Variants]
-> ShowS)
-> Show GetSubscriptionSchedulesParametersQueryCompletedAt'Variants
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [GetSubscriptionSchedulesParametersQueryCompletedAt'Variants]
-> ShowS
$cshowList :: [GetSubscriptionSchedulesParametersQueryCompletedAt'Variants]
-> ShowS
show :: GetSubscriptionSchedulesParametersQueryCompletedAt'Variants
-> String
$cshow :: GetSubscriptionSchedulesParametersQueryCompletedAt'Variants
-> String
showsPrec :: Int
-> GetSubscriptionSchedulesParametersQueryCompletedAt'Variants
-> ShowS
$cshowsPrec :: Int
-> GetSubscriptionSchedulesParametersQueryCompletedAt'Variants
-> ShowS
GHC.Show.Show, GetSubscriptionSchedulesParametersQueryCompletedAt'Variants
-> GetSubscriptionSchedulesParametersQueryCompletedAt'Variants
-> Bool
(GetSubscriptionSchedulesParametersQueryCompletedAt'Variants
-> GetSubscriptionSchedulesParametersQueryCompletedAt'Variants
-> Bool)
-> (GetSubscriptionSchedulesParametersQueryCompletedAt'Variants
-> GetSubscriptionSchedulesParametersQueryCompletedAt'Variants
-> Bool)
-> Eq GetSubscriptionSchedulesParametersQueryCompletedAt'Variants
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: GetSubscriptionSchedulesParametersQueryCompletedAt'Variants
-> GetSubscriptionSchedulesParametersQueryCompletedAt'Variants
-> Bool
$c/= :: GetSubscriptionSchedulesParametersQueryCompletedAt'Variants
-> GetSubscriptionSchedulesParametersQueryCompletedAt'Variants
-> Bool
== :: GetSubscriptionSchedulesParametersQueryCompletedAt'Variants
-> GetSubscriptionSchedulesParametersQueryCompletedAt'Variants
-> Bool
$c== :: GetSubscriptionSchedulesParametersQueryCompletedAt'Variants
-> GetSubscriptionSchedulesParametersQueryCompletedAt'Variants
-> Bool
GHC.Classes.Eq)
instance Data.Aeson.Types.ToJSON.ToJSON GetSubscriptionSchedulesParametersQueryCompletedAt'Variants where
toJSON :: GetSubscriptionSchedulesParametersQueryCompletedAt'Variants
-> Value
toJSON (GetSubscriptionSchedulesParametersQueryCompletedAt'GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1 GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1
a) = GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1 -> Value
forall a. ToJSON a => a -> Value
Data.Aeson.Types.ToJSON.toJSON GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1
a
toJSON (GetSubscriptionSchedulesParametersQueryCompletedAt'Int Int
a) = Int -> Value
forall a. ToJSON a => a -> Value
Data.Aeson.Types.ToJSON.toJSON Int
a
instance Data.Aeson.Types.FromJSON.FromJSON GetSubscriptionSchedulesParametersQueryCompletedAt'Variants where
parseJSON :: Value
-> Parser
GetSubscriptionSchedulesParametersQueryCompletedAt'Variants
parseJSON Value
val = case (GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1
-> GetSubscriptionSchedulesParametersQueryCompletedAt'Variants
GetSubscriptionSchedulesParametersQueryCompletedAt'GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1 (GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1
-> GetSubscriptionSchedulesParametersQueryCompletedAt'Variants)
-> Result GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1
-> Result
GetSubscriptionSchedulesParametersQueryCompletedAt'Variants
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Data.Functor.<$> Value
-> Result GetSubscriptionSchedulesParametersQueryCompletedAt'OneOf1
forall a. FromJSON a => Value -> Result a
Data.Aeson.Types.FromJSON.fromJSON Value
val) Result GetSubscriptionSchedulesParametersQueryCompletedAt'Variants
-> Result
GetSubscriptionSchedulesParametersQueryCompletedAt'Variants
-> Result
GetSubscriptionSchedulesParametersQueryCompletedAt'Variants
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
GHC.Base.<|> ((Int -> GetSubscriptionSchedulesParametersQueryCompletedAt'Variants
GetSubscriptionSchedulesParametersQueryCompletedAt'Int (Int
-> GetSubscriptionSchedulesParametersQueryCompletedAt'Variants)
-> Result Int
-> Result
GetSubscriptionSchedulesParametersQueryCompletedAt'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 GetSubscriptionSchedulesParametersQueryCompletedAt'Variants
-> Result
GetSubscriptionSchedulesParametersQueryCompletedAt'Variants
-> Result
GetSubscriptionSchedulesParametersQueryCompletedAt'Variants
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
GHC.Base.<|> String
-> Result
GetSubscriptionSchedulesParametersQueryCompletedAt'Variants
forall a. String -> Result a
Data.Aeson.Types.Internal.Error String
"No variant matched") of
Data.Aeson.Types.Internal.Success GetSubscriptionSchedulesParametersQueryCompletedAt'Variants
a -> GetSubscriptionSchedulesParametersQueryCompletedAt'Variants
-> Parser
GetSubscriptionSchedulesParametersQueryCompletedAt'Variants
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure GetSubscriptionSchedulesParametersQueryCompletedAt'Variants
a
Data.Aeson.Types.Internal.Error String
a -> String
-> Parser
GetSubscriptionSchedulesParametersQueryCompletedAt'Variants
forall (m :: * -> *) a. MonadFail m => String -> m a
Control.Monad.Fail.fail String
a
data GetSubscriptionSchedulesParametersQueryCreated'OneOf1 = GetSubscriptionSchedulesParametersQueryCreated'OneOf1
{
GetSubscriptionSchedulesParametersQueryCreated'OneOf1 -> Maybe Int
getSubscriptionSchedulesParametersQueryCreated'OneOf1Gt :: (GHC.Maybe.Maybe GHC.Types.Int),
GetSubscriptionSchedulesParametersQueryCreated'OneOf1 -> Maybe Int
getSubscriptionSchedulesParametersQueryCreated'OneOf1Gte :: (GHC.Maybe.Maybe GHC.Types.Int),
GetSubscriptionSchedulesParametersQueryCreated'OneOf1 -> Maybe Int
getSubscriptionSchedulesParametersQueryCreated'OneOf1Lt :: (GHC.Maybe.Maybe GHC.Types.Int),
GetSubscriptionSchedulesParametersQueryCreated'OneOf1 -> Maybe Int
getSubscriptionSchedulesParametersQueryCreated'OneOf1Lte :: (GHC.Maybe.Maybe GHC.Types.Int)
}
deriving
( Int
-> GetSubscriptionSchedulesParametersQueryCreated'OneOf1 -> ShowS
[GetSubscriptionSchedulesParametersQueryCreated'OneOf1] -> ShowS
GetSubscriptionSchedulesParametersQueryCreated'OneOf1 -> String
(Int
-> GetSubscriptionSchedulesParametersQueryCreated'OneOf1 -> ShowS)
-> (GetSubscriptionSchedulesParametersQueryCreated'OneOf1
-> String)
-> ([GetSubscriptionSchedulesParametersQueryCreated'OneOf1]
-> ShowS)
-> Show GetSubscriptionSchedulesParametersQueryCreated'OneOf1
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [GetSubscriptionSchedulesParametersQueryCreated'OneOf1] -> ShowS
$cshowList :: [GetSubscriptionSchedulesParametersQueryCreated'OneOf1] -> ShowS
show :: GetSubscriptionSchedulesParametersQueryCreated'OneOf1 -> String
$cshow :: GetSubscriptionSchedulesParametersQueryCreated'OneOf1 -> String
showsPrec :: Int
-> GetSubscriptionSchedulesParametersQueryCreated'OneOf1 -> ShowS
$cshowsPrec :: Int
-> GetSubscriptionSchedulesParametersQueryCreated'OneOf1 -> ShowS
GHC.Show.Show,
GetSubscriptionSchedulesParametersQueryCreated'OneOf1
-> GetSubscriptionSchedulesParametersQueryCreated'OneOf1 -> Bool
(GetSubscriptionSchedulesParametersQueryCreated'OneOf1
-> GetSubscriptionSchedulesParametersQueryCreated'OneOf1 -> Bool)
-> (GetSubscriptionSchedulesParametersQueryCreated'OneOf1
-> GetSubscriptionSchedulesParametersQueryCreated'OneOf1 -> Bool)
-> Eq GetSubscriptionSchedulesParametersQueryCreated'OneOf1
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: GetSubscriptionSchedulesParametersQueryCreated'OneOf1
-> GetSubscriptionSchedulesParametersQueryCreated'OneOf1 -> Bool
$c/= :: GetSubscriptionSchedulesParametersQueryCreated'OneOf1
-> GetSubscriptionSchedulesParametersQueryCreated'OneOf1 -> Bool
== :: GetSubscriptionSchedulesParametersQueryCreated'OneOf1
-> GetSubscriptionSchedulesParametersQueryCreated'OneOf1 -> Bool
$c== :: GetSubscriptionSchedulesParametersQueryCreated'OneOf1
-> GetSubscriptionSchedulesParametersQueryCreated'OneOf1 -> Bool
GHC.Classes.Eq
)
instance Data.Aeson.Types.ToJSON.ToJSON GetSubscriptionSchedulesParametersQueryCreated'OneOf1 where
toJSON :: GetSubscriptionSchedulesParametersQueryCreated'OneOf1 -> Value
toJSON GetSubscriptionSchedulesParametersQueryCreated'OneOf1
obj = [Pair] -> Value
Data.Aeson.Types.Internal.object (Text
"gt" Text -> Maybe Int -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= GetSubscriptionSchedulesParametersQueryCreated'OneOf1 -> Maybe Int
getSubscriptionSchedulesParametersQueryCreated'OneOf1Gt GetSubscriptionSchedulesParametersQueryCreated'OneOf1
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"gte" Text -> Maybe Int -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= GetSubscriptionSchedulesParametersQueryCreated'OneOf1 -> Maybe Int
getSubscriptionSchedulesParametersQueryCreated'OneOf1Gte GetSubscriptionSchedulesParametersQueryCreated'OneOf1
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"lt" Text -> Maybe Int -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= GetSubscriptionSchedulesParametersQueryCreated'OneOf1 -> Maybe Int
getSubscriptionSchedulesParametersQueryCreated'OneOf1Lt GetSubscriptionSchedulesParametersQueryCreated'OneOf1
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"lte" Text -> Maybe Int -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= GetSubscriptionSchedulesParametersQueryCreated'OneOf1 -> Maybe Int
getSubscriptionSchedulesParametersQueryCreated'OneOf1Lte GetSubscriptionSchedulesParametersQueryCreated'OneOf1
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: [Pair]
forall a. Monoid a => a
GHC.Base.mempty)
toEncoding :: GetSubscriptionSchedulesParametersQueryCreated'OneOf1 -> Encoding
toEncoding GetSubscriptionSchedulesParametersQueryCreated'OneOf1
obj = Series -> Encoding
Data.Aeson.Encoding.Internal.pairs ((Text
"gt" Text -> Maybe Int -> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= GetSubscriptionSchedulesParametersQueryCreated'OneOf1 -> Maybe Int
getSubscriptionSchedulesParametersQueryCreated'OneOf1Gt GetSubscriptionSchedulesParametersQueryCreated'OneOf1
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> ((Text
"gte" Text -> Maybe Int -> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= GetSubscriptionSchedulesParametersQueryCreated'OneOf1 -> Maybe Int
getSubscriptionSchedulesParametersQueryCreated'OneOf1Gte GetSubscriptionSchedulesParametersQueryCreated'OneOf1
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> ((Text
"lt" Text -> Maybe Int -> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= GetSubscriptionSchedulesParametersQueryCreated'OneOf1 -> Maybe Int
getSubscriptionSchedulesParametersQueryCreated'OneOf1Lt GetSubscriptionSchedulesParametersQueryCreated'OneOf1
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> (Text
"lte" Text -> Maybe Int -> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= GetSubscriptionSchedulesParametersQueryCreated'OneOf1 -> Maybe Int
getSubscriptionSchedulesParametersQueryCreated'OneOf1Lte GetSubscriptionSchedulesParametersQueryCreated'OneOf1
obj))))
instance Data.Aeson.Types.FromJSON.FromJSON GetSubscriptionSchedulesParametersQueryCreated'OneOf1 where
parseJSON :: Value
-> Parser GetSubscriptionSchedulesParametersQueryCreated'OneOf1
parseJSON = String
-> (Object
-> Parser GetSubscriptionSchedulesParametersQueryCreated'OneOf1)
-> Value
-> Parser GetSubscriptionSchedulesParametersQueryCreated'OneOf1
forall a. String -> (Object -> Parser a) -> Value -> Parser a
Data.Aeson.Types.FromJSON.withObject String
"GetSubscriptionSchedulesParametersQueryCreated'OneOf1" (\Object
obj -> ((((Maybe Int
-> Maybe Int
-> Maybe Int
-> Maybe Int
-> GetSubscriptionSchedulesParametersQueryCreated'OneOf1)
-> Parser
(Maybe Int
-> Maybe Int
-> Maybe Int
-> Maybe Int
-> GetSubscriptionSchedulesParametersQueryCreated'OneOf1)
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure Maybe Int
-> Maybe Int
-> Maybe Int
-> Maybe Int
-> GetSubscriptionSchedulesParametersQueryCreated'OneOf1
GetSubscriptionSchedulesParametersQueryCreated'OneOf1 Parser
(Maybe Int
-> Maybe Int
-> Maybe Int
-> Maybe Int
-> GetSubscriptionSchedulesParametersQueryCreated'OneOf1)
-> Parser (Maybe Int)
-> Parser
(Maybe Int
-> Maybe Int
-> Maybe Int
-> GetSubscriptionSchedulesParametersQueryCreated'OneOf1)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object -> Text -> Parser (Maybe Int)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Data.Aeson.Types.FromJSON..:? Text
"gt")) Parser
(Maybe Int
-> Maybe Int
-> Maybe Int
-> GetSubscriptionSchedulesParametersQueryCreated'OneOf1)
-> Parser (Maybe Int)
-> Parser
(Maybe Int
-> Maybe Int
-> GetSubscriptionSchedulesParametersQueryCreated'OneOf1)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object -> Text -> Parser (Maybe Int)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Data.Aeson.Types.FromJSON..:? Text
"gte")) Parser
(Maybe Int
-> Maybe Int
-> GetSubscriptionSchedulesParametersQueryCreated'OneOf1)
-> Parser (Maybe Int)
-> Parser
(Maybe Int
-> GetSubscriptionSchedulesParametersQueryCreated'OneOf1)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object -> Text -> Parser (Maybe Int)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Data.Aeson.Types.FromJSON..:? Text
"lt")) Parser
(Maybe Int
-> GetSubscriptionSchedulesParametersQueryCreated'OneOf1)
-> Parser (Maybe Int)
-> Parser GetSubscriptionSchedulesParametersQueryCreated'OneOf1
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object -> Text -> Parser (Maybe Int)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Data.Aeson.Types.FromJSON..:? Text
"lte"))
mkGetSubscriptionSchedulesParametersQueryCreated'OneOf1 :: GetSubscriptionSchedulesParametersQueryCreated'OneOf1
mkGetSubscriptionSchedulesParametersQueryCreated'OneOf1 :: GetSubscriptionSchedulesParametersQueryCreated'OneOf1
mkGetSubscriptionSchedulesParametersQueryCreated'OneOf1 =
GetSubscriptionSchedulesParametersQueryCreated'OneOf1 :: Maybe Int
-> Maybe Int
-> Maybe Int
-> Maybe Int
-> GetSubscriptionSchedulesParametersQueryCreated'OneOf1
GetSubscriptionSchedulesParametersQueryCreated'OneOf1
{ getSubscriptionSchedulesParametersQueryCreated'OneOf1Gt :: Maybe Int
getSubscriptionSchedulesParametersQueryCreated'OneOf1Gt = Maybe Int
forall a. Maybe a
GHC.Maybe.Nothing,
getSubscriptionSchedulesParametersQueryCreated'OneOf1Gte :: Maybe Int
getSubscriptionSchedulesParametersQueryCreated'OneOf1Gte = Maybe Int
forall a. Maybe a
GHC.Maybe.Nothing,
getSubscriptionSchedulesParametersQueryCreated'OneOf1Lt :: Maybe Int
getSubscriptionSchedulesParametersQueryCreated'OneOf1Lt = Maybe Int
forall a. Maybe a
GHC.Maybe.Nothing,
getSubscriptionSchedulesParametersQueryCreated'OneOf1Lte :: Maybe Int
getSubscriptionSchedulesParametersQueryCreated'OneOf1Lte = Maybe Int
forall a. Maybe a
GHC.Maybe.Nothing
}
data GetSubscriptionSchedulesParametersQueryCreated'Variants
= GetSubscriptionSchedulesParametersQueryCreated'GetSubscriptionSchedulesParametersQueryCreated'OneOf1 GetSubscriptionSchedulesParametersQueryCreated'OneOf1
| GetSubscriptionSchedulesParametersQueryCreated'Int GHC.Types.Int
deriving (Int
-> GetSubscriptionSchedulesParametersQueryCreated'Variants -> ShowS
[GetSubscriptionSchedulesParametersQueryCreated'Variants] -> ShowS
GetSubscriptionSchedulesParametersQueryCreated'Variants -> String
(Int
-> GetSubscriptionSchedulesParametersQueryCreated'Variants
-> ShowS)
-> (GetSubscriptionSchedulesParametersQueryCreated'Variants
-> String)
-> ([GetSubscriptionSchedulesParametersQueryCreated'Variants]
-> ShowS)
-> Show GetSubscriptionSchedulesParametersQueryCreated'Variants
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [GetSubscriptionSchedulesParametersQueryCreated'Variants] -> ShowS
$cshowList :: [GetSubscriptionSchedulesParametersQueryCreated'Variants] -> ShowS
show :: GetSubscriptionSchedulesParametersQueryCreated'Variants -> String
$cshow :: GetSubscriptionSchedulesParametersQueryCreated'Variants -> String
showsPrec :: Int
-> GetSubscriptionSchedulesParametersQueryCreated'Variants -> ShowS
$cshowsPrec :: Int
-> GetSubscriptionSchedulesParametersQueryCreated'Variants -> ShowS
GHC.Show.Show, GetSubscriptionSchedulesParametersQueryCreated'Variants
-> GetSubscriptionSchedulesParametersQueryCreated'Variants -> Bool
(GetSubscriptionSchedulesParametersQueryCreated'Variants
-> GetSubscriptionSchedulesParametersQueryCreated'Variants -> Bool)
-> (GetSubscriptionSchedulesParametersQueryCreated'Variants
-> GetSubscriptionSchedulesParametersQueryCreated'Variants -> Bool)
-> Eq GetSubscriptionSchedulesParametersQueryCreated'Variants
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: GetSubscriptionSchedulesParametersQueryCreated'Variants
-> GetSubscriptionSchedulesParametersQueryCreated'Variants -> Bool
$c/= :: GetSubscriptionSchedulesParametersQueryCreated'Variants
-> GetSubscriptionSchedulesParametersQueryCreated'Variants -> Bool
== :: GetSubscriptionSchedulesParametersQueryCreated'Variants
-> GetSubscriptionSchedulesParametersQueryCreated'Variants -> Bool
$c== :: GetSubscriptionSchedulesParametersQueryCreated'Variants
-> GetSubscriptionSchedulesParametersQueryCreated'Variants -> Bool
GHC.Classes.Eq)
instance Data.Aeson.Types.ToJSON.ToJSON GetSubscriptionSchedulesParametersQueryCreated'Variants where
toJSON :: GetSubscriptionSchedulesParametersQueryCreated'Variants -> Value
toJSON (GetSubscriptionSchedulesParametersQueryCreated'GetSubscriptionSchedulesParametersQueryCreated'OneOf1 GetSubscriptionSchedulesParametersQueryCreated'OneOf1
a) = GetSubscriptionSchedulesParametersQueryCreated'OneOf1 -> Value
forall a. ToJSON a => a -> Value
Data.Aeson.Types.ToJSON.toJSON GetSubscriptionSchedulesParametersQueryCreated'OneOf1
a
toJSON (GetSubscriptionSchedulesParametersQueryCreated'Int Int
a) = Int -> Value
forall a. ToJSON a => a -> Value
Data.Aeson.Types.ToJSON.toJSON Int
a
instance Data.Aeson.Types.FromJSON.FromJSON GetSubscriptionSchedulesParametersQueryCreated'Variants where
parseJSON :: Value
-> Parser GetSubscriptionSchedulesParametersQueryCreated'Variants
parseJSON Value
val = case (GetSubscriptionSchedulesParametersQueryCreated'OneOf1
-> GetSubscriptionSchedulesParametersQueryCreated'Variants
GetSubscriptionSchedulesParametersQueryCreated'GetSubscriptionSchedulesParametersQueryCreated'OneOf1 (GetSubscriptionSchedulesParametersQueryCreated'OneOf1
-> GetSubscriptionSchedulesParametersQueryCreated'Variants)
-> Result GetSubscriptionSchedulesParametersQueryCreated'OneOf1
-> Result GetSubscriptionSchedulesParametersQueryCreated'Variants
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Data.Functor.<$> Value
-> Result GetSubscriptionSchedulesParametersQueryCreated'OneOf1
forall a. FromJSON a => Value -> Result a
Data.Aeson.Types.FromJSON.fromJSON Value
val) Result GetSubscriptionSchedulesParametersQueryCreated'Variants
-> Result GetSubscriptionSchedulesParametersQueryCreated'Variants
-> Result GetSubscriptionSchedulesParametersQueryCreated'Variants
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
GHC.Base.<|> ((Int -> GetSubscriptionSchedulesParametersQueryCreated'Variants
GetSubscriptionSchedulesParametersQueryCreated'Int (Int -> GetSubscriptionSchedulesParametersQueryCreated'Variants)
-> Result Int
-> Result GetSubscriptionSchedulesParametersQueryCreated'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 GetSubscriptionSchedulesParametersQueryCreated'Variants
-> Result GetSubscriptionSchedulesParametersQueryCreated'Variants
-> Result GetSubscriptionSchedulesParametersQueryCreated'Variants
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
GHC.Base.<|> String
-> Result GetSubscriptionSchedulesParametersQueryCreated'Variants
forall a. String -> Result a
Data.Aeson.Types.Internal.Error String
"No variant matched") of
Data.Aeson.Types.Internal.Success GetSubscriptionSchedulesParametersQueryCreated'Variants
a -> GetSubscriptionSchedulesParametersQueryCreated'Variants
-> Parser GetSubscriptionSchedulesParametersQueryCreated'Variants
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure GetSubscriptionSchedulesParametersQueryCreated'Variants
a
Data.Aeson.Types.Internal.Error String
a -> String
-> Parser GetSubscriptionSchedulesParametersQueryCreated'Variants
forall (m :: * -> *) a. MonadFail m => String -> m a
Control.Monad.Fail.fail String
a
data GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1 = GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1
{
GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1
-> Maybe Int
getSubscriptionSchedulesParametersQueryReleasedAt'OneOf1Gt :: (GHC.Maybe.Maybe GHC.Types.Int),
GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1
-> Maybe Int
getSubscriptionSchedulesParametersQueryReleasedAt'OneOf1Gte :: (GHC.Maybe.Maybe GHC.Types.Int),
GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1
-> Maybe Int
getSubscriptionSchedulesParametersQueryReleasedAt'OneOf1Lt :: (GHC.Maybe.Maybe GHC.Types.Int),
GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1
-> Maybe Int
getSubscriptionSchedulesParametersQueryReleasedAt'OneOf1Lte :: (GHC.Maybe.Maybe GHC.Types.Int)
}
deriving
( Int
-> GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1
-> ShowS
[GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1] -> ShowS
GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1 -> String
(Int
-> GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1
-> ShowS)
-> (GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1
-> String)
-> ([GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1]
-> ShowS)
-> Show GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1] -> ShowS
$cshowList :: [GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1] -> ShowS
show :: GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1 -> String
$cshow :: GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1 -> String
showsPrec :: Int
-> GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1
-> ShowS
$cshowsPrec :: Int
-> GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1
-> ShowS
GHC.Show.Show,
GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1
-> GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1 -> Bool
(GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1
-> GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1
-> Bool)
-> (GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1
-> GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1
-> Bool)
-> Eq GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1
-> GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1 -> Bool
$c/= :: GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1
-> GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1 -> Bool
== :: GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1
-> GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1 -> Bool
$c== :: GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1
-> GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1 -> Bool
GHC.Classes.Eq
)
instance Data.Aeson.Types.ToJSON.ToJSON GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1 where
toJSON :: GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1 -> Value
toJSON GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1
obj = [Pair] -> Value
Data.Aeson.Types.Internal.object (Text
"gt" Text -> Maybe Int -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1
-> Maybe Int
getSubscriptionSchedulesParametersQueryReleasedAt'OneOf1Gt GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"gte" Text -> Maybe Int -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1
-> Maybe Int
getSubscriptionSchedulesParametersQueryReleasedAt'OneOf1Gte GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"lt" Text -> Maybe Int -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1
-> Maybe Int
getSubscriptionSchedulesParametersQueryReleasedAt'OneOf1Lt GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"lte" Text -> Maybe Int -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1
-> Maybe Int
getSubscriptionSchedulesParametersQueryReleasedAt'OneOf1Lte GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: [Pair]
forall a. Monoid a => a
GHC.Base.mempty)
toEncoding :: GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1
-> Encoding
toEncoding GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1
obj = Series -> Encoding
Data.Aeson.Encoding.Internal.pairs ((Text
"gt" Text -> Maybe Int -> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1
-> Maybe Int
getSubscriptionSchedulesParametersQueryReleasedAt'OneOf1Gt GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> ((Text
"gte" Text -> Maybe Int -> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1
-> Maybe Int
getSubscriptionSchedulesParametersQueryReleasedAt'OneOf1Gte GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> ((Text
"lt" Text -> Maybe Int -> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1
-> Maybe Int
getSubscriptionSchedulesParametersQueryReleasedAt'OneOf1Lt GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> (Text
"lte" Text -> Maybe Int -> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1
-> Maybe Int
getSubscriptionSchedulesParametersQueryReleasedAt'OneOf1Lte GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1
obj))))
instance Data.Aeson.Types.FromJSON.FromJSON GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1 where
parseJSON :: Value
-> Parser GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1
parseJSON = String
-> (Object
-> Parser GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1)
-> Value
-> Parser GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1
forall a. String -> (Object -> Parser a) -> Value -> Parser a
Data.Aeson.Types.FromJSON.withObject String
"GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1" (\Object
obj -> ((((Maybe Int
-> Maybe Int
-> Maybe Int
-> Maybe Int
-> GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1)
-> Parser
(Maybe Int
-> Maybe Int
-> Maybe Int
-> Maybe Int
-> GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1)
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure Maybe Int
-> Maybe Int
-> Maybe Int
-> Maybe Int
-> GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1
GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1 Parser
(Maybe Int
-> Maybe Int
-> Maybe Int
-> Maybe Int
-> GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1)
-> Parser (Maybe Int)
-> Parser
(Maybe Int
-> Maybe Int
-> Maybe Int
-> GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object -> Text -> Parser (Maybe Int)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Data.Aeson.Types.FromJSON..:? Text
"gt")) Parser
(Maybe Int
-> Maybe Int
-> Maybe Int
-> GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1)
-> Parser (Maybe Int)
-> Parser
(Maybe Int
-> Maybe Int
-> GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object -> Text -> Parser (Maybe Int)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Data.Aeson.Types.FromJSON..:? Text
"gte")) Parser
(Maybe Int
-> Maybe Int
-> GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1)
-> Parser (Maybe Int)
-> Parser
(Maybe Int
-> GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object -> Text -> Parser (Maybe Int)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Data.Aeson.Types.FromJSON..:? Text
"lt")) Parser
(Maybe Int
-> GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1)
-> Parser (Maybe Int)
-> Parser GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object -> Text -> Parser (Maybe Int)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Data.Aeson.Types.FromJSON..:? Text
"lte"))
mkGetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1 :: GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1
mkGetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1 :: GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1
mkGetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1 =
GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1 :: Maybe Int
-> Maybe Int
-> Maybe Int
-> Maybe Int
-> GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1
GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1
{ getSubscriptionSchedulesParametersQueryReleasedAt'OneOf1Gt :: Maybe Int
getSubscriptionSchedulesParametersQueryReleasedAt'OneOf1Gt = Maybe Int
forall a. Maybe a
GHC.Maybe.Nothing,
getSubscriptionSchedulesParametersQueryReleasedAt'OneOf1Gte :: Maybe Int
getSubscriptionSchedulesParametersQueryReleasedAt'OneOf1Gte = Maybe Int
forall a. Maybe a
GHC.Maybe.Nothing,
getSubscriptionSchedulesParametersQueryReleasedAt'OneOf1Lt :: Maybe Int
getSubscriptionSchedulesParametersQueryReleasedAt'OneOf1Lt = Maybe Int
forall a. Maybe a
GHC.Maybe.Nothing,
getSubscriptionSchedulesParametersQueryReleasedAt'OneOf1Lte :: Maybe Int
getSubscriptionSchedulesParametersQueryReleasedAt'OneOf1Lte = Maybe Int
forall a. Maybe a
GHC.Maybe.Nothing
}
data GetSubscriptionSchedulesParametersQueryReleasedAt'Variants
= GetSubscriptionSchedulesParametersQueryReleasedAt'GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1 GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1
| GetSubscriptionSchedulesParametersQueryReleasedAt'Int GHC.Types.Int
deriving (Int
-> GetSubscriptionSchedulesParametersQueryReleasedAt'Variants
-> ShowS
[GetSubscriptionSchedulesParametersQueryReleasedAt'Variants]
-> ShowS
GetSubscriptionSchedulesParametersQueryReleasedAt'Variants
-> String
(Int
-> GetSubscriptionSchedulesParametersQueryReleasedAt'Variants
-> ShowS)
-> (GetSubscriptionSchedulesParametersQueryReleasedAt'Variants
-> String)
-> ([GetSubscriptionSchedulesParametersQueryReleasedAt'Variants]
-> ShowS)
-> Show GetSubscriptionSchedulesParametersQueryReleasedAt'Variants
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [GetSubscriptionSchedulesParametersQueryReleasedAt'Variants]
-> ShowS
$cshowList :: [GetSubscriptionSchedulesParametersQueryReleasedAt'Variants]
-> ShowS
show :: GetSubscriptionSchedulesParametersQueryReleasedAt'Variants
-> String
$cshow :: GetSubscriptionSchedulesParametersQueryReleasedAt'Variants
-> String
showsPrec :: Int
-> GetSubscriptionSchedulesParametersQueryReleasedAt'Variants
-> ShowS
$cshowsPrec :: Int
-> GetSubscriptionSchedulesParametersQueryReleasedAt'Variants
-> ShowS
GHC.Show.Show, GetSubscriptionSchedulesParametersQueryReleasedAt'Variants
-> GetSubscriptionSchedulesParametersQueryReleasedAt'Variants
-> Bool
(GetSubscriptionSchedulesParametersQueryReleasedAt'Variants
-> GetSubscriptionSchedulesParametersQueryReleasedAt'Variants
-> Bool)
-> (GetSubscriptionSchedulesParametersQueryReleasedAt'Variants
-> GetSubscriptionSchedulesParametersQueryReleasedAt'Variants
-> Bool)
-> Eq GetSubscriptionSchedulesParametersQueryReleasedAt'Variants
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: GetSubscriptionSchedulesParametersQueryReleasedAt'Variants
-> GetSubscriptionSchedulesParametersQueryReleasedAt'Variants
-> Bool
$c/= :: GetSubscriptionSchedulesParametersQueryReleasedAt'Variants
-> GetSubscriptionSchedulesParametersQueryReleasedAt'Variants
-> Bool
== :: GetSubscriptionSchedulesParametersQueryReleasedAt'Variants
-> GetSubscriptionSchedulesParametersQueryReleasedAt'Variants
-> Bool
$c== :: GetSubscriptionSchedulesParametersQueryReleasedAt'Variants
-> GetSubscriptionSchedulesParametersQueryReleasedAt'Variants
-> Bool
GHC.Classes.Eq)
instance Data.Aeson.Types.ToJSON.ToJSON GetSubscriptionSchedulesParametersQueryReleasedAt'Variants where
toJSON :: GetSubscriptionSchedulesParametersQueryReleasedAt'Variants -> Value
toJSON (GetSubscriptionSchedulesParametersQueryReleasedAt'GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1 GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1
a) = GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1 -> Value
forall a. ToJSON a => a -> Value
Data.Aeson.Types.ToJSON.toJSON GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1
a
toJSON (GetSubscriptionSchedulesParametersQueryReleasedAt'Int Int
a) = Int -> Value
forall a. ToJSON a => a -> Value
Data.Aeson.Types.ToJSON.toJSON Int
a
instance Data.Aeson.Types.FromJSON.FromJSON GetSubscriptionSchedulesParametersQueryReleasedAt'Variants where
parseJSON :: Value
-> Parser
GetSubscriptionSchedulesParametersQueryReleasedAt'Variants
parseJSON Value
val = case (GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1
-> GetSubscriptionSchedulesParametersQueryReleasedAt'Variants
GetSubscriptionSchedulesParametersQueryReleasedAt'GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1 (GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1
-> GetSubscriptionSchedulesParametersQueryReleasedAt'Variants)
-> Result GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1
-> Result
GetSubscriptionSchedulesParametersQueryReleasedAt'Variants
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Data.Functor.<$> Value
-> Result GetSubscriptionSchedulesParametersQueryReleasedAt'OneOf1
forall a. FromJSON a => Value -> Result a
Data.Aeson.Types.FromJSON.fromJSON Value
val) Result GetSubscriptionSchedulesParametersQueryReleasedAt'Variants
-> Result
GetSubscriptionSchedulesParametersQueryReleasedAt'Variants
-> Result
GetSubscriptionSchedulesParametersQueryReleasedAt'Variants
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
GHC.Base.<|> ((Int -> GetSubscriptionSchedulesParametersQueryReleasedAt'Variants
GetSubscriptionSchedulesParametersQueryReleasedAt'Int (Int -> GetSubscriptionSchedulesParametersQueryReleasedAt'Variants)
-> Result Int
-> Result
GetSubscriptionSchedulesParametersQueryReleasedAt'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 GetSubscriptionSchedulesParametersQueryReleasedAt'Variants
-> Result
GetSubscriptionSchedulesParametersQueryReleasedAt'Variants
-> Result
GetSubscriptionSchedulesParametersQueryReleasedAt'Variants
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
GHC.Base.<|> String
-> Result
GetSubscriptionSchedulesParametersQueryReleasedAt'Variants
forall a. String -> Result a
Data.Aeson.Types.Internal.Error String
"No variant matched") of
Data.Aeson.Types.Internal.Success GetSubscriptionSchedulesParametersQueryReleasedAt'Variants
a -> GetSubscriptionSchedulesParametersQueryReleasedAt'Variants
-> Parser
GetSubscriptionSchedulesParametersQueryReleasedAt'Variants
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure GetSubscriptionSchedulesParametersQueryReleasedAt'Variants
a
Data.Aeson.Types.Internal.Error String
a -> String
-> Parser
GetSubscriptionSchedulesParametersQueryReleasedAt'Variants
forall (m :: * -> *) a. MonadFail m => String -> m a
Control.Monad.Fail.fail String
a
data GetSubscriptionSchedulesResponse
=
GetSubscriptionSchedulesResponseError GHC.Base.String
|
GetSubscriptionSchedulesResponse200 GetSubscriptionSchedulesResponseBody200
|
GetSubscriptionSchedulesResponseDefault Error
deriving (Int -> GetSubscriptionSchedulesResponse -> ShowS
[GetSubscriptionSchedulesResponse] -> ShowS
GetSubscriptionSchedulesResponse -> String
(Int -> GetSubscriptionSchedulesResponse -> ShowS)
-> (GetSubscriptionSchedulesResponse -> String)
-> ([GetSubscriptionSchedulesResponse] -> ShowS)
-> Show GetSubscriptionSchedulesResponse
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [GetSubscriptionSchedulesResponse] -> ShowS
$cshowList :: [GetSubscriptionSchedulesResponse] -> ShowS
show :: GetSubscriptionSchedulesResponse -> String
$cshow :: GetSubscriptionSchedulesResponse -> String
showsPrec :: Int -> GetSubscriptionSchedulesResponse -> ShowS
$cshowsPrec :: Int -> GetSubscriptionSchedulesResponse -> ShowS
GHC.Show.Show, GetSubscriptionSchedulesResponse
-> GetSubscriptionSchedulesResponse -> Bool
(GetSubscriptionSchedulesResponse
-> GetSubscriptionSchedulesResponse -> Bool)
-> (GetSubscriptionSchedulesResponse
-> GetSubscriptionSchedulesResponse -> Bool)
-> Eq GetSubscriptionSchedulesResponse
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: GetSubscriptionSchedulesResponse
-> GetSubscriptionSchedulesResponse -> Bool
$c/= :: GetSubscriptionSchedulesResponse
-> GetSubscriptionSchedulesResponse -> Bool
== :: GetSubscriptionSchedulesResponse
-> GetSubscriptionSchedulesResponse -> Bool
$c== :: GetSubscriptionSchedulesResponse
-> GetSubscriptionSchedulesResponse -> Bool
GHC.Classes.Eq)
data GetSubscriptionSchedulesResponseBody200 = GetSubscriptionSchedulesResponseBody200
{
GetSubscriptionSchedulesResponseBody200 -> [SubscriptionSchedule]
getSubscriptionSchedulesResponseBody200Data :: ([SubscriptionSchedule]),
GetSubscriptionSchedulesResponseBody200 -> Bool
getSubscriptionSchedulesResponseBody200HasMore :: GHC.Types.Bool,
GetSubscriptionSchedulesResponseBody200 -> Text
getSubscriptionSchedulesResponseBody200Url :: Data.Text.Internal.Text
}
deriving
( Int -> GetSubscriptionSchedulesResponseBody200 -> ShowS
[GetSubscriptionSchedulesResponseBody200] -> ShowS
GetSubscriptionSchedulesResponseBody200 -> String
(Int -> GetSubscriptionSchedulesResponseBody200 -> ShowS)
-> (GetSubscriptionSchedulesResponseBody200 -> String)
-> ([GetSubscriptionSchedulesResponseBody200] -> ShowS)
-> Show GetSubscriptionSchedulesResponseBody200
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [GetSubscriptionSchedulesResponseBody200] -> ShowS
$cshowList :: [GetSubscriptionSchedulesResponseBody200] -> ShowS
show :: GetSubscriptionSchedulesResponseBody200 -> String
$cshow :: GetSubscriptionSchedulesResponseBody200 -> String
showsPrec :: Int -> GetSubscriptionSchedulesResponseBody200 -> ShowS
$cshowsPrec :: Int -> GetSubscriptionSchedulesResponseBody200 -> ShowS
GHC.Show.Show,
GetSubscriptionSchedulesResponseBody200
-> GetSubscriptionSchedulesResponseBody200 -> Bool
(GetSubscriptionSchedulesResponseBody200
-> GetSubscriptionSchedulesResponseBody200 -> Bool)
-> (GetSubscriptionSchedulesResponseBody200
-> GetSubscriptionSchedulesResponseBody200 -> Bool)
-> Eq GetSubscriptionSchedulesResponseBody200
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: GetSubscriptionSchedulesResponseBody200
-> GetSubscriptionSchedulesResponseBody200 -> Bool
$c/= :: GetSubscriptionSchedulesResponseBody200
-> GetSubscriptionSchedulesResponseBody200 -> Bool
== :: GetSubscriptionSchedulesResponseBody200
-> GetSubscriptionSchedulesResponseBody200 -> Bool
$c== :: GetSubscriptionSchedulesResponseBody200
-> GetSubscriptionSchedulesResponseBody200 -> Bool
GHC.Classes.Eq
)
instance Data.Aeson.Types.ToJSON.ToJSON GetSubscriptionSchedulesResponseBody200 where
toJSON :: GetSubscriptionSchedulesResponseBody200 -> Value
toJSON GetSubscriptionSchedulesResponseBody200
obj = [Pair] -> Value
Data.Aeson.Types.Internal.object (Text
"data" Text -> [SubscriptionSchedule] -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= GetSubscriptionSchedulesResponseBody200 -> [SubscriptionSchedule]
getSubscriptionSchedulesResponseBody200Data GetSubscriptionSchedulesResponseBody200
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"has_more" Text -> Bool -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= GetSubscriptionSchedulesResponseBody200 -> Bool
getSubscriptionSchedulesResponseBody200HasMore GetSubscriptionSchedulesResponseBody200
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"url" Text -> Text -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= GetSubscriptionSchedulesResponseBody200 -> Text
getSubscriptionSchedulesResponseBody200Url GetSubscriptionSchedulesResponseBody200
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"object" Text -> Value -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= Text -> Value
Data.Aeson.Types.Internal.String Text
"list" Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: [Pair]
forall a. Monoid a => a
GHC.Base.mempty)
toEncoding :: GetSubscriptionSchedulesResponseBody200 -> Encoding
toEncoding GetSubscriptionSchedulesResponseBody200
obj = Series -> Encoding
Data.Aeson.Encoding.Internal.pairs ((Text
"data" Text -> [SubscriptionSchedule] -> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= GetSubscriptionSchedulesResponseBody200 -> [SubscriptionSchedule]
getSubscriptionSchedulesResponseBody200Data GetSubscriptionSchedulesResponseBody200
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> ((Text
"has_more" Text -> Bool -> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= GetSubscriptionSchedulesResponseBody200 -> Bool
getSubscriptionSchedulesResponseBody200HasMore GetSubscriptionSchedulesResponseBody200
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> ((Text
"url" Text -> Text -> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= GetSubscriptionSchedulesResponseBody200 -> Text
getSubscriptionSchedulesResponseBody200Url GetSubscriptionSchedulesResponseBody200
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> (Text
"object" Text -> Value -> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= Text -> Value
Data.Aeson.Types.Internal.String Text
"list"))))
instance Data.Aeson.Types.FromJSON.FromJSON GetSubscriptionSchedulesResponseBody200 where
parseJSON :: Value -> Parser GetSubscriptionSchedulesResponseBody200
parseJSON = String
-> (Object -> Parser GetSubscriptionSchedulesResponseBody200)
-> Value
-> Parser GetSubscriptionSchedulesResponseBody200
forall a. String -> (Object -> Parser a) -> Value -> Parser a
Data.Aeson.Types.FromJSON.withObject String
"GetSubscriptionSchedulesResponseBody200" (\Object
obj -> ((([SubscriptionSchedule]
-> Bool -> Text -> GetSubscriptionSchedulesResponseBody200)
-> Parser
([SubscriptionSchedule]
-> Bool -> Text -> GetSubscriptionSchedulesResponseBody200)
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure [SubscriptionSchedule]
-> Bool -> Text -> GetSubscriptionSchedulesResponseBody200
GetSubscriptionSchedulesResponseBody200 Parser
([SubscriptionSchedule]
-> Bool -> Text -> GetSubscriptionSchedulesResponseBody200)
-> Parser [SubscriptionSchedule]
-> Parser (Bool -> Text -> GetSubscriptionSchedulesResponseBody200)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object -> Text -> Parser [SubscriptionSchedule]
forall a. FromJSON a => Object -> Text -> Parser a
Data.Aeson.Types.FromJSON..: Text
"data")) Parser (Bool -> Text -> GetSubscriptionSchedulesResponseBody200)
-> Parser Bool
-> Parser (Text -> GetSubscriptionSchedulesResponseBody200)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object -> Text -> Parser Bool
forall a. FromJSON a => Object -> Text -> Parser a
Data.Aeson.Types.FromJSON..: Text
"has_more")) Parser (Text -> GetSubscriptionSchedulesResponseBody200)
-> Parser Text -> Parser GetSubscriptionSchedulesResponseBody200
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object -> Text -> Parser Text
forall a. FromJSON a => Object -> Text -> Parser a
Data.Aeson.Types.FromJSON..: Text
"url"))
mkGetSubscriptionSchedulesResponseBody200 ::
[SubscriptionSchedule] ->
GHC.Types.Bool ->
Data.Text.Internal.Text ->
GetSubscriptionSchedulesResponseBody200
mkGetSubscriptionSchedulesResponseBody200 :: [SubscriptionSchedule]
-> Bool -> Text -> GetSubscriptionSchedulesResponseBody200
mkGetSubscriptionSchedulesResponseBody200 [SubscriptionSchedule]
getSubscriptionSchedulesResponseBody200Data Bool
getSubscriptionSchedulesResponseBody200HasMore Text
getSubscriptionSchedulesResponseBody200Url =
GetSubscriptionSchedulesResponseBody200 :: [SubscriptionSchedule]
-> Bool -> Text -> GetSubscriptionSchedulesResponseBody200
GetSubscriptionSchedulesResponseBody200
{ getSubscriptionSchedulesResponseBody200Data :: [SubscriptionSchedule]
getSubscriptionSchedulesResponseBody200Data = [SubscriptionSchedule]
getSubscriptionSchedulesResponseBody200Data,
getSubscriptionSchedulesResponseBody200HasMore :: Bool
getSubscriptionSchedulesResponseBody200HasMore = Bool
getSubscriptionSchedulesResponseBody200HasMore,
getSubscriptionSchedulesResponseBody200Url :: Text
getSubscriptionSchedulesResponseBody200Url = Text
getSubscriptionSchedulesResponseBody200Url
}