module Stratosphere.CleanRooms.ConfiguredTable (
module Exports, ConfiguredTable(..), mkConfiguredTable
) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.CleanRooms.ConfiguredTable.AnalysisRuleProperty as Exports
import {-# SOURCE #-} Stratosphere.CleanRooms.ConfiguredTable.TableReferenceProperty as Exports
import Stratosphere.ResourceProperties
import Stratosphere.Tag
import Stratosphere.Value
data ConfiguredTable
=
ConfiguredTable {ConfiguredTable -> ()
haddock_workaround_ :: (),
ConfiguredTable -> ValueList Text
allowedColumns :: (ValueList Prelude.Text),
ConfiguredTable -> Value Text
analysisMethod :: (Value Prelude.Text),
ConfiguredTable -> Maybe [AnalysisRuleProperty]
analysisRules :: (Prelude.Maybe [AnalysisRuleProperty]),
ConfiguredTable -> Maybe (Value Text)
description :: (Prelude.Maybe (Value Prelude.Text)),
ConfiguredTable -> Value Text
name :: (Value Prelude.Text),
ConfiguredTable -> Maybe (ValueList Text)
selectedAnalysisMethods :: (Prelude.Maybe (ValueList Prelude.Text)),
ConfiguredTable -> TableReferenceProperty
tableReference :: TableReferenceProperty,
ConfiguredTable -> Maybe [Tag]
tags :: (Prelude.Maybe [Tag])}
deriving stock (ConfiguredTable -> ConfiguredTable -> Bool
(ConfiguredTable -> ConfiguredTable -> Bool)
-> (ConfiguredTable -> ConfiguredTable -> Bool)
-> Eq ConfiguredTable
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ConfiguredTable -> ConfiguredTable -> Bool
== :: ConfiguredTable -> ConfiguredTable -> Bool
$c/= :: ConfiguredTable -> ConfiguredTable -> Bool
/= :: ConfiguredTable -> ConfiguredTable -> Bool
Prelude.Eq, Int -> ConfiguredTable -> ShowS
[ConfiguredTable] -> ShowS
ConfiguredTable -> String
(Int -> ConfiguredTable -> ShowS)
-> (ConfiguredTable -> String)
-> ([ConfiguredTable] -> ShowS)
-> Show ConfiguredTable
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> ConfiguredTable -> ShowS
showsPrec :: Int -> ConfiguredTable -> ShowS
$cshow :: ConfiguredTable -> String
show :: ConfiguredTable -> String
$cshowList :: [ConfiguredTable] -> ShowS
showList :: [ConfiguredTable] -> ShowS
Prelude.Show)
mkConfiguredTable ::
ValueList Prelude.Text
-> Value Prelude.Text
-> Value Prelude.Text -> TableReferenceProperty -> ConfiguredTable
mkConfiguredTable :: ValueList Text
-> Value Text
-> Value Text
-> TableReferenceProperty
-> ConfiguredTable
mkConfiguredTable ValueList Text
allowedColumns Value Text
analysisMethod Value Text
name TableReferenceProperty
tableReference
= ConfiguredTable
{haddock_workaround_ :: ()
haddock_workaround_ = (), allowedColumns :: ValueList Text
allowedColumns = ValueList Text
allowedColumns,
analysisMethod :: Value Text
analysisMethod = Value Text
analysisMethod, name :: Value Text
name = Value Text
name,
tableReference :: TableReferenceProperty
tableReference = TableReferenceProperty
tableReference, analysisRules :: Maybe [AnalysisRuleProperty]
analysisRules = Maybe [AnalysisRuleProperty]
forall a. Maybe a
Prelude.Nothing,
description :: Maybe (Value Text)
description = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
selectedAnalysisMethods :: Maybe (ValueList Text)
selectedAnalysisMethods = Maybe (ValueList Text)
forall a. Maybe a
Prelude.Nothing, tags :: Maybe [Tag]
tags = Maybe [Tag]
forall a. Maybe a
Prelude.Nothing}
instance ToResourceProperties ConfiguredTable where
toResourceProperties :: ConfiguredTable -> ResourceProperties
toResourceProperties ConfiguredTable {Maybe [Tag]
Maybe [AnalysisRuleProperty]
Maybe (ValueList Text)
Maybe (Value Text)
()
ValueList Text
Value Text
TableReferenceProperty
haddock_workaround_ :: ConfiguredTable -> ()
allowedColumns :: ConfiguredTable -> ValueList Text
analysisMethod :: ConfiguredTable -> Value Text
analysisRules :: ConfiguredTable -> Maybe [AnalysisRuleProperty]
description :: ConfiguredTable -> Maybe (Value Text)
name :: ConfiguredTable -> Value Text
selectedAnalysisMethods :: ConfiguredTable -> Maybe (ValueList Text)
tableReference :: ConfiguredTable -> TableReferenceProperty
tags :: ConfiguredTable -> Maybe [Tag]
haddock_workaround_ :: ()
allowedColumns :: ValueList Text
analysisMethod :: Value Text
analysisRules :: Maybe [AnalysisRuleProperty]
description :: Maybe (Value Text)
name :: Value Text
selectedAnalysisMethods :: Maybe (ValueList Text)
tableReference :: TableReferenceProperty
tags :: Maybe [Tag]
..}
= ResourceProperties
{awsType :: Text
awsType = Text
"AWS::CleanRooms::ConfiguredTable",
supportsTags :: Bool
supportsTags = Bool
Prelude.True,
properties :: Object
properties = [Item Object] -> Object
forall l. IsList l => [Item l] -> l
Prelude.fromList
([(Key, Value)] -> [(Key, Value)] -> [(Key, Value)]
forall a. Semigroup a => a -> a -> a
(Prelude.<>)
[Key
"AllowedColumns" Key -> ValueList Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= ValueList Text
allowedColumns,
Key
"AnalysisMethod" Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Text
analysisMethod, Key
"Name" Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Text
name,
Key
"TableReference" Key -> TableReferenceProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= TableReferenceProperty
tableReference]
([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
[Key -> [AnalysisRuleProperty] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"AnalysisRules" ([AnalysisRuleProperty] -> (Key, Value))
-> Maybe [AnalysisRuleProperty] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [AnalysisRuleProperty]
analysisRules,
Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Description" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
description,
Key -> ValueList Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"SelectedAnalysisMethods"
(ValueList Text -> (Key, Value))
-> Maybe (ValueList Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (ValueList Text)
selectedAnalysisMethods,
Key -> [Tag] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Tags" ([Tag] -> (Key, Value)) -> Maybe [Tag] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [Tag]
tags]))}
instance JSON.ToJSON ConfiguredTable where
toJSON :: ConfiguredTable -> Value
toJSON ConfiguredTable {Maybe [Tag]
Maybe [AnalysisRuleProperty]
Maybe (ValueList Text)
Maybe (Value Text)
()
ValueList Text
Value Text
TableReferenceProperty
haddock_workaround_ :: ConfiguredTable -> ()
allowedColumns :: ConfiguredTable -> ValueList Text
analysisMethod :: ConfiguredTable -> Value Text
analysisRules :: ConfiguredTable -> Maybe [AnalysisRuleProperty]
description :: ConfiguredTable -> Maybe (Value Text)
name :: ConfiguredTable -> Value Text
selectedAnalysisMethods :: ConfiguredTable -> Maybe (ValueList Text)
tableReference :: ConfiguredTable -> TableReferenceProperty
tags :: ConfiguredTable -> Maybe [Tag]
haddock_workaround_ :: ()
allowedColumns :: ValueList Text
analysisMethod :: Value Text
analysisRules :: Maybe [AnalysisRuleProperty]
description :: Maybe (Value Text)
name :: Value Text
selectedAnalysisMethods :: Maybe (ValueList Text)
tableReference :: TableReferenceProperty
tags :: Maybe [Tag]
..}
= [(Key, Value)] -> Value
JSON.object
([Item [(Key, Value)]] -> [(Key, Value)]
forall l. IsList l => [Item l] -> l
Prelude.fromList
([(Key, Value)] -> [(Key, Value)] -> [(Key, Value)]
forall a. Semigroup a => a -> a -> a
(Prelude.<>)
[Key
"AllowedColumns" Key -> ValueList Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= ValueList Text
allowedColumns,
Key
"AnalysisMethod" Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Text
analysisMethod, Key
"Name" Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Text
name,
Key
"TableReference" Key -> TableReferenceProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= TableReferenceProperty
tableReference]
([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
[Key -> [AnalysisRuleProperty] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"AnalysisRules" ([AnalysisRuleProperty] -> (Key, Value))
-> Maybe [AnalysisRuleProperty] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [AnalysisRuleProperty]
analysisRules,
Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Description" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
description,
Key -> ValueList Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"SelectedAnalysisMethods"
(ValueList Text -> (Key, Value))
-> Maybe (ValueList Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (ValueList Text)
selectedAnalysisMethods,
Key -> [Tag] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Tags" ([Tag] -> (Key, Value)) -> Maybe [Tag] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [Tag]
tags])))
instance Property "AllowedColumns" ConfiguredTable where
type PropertyType "AllowedColumns" ConfiguredTable = ValueList Prelude.Text
set :: PropertyType "AllowedColumns" ConfiguredTable
-> ConfiguredTable -> ConfiguredTable
set PropertyType "AllowedColumns" ConfiguredTable
newValue ConfiguredTable {Maybe [Tag]
Maybe [AnalysisRuleProperty]
Maybe (ValueList Text)
Maybe (Value Text)
()
ValueList Text
Value Text
TableReferenceProperty
haddock_workaround_ :: ConfiguredTable -> ()
allowedColumns :: ConfiguredTable -> ValueList Text
analysisMethod :: ConfiguredTable -> Value Text
analysisRules :: ConfiguredTable -> Maybe [AnalysisRuleProperty]
description :: ConfiguredTable -> Maybe (Value Text)
name :: ConfiguredTable -> Value Text
selectedAnalysisMethods :: ConfiguredTable -> Maybe (ValueList Text)
tableReference :: ConfiguredTable -> TableReferenceProperty
tags :: ConfiguredTable -> Maybe [Tag]
haddock_workaround_ :: ()
allowedColumns :: ValueList Text
analysisMethod :: Value Text
analysisRules :: Maybe [AnalysisRuleProperty]
description :: Maybe (Value Text)
name :: Value Text
selectedAnalysisMethods :: Maybe (ValueList Text)
tableReference :: TableReferenceProperty
tags :: Maybe [Tag]
..}
= ConfiguredTable {allowedColumns :: ValueList Text
allowedColumns = PropertyType "AllowedColumns" ConfiguredTable
ValueList Text
newValue, Maybe [Tag]
Maybe [AnalysisRuleProperty]
Maybe (ValueList Text)
Maybe (Value Text)
()
Value Text
TableReferenceProperty
haddock_workaround_ :: ()
analysisMethod :: Value Text
analysisRules :: Maybe [AnalysisRuleProperty]
description :: Maybe (Value Text)
name :: Value Text
selectedAnalysisMethods :: Maybe (ValueList Text)
tableReference :: TableReferenceProperty
tags :: Maybe [Tag]
haddock_workaround_ :: ()
analysisMethod :: Value Text
analysisRules :: Maybe [AnalysisRuleProperty]
description :: Maybe (Value Text)
name :: Value Text
selectedAnalysisMethods :: Maybe (ValueList Text)
tableReference :: TableReferenceProperty
tags :: Maybe [Tag]
..}
instance Property "AnalysisMethod" ConfiguredTable where
type PropertyType "AnalysisMethod" ConfiguredTable = Value Prelude.Text
set :: PropertyType "AnalysisMethod" ConfiguredTable
-> ConfiguredTable -> ConfiguredTable
set PropertyType "AnalysisMethod" ConfiguredTable
newValue ConfiguredTable {Maybe [Tag]
Maybe [AnalysisRuleProperty]
Maybe (ValueList Text)
Maybe (Value Text)
()
ValueList Text
Value Text
TableReferenceProperty
haddock_workaround_ :: ConfiguredTable -> ()
allowedColumns :: ConfiguredTable -> ValueList Text
analysisMethod :: ConfiguredTable -> Value Text
analysisRules :: ConfiguredTable -> Maybe [AnalysisRuleProperty]
description :: ConfiguredTable -> Maybe (Value Text)
name :: ConfiguredTable -> Value Text
selectedAnalysisMethods :: ConfiguredTable -> Maybe (ValueList Text)
tableReference :: ConfiguredTable -> TableReferenceProperty
tags :: ConfiguredTable -> Maybe [Tag]
haddock_workaround_ :: ()
allowedColumns :: ValueList Text
analysisMethod :: Value Text
analysisRules :: Maybe [AnalysisRuleProperty]
description :: Maybe (Value Text)
name :: Value Text
selectedAnalysisMethods :: Maybe (ValueList Text)
tableReference :: TableReferenceProperty
tags :: Maybe [Tag]
..}
= ConfiguredTable {analysisMethod :: Value Text
analysisMethod = PropertyType "AnalysisMethod" ConfiguredTable
Value Text
newValue, Maybe [Tag]
Maybe [AnalysisRuleProperty]
Maybe (ValueList Text)
Maybe (Value Text)
()
ValueList Text
Value Text
TableReferenceProperty
haddock_workaround_ :: ()
allowedColumns :: ValueList Text
analysisRules :: Maybe [AnalysisRuleProperty]
description :: Maybe (Value Text)
name :: Value Text
selectedAnalysisMethods :: Maybe (ValueList Text)
tableReference :: TableReferenceProperty
tags :: Maybe [Tag]
haddock_workaround_ :: ()
allowedColumns :: ValueList Text
analysisRules :: Maybe [AnalysisRuleProperty]
description :: Maybe (Value Text)
name :: Value Text
selectedAnalysisMethods :: Maybe (ValueList Text)
tableReference :: TableReferenceProperty
tags :: Maybe [Tag]
..}
instance Property "AnalysisRules" ConfiguredTable where
type PropertyType "AnalysisRules" ConfiguredTable = [AnalysisRuleProperty]
set :: PropertyType "AnalysisRules" ConfiguredTable
-> ConfiguredTable -> ConfiguredTable
set PropertyType "AnalysisRules" ConfiguredTable
newValue ConfiguredTable {Maybe [Tag]
Maybe [AnalysisRuleProperty]
Maybe (ValueList Text)
Maybe (Value Text)
()
ValueList Text
Value Text
TableReferenceProperty
haddock_workaround_ :: ConfiguredTable -> ()
allowedColumns :: ConfiguredTable -> ValueList Text
analysisMethod :: ConfiguredTable -> Value Text
analysisRules :: ConfiguredTable -> Maybe [AnalysisRuleProperty]
description :: ConfiguredTable -> Maybe (Value Text)
name :: ConfiguredTable -> Value Text
selectedAnalysisMethods :: ConfiguredTable -> Maybe (ValueList Text)
tableReference :: ConfiguredTable -> TableReferenceProperty
tags :: ConfiguredTable -> Maybe [Tag]
haddock_workaround_ :: ()
allowedColumns :: ValueList Text
analysisMethod :: Value Text
analysisRules :: Maybe [AnalysisRuleProperty]
description :: Maybe (Value Text)
name :: Value Text
selectedAnalysisMethods :: Maybe (ValueList Text)
tableReference :: TableReferenceProperty
tags :: Maybe [Tag]
..}
= ConfiguredTable {analysisRules :: Maybe [AnalysisRuleProperty]
analysisRules = [AnalysisRuleProperty] -> Maybe [AnalysisRuleProperty]
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure [AnalysisRuleProperty]
PropertyType "AnalysisRules" ConfiguredTable
newValue, Maybe [Tag]
Maybe (ValueList Text)
Maybe (Value Text)
()
ValueList Text
Value Text
TableReferenceProperty
haddock_workaround_ :: ()
allowedColumns :: ValueList Text
analysisMethod :: Value Text
description :: Maybe (Value Text)
name :: Value Text
selectedAnalysisMethods :: Maybe (ValueList Text)
tableReference :: TableReferenceProperty
tags :: Maybe [Tag]
haddock_workaround_ :: ()
allowedColumns :: ValueList Text
analysisMethod :: Value Text
description :: Maybe (Value Text)
name :: Value Text
selectedAnalysisMethods :: Maybe (ValueList Text)
tableReference :: TableReferenceProperty
tags :: Maybe [Tag]
..}
instance Property "Description" ConfiguredTable where
type PropertyType "Description" ConfiguredTable = Value Prelude.Text
set :: PropertyType "Description" ConfiguredTable
-> ConfiguredTable -> ConfiguredTable
set PropertyType "Description" ConfiguredTable
newValue ConfiguredTable {Maybe [Tag]
Maybe [AnalysisRuleProperty]
Maybe (ValueList Text)
Maybe (Value Text)
()
ValueList Text
Value Text
TableReferenceProperty
haddock_workaround_ :: ConfiguredTable -> ()
allowedColumns :: ConfiguredTable -> ValueList Text
analysisMethod :: ConfiguredTable -> Value Text
analysisRules :: ConfiguredTable -> Maybe [AnalysisRuleProperty]
description :: ConfiguredTable -> Maybe (Value Text)
name :: ConfiguredTable -> Value Text
selectedAnalysisMethods :: ConfiguredTable -> Maybe (ValueList Text)
tableReference :: ConfiguredTable -> TableReferenceProperty
tags :: ConfiguredTable -> Maybe [Tag]
haddock_workaround_ :: ()
allowedColumns :: ValueList Text
analysisMethod :: Value Text
analysisRules :: Maybe [AnalysisRuleProperty]
description :: Maybe (Value Text)
name :: Value Text
selectedAnalysisMethods :: Maybe (ValueList Text)
tableReference :: TableReferenceProperty
tags :: Maybe [Tag]
..}
= ConfiguredTable {description :: Maybe (Value Text)
description = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "Description" ConfiguredTable
Value Text
newValue, Maybe [Tag]
Maybe [AnalysisRuleProperty]
Maybe (ValueList Text)
()
ValueList Text
Value Text
TableReferenceProperty
haddock_workaround_ :: ()
allowedColumns :: ValueList Text
analysisMethod :: Value Text
analysisRules :: Maybe [AnalysisRuleProperty]
name :: Value Text
selectedAnalysisMethods :: Maybe (ValueList Text)
tableReference :: TableReferenceProperty
tags :: Maybe [Tag]
haddock_workaround_ :: ()
allowedColumns :: ValueList Text
analysisMethod :: Value Text
analysisRules :: Maybe [AnalysisRuleProperty]
name :: Value Text
selectedAnalysisMethods :: Maybe (ValueList Text)
tableReference :: TableReferenceProperty
tags :: Maybe [Tag]
..}
instance Property "Name" ConfiguredTable where
type PropertyType "Name" ConfiguredTable = Value Prelude.Text
set :: PropertyType "Name" ConfiguredTable
-> ConfiguredTable -> ConfiguredTable
set PropertyType "Name" ConfiguredTable
newValue ConfiguredTable {Maybe [Tag]
Maybe [AnalysisRuleProperty]
Maybe (ValueList Text)
Maybe (Value Text)
()
ValueList Text
Value Text
TableReferenceProperty
haddock_workaround_ :: ConfiguredTable -> ()
allowedColumns :: ConfiguredTable -> ValueList Text
analysisMethod :: ConfiguredTable -> Value Text
analysisRules :: ConfiguredTable -> Maybe [AnalysisRuleProperty]
description :: ConfiguredTable -> Maybe (Value Text)
name :: ConfiguredTable -> Value Text
selectedAnalysisMethods :: ConfiguredTable -> Maybe (ValueList Text)
tableReference :: ConfiguredTable -> TableReferenceProperty
tags :: ConfiguredTable -> Maybe [Tag]
haddock_workaround_ :: ()
allowedColumns :: ValueList Text
analysisMethod :: Value Text
analysisRules :: Maybe [AnalysisRuleProperty]
description :: Maybe (Value Text)
name :: Value Text
selectedAnalysisMethods :: Maybe (ValueList Text)
tableReference :: TableReferenceProperty
tags :: Maybe [Tag]
..}
= ConfiguredTable {name :: Value Text
name = PropertyType "Name" ConfiguredTable
Value Text
newValue, Maybe [Tag]
Maybe [AnalysisRuleProperty]
Maybe (ValueList Text)
Maybe (Value Text)
()
ValueList Text
Value Text
TableReferenceProperty
haddock_workaround_ :: ()
allowedColumns :: ValueList Text
analysisMethod :: Value Text
analysisRules :: Maybe [AnalysisRuleProperty]
description :: Maybe (Value Text)
selectedAnalysisMethods :: Maybe (ValueList Text)
tableReference :: TableReferenceProperty
tags :: Maybe [Tag]
haddock_workaround_ :: ()
allowedColumns :: ValueList Text
analysisMethod :: Value Text
analysisRules :: Maybe [AnalysisRuleProperty]
description :: Maybe (Value Text)
selectedAnalysisMethods :: Maybe (ValueList Text)
tableReference :: TableReferenceProperty
tags :: Maybe [Tag]
..}
instance Property "SelectedAnalysisMethods" ConfiguredTable where
type PropertyType "SelectedAnalysisMethods" ConfiguredTable = ValueList Prelude.Text
set :: PropertyType "SelectedAnalysisMethods" ConfiguredTable
-> ConfiguredTable -> ConfiguredTable
set PropertyType "SelectedAnalysisMethods" ConfiguredTable
newValue ConfiguredTable {Maybe [Tag]
Maybe [AnalysisRuleProperty]
Maybe (ValueList Text)
Maybe (Value Text)
()
ValueList Text
Value Text
TableReferenceProperty
haddock_workaround_ :: ConfiguredTable -> ()
allowedColumns :: ConfiguredTable -> ValueList Text
analysisMethod :: ConfiguredTable -> Value Text
analysisRules :: ConfiguredTable -> Maybe [AnalysisRuleProperty]
description :: ConfiguredTable -> Maybe (Value Text)
name :: ConfiguredTable -> Value Text
selectedAnalysisMethods :: ConfiguredTable -> Maybe (ValueList Text)
tableReference :: ConfiguredTable -> TableReferenceProperty
tags :: ConfiguredTable -> Maybe [Tag]
haddock_workaround_ :: ()
allowedColumns :: ValueList Text
analysisMethod :: Value Text
analysisRules :: Maybe [AnalysisRuleProperty]
description :: Maybe (Value Text)
name :: Value Text
selectedAnalysisMethods :: Maybe (ValueList Text)
tableReference :: TableReferenceProperty
tags :: Maybe [Tag]
..}
= ConfiguredTable
{selectedAnalysisMethods :: Maybe (ValueList Text)
selectedAnalysisMethods = ValueList Text -> Maybe (ValueList Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "SelectedAnalysisMethods" ConfiguredTable
ValueList Text
newValue, Maybe [Tag]
Maybe [AnalysisRuleProperty]
Maybe (Value Text)
()
ValueList Text
Value Text
TableReferenceProperty
haddock_workaround_ :: ()
allowedColumns :: ValueList Text
analysisMethod :: Value Text
analysisRules :: Maybe [AnalysisRuleProperty]
description :: Maybe (Value Text)
name :: Value Text
tableReference :: TableReferenceProperty
tags :: Maybe [Tag]
haddock_workaround_ :: ()
allowedColumns :: ValueList Text
analysisMethod :: Value Text
analysisRules :: Maybe [AnalysisRuleProperty]
description :: Maybe (Value Text)
name :: Value Text
tableReference :: TableReferenceProperty
tags :: Maybe [Tag]
..}
instance Property "TableReference" ConfiguredTable where
type PropertyType "TableReference" ConfiguredTable = TableReferenceProperty
set :: PropertyType "TableReference" ConfiguredTable
-> ConfiguredTable -> ConfiguredTable
set PropertyType "TableReference" ConfiguredTable
newValue ConfiguredTable {Maybe [Tag]
Maybe [AnalysisRuleProperty]
Maybe (ValueList Text)
Maybe (Value Text)
()
ValueList Text
Value Text
TableReferenceProperty
haddock_workaround_ :: ConfiguredTable -> ()
allowedColumns :: ConfiguredTable -> ValueList Text
analysisMethod :: ConfiguredTable -> Value Text
analysisRules :: ConfiguredTable -> Maybe [AnalysisRuleProperty]
description :: ConfiguredTable -> Maybe (Value Text)
name :: ConfiguredTable -> Value Text
selectedAnalysisMethods :: ConfiguredTable -> Maybe (ValueList Text)
tableReference :: ConfiguredTable -> TableReferenceProperty
tags :: ConfiguredTable -> Maybe [Tag]
haddock_workaround_ :: ()
allowedColumns :: ValueList Text
analysisMethod :: Value Text
analysisRules :: Maybe [AnalysisRuleProperty]
description :: Maybe (Value Text)
name :: Value Text
selectedAnalysisMethods :: Maybe (ValueList Text)
tableReference :: TableReferenceProperty
tags :: Maybe [Tag]
..}
= ConfiguredTable {tableReference :: TableReferenceProperty
tableReference = PropertyType "TableReference" ConfiguredTable
TableReferenceProperty
newValue, Maybe [Tag]
Maybe [AnalysisRuleProperty]
Maybe (ValueList Text)
Maybe (Value Text)
()
ValueList Text
Value Text
haddock_workaround_ :: ()
allowedColumns :: ValueList Text
analysisMethod :: Value Text
analysisRules :: Maybe [AnalysisRuleProperty]
description :: Maybe (Value Text)
name :: Value Text
selectedAnalysisMethods :: Maybe (ValueList Text)
tags :: Maybe [Tag]
haddock_workaround_ :: ()
allowedColumns :: ValueList Text
analysisMethod :: Value Text
analysisRules :: Maybe [AnalysisRuleProperty]
description :: Maybe (Value Text)
name :: Value Text
selectedAnalysisMethods :: Maybe (ValueList Text)
tags :: Maybe [Tag]
..}
instance Property "Tags" ConfiguredTable where
type PropertyType "Tags" ConfiguredTable = [Tag]
set :: PropertyType "Tags" ConfiguredTable
-> ConfiguredTable -> ConfiguredTable
set PropertyType "Tags" ConfiguredTable
newValue ConfiguredTable {Maybe [Tag]
Maybe [AnalysisRuleProperty]
Maybe (ValueList Text)
Maybe (Value Text)
()
ValueList Text
Value Text
TableReferenceProperty
haddock_workaround_ :: ConfiguredTable -> ()
allowedColumns :: ConfiguredTable -> ValueList Text
analysisMethod :: ConfiguredTable -> Value Text
analysisRules :: ConfiguredTable -> Maybe [AnalysisRuleProperty]
description :: ConfiguredTable -> Maybe (Value Text)
name :: ConfiguredTable -> Value Text
selectedAnalysisMethods :: ConfiguredTable -> Maybe (ValueList Text)
tableReference :: ConfiguredTable -> TableReferenceProperty
tags :: ConfiguredTable -> Maybe [Tag]
haddock_workaround_ :: ()
allowedColumns :: ValueList Text
analysisMethod :: Value Text
analysisRules :: Maybe [AnalysisRuleProperty]
description :: Maybe (Value Text)
name :: Value Text
selectedAnalysisMethods :: Maybe (ValueList Text)
tableReference :: TableReferenceProperty
tags :: Maybe [Tag]
..}
= ConfiguredTable {tags :: Maybe [Tag]
tags = [Tag] -> Maybe [Tag]
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure [Tag]
PropertyType "Tags" ConfiguredTable
newValue, Maybe [AnalysisRuleProperty]
Maybe (ValueList Text)
Maybe (Value Text)
()
ValueList Text
Value Text
TableReferenceProperty
haddock_workaround_ :: ()
allowedColumns :: ValueList Text
analysisMethod :: Value Text
analysisRules :: Maybe [AnalysisRuleProperty]
description :: Maybe (Value Text)
name :: Value Text
selectedAnalysisMethods :: Maybe (ValueList Text)
tableReference :: TableReferenceProperty
haddock_workaround_ :: ()
allowedColumns :: ValueList Text
analysisMethod :: Value Text
analysisRules :: Maybe [AnalysisRuleProperty]
description :: Maybe (Value Text)
name :: Value Text
selectedAnalysisMethods :: Maybe (ValueList Text)
tableReference :: TableReferenceProperty
..}