{-# 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.QuickSight.UpdateDataSet
(
UpdateDataSet (..),
newUpdateDataSet,
updateDataSet_columnGroups,
updateDataSet_columnLevelPermissionRules,
updateDataSet_dataSetUsageConfiguration,
updateDataSet_fieldFolders,
updateDataSet_logicalTableMap,
updateDataSet_rowLevelPermissionDataSet,
updateDataSet_rowLevelPermissionTagConfiguration,
updateDataSet_awsAccountId,
updateDataSet_dataSetId,
updateDataSet_name,
updateDataSet_physicalTableMap,
updateDataSet_importMode,
UpdateDataSetResponse (..),
newUpdateDataSetResponse,
updateDataSetResponse_arn,
updateDataSetResponse_dataSetId,
updateDataSetResponse_ingestionArn,
updateDataSetResponse_ingestionId,
updateDataSetResponse_requestId,
updateDataSetResponse_status,
)
where
import qualified Amazonka.Core as Core
import qualified Amazonka.Core.Lens.Internal as Lens
import qualified Amazonka.Data as Data
import qualified Amazonka.Prelude as Prelude
import Amazonka.QuickSight.Types
import qualified Amazonka.Request as Request
import qualified Amazonka.Response as Response
data UpdateDataSet = UpdateDataSet'
{
UpdateDataSet -> Maybe (NonEmpty ColumnGroup)
columnGroups :: Prelude.Maybe (Prelude.NonEmpty ColumnGroup),
UpdateDataSet -> Maybe (NonEmpty ColumnLevelPermissionRule)
columnLevelPermissionRules :: Prelude.Maybe (Prelude.NonEmpty ColumnLevelPermissionRule),
UpdateDataSet -> Maybe DataSetUsageConfiguration
dataSetUsageConfiguration :: Prelude.Maybe DataSetUsageConfiguration,
UpdateDataSet -> Maybe (HashMap Text FieldFolder)
fieldFolders :: Prelude.Maybe (Prelude.HashMap Prelude.Text FieldFolder),
UpdateDataSet -> Maybe (HashMap Text LogicalTable)
logicalTableMap :: Prelude.Maybe (Prelude.HashMap Prelude.Text LogicalTable),
UpdateDataSet -> Maybe RowLevelPermissionDataSet
rowLevelPermissionDataSet :: Prelude.Maybe RowLevelPermissionDataSet,
UpdateDataSet -> Maybe RowLevelPermissionTagConfiguration
rowLevelPermissionTagConfiguration :: Prelude.Maybe RowLevelPermissionTagConfiguration,
UpdateDataSet -> Text
awsAccountId :: Prelude.Text,
UpdateDataSet -> Text
dataSetId :: Prelude.Text,
UpdateDataSet -> Text
name :: Prelude.Text,
UpdateDataSet -> HashMap Text PhysicalTable
physicalTableMap :: Prelude.HashMap Prelude.Text PhysicalTable,
UpdateDataSet -> DataSetImportMode
importMode :: DataSetImportMode
}
deriving (UpdateDataSet -> UpdateDataSet -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: UpdateDataSet -> UpdateDataSet -> Bool
$c/= :: UpdateDataSet -> UpdateDataSet -> Bool
== :: UpdateDataSet -> UpdateDataSet -> Bool
$c== :: UpdateDataSet -> UpdateDataSet -> Bool
Prelude.Eq, Int -> UpdateDataSet -> ShowS
[UpdateDataSet] -> ShowS
UpdateDataSet -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [UpdateDataSet] -> ShowS
$cshowList :: [UpdateDataSet] -> ShowS
show :: UpdateDataSet -> String
$cshow :: UpdateDataSet -> String
showsPrec :: Int -> UpdateDataSet -> ShowS
$cshowsPrec :: Int -> UpdateDataSet -> ShowS
Prelude.Show, forall x. Rep UpdateDataSet x -> UpdateDataSet
forall x. UpdateDataSet -> Rep UpdateDataSet x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep UpdateDataSet x -> UpdateDataSet
$cfrom :: forall x. UpdateDataSet -> Rep UpdateDataSet x
Prelude.Generic)
newUpdateDataSet ::
Prelude.Text ->
Prelude.Text ->
Prelude.Text ->
DataSetImportMode ->
UpdateDataSet
newUpdateDataSet :: Text -> Text -> Text -> DataSetImportMode -> UpdateDataSet
newUpdateDataSet
Text
pAwsAccountId_
Text
pDataSetId_
Text
pName_
DataSetImportMode
pImportMode_ =
UpdateDataSet'
{ $sel:columnGroups:UpdateDataSet' :: Maybe (NonEmpty ColumnGroup)
columnGroups = forall a. Maybe a
Prelude.Nothing,
$sel:columnLevelPermissionRules:UpdateDataSet' :: Maybe (NonEmpty ColumnLevelPermissionRule)
columnLevelPermissionRules = forall a. Maybe a
Prelude.Nothing,
$sel:dataSetUsageConfiguration:UpdateDataSet' :: Maybe DataSetUsageConfiguration
dataSetUsageConfiguration = forall a. Maybe a
Prelude.Nothing,
$sel:fieldFolders:UpdateDataSet' :: Maybe (HashMap Text FieldFolder)
fieldFolders = forall a. Maybe a
Prelude.Nothing,
$sel:logicalTableMap:UpdateDataSet' :: Maybe (HashMap Text LogicalTable)
logicalTableMap = forall a. Maybe a
Prelude.Nothing,
$sel:rowLevelPermissionDataSet:UpdateDataSet' :: Maybe RowLevelPermissionDataSet
rowLevelPermissionDataSet = forall a. Maybe a
Prelude.Nothing,
$sel:rowLevelPermissionTagConfiguration:UpdateDataSet' :: Maybe RowLevelPermissionTagConfiguration
rowLevelPermissionTagConfiguration = forall a. Maybe a
Prelude.Nothing,
$sel:awsAccountId:UpdateDataSet' :: Text
awsAccountId = Text
pAwsAccountId_,
$sel:dataSetId:UpdateDataSet' :: Text
dataSetId = Text
pDataSetId_,
$sel:name:UpdateDataSet' :: Text
name = Text
pName_,
$sel:physicalTableMap:UpdateDataSet' :: HashMap Text PhysicalTable
physicalTableMap = forall a. Monoid a => a
Prelude.mempty,
$sel:importMode:UpdateDataSet' :: DataSetImportMode
importMode = DataSetImportMode
pImportMode_
}
updateDataSet_columnGroups :: Lens.Lens' UpdateDataSet (Prelude.Maybe (Prelude.NonEmpty ColumnGroup))
updateDataSet_columnGroups :: Lens' UpdateDataSet (Maybe (NonEmpty ColumnGroup))
updateDataSet_columnGroups = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateDataSet' {Maybe (NonEmpty ColumnGroup)
columnGroups :: Maybe (NonEmpty ColumnGroup)
$sel:columnGroups:UpdateDataSet' :: UpdateDataSet -> Maybe (NonEmpty ColumnGroup)
columnGroups} -> Maybe (NonEmpty ColumnGroup)
columnGroups) (\s :: UpdateDataSet
s@UpdateDataSet' {} Maybe (NonEmpty ColumnGroup)
a -> UpdateDataSet
s {$sel:columnGroups:UpdateDataSet' :: Maybe (NonEmpty ColumnGroup)
columnGroups = Maybe (NonEmpty ColumnGroup)
a} :: UpdateDataSet) 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
updateDataSet_columnLevelPermissionRules :: Lens.Lens' UpdateDataSet (Prelude.Maybe (Prelude.NonEmpty ColumnLevelPermissionRule))
updateDataSet_columnLevelPermissionRules :: Lens' UpdateDataSet (Maybe (NonEmpty ColumnLevelPermissionRule))
updateDataSet_columnLevelPermissionRules = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateDataSet' {Maybe (NonEmpty ColumnLevelPermissionRule)
columnLevelPermissionRules :: Maybe (NonEmpty ColumnLevelPermissionRule)
$sel:columnLevelPermissionRules:UpdateDataSet' :: UpdateDataSet -> Maybe (NonEmpty ColumnLevelPermissionRule)
columnLevelPermissionRules} -> Maybe (NonEmpty ColumnLevelPermissionRule)
columnLevelPermissionRules) (\s :: UpdateDataSet
s@UpdateDataSet' {} Maybe (NonEmpty ColumnLevelPermissionRule)
a -> UpdateDataSet
s {$sel:columnLevelPermissionRules:UpdateDataSet' :: Maybe (NonEmpty ColumnLevelPermissionRule)
columnLevelPermissionRules = Maybe (NonEmpty ColumnLevelPermissionRule)
a} :: UpdateDataSet) 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
updateDataSet_dataSetUsageConfiguration :: Lens.Lens' UpdateDataSet (Prelude.Maybe DataSetUsageConfiguration)
updateDataSet_dataSetUsageConfiguration :: Lens' UpdateDataSet (Maybe DataSetUsageConfiguration)
updateDataSet_dataSetUsageConfiguration = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateDataSet' {Maybe DataSetUsageConfiguration
dataSetUsageConfiguration :: Maybe DataSetUsageConfiguration
$sel:dataSetUsageConfiguration:UpdateDataSet' :: UpdateDataSet -> Maybe DataSetUsageConfiguration
dataSetUsageConfiguration} -> Maybe DataSetUsageConfiguration
dataSetUsageConfiguration) (\s :: UpdateDataSet
s@UpdateDataSet' {} Maybe DataSetUsageConfiguration
a -> UpdateDataSet
s {$sel:dataSetUsageConfiguration:UpdateDataSet' :: Maybe DataSetUsageConfiguration
dataSetUsageConfiguration = Maybe DataSetUsageConfiguration
a} :: UpdateDataSet)
updateDataSet_fieldFolders :: Lens.Lens' UpdateDataSet (Prelude.Maybe (Prelude.HashMap Prelude.Text FieldFolder))
updateDataSet_fieldFolders :: Lens' UpdateDataSet (Maybe (HashMap Text FieldFolder))
updateDataSet_fieldFolders = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateDataSet' {Maybe (HashMap Text FieldFolder)
fieldFolders :: Maybe (HashMap Text FieldFolder)
$sel:fieldFolders:UpdateDataSet' :: UpdateDataSet -> Maybe (HashMap Text FieldFolder)
fieldFolders} -> Maybe (HashMap Text FieldFolder)
fieldFolders) (\s :: UpdateDataSet
s@UpdateDataSet' {} Maybe (HashMap Text FieldFolder)
a -> UpdateDataSet
s {$sel:fieldFolders:UpdateDataSet' :: Maybe (HashMap Text FieldFolder)
fieldFolders = Maybe (HashMap Text FieldFolder)
a} :: UpdateDataSet) 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
updateDataSet_logicalTableMap :: Lens.Lens' UpdateDataSet (Prelude.Maybe (Prelude.HashMap Prelude.Text LogicalTable))
updateDataSet_logicalTableMap :: Lens' UpdateDataSet (Maybe (HashMap Text LogicalTable))
updateDataSet_logicalTableMap = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateDataSet' {Maybe (HashMap Text LogicalTable)
logicalTableMap :: Maybe (HashMap Text LogicalTable)
$sel:logicalTableMap:UpdateDataSet' :: UpdateDataSet -> Maybe (HashMap Text LogicalTable)
logicalTableMap} -> Maybe (HashMap Text LogicalTable)
logicalTableMap) (\s :: UpdateDataSet
s@UpdateDataSet' {} Maybe (HashMap Text LogicalTable)
a -> UpdateDataSet
s {$sel:logicalTableMap:UpdateDataSet' :: Maybe (HashMap Text LogicalTable)
logicalTableMap = Maybe (HashMap Text LogicalTable)
a} :: UpdateDataSet) 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
updateDataSet_rowLevelPermissionDataSet :: Lens.Lens' UpdateDataSet (Prelude.Maybe RowLevelPermissionDataSet)
updateDataSet_rowLevelPermissionDataSet :: Lens' UpdateDataSet (Maybe RowLevelPermissionDataSet)
updateDataSet_rowLevelPermissionDataSet = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateDataSet' {Maybe RowLevelPermissionDataSet
rowLevelPermissionDataSet :: Maybe RowLevelPermissionDataSet
$sel:rowLevelPermissionDataSet:UpdateDataSet' :: UpdateDataSet -> Maybe RowLevelPermissionDataSet
rowLevelPermissionDataSet} -> Maybe RowLevelPermissionDataSet
rowLevelPermissionDataSet) (\s :: UpdateDataSet
s@UpdateDataSet' {} Maybe RowLevelPermissionDataSet
a -> UpdateDataSet
s {$sel:rowLevelPermissionDataSet:UpdateDataSet' :: Maybe RowLevelPermissionDataSet
rowLevelPermissionDataSet = Maybe RowLevelPermissionDataSet
a} :: UpdateDataSet)
updateDataSet_rowLevelPermissionTagConfiguration :: Lens.Lens' UpdateDataSet (Prelude.Maybe RowLevelPermissionTagConfiguration)
updateDataSet_rowLevelPermissionTagConfiguration :: Lens' UpdateDataSet (Maybe RowLevelPermissionTagConfiguration)
updateDataSet_rowLevelPermissionTagConfiguration = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateDataSet' {Maybe RowLevelPermissionTagConfiguration
rowLevelPermissionTagConfiguration :: Maybe RowLevelPermissionTagConfiguration
$sel:rowLevelPermissionTagConfiguration:UpdateDataSet' :: UpdateDataSet -> Maybe RowLevelPermissionTagConfiguration
rowLevelPermissionTagConfiguration} -> Maybe RowLevelPermissionTagConfiguration
rowLevelPermissionTagConfiguration) (\s :: UpdateDataSet
s@UpdateDataSet' {} Maybe RowLevelPermissionTagConfiguration
a -> UpdateDataSet
s {$sel:rowLevelPermissionTagConfiguration:UpdateDataSet' :: Maybe RowLevelPermissionTagConfiguration
rowLevelPermissionTagConfiguration = Maybe RowLevelPermissionTagConfiguration
a} :: UpdateDataSet)
updateDataSet_awsAccountId :: Lens.Lens' UpdateDataSet Prelude.Text
updateDataSet_awsAccountId :: Lens' UpdateDataSet Text
updateDataSet_awsAccountId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateDataSet' {Text
awsAccountId :: Text
$sel:awsAccountId:UpdateDataSet' :: UpdateDataSet -> Text
awsAccountId} -> Text
awsAccountId) (\s :: UpdateDataSet
s@UpdateDataSet' {} Text
a -> UpdateDataSet
s {$sel:awsAccountId:UpdateDataSet' :: Text
awsAccountId = Text
a} :: UpdateDataSet)
updateDataSet_dataSetId :: Lens.Lens' UpdateDataSet Prelude.Text
updateDataSet_dataSetId :: Lens' UpdateDataSet Text
updateDataSet_dataSetId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateDataSet' {Text
dataSetId :: Text
$sel:dataSetId:UpdateDataSet' :: UpdateDataSet -> Text
dataSetId} -> Text
dataSetId) (\s :: UpdateDataSet
s@UpdateDataSet' {} Text
a -> UpdateDataSet
s {$sel:dataSetId:UpdateDataSet' :: Text
dataSetId = Text
a} :: UpdateDataSet)
updateDataSet_name :: Lens.Lens' UpdateDataSet Prelude.Text
updateDataSet_name :: Lens' UpdateDataSet Text
updateDataSet_name = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateDataSet' {Text
name :: Text
$sel:name:UpdateDataSet' :: UpdateDataSet -> Text
name} -> Text
name) (\s :: UpdateDataSet
s@UpdateDataSet' {} Text
a -> UpdateDataSet
s {$sel:name:UpdateDataSet' :: Text
name = Text
a} :: UpdateDataSet)
updateDataSet_physicalTableMap :: Lens.Lens' UpdateDataSet (Prelude.HashMap Prelude.Text PhysicalTable)
updateDataSet_physicalTableMap :: Lens' UpdateDataSet (HashMap Text PhysicalTable)
updateDataSet_physicalTableMap = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateDataSet' {HashMap Text PhysicalTable
physicalTableMap :: HashMap Text PhysicalTable
$sel:physicalTableMap:UpdateDataSet' :: UpdateDataSet -> HashMap Text PhysicalTable
physicalTableMap} -> HashMap Text PhysicalTable
physicalTableMap) (\s :: UpdateDataSet
s@UpdateDataSet' {} HashMap Text PhysicalTable
a -> UpdateDataSet
s {$sel:physicalTableMap:UpdateDataSet' :: HashMap Text PhysicalTable
physicalTableMap = HashMap Text PhysicalTable
a} :: UpdateDataSet) forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b
Lens.coerced
updateDataSet_importMode :: Lens.Lens' UpdateDataSet DataSetImportMode
updateDataSet_importMode :: Lens' UpdateDataSet DataSetImportMode
updateDataSet_importMode = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateDataSet' {DataSetImportMode
importMode :: DataSetImportMode
$sel:importMode:UpdateDataSet' :: UpdateDataSet -> DataSetImportMode
importMode} -> DataSetImportMode
importMode) (\s :: UpdateDataSet
s@UpdateDataSet' {} DataSetImportMode
a -> UpdateDataSet
s {$sel:importMode:UpdateDataSet' :: DataSetImportMode
importMode = DataSetImportMode
a} :: UpdateDataSet)
instance Core.AWSRequest UpdateDataSet where
type
AWSResponse UpdateDataSet =
UpdateDataSetResponse
request :: (Service -> Service) -> UpdateDataSet -> Request UpdateDataSet
request Service -> Service
overrides =
forall a. (ToRequest a, ToJSON a) => Service -> a -> Request a
Request.putJSON (Service -> Service
overrides Service
defaultService)
response :: forall (m :: * -> *).
MonadResource m =>
(ByteStringLazy -> IO ByteStringLazy)
-> Service
-> Proxy UpdateDataSet
-> ClientResponse ClientBody
-> m (Either Error (ClientResponse (AWSResponse UpdateDataSet)))
response =
forall (m :: * -> *) a.
MonadResource m =>
(Int -> ResponseHeaders -> Object -> Either String (AWSResponse a))
-> (ByteStringLazy -> IO ByteStringLazy)
-> Service
-> Proxy a
-> ClientResponse ClientBody
-> m (Either Error (ClientResponse (AWSResponse a)))
Response.receiveJSON
( \Int
s ResponseHeaders
h Object
x ->
Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Int
-> UpdateDataSetResponse
UpdateDataSetResponse'
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"Arn")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"DataSetId")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"IngestionArn")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"IngestionId")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"RequestId")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure (forall a. Enum a => a -> Int
Prelude.fromEnum Int
s))
)
instance Prelude.Hashable UpdateDataSet where
hashWithSalt :: Int -> UpdateDataSet -> Int
hashWithSalt Int
_salt UpdateDataSet' {Maybe (NonEmpty ColumnLevelPermissionRule)
Maybe (NonEmpty ColumnGroup)
Maybe (HashMap Text FieldFolder)
Maybe (HashMap Text LogicalTable)
Maybe DataSetUsageConfiguration
Maybe RowLevelPermissionTagConfiguration
Maybe RowLevelPermissionDataSet
Text
HashMap Text PhysicalTable
DataSetImportMode
importMode :: DataSetImportMode
physicalTableMap :: HashMap Text PhysicalTable
name :: Text
dataSetId :: Text
awsAccountId :: Text
rowLevelPermissionTagConfiguration :: Maybe RowLevelPermissionTagConfiguration
rowLevelPermissionDataSet :: Maybe RowLevelPermissionDataSet
logicalTableMap :: Maybe (HashMap Text LogicalTable)
fieldFolders :: Maybe (HashMap Text FieldFolder)
dataSetUsageConfiguration :: Maybe DataSetUsageConfiguration
columnLevelPermissionRules :: Maybe (NonEmpty ColumnLevelPermissionRule)
columnGroups :: Maybe (NonEmpty ColumnGroup)
$sel:importMode:UpdateDataSet' :: UpdateDataSet -> DataSetImportMode
$sel:physicalTableMap:UpdateDataSet' :: UpdateDataSet -> HashMap Text PhysicalTable
$sel:name:UpdateDataSet' :: UpdateDataSet -> Text
$sel:dataSetId:UpdateDataSet' :: UpdateDataSet -> Text
$sel:awsAccountId:UpdateDataSet' :: UpdateDataSet -> Text
$sel:rowLevelPermissionTagConfiguration:UpdateDataSet' :: UpdateDataSet -> Maybe RowLevelPermissionTagConfiguration
$sel:rowLevelPermissionDataSet:UpdateDataSet' :: UpdateDataSet -> Maybe RowLevelPermissionDataSet
$sel:logicalTableMap:UpdateDataSet' :: UpdateDataSet -> Maybe (HashMap Text LogicalTable)
$sel:fieldFolders:UpdateDataSet' :: UpdateDataSet -> Maybe (HashMap Text FieldFolder)
$sel:dataSetUsageConfiguration:UpdateDataSet' :: UpdateDataSet -> Maybe DataSetUsageConfiguration
$sel:columnLevelPermissionRules:UpdateDataSet' :: UpdateDataSet -> Maybe (NonEmpty ColumnLevelPermissionRule)
$sel:columnGroups:UpdateDataSet' :: UpdateDataSet -> Maybe (NonEmpty ColumnGroup)
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe (NonEmpty ColumnGroup)
columnGroups
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe (NonEmpty ColumnLevelPermissionRule)
columnLevelPermissionRules
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe DataSetUsageConfiguration
dataSetUsageConfiguration
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe (HashMap Text FieldFolder)
fieldFolders
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe (HashMap Text LogicalTable)
logicalTableMap
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe RowLevelPermissionDataSet
rowLevelPermissionDataSet
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe RowLevelPermissionTagConfiguration
rowLevelPermissionTagConfiguration
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
awsAccountId
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
dataSetId
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
name
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` HashMap Text PhysicalTable
physicalTableMap
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` DataSetImportMode
importMode
instance Prelude.NFData UpdateDataSet where
rnf :: UpdateDataSet -> ()
rnf UpdateDataSet' {Maybe (NonEmpty ColumnLevelPermissionRule)
Maybe (NonEmpty ColumnGroup)
Maybe (HashMap Text FieldFolder)
Maybe (HashMap Text LogicalTable)
Maybe DataSetUsageConfiguration
Maybe RowLevelPermissionTagConfiguration
Maybe RowLevelPermissionDataSet
Text
HashMap Text PhysicalTable
DataSetImportMode
importMode :: DataSetImportMode
physicalTableMap :: HashMap Text PhysicalTable
name :: Text
dataSetId :: Text
awsAccountId :: Text
rowLevelPermissionTagConfiguration :: Maybe RowLevelPermissionTagConfiguration
rowLevelPermissionDataSet :: Maybe RowLevelPermissionDataSet
logicalTableMap :: Maybe (HashMap Text LogicalTable)
fieldFolders :: Maybe (HashMap Text FieldFolder)
dataSetUsageConfiguration :: Maybe DataSetUsageConfiguration
columnLevelPermissionRules :: Maybe (NonEmpty ColumnLevelPermissionRule)
columnGroups :: Maybe (NonEmpty ColumnGroup)
$sel:importMode:UpdateDataSet' :: UpdateDataSet -> DataSetImportMode
$sel:physicalTableMap:UpdateDataSet' :: UpdateDataSet -> HashMap Text PhysicalTable
$sel:name:UpdateDataSet' :: UpdateDataSet -> Text
$sel:dataSetId:UpdateDataSet' :: UpdateDataSet -> Text
$sel:awsAccountId:UpdateDataSet' :: UpdateDataSet -> Text
$sel:rowLevelPermissionTagConfiguration:UpdateDataSet' :: UpdateDataSet -> Maybe RowLevelPermissionTagConfiguration
$sel:rowLevelPermissionDataSet:UpdateDataSet' :: UpdateDataSet -> Maybe RowLevelPermissionDataSet
$sel:logicalTableMap:UpdateDataSet' :: UpdateDataSet -> Maybe (HashMap Text LogicalTable)
$sel:fieldFolders:UpdateDataSet' :: UpdateDataSet -> Maybe (HashMap Text FieldFolder)
$sel:dataSetUsageConfiguration:UpdateDataSet' :: UpdateDataSet -> Maybe DataSetUsageConfiguration
$sel:columnLevelPermissionRules:UpdateDataSet' :: UpdateDataSet -> Maybe (NonEmpty ColumnLevelPermissionRule)
$sel:columnGroups:UpdateDataSet' :: UpdateDataSet -> Maybe (NonEmpty ColumnGroup)
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe (NonEmpty ColumnGroup)
columnGroups
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe (NonEmpty ColumnLevelPermissionRule)
columnLevelPermissionRules
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe DataSetUsageConfiguration
dataSetUsageConfiguration
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe (HashMap Text FieldFolder)
fieldFolders
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe (HashMap Text LogicalTable)
logicalTableMap
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe RowLevelPermissionDataSet
rowLevelPermissionDataSet
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe RowLevelPermissionTagConfiguration
rowLevelPermissionTagConfiguration
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
awsAccountId
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
dataSetId
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
name
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf HashMap Text PhysicalTable
physicalTableMap
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf DataSetImportMode
importMode
instance Data.ToHeaders UpdateDataSet where
toHeaders :: UpdateDataSet -> ResponseHeaders
toHeaders =
forall a b. a -> b -> a
Prelude.const
( forall a. Monoid a => [a] -> a
Prelude.mconcat
[ HeaderName
"Content-Type"
forall a. ToHeader a => HeaderName -> a -> ResponseHeaders
Data.=# ( ByteString
"application/x-amz-json-1.0" ::
Prelude.ByteString
)
]
)
instance Data.ToJSON UpdateDataSet where
toJSON :: UpdateDataSet -> Value
toJSON UpdateDataSet' {Maybe (NonEmpty ColumnLevelPermissionRule)
Maybe (NonEmpty ColumnGroup)
Maybe (HashMap Text FieldFolder)
Maybe (HashMap Text LogicalTable)
Maybe DataSetUsageConfiguration
Maybe RowLevelPermissionTagConfiguration
Maybe RowLevelPermissionDataSet
Text
HashMap Text PhysicalTable
DataSetImportMode
importMode :: DataSetImportMode
physicalTableMap :: HashMap Text PhysicalTable
name :: Text
dataSetId :: Text
awsAccountId :: Text
rowLevelPermissionTagConfiguration :: Maybe RowLevelPermissionTagConfiguration
rowLevelPermissionDataSet :: Maybe RowLevelPermissionDataSet
logicalTableMap :: Maybe (HashMap Text LogicalTable)
fieldFolders :: Maybe (HashMap Text FieldFolder)
dataSetUsageConfiguration :: Maybe DataSetUsageConfiguration
columnLevelPermissionRules :: Maybe (NonEmpty ColumnLevelPermissionRule)
columnGroups :: Maybe (NonEmpty ColumnGroup)
$sel:importMode:UpdateDataSet' :: UpdateDataSet -> DataSetImportMode
$sel:physicalTableMap:UpdateDataSet' :: UpdateDataSet -> HashMap Text PhysicalTable
$sel:name:UpdateDataSet' :: UpdateDataSet -> Text
$sel:dataSetId:UpdateDataSet' :: UpdateDataSet -> Text
$sel:awsAccountId:UpdateDataSet' :: UpdateDataSet -> Text
$sel:rowLevelPermissionTagConfiguration:UpdateDataSet' :: UpdateDataSet -> Maybe RowLevelPermissionTagConfiguration
$sel:rowLevelPermissionDataSet:UpdateDataSet' :: UpdateDataSet -> Maybe RowLevelPermissionDataSet
$sel:logicalTableMap:UpdateDataSet' :: UpdateDataSet -> Maybe (HashMap Text LogicalTable)
$sel:fieldFolders:UpdateDataSet' :: UpdateDataSet -> Maybe (HashMap Text FieldFolder)
$sel:dataSetUsageConfiguration:UpdateDataSet' :: UpdateDataSet -> Maybe DataSetUsageConfiguration
$sel:columnLevelPermissionRules:UpdateDataSet' :: UpdateDataSet -> Maybe (NonEmpty ColumnLevelPermissionRule)
$sel:columnGroups:UpdateDataSet' :: UpdateDataSet -> Maybe (NonEmpty ColumnGroup)
..} =
[Pair] -> Value
Data.object
( forall a. [Maybe a] -> [a]
Prelude.catMaybes
[ (Key
"ColumnGroups" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (NonEmpty ColumnGroup)
columnGroups,
(Key
"ColumnLevelPermissionRules" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (NonEmpty ColumnLevelPermissionRule)
columnLevelPermissionRules,
(Key
"DataSetUsageConfiguration" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe DataSetUsageConfiguration
dataSetUsageConfiguration,
(Key
"FieldFolders" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (HashMap Text FieldFolder)
fieldFolders,
(Key
"LogicalTableMap" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (HashMap Text LogicalTable)
logicalTableMap,
(Key
"RowLevelPermissionDataSet" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe RowLevelPermissionDataSet
rowLevelPermissionDataSet,
(Key
"RowLevelPermissionTagConfiguration" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe RowLevelPermissionTagConfiguration
rowLevelPermissionTagConfiguration,
forall a. a -> Maybe a
Prelude.Just (Key
"Name" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..= Text
name),
forall a. a -> Maybe a
Prelude.Just
(Key
"PhysicalTableMap" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..= HashMap Text PhysicalTable
physicalTableMap),
forall a. a -> Maybe a
Prelude.Just (Key
"ImportMode" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..= DataSetImportMode
importMode)
]
)
instance Data.ToPath UpdateDataSet where
toPath :: UpdateDataSet -> ByteString
toPath UpdateDataSet' {Maybe (NonEmpty ColumnLevelPermissionRule)
Maybe (NonEmpty ColumnGroup)
Maybe (HashMap Text FieldFolder)
Maybe (HashMap Text LogicalTable)
Maybe DataSetUsageConfiguration
Maybe RowLevelPermissionTagConfiguration
Maybe RowLevelPermissionDataSet
Text
HashMap Text PhysicalTable
DataSetImportMode
importMode :: DataSetImportMode
physicalTableMap :: HashMap Text PhysicalTable
name :: Text
dataSetId :: Text
awsAccountId :: Text
rowLevelPermissionTagConfiguration :: Maybe RowLevelPermissionTagConfiguration
rowLevelPermissionDataSet :: Maybe RowLevelPermissionDataSet
logicalTableMap :: Maybe (HashMap Text LogicalTable)
fieldFolders :: Maybe (HashMap Text FieldFolder)
dataSetUsageConfiguration :: Maybe DataSetUsageConfiguration
columnLevelPermissionRules :: Maybe (NonEmpty ColumnLevelPermissionRule)
columnGroups :: Maybe (NonEmpty ColumnGroup)
$sel:importMode:UpdateDataSet' :: UpdateDataSet -> DataSetImportMode
$sel:physicalTableMap:UpdateDataSet' :: UpdateDataSet -> HashMap Text PhysicalTable
$sel:name:UpdateDataSet' :: UpdateDataSet -> Text
$sel:dataSetId:UpdateDataSet' :: UpdateDataSet -> Text
$sel:awsAccountId:UpdateDataSet' :: UpdateDataSet -> Text
$sel:rowLevelPermissionTagConfiguration:UpdateDataSet' :: UpdateDataSet -> Maybe RowLevelPermissionTagConfiguration
$sel:rowLevelPermissionDataSet:UpdateDataSet' :: UpdateDataSet -> Maybe RowLevelPermissionDataSet
$sel:logicalTableMap:UpdateDataSet' :: UpdateDataSet -> Maybe (HashMap Text LogicalTable)
$sel:fieldFolders:UpdateDataSet' :: UpdateDataSet -> Maybe (HashMap Text FieldFolder)
$sel:dataSetUsageConfiguration:UpdateDataSet' :: UpdateDataSet -> Maybe DataSetUsageConfiguration
$sel:columnLevelPermissionRules:UpdateDataSet' :: UpdateDataSet -> Maybe (NonEmpty ColumnLevelPermissionRule)
$sel:columnGroups:UpdateDataSet' :: UpdateDataSet -> Maybe (NonEmpty ColumnGroup)
..} =
forall a. Monoid a => [a] -> a
Prelude.mconcat
[ ByteString
"/accounts/",
forall a. ToByteString a => a -> ByteString
Data.toBS Text
awsAccountId,
ByteString
"/data-sets/",
forall a. ToByteString a => a -> ByteString
Data.toBS Text
dataSetId
]
instance Data.ToQuery UpdateDataSet where
toQuery :: UpdateDataSet -> QueryString
toQuery = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty
data UpdateDataSetResponse = UpdateDataSetResponse'
{
UpdateDataSetResponse -> Maybe Text
arn :: Prelude.Maybe Prelude.Text,
UpdateDataSetResponse -> Maybe Text
dataSetId :: Prelude.Maybe Prelude.Text,
UpdateDataSetResponse -> Maybe Text
ingestionArn :: Prelude.Maybe Prelude.Text,
UpdateDataSetResponse -> Maybe Text
ingestionId :: Prelude.Maybe Prelude.Text,
UpdateDataSetResponse -> Maybe Text
requestId :: Prelude.Maybe Prelude.Text,
UpdateDataSetResponse -> Int
status :: Prelude.Int
}
deriving (UpdateDataSetResponse -> UpdateDataSetResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: UpdateDataSetResponse -> UpdateDataSetResponse -> Bool
$c/= :: UpdateDataSetResponse -> UpdateDataSetResponse -> Bool
== :: UpdateDataSetResponse -> UpdateDataSetResponse -> Bool
$c== :: UpdateDataSetResponse -> UpdateDataSetResponse -> Bool
Prelude.Eq, ReadPrec [UpdateDataSetResponse]
ReadPrec UpdateDataSetResponse
Int -> ReadS UpdateDataSetResponse
ReadS [UpdateDataSetResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [UpdateDataSetResponse]
$creadListPrec :: ReadPrec [UpdateDataSetResponse]
readPrec :: ReadPrec UpdateDataSetResponse
$creadPrec :: ReadPrec UpdateDataSetResponse
readList :: ReadS [UpdateDataSetResponse]
$creadList :: ReadS [UpdateDataSetResponse]
readsPrec :: Int -> ReadS UpdateDataSetResponse
$creadsPrec :: Int -> ReadS UpdateDataSetResponse
Prelude.Read, Int -> UpdateDataSetResponse -> ShowS
[UpdateDataSetResponse] -> ShowS
UpdateDataSetResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [UpdateDataSetResponse] -> ShowS
$cshowList :: [UpdateDataSetResponse] -> ShowS
show :: UpdateDataSetResponse -> String
$cshow :: UpdateDataSetResponse -> String
showsPrec :: Int -> UpdateDataSetResponse -> ShowS
$cshowsPrec :: Int -> UpdateDataSetResponse -> ShowS
Prelude.Show, forall x. Rep UpdateDataSetResponse x -> UpdateDataSetResponse
forall x. UpdateDataSetResponse -> Rep UpdateDataSetResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep UpdateDataSetResponse x -> UpdateDataSetResponse
$cfrom :: forall x. UpdateDataSetResponse -> Rep UpdateDataSetResponse x
Prelude.Generic)
newUpdateDataSetResponse ::
Prelude.Int ->
UpdateDataSetResponse
newUpdateDataSetResponse :: Int -> UpdateDataSetResponse
newUpdateDataSetResponse Int
pStatus_ =
UpdateDataSetResponse'
{ $sel:arn:UpdateDataSetResponse' :: Maybe Text
arn = forall a. Maybe a
Prelude.Nothing,
$sel:dataSetId:UpdateDataSetResponse' :: Maybe Text
dataSetId = forall a. Maybe a
Prelude.Nothing,
$sel:ingestionArn:UpdateDataSetResponse' :: Maybe Text
ingestionArn = forall a. Maybe a
Prelude.Nothing,
$sel:ingestionId:UpdateDataSetResponse' :: Maybe Text
ingestionId = forall a. Maybe a
Prelude.Nothing,
$sel:requestId:UpdateDataSetResponse' :: Maybe Text
requestId = forall a. Maybe a
Prelude.Nothing,
$sel:status:UpdateDataSetResponse' :: Int
status = Int
pStatus_
}
updateDataSetResponse_arn :: Lens.Lens' UpdateDataSetResponse (Prelude.Maybe Prelude.Text)
updateDataSetResponse_arn :: Lens' UpdateDataSetResponse (Maybe Text)
updateDataSetResponse_arn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateDataSetResponse' {Maybe Text
arn :: Maybe Text
$sel:arn:UpdateDataSetResponse' :: UpdateDataSetResponse -> Maybe Text
arn} -> Maybe Text
arn) (\s :: UpdateDataSetResponse
s@UpdateDataSetResponse' {} Maybe Text
a -> UpdateDataSetResponse
s {$sel:arn:UpdateDataSetResponse' :: Maybe Text
arn = Maybe Text
a} :: UpdateDataSetResponse)
updateDataSetResponse_dataSetId :: Lens.Lens' UpdateDataSetResponse (Prelude.Maybe Prelude.Text)
updateDataSetResponse_dataSetId :: Lens' UpdateDataSetResponse (Maybe Text)
updateDataSetResponse_dataSetId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateDataSetResponse' {Maybe Text
dataSetId :: Maybe Text
$sel:dataSetId:UpdateDataSetResponse' :: UpdateDataSetResponse -> Maybe Text
dataSetId} -> Maybe Text
dataSetId) (\s :: UpdateDataSetResponse
s@UpdateDataSetResponse' {} Maybe Text
a -> UpdateDataSetResponse
s {$sel:dataSetId:UpdateDataSetResponse' :: Maybe Text
dataSetId = Maybe Text
a} :: UpdateDataSetResponse)
updateDataSetResponse_ingestionArn :: Lens.Lens' UpdateDataSetResponse (Prelude.Maybe Prelude.Text)
updateDataSetResponse_ingestionArn :: Lens' UpdateDataSetResponse (Maybe Text)
updateDataSetResponse_ingestionArn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateDataSetResponse' {Maybe Text
ingestionArn :: Maybe Text
$sel:ingestionArn:UpdateDataSetResponse' :: UpdateDataSetResponse -> Maybe Text
ingestionArn} -> Maybe Text
ingestionArn) (\s :: UpdateDataSetResponse
s@UpdateDataSetResponse' {} Maybe Text
a -> UpdateDataSetResponse
s {$sel:ingestionArn:UpdateDataSetResponse' :: Maybe Text
ingestionArn = Maybe Text
a} :: UpdateDataSetResponse)
updateDataSetResponse_ingestionId :: Lens.Lens' UpdateDataSetResponse (Prelude.Maybe Prelude.Text)
updateDataSetResponse_ingestionId :: Lens' UpdateDataSetResponse (Maybe Text)
updateDataSetResponse_ingestionId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateDataSetResponse' {Maybe Text
ingestionId :: Maybe Text
$sel:ingestionId:UpdateDataSetResponse' :: UpdateDataSetResponse -> Maybe Text
ingestionId} -> Maybe Text
ingestionId) (\s :: UpdateDataSetResponse
s@UpdateDataSetResponse' {} Maybe Text
a -> UpdateDataSetResponse
s {$sel:ingestionId:UpdateDataSetResponse' :: Maybe Text
ingestionId = Maybe Text
a} :: UpdateDataSetResponse)
updateDataSetResponse_requestId :: Lens.Lens' UpdateDataSetResponse (Prelude.Maybe Prelude.Text)
updateDataSetResponse_requestId :: Lens' UpdateDataSetResponse (Maybe Text)
updateDataSetResponse_requestId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateDataSetResponse' {Maybe Text
requestId :: Maybe Text
$sel:requestId:UpdateDataSetResponse' :: UpdateDataSetResponse -> Maybe Text
requestId} -> Maybe Text
requestId) (\s :: UpdateDataSetResponse
s@UpdateDataSetResponse' {} Maybe Text
a -> UpdateDataSetResponse
s {$sel:requestId:UpdateDataSetResponse' :: Maybe Text
requestId = Maybe Text
a} :: UpdateDataSetResponse)
updateDataSetResponse_status :: Lens.Lens' UpdateDataSetResponse Prelude.Int
updateDataSetResponse_status :: Lens' UpdateDataSetResponse Int
updateDataSetResponse_status = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateDataSetResponse' {Int
status :: Int
$sel:status:UpdateDataSetResponse' :: UpdateDataSetResponse -> Int
status} -> Int
status) (\s :: UpdateDataSetResponse
s@UpdateDataSetResponse' {} Int
a -> UpdateDataSetResponse
s {$sel:status:UpdateDataSetResponse' :: Int
status = Int
a} :: UpdateDataSetResponse)
instance Prelude.NFData UpdateDataSetResponse where
rnf :: UpdateDataSetResponse -> ()
rnf UpdateDataSetResponse' {Int
Maybe Text
status :: Int
requestId :: Maybe Text
ingestionId :: Maybe Text
ingestionArn :: Maybe Text
dataSetId :: Maybe Text
arn :: Maybe Text
$sel:status:UpdateDataSetResponse' :: UpdateDataSetResponse -> Int
$sel:requestId:UpdateDataSetResponse' :: UpdateDataSetResponse -> Maybe Text
$sel:ingestionId:UpdateDataSetResponse' :: UpdateDataSetResponse -> Maybe Text
$sel:ingestionArn:UpdateDataSetResponse' :: UpdateDataSetResponse -> Maybe Text
$sel:dataSetId:UpdateDataSetResponse' :: UpdateDataSetResponse -> Maybe Text
$sel:arn:UpdateDataSetResponse' :: UpdateDataSetResponse -> Maybe Text
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
arn
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
dataSetId
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
ingestionArn
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
ingestionId
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
requestId
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Int
status