{-# 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.SageMaker.CreateDataQualityJobDefinition
(
CreateDataQualityJobDefinition (..),
newCreateDataQualityJobDefinition,
createDataQualityJobDefinition_dataQualityBaselineConfig,
createDataQualityJobDefinition_stoppingCondition,
createDataQualityJobDefinition_networkConfig,
createDataQualityJobDefinition_tags,
createDataQualityJobDefinition_jobDefinitionName,
createDataQualityJobDefinition_dataQualityAppSpecification,
createDataQualityJobDefinition_dataQualityJobInput,
createDataQualityJobDefinition_dataQualityJobOutputConfig,
createDataQualityJobDefinition_jobResources,
createDataQualityJobDefinition_roleArn,
CreateDataQualityJobDefinitionResponse (..),
newCreateDataQualityJobDefinitionResponse,
createDataQualityJobDefinitionResponse_httpStatus,
createDataQualityJobDefinitionResponse_jobDefinitionArn,
)
where
import qualified Amazonka.Core as Core
import qualified Amazonka.Lens as Lens
import qualified Amazonka.Prelude as Prelude
import qualified Amazonka.Request as Request
import qualified Amazonka.Response as Response
import Amazonka.SageMaker.Types
data CreateDataQualityJobDefinition = CreateDataQualityJobDefinition'
{
CreateDataQualityJobDefinition -> Maybe DataQualityBaselineConfig
dataQualityBaselineConfig :: Prelude.Maybe DataQualityBaselineConfig,
CreateDataQualityJobDefinition -> Maybe MonitoringStoppingCondition
stoppingCondition :: Prelude.Maybe MonitoringStoppingCondition,
CreateDataQualityJobDefinition -> Maybe MonitoringNetworkConfig
networkConfig :: Prelude.Maybe MonitoringNetworkConfig,
CreateDataQualityJobDefinition -> Maybe [Tag]
tags :: Prelude.Maybe [Tag],
CreateDataQualityJobDefinition -> Text
jobDefinitionName :: Prelude.Text,
CreateDataQualityJobDefinition -> DataQualityAppSpecification
dataQualityAppSpecification :: DataQualityAppSpecification,
CreateDataQualityJobDefinition -> DataQualityJobInput
dataQualityJobInput :: DataQualityJobInput,
CreateDataQualityJobDefinition -> MonitoringOutputConfig
dataQualityJobOutputConfig :: MonitoringOutputConfig,
CreateDataQualityJobDefinition -> MonitoringResources
jobResources :: MonitoringResources,
CreateDataQualityJobDefinition -> Text
roleArn :: Prelude.Text
}
deriving (CreateDataQualityJobDefinition
-> CreateDataQualityJobDefinition -> Bool
(CreateDataQualityJobDefinition
-> CreateDataQualityJobDefinition -> Bool)
-> (CreateDataQualityJobDefinition
-> CreateDataQualityJobDefinition -> Bool)
-> Eq CreateDataQualityJobDefinition
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: CreateDataQualityJobDefinition
-> CreateDataQualityJobDefinition -> Bool
$c/= :: CreateDataQualityJobDefinition
-> CreateDataQualityJobDefinition -> Bool
== :: CreateDataQualityJobDefinition
-> CreateDataQualityJobDefinition -> Bool
$c== :: CreateDataQualityJobDefinition
-> CreateDataQualityJobDefinition -> Bool
Prelude.Eq, ReadPrec [CreateDataQualityJobDefinition]
ReadPrec CreateDataQualityJobDefinition
Int -> ReadS CreateDataQualityJobDefinition
ReadS [CreateDataQualityJobDefinition]
(Int -> ReadS CreateDataQualityJobDefinition)
-> ReadS [CreateDataQualityJobDefinition]
-> ReadPrec CreateDataQualityJobDefinition
-> ReadPrec [CreateDataQualityJobDefinition]
-> Read CreateDataQualityJobDefinition
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [CreateDataQualityJobDefinition]
$creadListPrec :: ReadPrec [CreateDataQualityJobDefinition]
readPrec :: ReadPrec CreateDataQualityJobDefinition
$creadPrec :: ReadPrec CreateDataQualityJobDefinition
readList :: ReadS [CreateDataQualityJobDefinition]
$creadList :: ReadS [CreateDataQualityJobDefinition]
readsPrec :: Int -> ReadS CreateDataQualityJobDefinition
$creadsPrec :: Int -> ReadS CreateDataQualityJobDefinition
Prelude.Read, Int -> CreateDataQualityJobDefinition -> ShowS
[CreateDataQualityJobDefinition] -> ShowS
CreateDataQualityJobDefinition -> String
(Int -> CreateDataQualityJobDefinition -> ShowS)
-> (CreateDataQualityJobDefinition -> String)
-> ([CreateDataQualityJobDefinition] -> ShowS)
-> Show CreateDataQualityJobDefinition
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [CreateDataQualityJobDefinition] -> ShowS
$cshowList :: [CreateDataQualityJobDefinition] -> ShowS
show :: CreateDataQualityJobDefinition -> String
$cshow :: CreateDataQualityJobDefinition -> String
showsPrec :: Int -> CreateDataQualityJobDefinition -> ShowS
$cshowsPrec :: Int -> CreateDataQualityJobDefinition -> ShowS
Prelude.Show, (forall x.
CreateDataQualityJobDefinition
-> Rep CreateDataQualityJobDefinition x)
-> (forall x.
Rep CreateDataQualityJobDefinition x
-> CreateDataQualityJobDefinition)
-> Generic CreateDataQualityJobDefinition
forall x.
Rep CreateDataQualityJobDefinition x
-> CreateDataQualityJobDefinition
forall x.
CreateDataQualityJobDefinition
-> Rep CreateDataQualityJobDefinition x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep CreateDataQualityJobDefinition x
-> CreateDataQualityJobDefinition
$cfrom :: forall x.
CreateDataQualityJobDefinition
-> Rep CreateDataQualityJobDefinition x
Prelude.Generic)
newCreateDataQualityJobDefinition ::
Prelude.Text ->
DataQualityAppSpecification ->
DataQualityJobInput ->
MonitoringOutputConfig ->
MonitoringResources ->
Prelude.Text ->
CreateDataQualityJobDefinition
newCreateDataQualityJobDefinition :: Text
-> DataQualityAppSpecification
-> DataQualityJobInput
-> MonitoringOutputConfig
-> MonitoringResources
-> Text
-> CreateDataQualityJobDefinition
newCreateDataQualityJobDefinition
Text
pJobDefinitionName_
DataQualityAppSpecification
pDataQualityAppSpecification_
DataQualityJobInput
pDataQualityJobInput_
MonitoringOutputConfig
pDataQualityJobOutputConfig_
MonitoringResources
pJobResources_
Text
pRoleArn_ =
CreateDataQualityJobDefinition' :: Maybe DataQualityBaselineConfig
-> Maybe MonitoringStoppingCondition
-> Maybe MonitoringNetworkConfig
-> Maybe [Tag]
-> Text
-> DataQualityAppSpecification
-> DataQualityJobInput
-> MonitoringOutputConfig
-> MonitoringResources
-> Text
-> CreateDataQualityJobDefinition
CreateDataQualityJobDefinition'
{ $sel:dataQualityBaselineConfig:CreateDataQualityJobDefinition' :: Maybe DataQualityBaselineConfig
dataQualityBaselineConfig =
Maybe DataQualityBaselineConfig
forall a. Maybe a
Prelude.Nothing,
$sel:stoppingCondition:CreateDataQualityJobDefinition' :: Maybe MonitoringStoppingCondition
stoppingCondition = Maybe MonitoringStoppingCondition
forall a. Maybe a
Prelude.Nothing,
$sel:networkConfig:CreateDataQualityJobDefinition' :: Maybe MonitoringNetworkConfig
networkConfig = Maybe MonitoringNetworkConfig
forall a. Maybe a
Prelude.Nothing,
$sel:tags:CreateDataQualityJobDefinition' :: Maybe [Tag]
tags = Maybe [Tag]
forall a. Maybe a
Prelude.Nothing,
$sel:jobDefinitionName:CreateDataQualityJobDefinition' :: Text
jobDefinitionName = Text
pJobDefinitionName_,
$sel:dataQualityAppSpecification:CreateDataQualityJobDefinition' :: DataQualityAppSpecification
dataQualityAppSpecification =
DataQualityAppSpecification
pDataQualityAppSpecification_,
$sel:dataQualityJobInput:CreateDataQualityJobDefinition' :: DataQualityJobInput
dataQualityJobInput = DataQualityJobInput
pDataQualityJobInput_,
$sel:dataQualityJobOutputConfig:CreateDataQualityJobDefinition' :: MonitoringOutputConfig
dataQualityJobOutputConfig =
MonitoringOutputConfig
pDataQualityJobOutputConfig_,
$sel:jobResources:CreateDataQualityJobDefinition' :: MonitoringResources
jobResources = MonitoringResources
pJobResources_,
$sel:roleArn:CreateDataQualityJobDefinition' :: Text
roleArn = Text
pRoleArn_
}
createDataQualityJobDefinition_dataQualityBaselineConfig :: Lens.Lens' CreateDataQualityJobDefinition (Prelude.Maybe DataQualityBaselineConfig)
createDataQualityJobDefinition_dataQualityBaselineConfig :: (Maybe DataQualityBaselineConfig
-> f (Maybe DataQualityBaselineConfig))
-> CreateDataQualityJobDefinition
-> f CreateDataQualityJobDefinition
createDataQualityJobDefinition_dataQualityBaselineConfig = (CreateDataQualityJobDefinition -> Maybe DataQualityBaselineConfig)
-> (CreateDataQualityJobDefinition
-> Maybe DataQualityBaselineConfig
-> CreateDataQualityJobDefinition)
-> Lens
CreateDataQualityJobDefinition
CreateDataQualityJobDefinition
(Maybe DataQualityBaselineConfig)
(Maybe DataQualityBaselineConfig)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateDataQualityJobDefinition' {Maybe DataQualityBaselineConfig
dataQualityBaselineConfig :: Maybe DataQualityBaselineConfig
$sel:dataQualityBaselineConfig:CreateDataQualityJobDefinition' :: CreateDataQualityJobDefinition -> Maybe DataQualityBaselineConfig
dataQualityBaselineConfig} -> Maybe DataQualityBaselineConfig
dataQualityBaselineConfig) (\s :: CreateDataQualityJobDefinition
s@CreateDataQualityJobDefinition' {} Maybe DataQualityBaselineConfig
a -> CreateDataQualityJobDefinition
s {$sel:dataQualityBaselineConfig:CreateDataQualityJobDefinition' :: Maybe DataQualityBaselineConfig
dataQualityBaselineConfig = Maybe DataQualityBaselineConfig
a} :: CreateDataQualityJobDefinition)
createDataQualityJobDefinition_stoppingCondition :: Lens.Lens' CreateDataQualityJobDefinition (Prelude.Maybe MonitoringStoppingCondition)
createDataQualityJobDefinition_stoppingCondition :: (Maybe MonitoringStoppingCondition
-> f (Maybe MonitoringStoppingCondition))
-> CreateDataQualityJobDefinition
-> f CreateDataQualityJobDefinition
createDataQualityJobDefinition_stoppingCondition = (CreateDataQualityJobDefinition
-> Maybe MonitoringStoppingCondition)
-> (CreateDataQualityJobDefinition
-> Maybe MonitoringStoppingCondition
-> CreateDataQualityJobDefinition)
-> Lens
CreateDataQualityJobDefinition
CreateDataQualityJobDefinition
(Maybe MonitoringStoppingCondition)
(Maybe MonitoringStoppingCondition)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateDataQualityJobDefinition' {Maybe MonitoringStoppingCondition
stoppingCondition :: Maybe MonitoringStoppingCondition
$sel:stoppingCondition:CreateDataQualityJobDefinition' :: CreateDataQualityJobDefinition -> Maybe MonitoringStoppingCondition
stoppingCondition} -> Maybe MonitoringStoppingCondition
stoppingCondition) (\s :: CreateDataQualityJobDefinition
s@CreateDataQualityJobDefinition' {} Maybe MonitoringStoppingCondition
a -> CreateDataQualityJobDefinition
s {$sel:stoppingCondition:CreateDataQualityJobDefinition' :: Maybe MonitoringStoppingCondition
stoppingCondition = Maybe MonitoringStoppingCondition
a} :: CreateDataQualityJobDefinition)
createDataQualityJobDefinition_networkConfig :: Lens.Lens' CreateDataQualityJobDefinition (Prelude.Maybe MonitoringNetworkConfig)
createDataQualityJobDefinition_networkConfig :: (Maybe MonitoringNetworkConfig
-> f (Maybe MonitoringNetworkConfig))
-> CreateDataQualityJobDefinition
-> f CreateDataQualityJobDefinition
createDataQualityJobDefinition_networkConfig = (CreateDataQualityJobDefinition -> Maybe MonitoringNetworkConfig)
-> (CreateDataQualityJobDefinition
-> Maybe MonitoringNetworkConfig -> CreateDataQualityJobDefinition)
-> Lens
CreateDataQualityJobDefinition
CreateDataQualityJobDefinition
(Maybe MonitoringNetworkConfig)
(Maybe MonitoringNetworkConfig)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateDataQualityJobDefinition' {Maybe MonitoringNetworkConfig
networkConfig :: Maybe MonitoringNetworkConfig
$sel:networkConfig:CreateDataQualityJobDefinition' :: CreateDataQualityJobDefinition -> Maybe MonitoringNetworkConfig
networkConfig} -> Maybe MonitoringNetworkConfig
networkConfig) (\s :: CreateDataQualityJobDefinition
s@CreateDataQualityJobDefinition' {} Maybe MonitoringNetworkConfig
a -> CreateDataQualityJobDefinition
s {$sel:networkConfig:CreateDataQualityJobDefinition' :: Maybe MonitoringNetworkConfig
networkConfig = Maybe MonitoringNetworkConfig
a} :: CreateDataQualityJobDefinition)
createDataQualityJobDefinition_tags :: Lens.Lens' CreateDataQualityJobDefinition (Prelude.Maybe [Tag])
createDataQualityJobDefinition_tags :: (Maybe [Tag] -> f (Maybe [Tag]))
-> CreateDataQualityJobDefinition
-> f CreateDataQualityJobDefinition
createDataQualityJobDefinition_tags = (CreateDataQualityJobDefinition -> Maybe [Tag])
-> (CreateDataQualityJobDefinition
-> Maybe [Tag] -> CreateDataQualityJobDefinition)
-> Lens
CreateDataQualityJobDefinition
CreateDataQualityJobDefinition
(Maybe [Tag])
(Maybe [Tag])
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateDataQualityJobDefinition' {Maybe [Tag]
tags :: Maybe [Tag]
$sel:tags:CreateDataQualityJobDefinition' :: CreateDataQualityJobDefinition -> Maybe [Tag]
tags} -> Maybe [Tag]
tags) (\s :: CreateDataQualityJobDefinition
s@CreateDataQualityJobDefinition' {} Maybe [Tag]
a -> CreateDataQualityJobDefinition
s {$sel:tags:CreateDataQualityJobDefinition' :: Maybe [Tag]
tags = Maybe [Tag]
a} :: CreateDataQualityJobDefinition) ((Maybe [Tag] -> f (Maybe [Tag]))
-> CreateDataQualityJobDefinition
-> f CreateDataQualityJobDefinition)
-> ((Maybe [Tag] -> f (Maybe [Tag]))
-> Maybe [Tag] -> f (Maybe [Tag]))
-> (Maybe [Tag] -> f (Maybe [Tag]))
-> CreateDataQualityJobDefinition
-> f CreateDataQualityJobDefinition
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. AnIso [Tag] [Tag] [Tag] [Tag]
-> Iso (Maybe [Tag]) (Maybe [Tag]) (Maybe [Tag]) (Maybe [Tag])
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 [Tag] [Tag] [Tag] [Tag]
forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b
Lens.coerced
createDataQualityJobDefinition_jobDefinitionName :: Lens.Lens' CreateDataQualityJobDefinition Prelude.Text
createDataQualityJobDefinition_jobDefinitionName :: (Text -> f Text)
-> CreateDataQualityJobDefinition
-> f CreateDataQualityJobDefinition
createDataQualityJobDefinition_jobDefinitionName = (CreateDataQualityJobDefinition -> Text)
-> (CreateDataQualityJobDefinition
-> Text -> CreateDataQualityJobDefinition)
-> Lens
CreateDataQualityJobDefinition
CreateDataQualityJobDefinition
Text
Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateDataQualityJobDefinition' {Text
jobDefinitionName :: Text
$sel:jobDefinitionName:CreateDataQualityJobDefinition' :: CreateDataQualityJobDefinition -> Text
jobDefinitionName} -> Text
jobDefinitionName) (\s :: CreateDataQualityJobDefinition
s@CreateDataQualityJobDefinition' {} Text
a -> CreateDataQualityJobDefinition
s {$sel:jobDefinitionName:CreateDataQualityJobDefinition' :: Text
jobDefinitionName = Text
a} :: CreateDataQualityJobDefinition)
createDataQualityJobDefinition_dataQualityAppSpecification :: Lens.Lens' CreateDataQualityJobDefinition DataQualityAppSpecification
createDataQualityJobDefinition_dataQualityAppSpecification :: (DataQualityAppSpecification -> f DataQualityAppSpecification)
-> CreateDataQualityJobDefinition
-> f CreateDataQualityJobDefinition
createDataQualityJobDefinition_dataQualityAppSpecification = (CreateDataQualityJobDefinition -> DataQualityAppSpecification)
-> (CreateDataQualityJobDefinition
-> DataQualityAppSpecification -> CreateDataQualityJobDefinition)
-> Lens
CreateDataQualityJobDefinition
CreateDataQualityJobDefinition
DataQualityAppSpecification
DataQualityAppSpecification
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateDataQualityJobDefinition' {DataQualityAppSpecification
dataQualityAppSpecification :: DataQualityAppSpecification
$sel:dataQualityAppSpecification:CreateDataQualityJobDefinition' :: CreateDataQualityJobDefinition -> DataQualityAppSpecification
dataQualityAppSpecification} -> DataQualityAppSpecification
dataQualityAppSpecification) (\s :: CreateDataQualityJobDefinition
s@CreateDataQualityJobDefinition' {} DataQualityAppSpecification
a -> CreateDataQualityJobDefinition
s {$sel:dataQualityAppSpecification:CreateDataQualityJobDefinition' :: DataQualityAppSpecification
dataQualityAppSpecification = DataQualityAppSpecification
a} :: CreateDataQualityJobDefinition)
createDataQualityJobDefinition_dataQualityJobInput :: Lens.Lens' CreateDataQualityJobDefinition DataQualityJobInput
createDataQualityJobDefinition_dataQualityJobInput :: (DataQualityJobInput -> f DataQualityJobInput)
-> CreateDataQualityJobDefinition
-> f CreateDataQualityJobDefinition
createDataQualityJobDefinition_dataQualityJobInput = (CreateDataQualityJobDefinition -> DataQualityJobInput)
-> (CreateDataQualityJobDefinition
-> DataQualityJobInput -> CreateDataQualityJobDefinition)
-> Lens
CreateDataQualityJobDefinition
CreateDataQualityJobDefinition
DataQualityJobInput
DataQualityJobInput
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateDataQualityJobDefinition' {DataQualityJobInput
dataQualityJobInput :: DataQualityJobInput
$sel:dataQualityJobInput:CreateDataQualityJobDefinition' :: CreateDataQualityJobDefinition -> DataQualityJobInput
dataQualityJobInput} -> DataQualityJobInput
dataQualityJobInput) (\s :: CreateDataQualityJobDefinition
s@CreateDataQualityJobDefinition' {} DataQualityJobInput
a -> CreateDataQualityJobDefinition
s {$sel:dataQualityJobInput:CreateDataQualityJobDefinition' :: DataQualityJobInput
dataQualityJobInput = DataQualityJobInput
a} :: CreateDataQualityJobDefinition)
createDataQualityJobDefinition_dataQualityJobOutputConfig :: Lens.Lens' CreateDataQualityJobDefinition MonitoringOutputConfig
createDataQualityJobDefinition_dataQualityJobOutputConfig :: (MonitoringOutputConfig -> f MonitoringOutputConfig)
-> CreateDataQualityJobDefinition
-> f CreateDataQualityJobDefinition
createDataQualityJobDefinition_dataQualityJobOutputConfig = (CreateDataQualityJobDefinition -> MonitoringOutputConfig)
-> (CreateDataQualityJobDefinition
-> MonitoringOutputConfig -> CreateDataQualityJobDefinition)
-> Lens
CreateDataQualityJobDefinition
CreateDataQualityJobDefinition
MonitoringOutputConfig
MonitoringOutputConfig
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateDataQualityJobDefinition' {MonitoringOutputConfig
dataQualityJobOutputConfig :: MonitoringOutputConfig
$sel:dataQualityJobOutputConfig:CreateDataQualityJobDefinition' :: CreateDataQualityJobDefinition -> MonitoringOutputConfig
dataQualityJobOutputConfig} -> MonitoringOutputConfig
dataQualityJobOutputConfig) (\s :: CreateDataQualityJobDefinition
s@CreateDataQualityJobDefinition' {} MonitoringOutputConfig
a -> CreateDataQualityJobDefinition
s {$sel:dataQualityJobOutputConfig:CreateDataQualityJobDefinition' :: MonitoringOutputConfig
dataQualityJobOutputConfig = MonitoringOutputConfig
a} :: CreateDataQualityJobDefinition)
createDataQualityJobDefinition_jobResources :: Lens.Lens' CreateDataQualityJobDefinition MonitoringResources
createDataQualityJobDefinition_jobResources :: (MonitoringResources -> f MonitoringResources)
-> CreateDataQualityJobDefinition
-> f CreateDataQualityJobDefinition
createDataQualityJobDefinition_jobResources = (CreateDataQualityJobDefinition -> MonitoringResources)
-> (CreateDataQualityJobDefinition
-> MonitoringResources -> CreateDataQualityJobDefinition)
-> Lens
CreateDataQualityJobDefinition
CreateDataQualityJobDefinition
MonitoringResources
MonitoringResources
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateDataQualityJobDefinition' {MonitoringResources
jobResources :: MonitoringResources
$sel:jobResources:CreateDataQualityJobDefinition' :: CreateDataQualityJobDefinition -> MonitoringResources
jobResources} -> MonitoringResources
jobResources) (\s :: CreateDataQualityJobDefinition
s@CreateDataQualityJobDefinition' {} MonitoringResources
a -> CreateDataQualityJobDefinition
s {$sel:jobResources:CreateDataQualityJobDefinition' :: MonitoringResources
jobResources = MonitoringResources
a} :: CreateDataQualityJobDefinition)
createDataQualityJobDefinition_roleArn :: Lens.Lens' CreateDataQualityJobDefinition Prelude.Text
createDataQualityJobDefinition_roleArn :: (Text -> f Text)
-> CreateDataQualityJobDefinition
-> f CreateDataQualityJobDefinition
createDataQualityJobDefinition_roleArn = (CreateDataQualityJobDefinition -> Text)
-> (CreateDataQualityJobDefinition
-> Text -> CreateDataQualityJobDefinition)
-> Lens
CreateDataQualityJobDefinition
CreateDataQualityJobDefinition
Text
Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateDataQualityJobDefinition' {Text
roleArn :: Text
$sel:roleArn:CreateDataQualityJobDefinition' :: CreateDataQualityJobDefinition -> Text
roleArn} -> Text
roleArn) (\s :: CreateDataQualityJobDefinition
s@CreateDataQualityJobDefinition' {} Text
a -> CreateDataQualityJobDefinition
s {$sel:roleArn:CreateDataQualityJobDefinition' :: Text
roleArn = Text
a} :: CreateDataQualityJobDefinition)
instance
Core.AWSRequest
CreateDataQualityJobDefinition
where
type
AWSResponse CreateDataQualityJobDefinition =
CreateDataQualityJobDefinitionResponse
request :: CreateDataQualityJobDefinition
-> Request CreateDataQualityJobDefinition
request = Service
-> CreateDataQualityJobDefinition
-> Request CreateDataQualityJobDefinition
forall a. (ToRequest a, ToJSON a) => Service -> a -> Request a
Request.postJSON Service
defaultService
response :: Logger
-> Service
-> Proxy CreateDataQualityJobDefinition
-> ClientResponse ClientBody
-> m (Either
Error
(ClientResponse (AWSResponse CreateDataQualityJobDefinition)))
response =
(Int
-> ResponseHeaders
-> Object
-> Either String (AWSResponse CreateDataQualityJobDefinition))
-> Logger
-> Service
-> Proxy CreateDataQualityJobDefinition
-> ClientResponse ClientBody
-> m (Either
Error
(ClientResponse (AWSResponse CreateDataQualityJobDefinition)))
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 ->
Int -> Text -> CreateDataQualityJobDefinitionResponse
CreateDataQualityJobDefinitionResponse'
(Int -> Text -> CreateDataQualityJobDefinitionResponse)
-> Either String Int
-> Either String (Text -> CreateDataQualityJobDefinitionResponse)
forall (f :: * -> *) a b. Functor 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))
Either String (Text -> CreateDataQualityJobDefinitionResponse)
-> Either String Text
-> Either String CreateDataQualityJobDefinitionResponse
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Either String Text
forall a. FromJSON a => Object -> Text -> Either String a
Core..:> Text
"JobDefinitionArn")
)
instance
Prelude.Hashable
CreateDataQualityJobDefinition
instance
Prelude.NFData
CreateDataQualityJobDefinition
instance
Core.ToHeaders
CreateDataQualityJobDefinition
where
toHeaders :: CreateDataQualityJobDefinition -> ResponseHeaders
toHeaders =
ResponseHeaders
-> CreateDataQualityJobDefinition -> ResponseHeaders
forall a b. a -> b -> a
Prelude.const
( [ResponseHeaders] -> ResponseHeaders
forall a. Monoid a => [a] -> a
Prelude.mconcat
[ HeaderName
"X-Amz-Target"
HeaderName -> ByteString -> ResponseHeaders
forall a. ToHeader a => HeaderName -> a -> ResponseHeaders
Core.=# ( ByteString
"SageMaker.CreateDataQualityJobDefinition" ::
Prelude.ByteString
),
HeaderName
"Content-Type"
HeaderName -> ByteString -> ResponseHeaders
forall a. ToHeader a => HeaderName -> a -> ResponseHeaders
Core.=# ( ByteString
"application/x-amz-json-1.1" ::
Prelude.ByteString
)
]
)
instance Core.ToJSON CreateDataQualityJobDefinition where
toJSON :: CreateDataQualityJobDefinition -> Value
toJSON CreateDataQualityJobDefinition' {Maybe [Tag]
Maybe DataQualityBaselineConfig
Maybe MonitoringStoppingCondition
Maybe MonitoringNetworkConfig
Text
DataQualityAppSpecification
MonitoringResources
DataQualityJobInput
MonitoringOutputConfig
roleArn :: Text
jobResources :: MonitoringResources
dataQualityJobOutputConfig :: MonitoringOutputConfig
dataQualityJobInput :: DataQualityJobInput
dataQualityAppSpecification :: DataQualityAppSpecification
jobDefinitionName :: Text
tags :: Maybe [Tag]
networkConfig :: Maybe MonitoringNetworkConfig
stoppingCondition :: Maybe MonitoringStoppingCondition
dataQualityBaselineConfig :: Maybe DataQualityBaselineConfig
$sel:roleArn:CreateDataQualityJobDefinition' :: CreateDataQualityJobDefinition -> Text
$sel:jobResources:CreateDataQualityJobDefinition' :: CreateDataQualityJobDefinition -> MonitoringResources
$sel:dataQualityJobOutputConfig:CreateDataQualityJobDefinition' :: CreateDataQualityJobDefinition -> MonitoringOutputConfig
$sel:dataQualityJobInput:CreateDataQualityJobDefinition' :: CreateDataQualityJobDefinition -> DataQualityJobInput
$sel:dataQualityAppSpecification:CreateDataQualityJobDefinition' :: CreateDataQualityJobDefinition -> DataQualityAppSpecification
$sel:jobDefinitionName:CreateDataQualityJobDefinition' :: CreateDataQualityJobDefinition -> Text
$sel:tags:CreateDataQualityJobDefinition' :: CreateDataQualityJobDefinition -> Maybe [Tag]
$sel:networkConfig:CreateDataQualityJobDefinition' :: CreateDataQualityJobDefinition -> Maybe MonitoringNetworkConfig
$sel:stoppingCondition:CreateDataQualityJobDefinition' :: CreateDataQualityJobDefinition -> Maybe MonitoringStoppingCondition
$sel:dataQualityBaselineConfig:CreateDataQualityJobDefinition' :: CreateDataQualityJobDefinition -> Maybe DataQualityBaselineConfig
..} =
[Pair] -> Value
Core.object
( [Maybe Pair] -> [Pair]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
[ (Text
"DataQualityBaselineConfig" Text -> DataQualityBaselineConfig -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..=)
(DataQualityBaselineConfig -> Pair)
-> Maybe DataQualityBaselineConfig -> Maybe Pair
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe DataQualityBaselineConfig
dataQualityBaselineConfig,
(Text
"StoppingCondition" Text -> MonitoringStoppingCondition -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..=)
(MonitoringStoppingCondition -> Pair)
-> Maybe MonitoringStoppingCondition -> Maybe Pair
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe MonitoringStoppingCondition
stoppingCondition,
(Text
"NetworkConfig" Text -> MonitoringNetworkConfig -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..=) (MonitoringNetworkConfig -> Pair)
-> Maybe MonitoringNetworkConfig -> Maybe Pair
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe MonitoringNetworkConfig
networkConfig,
(Text
"Tags" Text -> [Tag] -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..=) ([Tag] -> Pair) -> Maybe [Tag] -> Maybe Pair
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [Tag]
tags,
Pair -> Maybe Pair
forall a. a -> Maybe a
Prelude.Just
(Text
"JobDefinitionName" Text -> Text -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..= Text
jobDefinitionName),
Pair -> Maybe Pair
forall a. a -> Maybe a
Prelude.Just
( Text
"DataQualityAppSpecification"
Text -> DataQualityAppSpecification -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..= DataQualityAppSpecification
dataQualityAppSpecification
),
Pair -> Maybe Pair
forall a. a -> Maybe a
Prelude.Just
(Text
"DataQualityJobInput" Text -> DataQualityJobInput -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..= DataQualityJobInput
dataQualityJobInput),
Pair -> Maybe Pair
forall a. a -> Maybe a
Prelude.Just
( Text
"DataQualityJobOutputConfig"
Text -> MonitoringOutputConfig -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..= MonitoringOutputConfig
dataQualityJobOutputConfig
),
Pair -> Maybe Pair
forall a. a -> Maybe a
Prelude.Just (Text
"JobResources" Text -> MonitoringResources -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..= MonitoringResources
jobResources),
Pair -> Maybe Pair
forall a. a -> Maybe a
Prelude.Just (Text
"RoleArn" Text -> Text -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..= Text
roleArn)
]
)
instance Core.ToPath CreateDataQualityJobDefinition where
toPath :: CreateDataQualityJobDefinition -> ByteString
toPath = ByteString -> CreateDataQualityJobDefinition -> ByteString
forall a b. a -> b -> a
Prelude.const ByteString
"/"
instance Core.ToQuery CreateDataQualityJobDefinition where
toQuery :: CreateDataQualityJobDefinition -> QueryString
toQuery = QueryString -> CreateDataQualityJobDefinition -> QueryString
forall a b. a -> b -> a
Prelude.const QueryString
forall a. Monoid a => a
Prelude.mempty
data CreateDataQualityJobDefinitionResponse = CreateDataQualityJobDefinitionResponse'
{
CreateDataQualityJobDefinitionResponse -> Int
httpStatus :: Prelude.Int,
CreateDataQualityJobDefinitionResponse -> Text
jobDefinitionArn :: Prelude.Text
}
deriving (CreateDataQualityJobDefinitionResponse
-> CreateDataQualityJobDefinitionResponse -> Bool
(CreateDataQualityJobDefinitionResponse
-> CreateDataQualityJobDefinitionResponse -> Bool)
-> (CreateDataQualityJobDefinitionResponse
-> CreateDataQualityJobDefinitionResponse -> Bool)
-> Eq CreateDataQualityJobDefinitionResponse
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: CreateDataQualityJobDefinitionResponse
-> CreateDataQualityJobDefinitionResponse -> Bool
$c/= :: CreateDataQualityJobDefinitionResponse
-> CreateDataQualityJobDefinitionResponse -> Bool
== :: CreateDataQualityJobDefinitionResponse
-> CreateDataQualityJobDefinitionResponse -> Bool
$c== :: CreateDataQualityJobDefinitionResponse
-> CreateDataQualityJobDefinitionResponse -> Bool
Prelude.Eq, ReadPrec [CreateDataQualityJobDefinitionResponse]
ReadPrec CreateDataQualityJobDefinitionResponse
Int -> ReadS CreateDataQualityJobDefinitionResponse
ReadS [CreateDataQualityJobDefinitionResponse]
(Int -> ReadS CreateDataQualityJobDefinitionResponse)
-> ReadS [CreateDataQualityJobDefinitionResponse]
-> ReadPrec CreateDataQualityJobDefinitionResponse
-> ReadPrec [CreateDataQualityJobDefinitionResponse]
-> Read CreateDataQualityJobDefinitionResponse
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [CreateDataQualityJobDefinitionResponse]
$creadListPrec :: ReadPrec [CreateDataQualityJobDefinitionResponse]
readPrec :: ReadPrec CreateDataQualityJobDefinitionResponse
$creadPrec :: ReadPrec CreateDataQualityJobDefinitionResponse
readList :: ReadS [CreateDataQualityJobDefinitionResponse]
$creadList :: ReadS [CreateDataQualityJobDefinitionResponse]
readsPrec :: Int -> ReadS CreateDataQualityJobDefinitionResponse
$creadsPrec :: Int -> ReadS CreateDataQualityJobDefinitionResponse
Prelude.Read, Int -> CreateDataQualityJobDefinitionResponse -> ShowS
[CreateDataQualityJobDefinitionResponse] -> ShowS
CreateDataQualityJobDefinitionResponse -> String
(Int -> CreateDataQualityJobDefinitionResponse -> ShowS)
-> (CreateDataQualityJobDefinitionResponse -> String)
-> ([CreateDataQualityJobDefinitionResponse] -> ShowS)
-> Show CreateDataQualityJobDefinitionResponse
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [CreateDataQualityJobDefinitionResponse] -> ShowS
$cshowList :: [CreateDataQualityJobDefinitionResponse] -> ShowS
show :: CreateDataQualityJobDefinitionResponse -> String
$cshow :: CreateDataQualityJobDefinitionResponse -> String
showsPrec :: Int -> CreateDataQualityJobDefinitionResponse -> ShowS
$cshowsPrec :: Int -> CreateDataQualityJobDefinitionResponse -> ShowS
Prelude.Show, (forall x.
CreateDataQualityJobDefinitionResponse
-> Rep CreateDataQualityJobDefinitionResponse x)
-> (forall x.
Rep CreateDataQualityJobDefinitionResponse x
-> CreateDataQualityJobDefinitionResponse)
-> Generic CreateDataQualityJobDefinitionResponse
forall x.
Rep CreateDataQualityJobDefinitionResponse x
-> CreateDataQualityJobDefinitionResponse
forall x.
CreateDataQualityJobDefinitionResponse
-> Rep CreateDataQualityJobDefinitionResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep CreateDataQualityJobDefinitionResponse x
-> CreateDataQualityJobDefinitionResponse
$cfrom :: forall x.
CreateDataQualityJobDefinitionResponse
-> Rep CreateDataQualityJobDefinitionResponse x
Prelude.Generic)
newCreateDataQualityJobDefinitionResponse ::
Prelude.Int ->
Prelude.Text ->
CreateDataQualityJobDefinitionResponse
newCreateDataQualityJobDefinitionResponse :: Int -> Text -> CreateDataQualityJobDefinitionResponse
newCreateDataQualityJobDefinitionResponse
Int
pHttpStatus_
Text
pJobDefinitionArn_ =
CreateDataQualityJobDefinitionResponse' :: Int -> Text -> CreateDataQualityJobDefinitionResponse
CreateDataQualityJobDefinitionResponse'
{ $sel:httpStatus:CreateDataQualityJobDefinitionResponse' :: Int
httpStatus =
Int
pHttpStatus_,
$sel:jobDefinitionArn:CreateDataQualityJobDefinitionResponse' :: Text
jobDefinitionArn =
Text
pJobDefinitionArn_
}
createDataQualityJobDefinitionResponse_httpStatus :: Lens.Lens' CreateDataQualityJobDefinitionResponse Prelude.Int
createDataQualityJobDefinitionResponse_httpStatus :: (Int -> f Int)
-> CreateDataQualityJobDefinitionResponse
-> f CreateDataQualityJobDefinitionResponse
createDataQualityJobDefinitionResponse_httpStatus = (CreateDataQualityJobDefinitionResponse -> Int)
-> (CreateDataQualityJobDefinitionResponse
-> Int -> CreateDataQualityJobDefinitionResponse)
-> Lens
CreateDataQualityJobDefinitionResponse
CreateDataQualityJobDefinitionResponse
Int
Int
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateDataQualityJobDefinitionResponse' {Int
httpStatus :: Int
$sel:httpStatus:CreateDataQualityJobDefinitionResponse' :: CreateDataQualityJobDefinitionResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: CreateDataQualityJobDefinitionResponse
s@CreateDataQualityJobDefinitionResponse' {} Int
a -> CreateDataQualityJobDefinitionResponse
s {$sel:httpStatus:CreateDataQualityJobDefinitionResponse' :: Int
httpStatus = Int
a} :: CreateDataQualityJobDefinitionResponse)
createDataQualityJobDefinitionResponse_jobDefinitionArn :: Lens.Lens' CreateDataQualityJobDefinitionResponse Prelude.Text
createDataQualityJobDefinitionResponse_jobDefinitionArn :: (Text -> f Text)
-> CreateDataQualityJobDefinitionResponse
-> f CreateDataQualityJobDefinitionResponse
createDataQualityJobDefinitionResponse_jobDefinitionArn = (CreateDataQualityJobDefinitionResponse -> Text)
-> (CreateDataQualityJobDefinitionResponse
-> Text -> CreateDataQualityJobDefinitionResponse)
-> Lens
CreateDataQualityJobDefinitionResponse
CreateDataQualityJobDefinitionResponse
Text
Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateDataQualityJobDefinitionResponse' {Text
jobDefinitionArn :: Text
$sel:jobDefinitionArn:CreateDataQualityJobDefinitionResponse' :: CreateDataQualityJobDefinitionResponse -> Text
jobDefinitionArn} -> Text
jobDefinitionArn) (\s :: CreateDataQualityJobDefinitionResponse
s@CreateDataQualityJobDefinitionResponse' {} Text
a -> CreateDataQualityJobDefinitionResponse
s {$sel:jobDefinitionArn:CreateDataQualityJobDefinitionResponse' :: Text
jobDefinitionArn = Text
a} :: CreateDataQualityJobDefinitionResponse)
instance
Prelude.NFData
CreateDataQualityJobDefinitionResponse