{-# LANGUAGE MultiWayIf #-}
{-# LANGUAGE OverloadedStrings #-}
module StripeAPI.Types.ScheduledQueryRun where
import qualified Control.Monad.Fail
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.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 GHC.Base
import qualified GHC.Classes
import qualified GHC.Int
import qualified GHC.Show
import qualified GHC.Types
import qualified StripeAPI.Common
import StripeAPI.TypeAlias
import {-# SOURCE #-} StripeAPI.Types.File
import {-# SOURCE #-} StripeAPI.Types.FileLink
import {-# SOURCE #-} StripeAPI.Types.SigmaScheduledQueryRunError
import qualified Prelude as GHC.Integer.Type
import qualified Prelude as GHC.Maybe
data ScheduledQueryRun = ScheduledQueryRun
{
ScheduledQueryRun -> Int
scheduledQueryRunCreated :: GHC.Types.Int,
ScheduledQueryRun -> Int
scheduledQueryRunDataLoadTime :: GHC.Types.Int,
ScheduledQueryRun -> Maybe SigmaScheduledQueryRunError
scheduledQueryRunError :: (GHC.Maybe.Maybe SigmaScheduledQueryRunError),
ScheduledQueryRun -> Maybe ScheduledQueryRunFile'
scheduledQueryRunFile :: (GHC.Maybe.Maybe ScheduledQueryRunFile'),
ScheduledQueryRun -> Text
scheduledQueryRunId :: Data.Text.Internal.Text,
ScheduledQueryRun -> Bool
scheduledQueryRunLivemode :: GHC.Types.Bool,
ScheduledQueryRun -> Int
scheduledQueryRunResultAvailableUntil :: GHC.Types.Int,
ScheduledQueryRun -> Text
scheduledQueryRunSql :: Data.Text.Internal.Text,
ScheduledQueryRun -> Text
scheduledQueryRunStatus :: Data.Text.Internal.Text,
ScheduledQueryRun -> Text
scheduledQueryRunTitle :: Data.Text.Internal.Text
}
deriving
( Int -> ScheduledQueryRun -> ShowS
[ScheduledQueryRun] -> ShowS
ScheduledQueryRun -> String
(Int -> ScheduledQueryRun -> ShowS)
-> (ScheduledQueryRun -> String)
-> ([ScheduledQueryRun] -> ShowS)
-> Show ScheduledQueryRun
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ScheduledQueryRun] -> ShowS
$cshowList :: [ScheduledQueryRun] -> ShowS
show :: ScheduledQueryRun -> String
$cshow :: ScheduledQueryRun -> String
showsPrec :: Int -> ScheduledQueryRun -> ShowS
$cshowsPrec :: Int -> ScheduledQueryRun -> ShowS
GHC.Show.Show,
ScheduledQueryRun -> ScheduledQueryRun -> Bool
(ScheduledQueryRun -> ScheduledQueryRun -> Bool)
-> (ScheduledQueryRun -> ScheduledQueryRun -> Bool)
-> Eq ScheduledQueryRun
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ScheduledQueryRun -> ScheduledQueryRun -> Bool
$c/= :: ScheduledQueryRun -> ScheduledQueryRun -> Bool
== :: ScheduledQueryRun -> ScheduledQueryRun -> Bool
$c== :: ScheduledQueryRun -> ScheduledQueryRun -> Bool
GHC.Classes.Eq
)
instance Data.Aeson.Types.ToJSON.ToJSON ScheduledQueryRun where
toJSON :: ScheduledQueryRun -> Value
toJSON ScheduledQueryRun
obj = [Pair] -> Value
Data.Aeson.Types.Internal.object (Text
"created" Text -> Int -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= ScheduledQueryRun -> Int
scheduledQueryRunCreated ScheduledQueryRun
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"data_load_time" Text -> Int -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= ScheduledQueryRun -> Int
scheduledQueryRunDataLoadTime ScheduledQueryRun
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"error" Text -> Maybe SigmaScheduledQueryRunError -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= ScheduledQueryRun -> Maybe SigmaScheduledQueryRunError
scheduledQueryRunError ScheduledQueryRun
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"file" Text -> Maybe ScheduledQueryRunFile' -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= ScheduledQueryRun -> Maybe ScheduledQueryRunFile'
scheduledQueryRunFile ScheduledQueryRun
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"id" Text -> Text -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= ScheduledQueryRun -> Text
scheduledQueryRunId ScheduledQueryRun
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"livemode" Text -> Bool -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= ScheduledQueryRun -> Bool
scheduledQueryRunLivemode ScheduledQueryRun
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"result_available_until" Text -> Int -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= ScheduledQueryRun -> Int
scheduledQueryRunResultAvailableUntil ScheduledQueryRun
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"sql" Text -> Text -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= ScheduledQueryRun -> Text
scheduledQueryRunSql ScheduledQueryRun
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"status" Text -> Text -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= ScheduledQueryRun -> Text
scheduledQueryRunStatus ScheduledQueryRun
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"title" Text -> Text -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= ScheduledQueryRun -> Text
scheduledQueryRunTitle ScheduledQueryRun
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
"scheduled_query_run" Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: [Pair]
forall a. Monoid a => a
GHC.Base.mempty)
toEncoding :: ScheduledQueryRun -> Encoding
toEncoding ScheduledQueryRun
obj = Series -> Encoding
Data.Aeson.Encoding.Internal.pairs ((Text
"created" Text -> Int -> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= ScheduledQueryRun -> Int
scheduledQueryRunCreated ScheduledQueryRun
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> ((Text
"data_load_time" Text -> Int -> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= ScheduledQueryRun -> Int
scheduledQueryRunDataLoadTime ScheduledQueryRun
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> ((Text
"error" Text -> Maybe SigmaScheduledQueryRunError -> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= ScheduledQueryRun -> Maybe SigmaScheduledQueryRunError
scheduledQueryRunError ScheduledQueryRun
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> ((Text
"file" Text -> Maybe ScheduledQueryRunFile' -> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= ScheduledQueryRun -> Maybe ScheduledQueryRunFile'
scheduledQueryRunFile ScheduledQueryRun
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> ((Text
"id" Text -> Text -> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= ScheduledQueryRun -> Text
scheduledQueryRunId ScheduledQueryRun
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> ((Text
"livemode" Text -> Bool -> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= ScheduledQueryRun -> Bool
scheduledQueryRunLivemode ScheduledQueryRun
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> ((Text
"result_available_until" Text -> Int -> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= ScheduledQueryRun -> Int
scheduledQueryRunResultAvailableUntil ScheduledQueryRun
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> ((Text
"sql" Text -> Text -> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= ScheduledQueryRun -> Text
scheduledQueryRunSql ScheduledQueryRun
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> ((Text
"status" Text -> Text -> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= ScheduledQueryRun -> Text
scheduledQueryRunStatus ScheduledQueryRun
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> ((Text
"title" Text -> Text -> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= ScheduledQueryRun -> Text
scheduledQueryRunTitle ScheduledQueryRun
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
"scheduled_query_run")))))))))))
instance Data.Aeson.Types.FromJSON.FromJSON ScheduledQueryRun where
parseJSON :: Value -> Parser ScheduledQueryRun
parseJSON = String
-> (Object -> Parser ScheduledQueryRun)
-> Value
-> Parser ScheduledQueryRun
forall a. String -> (Object -> Parser a) -> Value -> Parser a
Data.Aeson.Types.FromJSON.withObject String
"ScheduledQueryRun" (\Object
obj -> ((((((((((Int
-> Int
-> Maybe SigmaScheduledQueryRunError
-> Maybe ScheduledQueryRunFile'
-> Text
-> Bool
-> Int
-> Text
-> Text
-> Text
-> ScheduledQueryRun)
-> Parser
(Int
-> Int
-> Maybe SigmaScheduledQueryRunError
-> Maybe ScheduledQueryRunFile'
-> Text
-> Bool
-> Int
-> Text
-> Text
-> Text
-> ScheduledQueryRun)
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure Int
-> Int
-> Maybe SigmaScheduledQueryRunError
-> Maybe ScheduledQueryRunFile'
-> Text
-> Bool
-> Int
-> Text
-> Text
-> Text
-> ScheduledQueryRun
ScheduledQueryRun Parser
(Int
-> Int
-> Maybe SigmaScheduledQueryRunError
-> Maybe ScheduledQueryRunFile'
-> Text
-> Bool
-> Int
-> Text
-> Text
-> Text
-> ScheduledQueryRun)
-> Parser Int
-> Parser
(Int
-> Maybe SigmaScheduledQueryRunError
-> Maybe ScheduledQueryRunFile'
-> Text
-> Bool
-> Int
-> Text
-> Text
-> Text
-> ScheduledQueryRun)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object -> Text -> Parser Int
forall a. FromJSON a => Object -> Text -> Parser a
Data.Aeson.Types.FromJSON..: Text
"created")) Parser
(Int
-> Maybe SigmaScheduledQueryRunError
-> Maybe ScheduledQueryRunFile'
-> Text
-> Bool
-> Int
-> Text
-> Text
-> Text
-> ScheduledQueryRun)
-> Parser Int
-> Parser
(Maybe SigmaScheduledQueryRunError
-> Maybe ScheduledQueryRunFile'
-> Text
-> Bool
-> Int
-> Text
-> Text
-> Text
-> ScheduledQueryRun)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object -> Text -> Parser Int
forall a. FromJSON a => Object -> Text -> Parser a
Data.Aeson.Types.FromJSON..: Text
"data_load_time")) Parser
(Maybe SigmaScheduledQueryRunError
-> Maybe ScheduledQueryRunFile'
-> Text
-> Bool
-> Int
-> Text
-> Text
-> Text
-> ScheduledQueryRun)
-> Parser (Maybe SigmaScheduledQueryRunError)
-> Parser
(Maybe ScheduledQueryRunFile'
-> Text
-> Bool
-> Int
-> Text
-> Text
-> Text
-> ScheduledQueryRun)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object -> Text -> Parser (Maybe SigmaScheduledQueryRunError)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Data.Aeson.Types.FromJSON..:? Text
"error")) Parser
(Maybe ScheduledQueryRunFile'
-> Text
-> Bool
-> Int
-> Text
-> Text
-> Text
-> ScheduledQueryRun)
-> Parser (Maybe ScheduledQueryRunFile')
-> Parser
(Text -> Bool -> Int -> Text -> Text -> Text -> ScheduledQueryRun)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object -> Text -> Parser (Maybe ScheduledQueryRunFile')
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Data.Aeson.Types.FromJSON..:? Text
"file")) Parser
(Text -> Bool -> Int -> Text -> Text -> Text -> ScheduledQueryRun)
-> Parser Text
-> Parser
(Bool -> Int -> Text -> Text -> Text -> ScheduledQueryRun)
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
"id")) Parser (Bool -> Int -> Text -> Text -> Text -> ScheduledQueryRun)
-> Parser Bool
-> Parser (Int -> Text -> Text -> Text -> ScheduledQueryRun)
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
"livemode")) Parser (Int -> Text -> Text -> Text -> ScheduledQueryRun)
-> Parser Int -> Parser (Text -> Text -> Text -> ScheduledQueryRun)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object -> Text -> Parser Int
forall a. FromJSON a => Object -> Text -> Parser a
Data.Aeson.Types.FromJSON..: Text
"result_available_until")) Parser (Text -> Text -> Text -> ScheduledQueryRun)
-> Parser Text -> Parser (Text -> Text -> ScheduledQueryRun)
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
"sql")) Parser (Text -> Text -> ScheduledQueryRun)
-> Parser Text -> Parser (Text -> ScheduledQueryRun)
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
"status")) Parser (Text -> ScheduledQueryRun)
-> Parser Text -> Parser ScheduledQueryRun
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
"title"))
mkScheduledQueryRun ::
GHC.Types.Int ->
GHC.Types.Int ->
Data.Text.Internal.Text ->
GHC.Types.Bool ->
GHC.Types.Int ->
Data.Text.Internal.Text ->
Data.Text.Internal.Text ->
Data.Text.Internal.Text ->
ScheduledQueryRun
mkScheduledQueryRun :: Int
-> Int
-> Text
-> Bool
-> Int
-> Text
-> Text
-> Text
-> ScheduledQueryRun
mkScheduledQueryRun Int
scheduledQueryRunCreated Int
scheduledQueryRunDataLoadTime Text
scheduledQueryRunId Bool
scheduledQueryRunLivemode Int
scheduledQueryRunResultAvailableUntil Text
scheduledQueryRunSql Text
scheduledQueryRunStatus Text
scheduledQueryRunTitle =
ScheduledQueryRun :: Int
-> Int
-> Maybe SigmaScheduledQueryRunError
-> Maybe ScheduledQueryRunFile'
-> Text
-> Bool
-> Int
-> Text
-> Text
-> Text
-> ScheduledQueryRun
ScheduledQueryRun
{ scheduledQueryRunCreated :: Int
scheduledQueryRunCreated = Int
scheduledQueryRunCreated,
scheduledQueryRunDataLoadTime :: Int
scheduledQueryRunDataLoadTime = Int
scheduledQueryRunDataLoadTime,
scheduledQueryRunError :: Maybe SigmaScheduledQueryRunError
scheduledQueryRunError = Maybe SigmaScheduledQueryRunError
forall a. Maybe a
GHC.Maybe.Nothing,
scheduledQueryRunFile :: Maybe ScheduledQueryRunFile'
scheduledQueryRunFile = Maybe ScheduledQueryRunFile'
forall a. Maybe a
GHC.Maybe.Nothing,
scheduledQueryRunId :: Text
scheduledQueryRunId = Text
scheduledQueryRunId,
scheduledQueryRunLivemode :: Bool
scheduledQueryRunLivemode = Bool
scheduledQueryRunLivemode,
scheduledQueryRunResultAvailableUntil :: Int
scheduledQueryRunResultAvailableUntil = Int
scheduledQueryRunResultAvailableUntil,
scheduledQueryRunSql :: Text
scheduledQueryRunSql = Text
scheduledQueryRunSql,
scheduledQueryRunStatus :: Text
scheduledQueryRunStatus = Text
scheduledQueryRunStatus,
scheduledQueryRunTitle :: Text
scheduledQueryRunTitle = Text
scheduledQueryRunTitle
}
data ScheduledQueryRunFile' = ScheduledQueryRunFile'
{
ScheduledQueryRunFile' -> Maybe Int
scheduledQueryRunFile'Created :: (GHC.Maybe.Maybe GHC.Types.Int),
ScheduledQueryRunFile' -> Maybe Int
scheduledQueryRunFile'ExpiresAt :: (GHC.Maybe.Maybe GHC.Types.Int),
ScheduledQueryRunFile' -> Maybe Text
scheduledQueryRunFile'Filename :: (GHC.Maybe.Maybe Data.Text.Internal.Text),
ScheduledQueryRunFile' -> Maybe Text
scheduledQueryRunFile'Id :: (GHC.Maybe.Maybe Data.Text.Internal.Text),
ScheduledQueryRunFile' -> Maybe ScheduledQueryRunFile'Links'
scheduledQueryRunFile'Links :: (GHC.Maybe.Maybe ScheduledQueryRunFile'Links'),
ScheduledQueryRunFile' -> Maybe ScheduledQueryRunFile'Object'
scheduledQueryRunFile'Object :: (GHC.Maybe.Maybe ScheduledQueryRunFile'Object'),
ScheduledQueryRunFile' -> Maybe ScheduledQueryRunFile'Purpose'
scheduledQueryRunFile'Purpose :: (GHC.Maybe.Maybe ScheduledQueryRunFile'Purpose'),
ScheduledQueryRunFile' -> Maybe Int
scheduledQueryRunFile'Size :: (GHC.Maybe.Maybe GHC.Types.Int),
ScheduledQueryRunFile' -> Maybe Text
scheduledQueryRunFile'Title :: (GHC.Maybe.Maybe Data.Text.Internal.Text),
ScheduledQueryRunFile' -> Maybe Text
scheduledQueryRunFile'Type :: (GHC.Maybe.Maybe Data.Text.Internal.Text),
ScheduledQueryRunFile' -> Maybe Text
scheduledQueryRunFile'Url :: (GHC.Maybe.Maybe Data.Text.Internal.Text)
}
deriving
( Int -> ScheduledQueryRunFile' -> ShowS
[ScheduledQueryRunFile'] -> ShowS
ScheduledQueryRunFile' -> String
(Int -> ScheduledQueryRunFile' -> ShowS)
-> (ScheduledQueryRunFile' -> String)
-> ([ScheduledQueryRunFile'] -> ShowS)
-> Show ScheduledQueryRunFile'
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ScheduledQueryRunFile'] -> ShowS
$cshowList :: [ScheduledQueryRunFile'] -> ShowS
show :: ScheduledQueryRunFile' -> String
$cshow :: ScheduledQueryRunFile' -> String
showsPrec :: Int -> ScheduledQueryRunFile' -> ShowS
$cshowsPrec :: Int -> ScheduledQueryRunFile' -> ShowS
GHC.Show.Show,
ScheduledQueryRunFile' -> ScheduledQueryRunFile' -> Bool
(ScheduledQueryRunFile' -> ScheduledQueryRunFile' -> Bool)
-> (ScheduledQueryRunFile' -> ScheduledQueryRunFile' -> Bool)
-> Eq ScheduledQueryRunFile'
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ScheduledQueryRunFile' -> ScheduledQueryRunFile' -> Bool
$c/= :: ScheduledQueryRunFile' -> ScheduledQueryRunFile' -> Bool
== :: ScheduledQueryRunFile' -> ScheduledQueryRunFile' -> Bool
$c== :: ScheduledQueryRunFile' -> ScheduledQueryRunFile' -> Bool
GHC.Classes.Eq
)
instance Data.Aeson.Types.ToJSON.ToJSON ScheduledQueryRunFile' where
toJSON :: ScheduledQueryRunFile' -> Value
toJSON ScheduledQueryRunFile'
obj = [Pair] -> Value
Data.Aeson.Types.Internal.object (Text
"created" Text -> Maybe Int -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= ScheduledQueryRunFile' -> Maybe Int
scheduledQueryRunFile'Created ScheduledQueryRunFile'
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"expires_at" Text -> Maybe Int -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= ScheduledQueryRunFile' -> Maybe Int
scheduledQueryRunFile'ExpiresAt ScheduledQueryRunFile'
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"filename" Text -> Maybe Text -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= ScheduledQueryRunFile' -> Maybe Text
scheduledQueryRunFile'Filename ScheduledQueryRunFile'
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"id" Text -> Maybe Text -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= ScheduledQueryRunFile' -> Maybe Text
scheduledQueryRunFile'Id ScheduledQueryRunFile'
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"links" Text -> Maybe ScheduledQueryRunFile'Links' -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= ScheduledQueryRunFile' -> Maybe ScheduledQueryRunFile'Links'
scheduledQueryRunFile'Links ScheduledQueryRunFile'
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"object" Text -> Maybe ScheduledQueryRunFile'Object' -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= ScheduledQueryRunFile' -> Maybe ScheduledQueryRunFile'Object'
scheduledQueryRunFile'Object ScheduledQueryRunFile'
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"purpose" Text -> Maybe ScheduledQueryRunFile'Purpose' -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= ScheduledQueryRunFile' -> Maybe ScheduledQueryRunFile'Purpose'
scheduledQueryRunFile'Purpose ScheduledQueryRunFile'
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"size" Text -> Maybe Int -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= ScheduledQueryRunFile' -> Maybe Int
scheduledQueryRunFile'Size ScheduledQueryRunFile'
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"title" Text -> Maybe Text -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= ScheduledQueryRunFile' -> Maybe Text
scheduledQueryRunFile'Title ScheduledQueryRunFile'
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"type" Text -> Maybe Text -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= ScheduledQueryRunFile' -> Maybe Text
scheduledQueryRunFile'Type ScheduledQueryRunFile'
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"url" Text -> Maybe Text -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= ScheduledQueryRunFile' -> Maybe Text
scheduledQueryRunFile'Url ScheduledQueryRunFile'
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: [Pair]
forall a. Monoid a => a
GHC.Base.mempty)
toEncoding :: ScheduledQueryRunFile' -> Encoding
toEncoding ScheduledQueryRunFile'
obj = Series -> Encoding
Data.Aeson.Encoding.Internal.pairs ((Text
"created" Text -> Maybe Int -> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= ScheduledQueryRunFile' -> Maybe Int
scheduledQueryRunFile'Created ScheduledQueryRunFile'
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> ((Text
"expires_at" Text -> Maybe Int -> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= ScheduledQueryRunFile' -> Maybe Int
scheduledQueryRunFile'ExpiresAt ScheduledQueryRunFile'
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> ((Text
"filename" Text -> Maybe Text -> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= ScheduledQueryRunFile' -> Maybe Text
scheduledQueryRunFile'Filename ScheduledQueryRunFile'
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> ((Text
"id" Text -> Maybe Text -> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= ScheduledQueryRunFile' -> Maybe Text
scheduledQueryRunFile'Id ScheduledQueryRunFile'
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> ((Text
"links" Text -> Maybe ScheduledQueryRunFile'Links' -> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= ScheduledQueryRunFile' -> Maybe ScheduledQueryRunFile'Links'
scheduledQueryRunFile'Links ScheduledQueryRunFile'
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> ((Text
"object" Text -> Maybe ScheduledQueryRunFile'Object' -> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= ScheduledQueryRunFile' -> Maybe ScheduledQueryRunFile'Object'
scheduledQueryRunFile'Object ScheduledQueryRunFile'
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> ((Text
"purpose" Text -> Maybe ScheduledQueryRunFile'Purpose' -> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= ScheduledQueryRunFile' -> Maybe ScheduledQueryRunFile'Purpose'
scheduledQueryRunFile'Purpose ScheduledQueryRunFile'
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> ((Text
"size" Text -> Maybe Int -> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= ScheduledQueryRunFile' -> Maybe Int
scheduledQueryRunFile'Size ScheduledQueryRunFile'
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> ((Text
"title" Text -> Maybe Text -> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= ScheduledQueryRunFile' -> Maybe Text
scheduledQueryRunFile'Title ScheduledQueryRunFile'
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> ((Text
"type" Text -> Maybe Text -> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= ScheduledQueryRunFile' -> Maybe Text
scheduledQueryRunFile'Type ScheduledQueryRunFile'
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> (Text
"url" Text -> Maybe Text -> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= ScheduledQueryRunFile' -> Maybe Text
scheduledQueryRunFile'Url ScheduledQueryRunFile'
obj)))))))))))
instance Data.Aeson.Types.FromJSON.FromJSON ScheduledQueryRunFile' where
parseJSON :: Value -> Parser ScheduledQueryRunFile'
parseJSON = String
-> (Object -> Parser ScheduledQueryRunFile')
-> Value
-> Parser ScheduledQueryRunFile'
forall a. String -> (Object -> Parser a) -> Value -> Parser a
Data.Aeson.Types.FromJSON.withObject String
"ScheduledQueryRunFile'" (\Object
obj -> (((((((((((Maybe Int
-> Maybe Int
-> Maybe Text
-> Maybe Text
-> Maybe ScheduledQueryRunFile'Links'
-> Maybe ScheduledQueryRunFile'Object'
-> Maybe ScheduledQueryRunFile'Purpose'
-> Maybe Int
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> ScheduledQueryRunFile')
-> Parser
(Maybe Int
-> Maybe Int
-> Maybe Text
-> Maybe Text
-> Maybe ScheduledQueryRunFile'Links'
-> Maybe ScheduledQueryRunFile'Object'
-> Maybe ScheduledQueryRunFile'Purpose'
-> Maybe Int
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> ScheduledQueryRunFile')
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure Maybe Int
-> Maybe Int
-> Maybe Text
-> Maybe Text
-> Maybe ScheduledQueryRunFile'Links'
-> Maybe ScheduledQueryRunFile'Object'
-> Maybe ScheduledQueryRunFile'Purpose'
-> Maybe Int
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> ScheduledQueryRunFile'
ScheduledQueryRunFile' Parser
(Maybe Int
-> Maybe Int
-> Maybe Text
-> Maybe Text
-> Maybe ScheduledQueryRunFile'Links'
-> Maybe ScheduledQueryRunFile'Object'
-> Maybe ScheduledQueryRunFile'Purpose'
-> Maybe Int
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> ScheduledQueryRunFile')
-> Parser (Maybe Int)
-> Parser
(Maybe Int
-> Maybe Text
-> Maybe Text
-> Maybe ScheduledQueryRunFile'Links'
-> Maybe ScheduledQueryRunFile'Object'
-> Maybe ScheduledQueryRunFile'Purpose'
-> Maybe Int
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> ScheduledQueryRunFile')
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
"created")) Parser
(Maybe Int
-> Maybe Text
-> Maybe Text
-> Maybe ScheduledQueryRunFile'Links'
-> Maybe ScheduledQueryRunFile'Object'
-> Maybe ScheduledQueryRunFile'Purpose'
-> Maybe Int
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> ScheduledQueryRunFile')
-> Parser (Maybe Int)
-> Parser
(Maybe Text
-> Maybe Text
-> Maybe ScheduledQueryRunFile'Links'
-> Maybe ScheduledQueryRunFile'Object'
-> Maybe ScheduledQueryRunFile'Purpose'
-> Maybe Int
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> ScheduledQueryRunFile')
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
"expires_at")) Parser
(Maybe Text
-> Maybe Text
-> Maybe ScheduledQueryRunFile'Links'
-> Maybe ScheduledQueryRunFile'Object'
-> Maybe ScheduledQueryRunFile'Purpose'
-> Maybe Int
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> ScheduledQueryRunFile')
-> Parser (Maybe Text)
-> Parser
(Maybe Text
-> Maybe ScheduledQueryRunFile'Links'
-> Maybe ScheduledQueryRunFile'Object'
-> Maybe ScheduledQueryRunFile'Purpose'
-> Maybe Int
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> ScheduledQueryRunFile')
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
"filename")) Parser
(Maybe Text
-> Maybe ScheduledQueryRunFile'Links'
-> Maybe ScheduledQueryRunFile'Object'
-> Maybe ScheduledQueryRunFile'Purpose'
-> Maybe Int
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> ScheduledQueryRunFile')
-> Parser (Maybe Text)
-> Parser
(Maybe ScheduledQueryRunFile'Links'
-> Maybe ScheduledQueryRunFile'Object'
-> Maybe ScheduledQueryRunFile'Purpose'
-> Maybe Int
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> ScheduledQueryRunFile')
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
"id")) Parser
(Maybe ScheduledQueryRunFile'Links'
-> Maybe ScheduledQueryRunFile'Object'
-> Maybe ScheduledQueryRunFile'Purpose'
-> Maybe Int
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> ScheduledQueryRunFile')
-> Parser (Maybe ScheduledQueryRunFile'Links')
-> Parser
(Maybe ScheduledQueryRunFile'Object'
-> Maybe ScheduledQueryRunFile'Purpose'
-> Maybe Int
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> ScheduledQueryRunFile')
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object -> Text -> Parser (Maybe ScheduledQueryRunFile'Links')
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Data.Aeson.Types.FromJSON..:? Text
"links")) Parser
(Maybe ScheduledQueryRunFile'Object'
-> Maybe ScheduledQueryRunFile'Purpose'
-> Maybe Int
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> ScheduledQueryRunFile')
-> Parser (Maybe ScheduledQueryRunFile'Object')
-> Parser
(Maybe ScheduledQueryRunFile'Purpose'
-> Maybe Int
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> ScheduledQueryRunFile')
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object -> Text -> Parser (Maybe ScheduledQueryRunFile'Object')
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Data.Aeson.Types.FromJSON..:? Text
"object")) Parser
(Maybe ScheduledQueryRunFile'Purpose'
-> Maybe Int
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> ScheduledQueryRunFile')
-> Parser (Maybe ScheduledQueryRunFile'Purpose')
-> Parser
(Maybe Int
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> ScheduledQueryRunFile')
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object -> Text -> Parser (Maybe ScheduledQueryRunFile'Purpose')
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Data.Aeson.Types.FromJSON..:? Text
"purpose")) Parser
(Maybe Int
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> ScheduledQueryRunFile')
-> Parser (Maybe Int)
-> Parser
(Maybe Text -> Maybe Text -> Maybe Text -> ScheduledQueryRunFile')
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
"size")) Parser
(Maybe Text -> Maybe Text -> Maybe Text -> ScheduledQueryRunFile')
-> Parser (Maybe Text)
-> Parser (Maybe Text -> Maybe Text -> ScheduledQueryRunFile')
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
"title")) Parser (Maybe Text -> Maybe Text -> ScheduledQueryRunFile')
-> Parser (Maybe Text)
-> Parser (Maybe Text -> ScheduledQueryRunFile')
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
"type")) Parser (Maybe Text -> ScheduledQueryRunFile')
-> Parser (Maybe Text) -> Parser ScheduledQueryRunFile'
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
"url"))
mkScheduledQueryRunFile' :: ScheduledQueryRunFile'
mkScheduledQueryRunFile' :: ScheduledQueryRunFile'
mkScheduledQueryRunFile' =
ScheduledQueryRunFile' :: Maybe Int
-> Maybe Int
-> Maybe Text
-> Maybe Text
-> Maybe ScheduledQueryRunFile'Links'
-> Maybe ScheduledQueryRunFile'Object'
-> Maybe ScheduledQueryRunFile'Purpose'
-> Maybe Int
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> ScheduledQueryRunFile'
ScheduledQueryRunFile'
{ scheduledQueryRunFile'Created :: Maybe Int
scheduledQueryRunFile'Created = Maybe Int
forall a. Maybe a
GHC.Maybe.Nothing,
scheduledQueryRunFile'ExpiresAt :: Maybe Int
scheduledQueryRunFile'ExpiresAt = Maybe Int
forall a. Maybe a
GHC.Maybe.Nothing,
scheduledQueryRunFile'Filename :: Maybe Text
scheduledQueryRunFile'Filename = Maybe Text
forall a. Maybe a
GHC.Maybe.Nothing,
scheduledQueryRunFile'Id :: Maybe Text
scheduledQueryRunFile'Id = Maybe Text
forall a. Maybe a
GHC.Maybe.Nothing,
scheduledQueryRunFile'Links :: Maybe ScheduledQueryRunFile'Links'
scheduledQueryRunFile'Links = Maybe ScheduledQueryRunFile'Links'
forall a. Maybe a
GHC.Maybe.Nothing,
scheduledQueryRunFile'Object :: Maybe ScheduledQueryRunFile'Object'
scheduledQueryRunFile'Object = Maybe ScheduledQueryRunFile'Object'
forall a. Maybe a
GHC.Maybe.Nothing,
scheduledQueryRunFile'Purpose :: Maybe ScheduledQueryRunFile'Purpose'
scheduledQueryRunFile'Purpose = Maybe ScheduledQueryRunFile'Purpose'
forall a. Maybe a
GHC.Maybe.Nothing,
scheduledQueryRunFile'Size :: Maybe Int
scheduledQueryRunFile'Size = Maybe Int
forall a. Maybe a
GHC.Maybe.Nothing,
scheduledQueryRunFile'Title :: Maybe Text
scheduledQueryRunFile'Title = Maybe Text
forall a. Maybe a
GHC.Maybe.Nothing,
scheduledQueryRunFile'Type :: Maybe Text
scheduledQueryRunFile'Type = Maybe Text
forall a. Maybe a
GHC.Maybe.Nothing,
scheduledQueryRunFile'Url :: Maybe Text
scheduledQueryRunFile'Url = Maybe Text
forall a. Maybe a
GHC.Maybe.Nothing
}
data ScheduledQueryRunFile'Links' = ScheduledQueryRunFile'Links'
{
ScheduledQueryRunFile'Links' -> [FileLink]
scheduledQueryRunFile'Links'Data :: ([FileLink]),
ScheduledQueryRunFile'Links' -> Bool
scheduledQueryRunFile'Links'HasMore :: GHC.Types.Bool,
ScheduledQueryRunFile'Links' -> Text
scheduledQueryRunFile'Links'Url :: Data.Text.Internal.Text
}
deriving
( Int -> ScheduledQueryRunFile'Links' -> ShowS
[ScheduledQueryRunFile'Links'] -> ShowS
ScheduledQueryRunFile'Links' -> String
(Int -> ScheduledQueryRunFile'Links' -> ShowS)
-> (ScheduledQueryRunFile'Links' -> String)
-> ([ScheduledQueryRunFile'Links'] -> ShowS)
-> Show ScheduledQueryRunFile'Links'
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ScheduledQueryRunFile'Links'] -> ShowS
$cshowList :: [ScheduledQueryRunFile'Links'] -> ShowS
show :: ScheduledQueryRunFile'Links' -> String
$cshow :: ScheduledQueryRunFile'Links' -> String
showsPrec :: Int -> ScheduledQueryRunFile'Links' -> ShowS
$cshowsPrec :: Int -> ScheduledQueryRunFile'Links' -> ShowS
GHC.Show.Show,
ScheduledQueryRunFile'Links'
-> ScheduledQueryRunFile'Links' -> Bool
(ScheduledQueryRunFile'Links'
-> ScheduledQueryRunFile'Links' -> Bool)
-> (ScheduledQueryRunFile'Links'
-> ScheduledQueryRunFile'Links' -> Bool)
-> Eq ScheduledQueryRunFile'Links'
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ScheduledQueryRunFile'Links'
-> ScheduledQueryRunFile'Links' -> Bool
$c/= :: ScheduledQueryRunFile'Links'
-> ScheduledQueryRunFile'Links' -> Bool
== :: ScheduledQueryRunFile'Links'
-> ScheduledQueryRunFile'Links' -> Bool
$c== :: ScheduledQueryRunFile'Links'
-> ScheduledQueryRunFile'Links' -> Bool
GHC.Classes.Eq
)
instance Data.Aeson.Types.ToJSON.ToJSON ScheduledQueryRunFile'Links' where
toJSON :: ScheduledQueryRunFile'Links' -> Value
toJSON ScheduledQueryRunFile'Links'
obj = [Pair] -> Value
Data.Aeson.Types.Internal.object (Text
"data" Text -> [FileLink] -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= ScheduledQueryRunFile'Links' -> [FileLink]
scheduledQueryRunFile'Links'Data ScheduledQueryRunFile'Links'
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..= ScheduledQueryRunFile'Links' -> Bool
scheduledQueryRunFile'Links'HasMore ScheduledQueryRunFile'Links'
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..= ScheduledQueryRunFile'Links' -> Text
scheduledQueryRunFile'Links'Url ScheduledQueryRunFile'Links'
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 :: ScheduledQueryRunFile'Links' -> Encoding
toEncoding ScheduledQueryRunFile'Links'
obj = Series -> Encoding
Data.Aeson.Encoding.Internal.pairs ((Text
"data" Text -> [FileLink] -> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= ScheduledQueryRunFile'Links' -> [FileLink]
scheduledQueryRunFile'Links'Data ScheduledQueryRunFile'Links'
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..= ScheduledQueryRunFile'Links' -> Bool
scheduledQueryRunFile'Links'HasMore ScheduledQueryRunFile'Links'
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..= ScheduledQueryRunFile'Links' -> Text
scheduledQueryRunFile'Links'Url ScheduledQueryRunFile'Links'
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 ScheduledQueryRunFile'Links' where
parseJSON :: Value -> Parser ScheduledQueryRunFile'Links'
parseJSON = String
-> (Object -> Parser ScheduledQueryRunFile'Links')
-> Value
-> Parser ScheduledQueryRunFile'Links'
forall a. String -> (Object -> Parser a) -> Value -> Parser a
Data.Aeson.Types.FromJSON.withObject String
"ScheduledQueryRunFile'Links'" (\Object
obj -> ((([FileLink] -> Bool -> Text -> ScheduledQueryRunFile'Links')
-> Parser
([FileLink] -> Bool -> Text -> ScheduledQueryRunFile'Links')
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure [FileLink] -> Bool -> Text -> ScheduledQueryRunFile'Links'
ScheduledQueryRunFile'Links' Parser ([FileLink] -> Bool -> Text -> ScheduledQueryRunFile'Links')
-> Parser [FileLink]
-> Parser (Bool -> Text -> ScheduledQueryRunFile'Links')
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object -> Text -> Parser [FileLink]
forall a. FromJSON a => Object -> Text -> Parser a
Data.Aeson.Types.FromJSON..: Text
"data")) Parser (Bool -> Text -> ScheduledQueryRunFile'Links')
-> Parser Bool -> Parser (Text -> ScheduledQueryRunFile'Links')
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 -> ScheduledQueryRunFile'Links')
-> Parser Text -> Parser ScheduledQueryRunFile'Links'
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"))
mkScheduledQueryRunFile'Links' ::
[FileLink] ->
GHC.Types.Bool ->
Data.Text.Internal.Text ->
ScheduledQueryRunFile'Links'
mkScheduledQueryRunFile'Links' :: [FileLink] -> Bool -> Text -> ScheduledQueryRunFile'Links'
mkScheduledQueryRunFile'Links' [FileLink]
scheduledQueryRunFile'Links'Data Bool
scheduledQueryRunFile'Links'HasMore Text
scheduledQueryRunFile'Links'Url =
ScheduledQueryRunFile'Links' :: [FileLink] -> Bool -> Text -> ScheduledQueryRunFile'Links'
ScheduledQueryRunFile'Links'
{ scheduledQueryRunFile'Links'Data :: [FileLink]
scheduledQueryRunFile'Links'Data = [FileLink]
scheduledQueryRunFile'Links'Data,
scheduledQueryRunFile'Links'HasMore :: Bool
scheduledQueryRunFile'Links'HasMore = Bool
scheduledQueryRunFile'Links'HasMore,
scheduledQueryRunFile'Links'Url :: Text
scheduledQueryRunFile'Links'Url = Text
scheduledQueryRunFile'Links'Url
}
data ScheduledQueryRunFile'Object'
=
ScheduledQueryRunFile'Object'Other Data.Aeson.Types.Internal.Value
|
ScheduledQueryRunFile'Object'Typed Data.Text.Internal.Text
|
ScheduledQueryRunFile'Object'EnumFile
deriving (Int -> ScheduledQueryRunFile'Object' -> ShowS
[ScheduledQueryRunFile'Object'] -> ShowS
ScheduledQueryRunFile'Object' -> String
(Int -> ScheduledQueryRunFile'Object' -> ShowS)
-> (ScheduledQueryRunFile'Object' -> String)
-> ([ScheduledQueryRunFile'Object'] -> ShowS)
-> Show ScheduledQueryRunFile'Object'
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ScheduledQueryRunFile'Object'] -> ShowS
$cshowList :: [ScheduledQueryRunFile'Object'] -> ShowS
show :: ScheduledQueryRunFile'Object' -> String
$cshow :: ScheduledQueryRunFile'Object' -> String
showsPrec :: Int -> ScheduledQueryRunFile'Object' -> ShowS
$cshowsPrec :: Int -> ScheduledQueryRunFile'Object' -> ShowS
GHC.Show.Show, ScheduledQueryRunFile'Object'
-> ScheduledQueryRunFile'Object' -> Bool
(ScheduledQueryRunFile'Object'
-> ScheduledQueryRunFile'Object' -> Bool)
-> (ScheduledQueryRunFile'Object'
-> ScheduledQueryRunFile'Object' -> Bool)
-> Eq ScheduledQueryRunFile'Object'
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ScheduledQueryRunFile'Object'
-> ScheduledQueryRunFile'Object' -> Bool
$c/= :: ScheduledQueryRunFile'Object'
-> ScheduledQueryRunFile'Object' -> Bool
== :: ScheduledQueryRunFile'Object'
-> ScheduledQueryRunFile'Object' -> Bool
$c== :: ScheduledQueryRunFile'Object'
-> ScheduledQueryRunFile'Object' -> Bool
GHC.Classes.Eq)
instance Data.Aeson.Types.ToJSON.ToJSON ScheduledQueryRunFile'Object' where
toJSON :: ScheduledQueryRunFile'Object' -> Value
toJSON (ScheduledQueryRunFile'Object'Other Value
val) = Value
val
toJSON (ScheduledQueryRunFile'Object'Typed Text
val) = Text -> Value
forall a. ToJSON a => a -> Value
Data.Aeson.Types.ToJSON.toJSON Text
val
toJSON (ScheduledQueryRunFile'Object'
ScheduledQueryRunFile'Object'EnumFile) = Value
"file"
instance Data.Aeson.Types.FromJSON.FromJSON ScheduledQueryRunFile'Object' where
parseJSON :: Value -> Parser ScheduledQueryRunFile'Object'
parseJSON Value
val =
ScheduledQueryRunFile'Object'
-> Parser ScheduledQueryRunFile'Object'
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure
( if
| Value
val Value -> Value -> Bool
forall a. Eq a => a -> a -> Bool
GHC.Classes.== Value
"file" -> ScheduledQueryRunFile'Object'
ScheduledQueryRunFile'Object'EnumFile
| Bool
GHC.Base.otherwise -> Value -> ScheduledQueryRunFile'Object'
ScheduledQueryRunFile'Object'Other Value
val
)
data ScheduledQueryRunFile'Purpose'
=
ScheduledQueryRunFile'Purpose'Other Data.Aeson.Types.Internal.Value
|
ScheduledQueryRunFile'Purpose'Typed Data.Text.Internal.Text
|
ScheduledQueryRunFile'Purpose'EnumAccountRequirement
|
ScheduledQueryRunFile'Purpose'EnumAdditionalVerification
|
ScheduledQueryRunFile'Purpose'EnumBusinessIcon
|
ScheduledQueryRunFile'Purpose'EnumBusinessLogo
|
ScheduledQueryRunFile'Purpose'EnumCustomerSignature
|
ScheduledQueryRunFile'Purpose'EnumDisputeEvidence
|
ScheduledQueryRunFile'Purpose'EnumDocumentProviderIdentityDocument
|
ScheduledQueryRunFile'Purpose'EnumFinanceReportRun
|
ScheduledQueryRunFile'Purpose'EnumIdentityDocument
|
ScheduledQueryRunFile'Purpose'EnumIdentityDocumentDownloadable
|
ScheduledQueryRunFile'Purpose'EnumPciDocument
|
ScheduledQueryRunFile'Purpose'EnumSelfie
|
ScheduledQueryRunFile'Purpose'EnumSigmaScheduledQuery
|
ScheduledQueryRunFile'Purpose'EnumTaxDocumentUserUpload
deriving (Int -> ScheduledQueryRunFile'Purpose' -> ShowS
[ScheduledQueryRunFile'Purpose'] -> ShowS
ScheduledQueryRunFile'Purpose' -> String
(Int -> ScheduledQueryRunFile'Purpose' -> ShowS)
-> (ScheduledQueryRunFile'Purpose' -> String)
-> ([ScheduledQueryRunFile'Purpose'] -> ShowS)
-> Show ScheduledQueryRunFile'Purpose'
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ScheduledQueryRunFile'Purpose'] -> ShowS
$cshowList :: [ScheduledQueryRunFile'Purpose'] -> ShowS
show :: ScheduledQueryRunFile'Purpose' -> String
$cshow :: ScheduledQueryRunFile'Purpose' -> String
showsPrec :: Int -> ScheduledQueryRunFile'Purpose' -> ShowS
$cshowsPrec :: Int -> ScheduledQueryRunFile'Purpose' -> ShowS
GHC.Show.Show, ScheduledQueryRunFile'Purpose'
-> ScheduledQueryRunFile'Purpose' -> Bool
(ScheduledQueryRunFile'Purpose'
-> ScheduledQueryRunFile'Purpose' -> Bool)
-> (ScheduledQueryRunFile'Purpose'
-> ScheduledQueryRunFile'Purpose' -> Bool)
-> Eq ScheduledQueryRunFile'Purpose'
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ScheduledQueryRunFile'Purpose'
-> ScheduledQueryRunFile'Purpose' -> Bool
$c/= :: ScheduledQueryRunFile'Purpose'
-> ScheduledQueryRunFile'Purpose' -> Bool
== :: ScheduledQueryRunFile'Purpose'
-> ScheduledQueryRunFile'Purpose' -> Bool
$c== :: ScheduledQueryRunFile'Purpose'
-> ScheduledQueryRunFile'Purpose' -> Bool
GHC.Classes.Eq)
instance Data.Aeson.Types.ToJSON.ToJSON ScheduledQueryRunFile'Purpose' where
toJSON :: ScheduledQueryRunFile'Purpose' -> Value
toJSON (ScheduledQueryRunFile'Purpose'Other Value
val) = Value
val
toJSON (ScheduledQueryRunFile'Purpose'Typed Text
val) = Text -> Value
forall a. ToJSON a => a -> Value
Data.Aeson.Types.ToJSON.toJSON Text
val
toJSON (ScheduledQueryRunFile'Purpose'
ScheduledQueryRunFile'Purpose'EnumAccountRequirement) = Value
"account_requirement"
toJSON (ScheduledQueryRunFile'Purpose'
ScheduledQueryRunFile'Purpose'EnumAdditionalVerification) = Value
"additional_verification"
toJSON (ScheduledQueryRunFile'Purpose'
ScheduledQueryRunFile'Purpose'EnumBusinessIcon) = Value
"business_icon"
toJSON (ScheduledQueryRunFile'Purpose'
ScheduledQueryRunFile'Purpose'EnumBusinessLogo) = Value
"business_logo"
toJSON (ScheduledQueryRunFile'Purpose'
ScheduledQueryRunFile'Purpose'EnumCustomerSignature) = Value
"customer_signature"
toJSON (ScheduledQueryRunFile'Purpose'
ScheduledQueryRunFile'Purpose'EnumDisputeEvidence) = Value
"dispute_evidence"
toJSON (ScheduledQueryRunFile'Purpose'
ScheduledQueryRunFile'Purpose'EnumDocumentProviderIdentityDocument) = Value
"document_provider_identity_document"
toJSON (ScheduledQueryRunFile'Purpose'
ScheduledQueryRunFile'Purpose'EnumFinanceReportRun) = Value
"finance_report_run"
toJSON (ScheduledQueryRunFile'Purpose'
ScheduledQueryRunFile'Purpose'EnumIdentityDocument) = Value
"identity_document"
toJSON (ScheduledQueryRunFile'Purpose'
ScheduledQueryRunFile'Purpose'EnumIdentityDocumentDownloadable) = Value
"identity_document_downloadable"
toJSON (ScheduledQueryRunFile'Purpose'
ScheduledQueryRunFile'Purpose'EnumPciDocument) = Value
"pci_document"
toJSON (ScheduledQueryRunFile'Purpose'
ScheduledQueryRunFile'Purpose'EnumSelfie) = Value
"selfie"
toJSON (ScheduledQueryRunFile'Purpose'
ScheduledQueryRunFile'Purpose'EnumSigmaScheduledQuery) = Value
"sigma_scheduled_query"
toJSON (ScheduledQueryRunFile'Purpose'
ScheduledQueryRunFile'Purpose'EnumTaxDocumentUserUpload) = Value
"tax_document_user_upload"
instance Data.Aeson.Types.FromJSON.FromJSON ScheduledQueryRunFile'Purpose' where
parseJSON :: Value -> Parser ScheduledQueryRunFile'Purpose'
parseJSON Value
val =
ScheduledQueryRunFile'Purpose'
-> Parser ScheduledQueryRunFile'Purpose'
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure
( if
| Value
val Value -> Value -> Bool
forall a. Eq a => a -> a -> Bool
GHC.Classes.== Value
"account_requirement" -> ScheduledQueryRunFile'Purpose'
ScheduledQueryRunFile'Purpose'EnumAccountRequirement
| Value
val Value -> Value -> Bool
forall a. Eq a => a -> a -> Bool
GHC.Classes.== Value
"additional_verification" -> ScheduledQueryRunFile'Purpose'
ScheduledQueryRunFile'Purpose'EnumAdditionalVerification
| Value
val Value -> Value -> Bool
forall a. Eq a => a -> a -> Bool
GHC.Classes.== Value
"business_icon" -> ScheduledQueryRunFile'Purpose'
ScheduledQueryRunFile'Purpose'EnumBusinessIcon
| Value
val Value -> Value -> Bool
forall a. Eq a => a -> a -> Bool
GHC.Classes.== Value
"business_logo" -> ScheduledQueryRunFile'Purpose'
ScheduledQueryRunFile'Purpose'EnumBusinessLogo
| Value
val Value -> Value -> Bool
forall a. Eq a => a -> a -> Bool
GHC.Classes.== Value
"customer_signature" -> ScheduledQueryRunFile'Purpose'
ScheduledQueryRunFile'Purpose'EnumCustomerSignature
| Value
val Value -> Value -> Bool
forall a. Eq a => a -> a -> Bool
GHC.Classes.== Value
"dispute_evidence" -> ScheduledQueryRunFile'Purpose'
ScheduledQueryRunFile'Purpose'EnumDisputeEvidence
| Value
val Value -> Value -> Bool
forall a. Eq a => a -> a -> Bool
GHC.Classes.== Value
"document_provider_identity_document" -> ScheduledQueryRunFile'Purpose'
ScheduledQueryRunFile'Purpose'EnumDocumentProviderIdentityDocument
| Value
val Value -> Value -> Bool
forall a. Eq a => a -> a -> Bool
GHC.Classes.== Value
"finance_report_run" -> ScheduledQueryRunFile'Purpose'
ScheduledQueryRunFile'Purpose'EnumFinanceReportRun
| Value
val Value -> Value -> Bool
forall a. Eq a => a -> a -> Bool
GHC.Classes.== Value
"identity_document" -> ScheduledQueryRunFile'Purpose'
ScheduledQueryRunFile'Purpose'EnumIdentityDocument
| Value
val Value -> Value -> Bool
forall a. Eq a => a -> a -> Bool
GHC.Classes.== Value
"identity_document_downloadable" -> ScheduledQueryRunFile'Purpose'
ScheduledQueryRunFile'Purpose'EnumIdentityDocumentDownloadable
| Value
val Value -> Value -> Bool
forall a. Eq a => a -> a -> Bool
GHC.Classes.== Value
"pci_document" -> ScheduledQueryRunFile'Purpose'
ScheduledQueryRunFile'Purpose'EnumPciDocument
| Value
val Value -> Value -> Bool
forall a. Eq a => a -> a -> Bool
GHC.Classes.== Value
"selfie" -> ScheduledQueryRunFile'Purpose'
ScheduledQueryRunFile'Purpose'EnumSelfie
| Value
val Value -> Value -> Bool
forall a. Eq a => a -> a -> Bool
GHC.Classes.== Value
"sigma_scheduled_query" -> ScheduledQueryRunFile'Purpose'
ScheduledQueryRunFile'Purpose'EnumSigmaScheduledQuery
| Value
val Value -> Value -> Bool
forall a. Eq a => a -> a -> Bool
GHC.Classes.== Value
"tax_document_user_upload" -> ScheduledQueryRunFile'Purpose'
ScheduledQueryRunFile'Purpose'EnumTaxDocumentUserUpload
| Bool
GHC.Base.otherwise -> Value -> ScheduledQueryRunFile'Purpose'
ScheduledQueryRunFile'Purpose'Other Value
val
)