{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE DuplicateRecordFields #-}
{-# LANGUAGE NamedFieldPuns #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE RecordWildCards #-}
{-# LANGUAGE StrictData #-}
{-# LANGUAGE TypeFamilies #-}
{-# LANGUAGE NoImplicitPrelude #-}
{-# OPTIONS_GHC -fno-warn-unused-binds #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
{-# OPTIONS_GHC -fno-warn-unused-matches #-}
module Amazonka.IoT.DescribeJobTemplate
(
DescribeJobTemplate (..),
newDescribeJobTemplate,
describeJobTemplate_jobTemplateId,
DescribeJobTemplateResponse (..),
newDescribeJobTemplateResponse,
describeJobTemplateResponse_jobExecutionsRolloutConfig,
describeJobTemplateResponse_documentSource,
describeJobTemplateResponse_createdAt,
describeJobTemplateResponse_abortConfig,
describeJobTemplateResponse_presignedUrlConfig,
describeJobTemplateResponse_document,
describeJobTemplateResponse_jobTemplateId,
describeJobTemplateResponse_jobTemplateArn,
describeJobTemplateResponse_description,
describeJobTemplateResponse_timeoutConfig,
describeJobTemplateResponse_httpStatus,
)
where
import qualified Amazonka.Core as Core
import Amazonka.IoT.Types
import qualified Amazonka.Lens as Lens
import qualified Amazonka.Prelude as Prelude
import qualified Amazonka.Request as Request
import qualified Amazonka.Response as Response
data DescribeJobTemplate = DescribeJobTemplate'
{
DescribeJobTemplate -> Text
jobTemplateId :: Prelude.Text
}
deriving (DescribeJobTemplate -> DescribeJobTemplate -> Bool
(DescribeJobTemplate -> DescribeJobTemplate -> Bool)
-> (DescribeJobTemplate -> DescribeJobTemplate -> Bool)
-> Eq DescribeJobTemplate
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: DescribeJobTemplate -> DescribeJobTemplate -> Bool
$c/= :: DescribeJobTemplate -> DescribeJobTemplate -> Bool
== :: DescribeJobTemplate -> DescribeJobTemplate -> Bool
$c== :: DescribeJobTemplate -> DescribeJobTemplate -> Bool
Prelude.Eq, ReadPrec [DescribeJobTemplate]
ReadPrec DescribeJobTemplate
Int -> ReadS DescribeJobTemplate
ReadS [DescribeJobTemplate]
(Int -> ReadS DescribeJobTemplate)
-> ReadS [DescribeJobTemplate]
-> ReadPrec DescribeJobTemplate
-> ReadPrec [DescribeJobTemplate]
-> Read DescribeJobTemplate
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [DescribeJobTemplate]
$creadListPrec :: ReadPrec [DescribeJobTemplate]
readPrec :: ReadPrec DescribeJobTemplate
$creadPrec :: ReadPrec DescribeJobTemplate
readList :: ReadS [DescribeJobTemplate]
$creadList :: ReadS [DescribeJobTemplate]
readsPrec :: Int -> ReadS DescribeJobTemplate
$creadsPrec :: Int -> ReadS DescribeJobTemplate
Prelude.Read, Int -> DescribeJobTemplate -> ShowS
[DescribeJobTemplate] -> ShowS
DescribeJobTemplate -> String
(Int -> DescribeJobTemplate -> ShowS)
-> (DescribeJobTemplate -> String)
-> ([DescribeJobTemplate] -> ShowS)
-> Show DescribeJobTemplate
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [DescribeJobTemplate] -> ShowS
$cshowList :: [DescribeJobTemplate] -> ShowS
show :: DescribeJobTemplate -> String
$cshow :: DescribeJobTemplate -> String
showsPrec :: Int -> DescribeJobTemplate -> ShowS
$cshowsPrec :: Int -> DescribeJobTemplate -> ShowS
Prelude.Show, (forall x. DescribeJobTemplate -> Rep DescribeJobTemplate x)
-> (forall x. Rep DescribeJobTemplate x -> DescribeJobTemplate)
-> Generic DescribeJobTemplate
forall x. Rep DescribeJobTemplate x -> DescribeJobTemplate
forall x. DescribeJobTemplate -> Rep DescribeJobTemplate x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep DescribeJobTemplate x -> DescribeJobTemplate
$cfrom :: forall x. DescribeJobTemplate -> Rep DescribeJobTemplate x
Prelude.Generic)
newDescribeJobTemplate ::
Prelude.Text ->
DescribeJobTemplate
newDescribeJobTemplate :: Text -> DescribeJobTemplate
newDescribeJobTemplate Text
pJobTemplateId_ =
DescribeJobTemplate' :: Text -> DescribeJobTemplate
DescribeJobTemplate'
{ $sel:jobTemplateId:DescribeJobTemplate' :: Text
jobTemplateId =
Text
pJobTemplateId_
}
describeJobTemplate_jobTemplateId :: Lens.Lens' DescribeJobTemplate Prelude.Text
describeJobTemplate_jobTemplateId :: (Text -> f Text) -> DescribeJobTemplate -> f DescribeJobTemplate
describeJobTemplate_jobTemplateId = (DescribeJobTemplate -> Text)
-> (DescribeJobTemplate -> Text -> DescribeJobTemplate)
-> Lens DescribeJobTemplate DescribeJobTemplate Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeJobTemplate' {Text
jobTemplateId :: Text
$sel:jobTemplateId:DescribeJobTemplate' :: DescribeJobTemplate -> Text
jobTemplateId} -> Text
jobTemplateId) (\s :: DescribeJobTemplate
s@DescribeJobTemplate' {} Text
a -> DescribeJobTemplate
s {$sel:jobTemplateId:DescribeJobTemplate' :: Text
jobTemplateId = Text
a} :: DescribeJobTemplate)
instance Core.AWSRequest DescribeJobTemplate where
type
AWSResponse DescribeJobTemplate =
DescribeJobTemplateResponse
request :: DescribeJobTemplate -> Request DescribeJobTemplate
request = Service -> DescribeJobTemplate -> Request DescribeJobTemplate
forall a. ToRequest a => Service -> a -> Request a
Request.get Service
defaultService
response :: Logger
-> Service
-> Proxy DescribeJobTemplate
-> ClientResponse ClientBody
-> m (Either
Error (ClientResponse (AWSResponse DescribeJobTemplate)))
response =
(Int
-> ResponseHeaders
-> Object
-> Either String (AWSResponse DescribeJobTemplate))
-> Logger
-> Service
-> Proxy DescribeJobTemplate
-> ClientResponse ClientBody
-> m (Either
Error (ClientResponse (AWSResponse DescribeJobTemplate)))
forall (m :: * -> *) a.
MonadResource m =>
(Int -> ResponseHeaders -> Object -> Either String (AWSResponse a))
-> Logger
-> Service
-> Proxy a
-> ClientResponse ClientBody
-> m (Either Error (ClientResponse (AWSResponse a)))
Response.receiveJSON
( \Int
s ResponseHeaders
h Object
x ->
Maybe JobExecutionsRolloutConfig
-> Maybe Text
-> Maybe POSIX
-> Maybe AbortConfig
-> Maybe PresignedUrlConfig
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe TimeoutConfig
-> Int
-> DescribeJobTemplateResponse
DescribeJobTemplateResponse'
(Maybe JobExecutionsRolloutConfig
-> Maybe Text
-> Maybe POSIX
-> Maybe AbortConfig
-> Maybe PresignedUrlConfig
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe TimeoutConfig
-> Int
-> DescribeJobTemplateResponse)
-> Either String (Maybe JobExecutionsRolloutConfig)
-> Either
String
(Maybe Text
-> Maybe POSIX
-> Maybe AbortConfig
-> Maybe PresignedUrlConfig
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe TimeoutConfig
-> Int
-> DescribeJobTemplateResponse)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> (Object
x Object -> Text -> Either String (Maybe JobExecutionsRolloutConfig)
forall a. FromJSON a => Object -> Text -> Either String (Maybe a)
Core..?> Text
"jobExecutionsRolloutConfig")
Either
String
(Maybe Text
-> Maybe POSIX
-> Maybe AbortConfig
-> Maybe PresignedUrlConfig
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe TimeoutConfig
-> Int
-> DescribeJobTemplateResponse)
-> Either String (Maybe Text)
-> Either
String
(Maybe POSIX
-> Maybe AbortConfig
-> Maybe PresignedUrlConfig
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe TimeoutConfig
-> Int
-> DescribeJobTemplateResponse)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Either String (Maybe Text)
forall a. FromJSON a => Object -> Text -> Either String (Maybe a)
Core..?> Text
"documentSource")
Either
String
(Maybe POSIX
-> Maybe AbortConfig
-> Maybe PresignedUrlConfig
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe TimeoutConfig
-> Int
-> DescribeJobTemplateResponse)
-> Either String (Maybe POSIX)
-> Either
String
(Maybe AbortConfig
-> Maybe PresignedUrlConfig
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe TimeoutConfig
-> Int
-> DescribeJobTemplateResponse)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Either String (Maybe POSIX)
forall a. FromJSON a => Object -> Text -> Either String (Maybe a)
Core..?> Text
"createdAt")
Either
String
(Maybe AbortConfig
-> Maybe PresignedUrlConfig
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe TimeoutConfig
-> Int
-> DescribeJobTemplateResponse)
-> Either String (Maybe AbortConfig)
-> Either
String
(Maybe PresignedUrlConfig
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe TimeoutConfig
-> Int
-> DescribeJobTemplateResponse)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Either String (Maybe AbortConfig)
forall a. FromJSON a => Object -> Text -> Either String (Maybe a)
Core..?> Text
"abortConfig")
Either
String
(Maybe PresignedUrlConfig
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe TimeoutConfig
-> Int
-> DescribeJobTemplateResponse)
-> Either String (Maybe PresignedUrlConfig)
-> Either
String
(Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe TimeoutConfig
-> Int
-> DescribeJobTemplateResponse)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Either String (Maybe PresignedUrlConfig)
forall a. FromJSON a => Object -> Text -> Either String (Maybe a)
Core..?> Text
"presignedUrlConfig")
Either
String
(Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe TimeoutConfig
-> Int
-> DescribeJobTemplateResponse)
-> Either String (Maybe Text)
-> Either
String
(Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe TimeoutConfig
-> Int
-> DescribeJobTemplateResponse)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Either String (Maybe Text)
forall a. FromJSON a => Object -> Text -> Either String (Maybe a)
Core..?> Text
"document")
Either
String
(Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe TimeoutConfig
-> Int
-> DescribeJobTemplateResponse)
-> Either String (Maybe Text)
-> Either
String
(Maybe Text
-> Maybe Text
-> Maybe TimeoutConfig
-> Int
-> DescribeJobTemplateResponse)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Either String (Maybe Text)
forall a. FromJSON a => Object -> Text -> Either String (Maybe a)
Core..?> Text
"jobTemplateId")
Either
String
(Maybe Text
-> Maybe Text
-> Maybe TimeoutConfig
-> Int
-> DescribeJobTemplateResponse)
-> Either String (Maybe Text)
-> Either
String
(Maybe Text
-> Maybe TimeoutConfig -> Int -> DescribeJobTemplateResponse)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Either String (Maybe Text)
forall a. FromJSON a => Object -> Text -> Either String (Maybe a)
Core..?> Text
"jobTemplateArn")
Either
String
(Maybe Text
-> Maybe TimeoutConfig -> Int -> DescribeJobTemplateResponse)
-> Either String (Maybe Text)
-> Either
String (Maybe TimeoutConfig -> Int -> DescribeJobTemplateResponse)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Either String (Maybe Text)
forall a. FromJSON a => Object -> Text -> Either String (Maybe a)
Core..?> Text
"description")
Either
String (Maybe TimeoutConfig -> Int -> DescribeJobTemplateResponse)
-> Either String (Maybe TimeoutConfig)
-> Either String (Int -> DescribeJobTemplateResponse)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Either String (Maybe TimeoutConfig)
forall a. FromJSON a => Object -> Text -> Either String (Maybe a)
Core..?> Text
"timeoutConfig")
Either String (Int -> DescribeJobTemplateResponse)
-> Either String Int -> Either String DescribeJobTemplateResponse
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Int -> Either String Int
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure (Int -> Int
forall a. Enum a => a -> Int
Prelude.fromEnum Int
s))
)
instance Prelude.Hashable DescribeJobTemplate
instance Prelude.NFData DescribeJobTemplate
instance Core.ToHeaders DescribeJobTemplate where
toHeaders :: DescribeJobTemplate -> ResponseHeaders
toHeaders = ResponseHeaders -> DescribeJobTemplate -> ResponseHeaders
forall a b. a -> b -> a
Prelude.const ResponseHeaders
forall a. Monoid a => a
Prelude.mempty
instance Core.ToPath DescribeJobTemplate where
toPath :: DescribeJobTemplate -> ByteString
toPath DescribeJobTemplate' {Text
jobTemplateId :: Text
$sel:jobTemplateId:DescribeJobTemplate' :: DescribeJobTemplate -> Text
..} =
[ByteString] -> ByteString
forall a. Monoid a => [a] -> a
Prelude.mconcat
[ByteString
"/job-templates/", Text -> ByteString
forall a. ToByteString a => a -> ByteString
Core.toBS Text
jobTemplateId]
instance Core.ToQuery DescribeJobTemplate where
toQuery :: DescribeJobTemplate -> QueryString
toQuery = QueryString -> DescribeJobTemplate -> QueryString
forall a b. a -> b -> a
Prelude.const QueryString
forall a. Monoid a => a
Prelude.mempty
data DescribeJobTemplateResponse = DescribeJobTemplateResponse'
{ DescribeJobTemplateResponse -> Maybe JobExecutionsRolloutConfig
jobExecutionsRolloutConfig :: Prelude.Maybe JobExecutionsRolloutConfig,
DescribeJobTemplateResponse -> Maybe Text
documentSource :: Prelude.Maybe Prelude.Text,
DescribeJobTemplateResponse -> Maybe POSIX
createdAt :: Prelude.Maybe Core.POSIX,
DescribeJobTemplateResponse -> Maybe AbortConfig
abortConfig :: Prelude.Maybe AbortConfig,
DescribeJobTemplateResponse -> Maybe PresignedUrlConfig
presignedUrlConfig :: Prelude.Maybe PresignedUrlConfig,
DescribeJobTemplateResponse -> Maybe Text
document :: Prelude.Maybe Prelude.Text,
DescribeJobTemplateResponse -> Maybe Text
jobTemplateId :: Prelude.Maybe Prelude.Text,
DescribeJobTemplateResponse -> Maybe Text
jobTemplateArn :: Prelude.Maybe Prelude.Text,
DescribeJobTemplateResponse -> Maybe Text
description :: Prelude.Maybe Prelude.Text,
DescribeJobTemplateResponse -> Maybe TimeoutConfig
timeoutConfig :: Prelude.Maybe TimeoutConfig,
DescribeJobTemplateResponse -> Int
httpStatus :: Prelude.Int
}
deriving (DescribeJobTemplateResponse -> DescribeJobTemplateResponse -> Bool
(DescribeJobTemplateResponse
-> DescribeJobTemplateResponse -> Bool)
-> (DescribeJobTemplateResponse
-> DescribeJobTemplateResponse -> Bool)
-> Eq DescribeJobTemplateResponse
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: DescribeJobTemplateResponse -> DescribeJobTemplateResponse -> Bool
$c/= :: DescribeJobTemplateResponse -> DescribeJobTemplateResponse -> Bool
== :: DescribeJobTemplateResponse -> DescribeJobTemplateResponse -> Bool
$c== :: DescribeJobTemplateResponse -> DescribeJobTemplateResponse -> Bool
Prelude.Eq, ReadPrec [DescribeJobTemplateResponse]
ReadPrec DescribeJobTemplateResponse
Int -> ReadS DescribeJobTemplateResponse
ReadS [DescribeJobTemplateResponse]
(Int -> ReadS DescribeJobTemplateResponse)
-> ReadS [DescribeJobTemplateResponse]
-> ReadPrec DescribeJobTemplateResponse
-> ReadPrec [DescribeJobTemplateResponse]
-> Read DescribeJobTemplateResponse
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [DescribeJobTemplateResponse]
$creadListPrec :: ReadPrec [DescribeJobTemplateResponse]
readPrec :: ReadPrec DescribeJobTemplateResponse
$creadPrec :: ReadPrec DescribeJobTemplateResponse
readList :: ReadS [DescribeJobTemplateResponse]
$creadList :: ReadS [DescribeJobTemplateResponse]
readsPrec :: Int -> ReadS DescribeJobTemplateResponse
$creadsPrec :: Int -> ReadS DescribeJobTemplateResponse
Prelude.Read, Int -> DescribeJobTemplateResponse -> ShowS
[DescribeJobTemplateResponse] -> ShowS
DescribeJobTemplateResponse -> String
(Int -> DescribeJobTemplateResponse -> ShowS)
-> (DescribeJobTemplateResponse -> String)
-> ([DescribeJobTemplateResponse] -> ShowS)
-> Show DescribeJobTemplateResponse
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [DescribeJobTemplateResponse] -> ShowS
$cshowList :: [DescribeJobTemplateResponse] -> ShowS
show :: DescribeJobTemplateResponse -> String
$cshow :: DescribeJobTemplateResponse -> String
showsPrec :: Int -> DescribeJobTemplateResponse -> ShowS
$cshowsPrec :: Int -> DescribeJobTemplateResponse -> ShowS
Prelude.Show, (forall x.
DescribeJobTemplateResponse -> Rep DescribeJobTemplateResponse x)
-> (forall x.
Rep DescribeJobTemplateResponse x -> DescribeJobTemplateResponse)
-> Generic DescribeJobTemplateResponse
forall x.
Rep DescribeJobTemplateResponse x -> DescribeJobTemplateResponse
forall x.
DescribeJobTemplateResponse -> Rep DescribeJobTemplateResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep DescribeJobTemplateResponse x -> DescribeJobTemplateResponse
$cfrom :: forall x.
DescribeJobTemplateResponse -> Rep DescribeJobTemplateResponse x
Prelude.Generic)
newDescribeJobTemplateResponse ::
Prelude.Int ->
DescribeJobTemplateResponse
newDescribeJobTemplateResponse :: Int -> DescribeJobTemplateResponse
newDescribeJobTemplateResponse Int
pHttpStatus_ =
DescribeJobTemplateResponse' :: Maybe JobExecutionsRolloutConfig
-> Maybe Text
-> Maybe POSIX
-> Maybe AbortConfig
-> Maybe PresignedUrlConfig
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe TimeoutConfig
-> Int
-> DescribeJobTemplateResponse
DescribeJobTemplateResponse'
{ $sel:jobExecutionsRolloutConfig:DescribeJobTemplateResponse' :: Maybe JobExecutionsRolloutConfig
jobExecutionsRolloutConfig =
Maybe JobExecutionsRolloutConfig
forall a. Maybe a
Prelude.Nothing,
$sel:documentSource:DescribeJobTemplateResponse' :: Maybe Text
documentSource = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:createdAt:DescribeJobTemplateResponse' :: Maybe POSIX
createdAt = Maybe POSIX
forall a. Maybe a
Prelude.Nothing,
$sel:abortConfig:DescribeJobTemplateResponse' :: Maybe AbortConfig
abortConfig = Maybe AbortConfig
forall a. Maybe a
Prelude.Nothing,
$sel:presignedUrlConfig:DescribeJobTemplateResponse' :: Maybe PresignedUrlConfig
presignedUrlConfig = Maybe PresignedUrlConfig
forall a. Maybe a
Prelude.Nothing,
$sel:document:DescribeJobTemplateResponse' :: Maybe Text
document = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:jobTemplateId:DescribeJobTemplateResponse' :: Maybe Text
jobTemplateId = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:jobTemplateArn:DescribeJobTemplateResponse' :: Maybe Text
jobTemplateArn = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:description:DescribeJobTemplateResponse' :: Maybe Text
description = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:timeoutConfig:DescribeJobTemplateResponse' :: Maybe TimeoutConfig
timeoutConfig = Maybe TimeoutConfig
forall a. Maybe a
Prelude.Nothing,
$sel:httpStatus:DescribeJobTemplateResponse' :: Int
httpStatus = Int
pHttpStatus_
}
describeJobTemplateResponse_jobExecutionsRolloutConfig :: Lens.Lens' DescribeJobTemplateResponse (Prelude.Maybe JobExecutionsRolloutConfig)
describeJobTemplateResponse_jobExecutionsRolloutConfig :: (Maybe JobExecutionsRolloutConfig
-> f (Maybe JobExecutionsRolloutConfig))
-> DescribeJobTemplateResponse -> f DescribeJobTemplateResponse
describeJobTemplateResponse_jobExecutionsRolloutConfig = (DescribeJobTemplateResponse -> Maybe JobExecutionsRolloutConfig)
-> (DescribeJobTemplateResponse
-> Maybe JobExecutionsRolloutConfig -> DescribeJobTemplateResponse)
-> Lens
DescribeJobTemplateResponse
DescribeJobTemplateResponse
(Maybe JobExecutionsRolloutConfig)
(Maybe JobExecutionsRolloutConfig)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeJobTemplateResponse' {Maybe JobExecutionsRolloutConfig
jobExecutionsRolloutConfig :: Maybe JobExecutionsRolloutConfig
$sel:jobExecutionsRolloutConfig:DescribeJobTemplateResponse' :: DescribeJobTemplateResponse -> Maybe JobExecutionsRolloutConfig
jobExecutionsRolloutConfig} -> Maybe JobExecutionsRolloutConfig
jobExecutionsRolloutConfig) (\s :: DescribeJobTemplateResponse
s@DescribeJobTemplateResponse' {} Maybe JobExecutionsRolloutConfig
a -> DescribeJobTemplateResponse
s {$sel:jobExecutionsRolloutConfig:DescribeJobTemplateResponse' :: Maybe JobExecutionsRolloutConfig
jobExecutionsRolloutConfig = Maybe JobExecutionsRolloutConfig
a} :: DescribeJobTemplateResponse)
describeJobTemplateResponse_documentSource :: Lens.Lens' DescribeJobTemplateResponse (Prelude.Maybe Prelude.Text)
describeJobTemplateResponse_documentSource :: (Maybe Text -> f (Maybe Text))
-> DescribeJobTemplateResponse -> f DescribeJobTemplateResponse
describeJobTemplateResponse_documentSource = (DescribeJobTemplateResponse -> Maybe Text)
-> (DescribeJobTemplateResponse
-> Maybe Text -> DescribeJobTemplateResponse)
-> Lens
DescribeJobTemplateResponse
DescribeJobTemplateResponse
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeJobTemplateResponse' {Maybe Text
documentSource :: Maybe Text
$sel:documentSource:DescribeJobTemplateResponse' :: DescribeJobTemplateResponse -> Maybe Text
documentSource} -> Maybe Text
documentSource) (\s :: DescribeJobTemplateResponse
s@DescribeJobTemplateResponse' {} Maybe Text
a -> DescribeJobTemplateResponse
s {$sel:documentSource:DescribeJobTemplateResponse' :: Maybe Text
documentSource = Maybe Text
a} :: DescribeJobTemplateResponse)
describeJobTemplateResponse_createdAt :: Lens.Lens' DescribeJobTemplateResponse (Prelude.Maybe Prelude.UTCTime)
describeJobTemplateResponse_createdAt :: (Maybe UTCTime -> f (Maybe UTCTime))
-> DescribeJobTemplateResponse -> f DescribeJobTemplateResponse
describeJobTemplateResponse_createdAt = (DescribeJobTemplateResponse -> Maybe POSIX)
-> (DescribeJobTemplateResponse
-> Maybe POSIX -> DescribeJobTemplateResponse)
-> Lens
DescribeJobTemplateResponse
DescribeJobTemplateResponse
(Maybe POSIX)
(Maybe POSIX)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeJobTemplateResponse' {Maybe POSIX
createdAt :: Maybe POSIX
$sel:createdAt:DescribeJobTemplateResponse' :: DescribeJobTemplateResponse -> Maybe POSIX
createdAt} -> Maybe POSIX
createdAt) (\s :: DescribeJobTemplateResponse
s@DescribeJobTemplateResponse' {} Maybe POSIX
a -> DescribeJobTemplateResponse
s {$sel:createdAt:DescribeJobTemplateResponse' :: Maybe POSIX
createdAt = Maybe POSIX
a} :: DescribeJobTemplateResponse) ((Maybe POSIX -> f (Maybe POSIX))
-> DescribeJobTemplateResponse -> f DescribeJobTemplateResponse)
-> ((Maybe UTCTime -> f (Maybe UTCTime))
-> Maybe POSIX -> f (Maybe POSIX))
-> (Maybe UTCTime -> f (Maybe UTCTime))
-> DescribeJobTemplateResponse
-> f DescribeJobTemplateResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. AnIso POSIX POSIX UTCTime UTCTime
-> Iso (Maybe POSIX) (Maybe POSIX) (Maybe UTCTime) (Maybe UTCTime)
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 AnIso POSIX POSIX UTCTime UTCTime
forall (a :: Format). Iso' (Time a) UTCTime
Core._Time
describeJobTemplateResponse_abortConfig :: Lens.Lens' DescribeJobTemplateResponse (Prelude.Maybe AbortConfig)
describeJobTemplateResponse_abortConfig :: (Maybe AbortConfig -> f (Maybe AbortConfig))
-> DescribeJobTemplateResponse -> f DescribeJobTemplateResponse
describeJobTemplateResponse_abortConfig = (DescribeJobTemplateResponse -> Maybe AbortConfig)
-> (DescribeJobTemplateResponse
-> Maybe AbortConfig -> DescribeJobTemplateResponse)
-> Lens
DescribeJobTemplateResponse
DescribeJobTemplateResponse
(Maybe AbortConfig)
(Maybe AbortConfig)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeJobTemplateResponse' {Maybe AbortConfig
abortConfig :: Maybe AbortConfig
$sel:abortConfig:DescribeJobTemplateResponse' :: DescribeJobTemplateResponse -> Maybe AbortConfig
abortConfig} -> Maybe AbortConfig
abortConfig) (\s :: DescribeJobTemplateResponse
s@DescribeJobTemplateResponse' {} Maybe AbortConfig
a -> DescribeJobTemplateResponse
s {$sel:abortConfig:DescribeJobTemplateResponse' :: Maybe AbortConfig
abortConfig = Maybe AbortConfig
a} :: DescribeJobTemplateResponse)
describeJobTemplateResponse_presignedUrlConfig :: Lens.Lens' DescribeJobTemplateResponse (Prelude.Maybe PresignedUrlConfig)
describeJobTemplateResponse_presignedUrlConfig :: (Maybe PresignedUrlConfig -> f (Maybe PresignedUrlConfig))
-> DescribeJobTemplateResponse -> f DescribeJobTemplateResponse
describeJobTemplateResponse_presignedUrlConfig = (DescribeJobTemplateResponse -> Maybe PresignedUrlConfig)
-> (DescribeJobTemplateResponse
-> Maybe PresignedUrlConfig -> DescribeJobTemplateResponse)
-> Lens
DescribeJobTemplateResponse
DescribeJobTemplateResponse
(Maybe PresignedUrlConfig)
(Maybe PresignedUrlConfig)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeJobTemplateResponse' {Maybe PresignedUrlConfig
presignedUrlConfig :: Maybe PresignedUrlConfig
$sel:presignedUrlConfig:DescribeJobTemplateResponse' :: DescribeJobTemplateResponse -> Maybe PresignedUrlConfig
presignedUrlConfig} -> Maybe PresignedUrlConfig
presignedUrlConfig) (\s :: DescribeJobTemplateResponse
s@DescribeJobTemplateResponse' {} Maybe PresignedUrlConfig
a -> DescribeJobTemplateResponse
s {$sel:presignedUrlConfig:DescribeJobTemplateResponse' :: Maybe PresignedUrlConfig
presignedUrlConfig = Maybe PresignedUrlConfig
a} :: DescribeJobTemplateResponse)
describeJobTemplateResponse_document :: Lens.Lens' DescribeJobTemplateResponse (Prelude.Maybe Prelude.Text)
describeJobTemplateResponse_document :: (Maybe Text -> f (Maybe Text))
-> DescribeJobTemplateResponse -> f DescribeJobTemplateResponse
describeJobTemplateResponse_document = (DescribeJobTemplateResponse -> Maybe Text)
-> (DescribeJobTemplateResponse
-> Maybe Text -> DescribeJobTemplateResponse)
-> Lens
DescribeJobTemplateResponse
DescribeJobTemplateResponse
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeJobTemplateResponse' {Maybe Text
document :: Maybe Text
$sel:document:DescribeJobTemplateResponse' :: DescribeJobTemplateResponse -> Maybe Text
document} -> Maybe Text
document) (\s :: DescribeJobTemplateResponse
s@DescribeJobTemplateResponse' {} Maybe Text
a -> DescribeJobTemplateResponse
s {$sel:document:DescribeJobTemplateResponse' :: Maybe Text
document = Maybe Text
a} :: DescribeJobTemplateResponse)
describeJobTemplateResponse_jobTemplateId :: Lens.Lens' DescribeJobTemplateResponse (Prelude.Maybe Prelude.Text)
describeJobTemplateResponse_jobTemplateId :: (Maybe Text -> f (Maybe Text))
-> DescribeJobTemplateResponse -> f DescribeJobTemplateResponse
describeJobTemplateResponse_jobTemplateId = (DescribeJobTemplateResponse -> Maybe Text)
-> (DescribeJobTemplateResponse
-> Maybe Text -> DescribeJobTemplateResponse)
-> Lens
DescribeJobTemplateResponse
DescribeJobTemplateResponse
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeJobTemplateResponse' {Maybe Text
jobTemplateId :: Maybe Text
$sel:jobTemplateId:DescribeJobTemplateResponse' :: DescribeJobTemplateResponse -> Maybe Text
jobTemplateId} -> Maybe Text
jobTemplateId) (\s :: DescribeJobTemplateResponse
s@DescribeJobTemplateResponse' {} Maybe Text
a -> DescribeJobTemplateResponse
s {$sel:jobTemplateId:DescribeJobTemplateResponse' :: Maybe Text
jobTemplateId = Maybe Text
a} :: DescribeJobTemplateResponse)
describeJobTemplateResponse_jobTemplateArn :: Lens.Lens' DescribeJobTemplateResponse (Prelude.Maybe Prelude.Text)
describeJobTemplateResponse_jobTemplateArn :: (Maybe Text -> f (Maybe Text))
-> DescribeJobTemplateResponse -> f DescribeJobTemplateResponse
describeJobTemplateResponse_jobTemplateArn = (DescribeJobTemplateResponse -> Maybe Text)
-> (DescribeJobTemplateResponse
-> Maybe Text -> DescribeJobTemplateResponse)
-> Lens
DescribeJobTemplateResponse
DescribeJobTemplateResponse
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeJobTemplateResponse' {Maybe Text
jobTemplateArn :: Maybe Text
$sel:jobTemplateArn:DescribeJobTemplateResponse' :: DescribeJobTemplateResponse -> Maybe Text
jobTemplateArn} -> Maybe Text
jobTemplateArn) (\s :: DescribeJobTemplateResponse
s@DescribeJobTemplateResponse' {} Maybe Text
a -> DescribeJobTemplateResponse
s {$sel:jobTemplateArn:DescribeJobTemplateResponse' :: Maybe Text
jobTemplateArn = Maybe Text
a} :: DescribeJobTemplateResponse)
describeJobTemplateResponse_description :: Lens.Lens' DescribeJobTemplateResponse (Prelude.Maybe Prelude.Text)
describeJobTemplateResponse_description :: (Maybe Text -> f (Maybe Text))
-> DescribeJobTemplateResponse -> f DescribeJobTemplateResponse
describeJobTemplateResponse_description = (DescribeJobTemplateResponse -> Maybe Text)
-> (DescribeJobTemplateResponse
-> Maybe Text -> DescribeJobTemplateResponse)
-> Lens
DescribeJobTemplateResponse
DescribeJobTemplateResponse
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeJobTemplateResponse' {Maybe Text
description :: Maybe Text
$sel:description:DescribeJobTemplateResponse' :: DescribeJobTemplateResponse -> Maybe Text
description} -> Maybe Text
description) (\s :: DescribeJobTemplateResponse
s@DescribeJobTemplateResponse' {} Maybe Text
a -> DescribeJobTemplateResponse
s {$sel:description:DescribeJobTemplateResponse' :: Maybe Text
description = Maybe Text
a} :: DescribeJobTemplateResponse)
describeJobTemplateResponse_timeoutConfig :: Lens.Lens' DescribeJobTemplateResponse (Prelude.Maybe TimeoutConfig)
describeJobTemplateResponse_timeoutConfig :: (Maybe TimeoutConfig -> f (Maybe TimeoutConfig))
-> DescribeJobTemplateResponse -> f DescribeJobTemplateResponse
describeJobTemplateResponse_timeoutConfig = (DescribeJobTemplateResponse -> Maybe TimeoutConfig)
-> (DescribeJobTemplateResponse
-> Maybe TimeoutConfig -> DescribeJobTemplateResponse)
-> Lens
DescribeJobTemplateResponse
DescribeJobTemplateResponse
(Maybe TimeoutConfig)
(Maybe TimeoutConfig)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeJobTemplateResponse' {Maybe TimeoutConfig
timeoutConfig :: Maybe TimeoutConfig
$sel:timeoutConfig:DescribeJobTemplateResponse' :: DescribeJobTemplateResponse -> Maybe TimeoutConfig
timeoutConfig} -> Maybe TimeoutConfig
timeoutConfig) (\s :: DescribeJobTemplateResponse
s@DescribeJobTemplateResponse' {} Maybe TimeoutConfig
a -> DescribeJobTemplateResponse
s {$sel:timeoutConfig:DescribeJobTemplateResponse' :: Maybe TimeoutConfig
timeoutConfig = Maybe TimeoutConfig
a} :: DescribeJobTemplateResponse)
describeJobTemplateResponse_httpStatus :: Lens.Lens' DescribeJobTemplateResponse Prelude.Int
describeJobTemplateResponse_httpStatus :: (Int -> f Int)
-> DescribeJobTemplateResponse -> f DescribeJobTemplateResponse
describeJobTemplateResponse_httpStatus = (DescribeJobTemplateResponse -> Int)
-> (DescribeJobTemplateResponse
-> Int -> DescribeJobTemplateResponse)
-> Lens
DescribeJobTemplateResponse DescribeJobTemplateResponse Int Int
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeJobTemplateResponse' {Int
httpStatus :: Int
$sel:httpStatus:DescribeJobTemplateResponse' :: DescribeJobTemplateResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: DescribeJobTemplateResponse
s@DescribeJobTemplateResponse' {} Int
a -> DescribeJobTemplateResponse
s {$sel:httpStatus:DescribeJobTemplateResponse' :: Int
httpStatus = Int
a} :: DescribeJobTemplateResponse)
instance Prelude.NFData DescribeJobTemplateResponse