{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE DuplicateRecordFields #-}
{-# LANGUAGE NamedFieldPuns #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE RecordWildCards #-}
{-# LANGUAGE StrictData #-}
{-# LANGUAGE NoImplicitPrelude #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
{-# OPTIONS_GHC -fno-warn-unused-matches #-}
module Amazonka.Glue.Types.JobRun where
import qualified Amazonka.Core as Core
import qualified Amazonka.Core.Lens.Internal as Lens
import qualified Amazonka.Data as Data
import Amazonka.Glue.Types.ExecutionClass
import Amazonka.Glue.Types.JobRunState
import Amazonka.Glue.Types.NotificationProperty
import Amazonka.Glue.Types.Predecessor
import Amazonka.Glue.Types.WorkerType
import qualified Amazonka.Prelude as Prelude
data JobRun = JobRun'
{
JobRun -> Maybe Int
allocatedCapacity :: Prelude.Maybe Prelude.Int,
JobRun -> Maybe (HashMap Text Text)
arguments :: Prelude.Maybe (Prelude.HashMap Prelude.Text Prelude.Text),
JobRun -> Maybe Int
attempt :: Prelude.Maybe Prelude.Int,
JobRun -> Maybe POSIX
completedOn :: Prelude.Maybe Data.POSIX,
JobRun -> Maybe Double
dPUSeconds :: Prelude.Maybe Prelude.Double,
JobRun -> Maybe Text
errorMessage :: Prelude.Maybe Prelude.Text,
JobRun -> Maybe ExecutionClass
executionClass :: Prelude.Maybe ExecutionClass,
JobRun -> Maybe Int
executionTime :: Prelude.Maybe Prelude.Int,
JobRun -> Maybe Text
glueVersion :: Prelude.Maybe Prelude.Text,
JobRun -> Maybe Text
id :: Prelude.Maybe Prelude.Text,
JobRun -> Maybe Text
jobName :: Prelude.Maybe Prelude.Text,
JobRun -> Maybe JobRunState
jobRunState :: Prelude.Maybe JobRunState,
JobRun -> Maybe POSIX
lastModifiedOn :: Prelude.Maybe Data.POSIX,
JobRun -> Maybe Text
logGroupName :: Prelude.Maybe Prelude.Text,
JobRun -> Maybe Double
maxCapacity :: Prelude.Maybe Prelude.Double,
JobRun -> Maybe NotificationProperty
notificationProperty :: Prelude.Maybe NotificationProperty,
JobRun -> Maybe Int
numberOfWorkers :: Prelude.Maybe Prelude.Int,
JobRun -> Maybe [Predecessor]
predecessorRuns :: Prelude.Maybe [Predecessor],
JobRun -> Maybe Text
previousRunId :: Prelude.Maybe Prelude.Text,
JobRun -> Maybe Text
securityConfiguration :: Prelude.Maybe Prelude.Text,
JobRun -> Maybe POSIX
startedOn :: Prelude.Maybe Data.POSIX,
JobRun -> Maybe Natural
timeout :: Prelude.Maybe Prelude.Natural,
JobRun -> Maybe Text
triggerName :: Prelude.Maybe Prelude.Text,
JobRun -> Maybe WorkerType
workerType :: Prelude.Maybe WorkerType
}
deriving (JobRun -> JobRun -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: JobRun -> JobRun -> Bool
$c/= :: JobRun -> JobRun -> Bool
== :: JobRun -> JobRun -> Bool
$c== :: JobRun -> JobRun -> Bool
Prelude.Eq, ReadPrec [JobRun]
ReadPrec JobRun
Int -> ReadS JobRun
ReadS [JobRun]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [JobRun]
$creadListPrec :: ReadPrec [JobRun]
readPrec :: ReadPrec JobRun
$creadPrec :: ReadPrec JobRun
readList :: ReadS [JobRun]
$creadList :: ReadS [JobRun]
readsPrec :: Int -> ReadS JobRun
$creadsPrec :: Int -> ReadS JobRun
Prelude.Read, Int -> JobRun -> ShowS
[JobRun] -> ShowS
JobRun -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [JobRun] -> ShowS
$cshowList :: [JobRun] -> ShowS
show :: JobRun -> String
$cshow :: JobRun -> String
showsPrec :: Int -> JobRun -> ShowS
$cshowsPrec :: Int -> JobRun -> ShowS
Prelude.Show, forall x. Rep JobRun x -> JobRun
forall x. JobRun -> Rep JobRun x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep JobRun x -> JobRun
$cfrom :: forall x. JobRun -> Rep JobRun x
Prelude.Generic)
newJobRun ::
JobRun
newJobRun :: JobRun
newJobRun =
JobRun'
{ $sel:allocatedCapacity:JobRun' :: Maybe Int
allocatedCapacity = forall a. Maybe a
Prelude.Nothing,
$sel:arguments:JobRun' :: Maybe (HashMap Text Text)
arguments = forall a. Maybe a
Prelude.Nothing,
$sel:attempt:JobRun' :: Maybe Int
attempt = forall a. Maybe a
Prelude.Nothing,
$sel:completedOn:JobRun' :: Maybe POSIX
completedOn = forall a. Maybe a
Prelude.Nothing,
$sel:dPUSeconds:JobRun' :: Maybe Double
dPUSeconds = forall a. Maybe a
Prelude.Nothing,
$sel:errorMessage:JobRun' :: Maybe Text
errorMessage = forall a. Maybe a
Prelude.Nothing,
$sel:executionClass:JobRun' :: Maybe ExecutionClass
executionClass = forall a. Maybe a
Prelude.Nothing,
$sel:executionTime:JobRun' :: Maybe Int
executionTime = forall a. Maybe a
Prelude.Nothing,
$sel:glueVersion:JobRun' :: Maybe Text
glueVersion = forall a. Maybe a
Prelude.Nothing,
$sel:id:JobRun' :: Maybe Text
id = forall a. Maybe a
Prelude.Nothing,
$sel:jobName:JobRun' :: Maybe Text
jobName = forall a. Maybe a
Prelude.Nothing,
$sel:jobRunState:JobRun' :: Maybe JobRunState
jobRunState = forall a. Maybe a
Prelude.Nothing,
$sel:lastModifiedOn:JobRun' :: Maybe POSIX
lastModifiedOn = forall a. Maybe a
Prelude.Nothing,
$sel:logGroupName:JobRun' :: Maybe Text
logGroupName = forall a. Maybe a
Prelude.Nothing,
$sel:maxCapacity:JobRun' :: Maybe Double
maxCapacity = forall a. Maybe a
Prelude.Nothing,
$sel:notificationProperty:JobRun' :: Maybe NotificationProperty
notificationProperty = forall a. Maybe a
Prelude.Nothing,
$sel:numberOfWorkers:JobRun' :: Maybe Int
numberOfWorkers = forall a. Maybe a
Prelude.Nothing,
$sel:predecessorRuns:JobRun' :: Maybe [Predecessor]
predecessorRuns = forall a. Maybe a
Prelude.Nothing,
$sel:previousRunId:JobRun' :: Maybe Text
previousRunId = forall a. Maybe a
Prelude.Nothing,
$sel:securityConfiguration:JobRun' :: Maybe Text
securityConfiguration = forall a. Maybe a
Prelude.Nothing,
$sel:startedOn:JobRun' :: Maybe POSIX
startedOn = forall a. Maybe a
Prelude.Nothing,
$sel:timeout:JobRun' :: Maybe Natural
timeout = forall a. Maybe a
Prelude.Nothing,
$sel:triggerName:JobRun' :: Maybe Text
triggerName = forall a. Maybe a
Prelude.Nothing,
$sel:workerType:JobRun' :: Maybe WorkerType
workerType = forall a. Maybe a
Prelude.Nothing
}
jobRun_allocatedCapacity :: Lens.Lens' JobRun (Prelude.Maybe Prelude.Int)
jobRun_allocatedCapacity :: Lens' JobRun (Maybe Int)
jobRun_allocatedCapacity = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\JobRun' {Maybe Int
allocatedCapacity :: Maybe Int
$sel:allocatedCapacity:JobRun' :: JobRun -> Maybe Int
allocatedCapacity} -> Maybe Int
allocatedCapacity) (\s :: JobRun
s@JobRun' {} Maybe Int
a -> JobRun
s {$sel:allocatedCapacity:JobRun' :: Maybe Int
allocatedCapacity = Maybe Int
a} :: JobRun)
jobRun_arguments :: Lens.Lens' JobRun (Prelude.Maybe (Prelude.HashMap Prelude.Text Prelude.Text))
jobRun_arguments :: Lens' JobRun (Maybe (HashMap Text Text))
jobRun_arguments = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\JobRun' {Maybe (HashMap Text Text)
arguments :: Maybe (HashMap Text Text)
$sel:arguments:JobRun' :: JobRun -> Maybe (HashMap Text Text)
arguments} -> Maybe (HashMap Text Text)
arguments) (\s :: JobRun
s@JobRun' {} Maybe (HashMap Text Text)
a -> JobRun
s {$sel:arguments:JobRun' :: Maybe (HashMap Text Text)
arguments = Maybe (HashMap Text Text)
a} :: JobRun) forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (g :: * -> *) s t a b.
(Functor f, Functor g) =>
AnIso s t a b -> Iso (f s) (g t) (f a) (g b)
Lens.mapping forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b
Lens.coerced
jobRun_attempt :: Lens.Lens' JobRun (Prelude.Maybe Prelude.Int)
jobRun_attempt :: Lens' JobRun (Maybe Int)
jobRun_attempt = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\JobRun' {Maybe Int
attempt :: Maybe Int
$sel:attempt:JobRun' :: JobRun -> Maybe Int
attempt} -> Maybe Int
attempt) (\s :: JobRun
s@JobRun' {} Maybe Int
a -> JobRun
s {$sel:attempt:JobRun' :: Maybe Int
attempt = Maybe Int
a} :: JobRun)
jobRun_completedOn :: Lens.Lens' JobRun (Prelude.Maybe Prelude.UTCTime)
jobRun_completedOn :: Lens' JobRun (Maybe UTCTime)
jobRun_completedOn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\JobRun' {Maybe POSIX
completedOn :: Maybe POSIX
$sel:completedOn:JobRun' :: JobRun -> Maybe POSIX
completedOn} -> Maybe POSIX
completedOn) (\s :: JobRun
s@JobRun' {} Maybe POSIX
a -> JobRun
s {$sel:completedOn:JobRun' :: Maybe POSIX
completedOn = Maybe POSIX
a} :: JobRun) forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (g :: * -> *) s t a b.
(Functor f, Functor g) =>
AnIso s t a b -> Iso (f s) (g t) (f a) (g b)
Lens.mapping forall (a :: Format). Iso' (Time a) UTCTime
Data._Time
jobRun_dPUSeconds :: Lens.Lens' JobRun (Prelude.Maybe Prelude.Double)
jobRun_dPUSeconds :: Lens' JobRun (Maybe Double)
jobRun_dPUSeconds = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\JobRun' {Maybe Double
dPUSeconds :: Maybe Double
$sel:dPUSeconds:JobRun' :: JobRun -> Maybe Double
dPUSeconds} -> Maybe Double
dPUSeconds) (\s :: JobRun
s@JobRun' {} Maybe Double
a -> JobRun
s {$sel:dPUSeconds:JobRun' :: Maybe Double
dPUSeconds = Maybe Double
a} :: JobRun)
jobRun_errorMessage :: Lens.Lens' JobRun (Prelude.Maybe Prelude.Text)
jobRun_errorMessage :: Lens' JobRun (Maybe Text)
jobRun_errorMessage = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\JobRun' {Maybe Text
errorMessage :: Maybe Text
$sel:errorMessage:JobRun' :: JobRun -> Maybe Text
errorMessage} -> Maybe Text
errorMessage) (\s :: JobRun
s@JobRun' {} Maybe Text
a -> JobRun
s {$sel:errorMessage:JobRun' :: Maybe Text
errorMessage = Maybe Text
a} :: JobRun)
jobRun_executionClass :: Lens.Lens' JobRun (Prelude.Maybe ExecutionClass)
jobRun_executionClass :: Lens' JobRun (Maybe ExecutionClass)
jobRun_executionClass = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\JobRun' {Maybe ExecutionClass
executionClass :: Maybe ExecutionClass
$sel:executionClass:JobRun' :: JobRun -> Maybe ExecutionClass
executionClass} -> Maybe ExecutionClass
executionClass) (\s :: JobRun
s@JobRun' {} Maybe ExecutionClass
a -> JobRun
s {$sel:executionClass:JobRun' :: Maybe ExecutionClass
executionClass = Maybe ExecutionClass
a} :: JobRun)
jobRun_executionTime :: Lens.Lens' JobRun (Prelude.Maybe Prelude.Int)
jobRun_executionTime :: Lens' JobRun (Maybe Int)
jobRun_executionTime = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\JobRun' {Maybe Int
executionTime :: Maybe Int
$sel:executionTime:JobRun' :: JobRun -> Maybe Int
executionTime} -> Maybe Int
executionTime) (\s :: JobRun
s@JobRun' {} Maybe Int
a -> JobRun
s {$sel:executionTime:JobRun' :: Maybe Int
executionTime = Maybe Int
a} :: JobRun)
jobRun_glueVersion :: Lens.Lens' JobRun (Prelude.Maybe Prelude.Text)
jobRun_glueVersion :: Lens' JobRun (Maybe Text)
jobRun_glueVersion = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\JobRun' {Maybe Text
glueVersion :: Maybe Text
$sel:glueVersion:JobRun' :: JobRun -> Maybe Text
glueVersion} -> Maybe Text
glueVersion) (\s :: JobRun
s@JobRun' {} Maybe Text
a -> JobRun
s {$sel:glueVersion:JobRun' :: Maybe Text
glueVersion = Maybe Text
a} :: JobRun)
jobRun_id :: Lens.Lens' JobRun (Prelude.Maybe Prelude.Text)
jobRun_id :: Lens' JobRun (Maybe Text)
jobRun_id = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\JobRun' {Maybe Text
id :: Maybe Text
$sel:id:JobRun' :: JobRun -> Maybe Text
id} -> Maybe Text
id) (\s :: JobRun
s@JobRun' {} Maybe Text
a -> JobRun
s {$sel:id:JobRun' :: Maybe Text
id = Maybe Text
a} :: JobRun)
jobRun_jobName :: Lens.Lens' JobRun (Prelude.Maybe Prelude.Text)
jobRun_jobName :: Lens' JobRun (Maybe Text)
jobRun_jobName = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\JobRun' {Maybe Text
jobName :: Maybe Text
$sel:jobName:JobRun' :: JobRun -> Maybe Text
jobName} -> Maybe Text
jobName) (\s :: JobRun
s@JobRun' {} Maybe Text
a -> JobRun
s {$sel:jobName:JobRun' :: Maybe Text
jobName = Maybe Text
a} :: JobRun)
jobRun_jobRunState :: Lens.Lens' JobRun (Prelude.Maybe JobRunState)
jobRun_jobRunState :: Lens' JobRun (Maybe JobRunState)
jobRun_jobRunState = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\JobRun' {Maybe JobRunState
jobRunState :: Maybe JobRunState
$sel:jobRunState:JobRun' :: JobRun -> Maybe JobRunState
jobRunState} -> Maybe JobRunState
jobRunState) (\s :: JobRun
s@JobRun' {} Maybe JobRunState
a -> JobRun
s {$sel:jobRunState:JobRun' :: Maybe JobRunState
jobRunState = Maybe JobRunState
a} :: JobRun)
jobRun_lastModifiedOn :: Lens.Lens' JobRun (Prelude.Maybe Prelude.UTCTime)
jobRun_lastModifiedOn :: Lens' JobRun (Maybe UTCTime)
jobRun_lastModifiedOn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\JobRun' {Maybe POSIX
lastModifiedOn :: Maybe POSIX
$sel:lastModifiedOn:JobRun' :: JobRun -> Maybe POSIX
lastModifiedOn} -> Maybe POSIX
lastModifiedOn) (\s :: JobRun
s@JobRun' {} Maybe POSIX
a -> JobRun
s {$sel:lastModifiedOn:JobRun' :: Maybe POSIX
lastModifiedOn = Maybe POSIX
a} :: JobRun) forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (g :: * -> *) s t a b.
(Functor f, Functor g) =>
AnIso s t a b -> Iso (f s) (g t) (f a) (g b)
Lens.mapping forall (a :: Format). Iso' (Time a) UTCTime
Data._Time
jobRun_logGroupName :: Lens.Lens' JobRun (Prelude.Maybe Prelude.Text)
jobRun_logGroupName :: Lens' JobRun (Maybe Text)
jobRun_logGroupName = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\JobRun' {Maybe Text
logGroupName :: Maybe Text
$sel:logGroupName:JobRun' :: JobRun -> Maybe Text
logGroupName} -> Maybe Text
logGroupName) (\s :: JobRun
s@JobRun' {} Maybe Text
a -> JobRun
s {$sel:logGroupName:JobRun' :: Maybe Text
logGroupName = Maybe Text
a} :: JobRun)
jobRun_maxCapacity :: Lens.Lens' JobRun (Prelude.Maybe Prelude.Double)
jobRun_maxCapacity :: Lens' JobRun (Maybe Double)
jobRun_maxCapacity = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\JobRun' {Maybe Double
maxCapacity :: Maybe Double
$sel:maxCapacity:JobRun' :: JobRun -> Maybe Double
maxCapacity} -> Maybe Double
maxCapacity) (\s :: JobRun
s@JobRun' {} Maybe Double
a -> JobRun
s {$sel:maxCapacity:JobRun' :: Maybe Double
maxCapacity = Maybe Double
a} :: JobRun)
jobRun_notificationProperty :: Lens.Lens' JobRun (Prelude.Maybe NotificationProperty)
jobRun_notificationProperty :: Lens' JobRun (Maybe NotificationProperty)
jobRun_notificationProperty = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\JobRun' {Maybe NotificationProperty
notificationProperty :: Maybe NotificationProperty
$sel:notificationProperty:JobRun' :: JobRun -> Maybe NotificationProperty
notificationProperty} -> Maybe NotificationProperty
notificationProperty) (\s :: JobRun
s@JobRun' {} Maybe NotificationProperty
a -> JobRun
s {$sel:notificationProperty:JobRun' :: Maybe NotificationProperty
notificationProperty = Maybe NotificationProperty
a} :: JobRun)
jobRun_numberOfWorkers :: Lens.Lens' JobRun (Prelude.Maybe Prelude.Int)
jobRun_numberOfWorkers :: Lens' JobRun (Maybe Int)
jobRun_numberOfWorkers = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\JobRun' {Maybe Int
numberOfWorkers :: Maybe Int
$sel:numberOfWorkers:JobRun' :: JobRun -> Maybe Int
numberOfWorkers} -> Maybe Int
numberOfWorkers) (\s :: JobRun
s@JobRun' {} Maybe Int
a -> JobRun
s {$sel:numberOfWorkers:JobRun' :: Maybe Int
numberOfWorkers = Maybe Int
a} :: JobRun)
jobRun_predecessorRuns :: Lens.Lens' JobRun (Prelude.Maybe [Predecessor])
jobRun_predecessorRuns :: Lens' JobRun (Maybe [Predecessor])
jobRun_predecessorRuns = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\JobRun' {Maybe [Predecessor]
predecessorRuns :: Maybe [Predecessor]
$sel:predecessorRuns:JobRun' :: JobRun -> Maybe [Predecessor]
predecessorRuns} -> Maybe [Predecessor]
predecessorRuns) (\s :: JobRun
s@JobRun' {} Maybe [Predecessor]
a -> JobRun
s {$sel:predecessorRuns:JobRun' :: Maybe [Predecessor]
predecessorRuns = Maybe [Predecessor]
a} :: JobRun) forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (g :: * -> *) s t a b.
(Functor f, Functor g) =>
AnIso s t a b -> Iso (f s) (g t) (f a) (g b)
Lens.mapping forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b
Lens.coerced
jobRun_previousRunId :: Lens.Lens' JobRun (Prelude.Maybe Prelude.Text)
jobRun_previousRunId :: Lens' JobRun (Maybe Text)
jobRun_previousRunId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\JobRun' {Maybe Text
previousRunId :: Maybe Text
$sel:previousRunId:JobRun' :: JobRun -> Maybe Text
previousRunId} -> Maybe Text
previousRunId) (\s :: JobRun
s@JobRun' {} Maybe Text
a -> JobRun
s {$sel:previousRunId:JobRun' :: Maybe Text
previousRunId = Maybe Text
a} :: JobRun)
jobRun_securityConfiguration :: Lens.Lens' JobRun (Prelude.Maybe Prelude.Text)
jobRun_securityConfiguration :: Lens' JobRun (Maybe Text)
jobRun_securityConfiguration = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\JobRun' {Maybe Text
securityConfiguration :: Maybe Text
$sel:securityConfiguration:JobRun' :: JobRun -> Maybe Text
securityConfiguration} -> Maybe Text
securityConfiguration) (\s :: JobRun
s@JobRun' {} Maybe Text
a -> JobRun
s {$sel:securityConfiguration:JobRun' :: Maybe Text
securityConfiguration = Maybe Text
a} :: JobRun)
jobRun_startedOn :: Lens.Lens' JobRun (Prelude.Maybe Prelude.UTCTime)
jobRun_startedOn :: Lens' JobRun (Maybe UTCTime)
jobRun_startedOn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\JobRun' {Maybe POSIX
startedOn :: Maybe POSIX
$sel:startedOn:JobRun' :: JobRun -> Maybe POSIX
startedOn} -> Maybe POSIX
startedOn) (\s :: JobRun
s@JobRun' {} Maybe POSIX
a -> JobRun
s {$sel:startedOn:JobRun' :: Maybe POSIX
startedOn = Maybe POSIX
a} :: JobRun) forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (g :: * -> *) s t a b.
(Functor f, Functor g) =>
AnIso s t a b -> Iso (f s) (g t) (f a) (g b)
Lens.mapping forall (a :: Format). Iso' (Time a) UTCTime
Data._Time
jobRun_timeout :: Lens.Lens' JobRun (Prelude.Maybe Prelude.Natural)
jobRun_timeout :: Lens' JobRun (Maybe Natural)
jobRun_timeout = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\JobRun' {Maybe Natural
timeout :: Maybe Natural
$sel:timeout:JobRun' :: JobRun -> Maybe Natural
timeout} -> Maybe Natural
timeout) (\s :: JobRun
s@JobRun' {} Maybe Natural
a -> JobRun
s {$sel:timeout:JobRun' :: Maybe Natural
timeout = Maybe Natural
a} :: JobRun)
jobRun_triggerName :: Lens.Lens' JobRun (Prelude.Maybe Prelude.Text)
jobRun_triggerName :: Lens' JobRun (Maybe Text)
jobRun_triggerName = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\JobRun' {Maybe Text
triggerName :: Maybe Text
$sel:triggerName:JobRun' :: JobRun -> Maybe Text
triggerName} -> Maybe Text
triggerName) (\s :: JobRun
s@JobRun' {} Maybe Text
a -> JobRun
s {$sel:triggerName:JobRun' :: Maybe Text
triggerName = Maybe Text
a} :: JobRun)
jobRun_workerType :: Lens.Lens' JobRun (Prelude.Maybe WorkerType)
jobRun_workerType :: Lens' JobRun (Maybe WorkerType)
jobRun_workerType = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\JobRun' {Maybe WorkerType
workerType :: Maybe WorkerType
$sel:workerType:JobRun' :: JobRun -> Maybe WorkerType
workerType} -> Maybe WorkerType
workerType) (\s :: JobRun
s@JobRun' {} Maybe WorkerType
a -> JobRun
s {$sel:workerType:JobRun' :: Maybe WorkerType
workerType = Maybe WorkerType
a} :: JobRun)
instance Data.FromJSON JobRun where
parseJSON :: Value -> Parser JobRun
parseJSON =
forall a. String -> (Object -> Parser a) -> Value -> Parser a
Data.withObject
String
"JobRun"
( \Object
x ->
Maybe Int
-> Maybe (HashMap Text Text)
-> Maybe Int
-> Maybe POSIX
-> Maybe Double
-> Maybe Text
-> Maybe ExecutionClass
-> Maybe Int
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe JobRunState
-> Maybe POSIX
-> Maybe Text
-> Maybe Double
-> Maybe NotificationProperty
-> Maybe Int
-> Maybe [Predecessor]
-> Maybe Text
-> Maybe Text
-> Maybe POSIX
-> Maybe Natural
-> Maybe Text
-> Maybe WorkerType
-> JobRun
JobRun'
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"AllocatedCapacity")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"Arguments" forall a. Parser (Maybe a) -> a -> Parser a
Data..!= forall a. Monoid a => a
Prelude.mempty)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"Attempt")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"CompletedOn")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"DPUSeconds")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"ErrorMessage")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"ExecutionClass")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"ExecutionTime")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"GlueVersion")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"Id")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"JobName")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"JobRunState")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"LastModifiedOn")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"LogGroupName")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"MaxCapacity")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"NotificationProperty")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"NumberOfWorkers")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ( Object
x
forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"PredecessorRuns"
forall a. Parser (Maybe a) -> a -> Parser a
Data..!= forall a. Monoid a => a
Prelude.mempty
)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"PreviousRunId")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"SecurityConfiguration")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"StartedOn")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"Timeout")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"TriggerName")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"WorkerType")
)
instance Prelude.Hashable JobRun where
hashWithSalt :: Int -> JobRun -> Int
hashWithSalt Int
_salt JobRun' {Maybe Double
Maybe Int
Maybe Natural
Maybe [Predecessor]
Maybe Text
Maybe (HashMap Text Text)
Maybe POSIX
Maybe ExecutionClass
Maybe JobRunState
Maybe NotificationProperty
Maybe WorkerType
workerType :: Maybe WorkerType
triggerName :: Maybe Text
timeout :: Maybe Natural
startedOn :: Maybe POSIX
securityConfiguration :: Maybe Text
previousRunId :: Maybe Text
predecessorRuns :: Maybe [Predecessor]
numberOfWorkers :: Maybe Int
notificationProperty :: Maybe NotificationProperty
maxCapacity :: Maybe Double
logGroupName :: Maybe Text
lastModifiedOn :: Maybe POSIX
jobRunState :: Maybe JobRunState
jobName :: Maybe Text
id :: Maybe Text
glueVersion :: Maybe Text
executionTime :: Maybe Int
executionClass :: Maybe ExecutionClass
errorMessage :: Maybe Text
dPUSeconds :: Maybe Double
completedOn :: Maybe POSIX
attempt :: Maybe Int
arguments :: Maybe (HashMap Text Text)
allocatedCapacity :: Maybe Int
$sel:workerType:JobRun' :: JobRun -> Maybe WorkerType
$sel:triggerName:JobRun' :: JobRun -> Maybe Text
$sel:timeout:JobRun' :: JobRun -> Maybe Natural
$sel:startedOn:JobRun' :: JobRun -> Maybe POSIX
$sel:securityConfiguration:JobRun' :: JobRun -> Maybe Text
$sel:previousRunId:JobRun' :: JobRun -> Maybe Text
$sel:predecessorRuns:JobRun' :: JobRun -> Maybe [Predecessor]
$sel:numberOfWorkers:JobRun' :: JobRun -> Maybe Int
$sel:notificationProperty:JobRun' :: JobRun -> Maybe NotificationProperty
$sel:maxCapacity:JobRun' :: JobRun -> Maybe Double
$sel:logGroupName:JobRun' :: JobRun -> Maybe Text
$sel:lastModifiedOn:JobRun' :: JobRun -> Maybe POSIX
$sel:jobRunState:JobRun' :: JobRun -> Maybe JobRunState
$sel:jobName:JobRun' :: JobRun -> Maybe Text
$sel:id:JobRun' :: JobRun -> Maybe Text
$sel:glueVersion:JobRun' :: JobRun -> Maybe Text
$sel:executionTime:JobRun' :: JobRun -> Maybe Int
$sel:executionClass:JobRun' :: JobRun -> Maybe ExecutionClass
$sel:errorMessage:JobRun' :: JobRun -> Maybe Text
$sel:dPUSeconds:JobRun' :: JobRun -> Maybe Double
$sel:completedOn:JobRun' :: JobRun -> Maybe POSIX
$sel:attempt:JobRun' :: JobRun -> Maybe Int
$sel:arguments:JobRun' :: JobRun -> Maybe (HashMap Text Text)
$sel:allocatedCapacity:JobRun' :: JobRun -> Maybe Int
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Int
allocatedCapacity
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe (HashMap Text Text)
arguments
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Int
attempt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe POSIX
completedOn
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Double
dPUSeconds
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
errorMessage
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe ExecutionClass
executionClass
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Int
executionTime
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
glueVersion
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
id
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
jobName
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe JobRunState
jobRunState
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe POSIX
lastModifiedOn
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
logGroupName
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Double
maxCapacity
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe NotificationProperty
notificationProperty
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Int
numberOfWorkers
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe [Predecessor]
predecessorRuns
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
previousRunId
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
securityConfiguration
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe POSIX
startedOn
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Natural
timeout
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
triggerName
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe WorkerType
workerType
instance Prelude.NFData JobRun where
rnf :: JobRun -> ()
rnf JobRun' {Maybe Double
Maybe Int
Maybe Natural
Maybe [Predecessor]
Maybe Text
Maybe (HashMap Text Text)
Maybe POSIX
Maybe ExecutionClass
Maybe JobRunState
Maybe NotificationProperty
Maybe WorkerType
workerType :: Maybe WorkerType
triggerName :: Maybe Text
timeout :: Maybe Natural
startedOn :: Maybe POSIX
securityConfiguration :: Maybe Text
previousRunId :: Maybe Text
predecessorRuns :: Maybe [Predecessor]
numberOfWorkers :: Maybe Int
notificationProperty :: Maybe NotificationProperty
maxCapacity :: Maybe Double
logGroupName :: Maybe Text
lastModifiedOn :: Maybe POSIX
jobRunState :: Maybe JobRunState
jobName :: Maybe Text
id :: Maybe Text
glueVersion :: Maybe Text
executionTime :: Maybe Int
executionClass :: Maybe ExecutionClass
errorMessage :: Maybe Text
dPUSeconds :: Maybe Double
completedOn :: Maybe POSIX
attempt :: Maybe Int
arguments :: Maybe (HashMap Text Text)
allocatedCapacity :: Maybe Int
$sel:workerType:JobRun' :: JobRun -> Maybe WorkerType
$sel:triggerName:JobRun' :: JobRun -> Maybe Text
$sel:timeout:JobRun' :: JobRun -> Maybe Natural
$sel:startedOn:JobRun' :: JobRun -> Maybe POSIX
$sel:securityConfiguration:JobRun' :: JobRun -> Maybe Text
$sel:previousRunId:JobRun' :: JobRun -> Maybe Text
$sel:predecessorRuns:JobRun' :: JobRun -> Maybe [Predecessor]
$sel:numberOfWorkers:JobRun' :: JobRun -> Maybe Int
$sel:notificationProperty:JobRun' :: JobRun -> Maybe NotificationProperty
$sel:maxCapacity:JobRun' :: JobRun -> Maybe Double
$sel:logGroupName:JobRun' :: JobRun -> Maybe Text
$sel:lastModifiedOn:JobRun' :: JobRun -> Maybe POSIX
$sel:jobRunState:JobRun' :: JobRun -> Maybe JobRunState
$sel:jobName:JobRun' :: JobRun -> Maybe Text
$sel:id:JobRun' :: JobRun -> Maybe Text
$sel:glueVersion:JobRun' :: JobRun -> Maybe Text
$sel:executionTime:JobRun' :: JobRun -> Maybe Int
$sel:executionClass:JobRun' :: JobRun -> Maybe ExecutionClass
$sel:errorMessage:JobRun' :: JobRun -> Maybe Text
$sel:dPUSeconds:JobRun' :: JobRun -> Maybe Double
$sel:completedOn:JobRun' :: JobRun -> Maybe POSIX
$sel:attempt:JobRun' :: JobRun -> Maybe Int
$sel:arguments:JobRun' :: JobRun -> Maybe (HashMap Text Text)
$sel:allocatedCapacity:JobRun' :: JobRun -> Maybe Int
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe Int
allocatedCapacity
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe (HashMap Text Text)
arguments
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Int
attempt
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe POSIX
completedOn
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Double
dPUSeconds
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
errorMessage
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe ExecutionClass
executionClass
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Int
executionTime
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
glueVersion
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
id
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
jobName
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe JobRunState
jobRunState
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe POSIX
lastModifiedOn
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
logGroupName
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Double
maxCapacity
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe NotificationProperty
notificationProperty
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Int
numberOfWorkers
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe [Predecessor]
predecessorRuns
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
previousRunId
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf
Maybe Text
securityConfiguration
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe POSIX
startedOn
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Natural
timeout
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
triggerName
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe WorkerType
workerType