module Stratosphere.QuickSight.Template.DynamicDefaultValueProperty (
module Exports, DynamicDefaultValueProperty(..),
mkDynamicDefaultValueProperty
) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.QuickSight.Template.ColumnIdentifierProperty as Exports
import Stratosphere.ResourceProperties
data DynamicDefaultValueProperty
=
DynamicDefaultValueProperty {DynamicDefaultValueProperty -> ()
haddock_workaround_ :: (),
DynamicDefaultValueProperty -> ColumnIdentifierProperty
defaultValueColumn :: ColumnIdentifierProperty,
DynamicDefaultValueProperty -> Maybe ColumnIdentifierProperty
groupNameColumn :: (Prelude.Maybe ColumnIdentifierProperty),
DynamicDefaultValueProperty -> Maybe ColumnIdentifierProperty
userNameColumn :: (Prelude.Maybe ColumnIdentifierProperty)}
deriving stock (DynamicDefaultValueProperty -> DynamicDefaultValueProperty -> Bool
(DynamicDefaultValueProperty
-> DynamicDefaultValueProperty -> Bool)
-> (DynamicDefaultValueProperty
-> DynamicDefaultValueProperty -> Bool)
-> Eq DynamicDefaultValueProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: DynamicDefaultValueProperty -> DynamicDefaultValueProperty -> Bool
== :: DynamicDefaultValueProperty -> DynamicDefaultValueProperty -> Bool
$c/= :: DynamicDefaultValueProperty -> DynamicDefaultValueProperty -> Bool
/= :: DynamicDefaultValueProperty -> DynamicDefaultValueProperty -> Bool
Prelude.Eq, Int -> DynamicDefaultValueProperty -> ShowS
[DynamicDefaultValueProperty] -> ShowS
DynamicDefaultValueProperty -> String
(Int -> DynamicDefaultValueProperty -> ShowS)
-> (DynamicDefaultValueProperty -> String)
-> ([DynamicDefaultValueProperty] -> ShowS)
-> Show DynamicDefaultValueProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> DynamicDefaultValueProperty -> ShowS
showsPrec :: Int -> DynamicDefaultValueProperty -> ShowS
$cshow :: DynamicDefaultValueProperty -> String
show :: DynamicDefaultValueProperty -> String
$cshowList :: [DynamicDefaultValueProperty] -> ShowS
showList :: [DynamicDefaultValueProperty] -> ShowS
Prelude.Show)
mkDynamicDefaultValueProperty ::
ColumnIdentifierProperty -> DynamicDefaultValueProperty
mkDynamicDefaultValueProperty :: ColumnIdentifierProperty -> DynamicDefaultValueProperty
mkDynamicDefaultValueProperty ColumnIdentifierProperty
defaultValueColumn
= DynamicDefaultValueProperty
{haddock_workaround_ :: ()
haddock_workaround_ = (), defaultValueColumn :: ColumnIdentifierProperty
defaultValueColumn = ColumnIdentifierProperty
defaultValueColumn,
groupNameColumn :: Maybe ColumnIdentifierProperty
groupNameColumn = Maybe ColumnIdentifierProperty
forall a. Maybe a
Prelude.Nothing,
userNameColumn :: Maybe ColumnIdentifierProperty
userNameColumn = Maybe ColumnIdentifierProperty
forall a. Maybe a
Prelude.Nothing}
instance ToResourceProperties DynamicDefaultValueProperty where
toResourceProperties :: DynamicDefaultValueProperty -> ResourceProperties
toResourceProperties DynamicDefaultValueProperty {Maybe ColumnIdentifierProperty
()
ColumnIdentifierProperty
haddock_workaround_ :: DynamicDefaultValueProperty -> ()
defaultValueColumn :: DynamicDefaultValueProperty -> ColumnIdentifierProperty
groupNameColumn :: DynamicDefaultValueProperty -> Maybe ColumnIdentifierProperty
userNameColumn :: DynamicDefaultValueProperty -> Maybe ColumnIdentifierProperty
haddock_workaround_ :: ()
defaultValueColumn :: ColumnIdentifierProperty
groupNameColumn :: Maybe ColumnIdentifierProperty
userNameColumn :: Maybe ColumnIdentifierProperty
..}
= ResourceProperties
{awsType :: Text
awsType = Text
"AWS::QuickSight::Template.DynamicDefaultValue",
supportsTags :: Bool
supportsTags = Bool
Prelude.False,
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
"DefaultValueColumn" Key -> ColumnIdentifierProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= ColumnIdentifierProperty
defaultValueColumn]
([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
[Key -> ColumnIdentifierProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"GroupNameColumn" (ColumnIdentifierProperty -> (Key, Value))
-> Maybe ColumnIdentifierProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe ColumnIdentifierProperty
groupNameColumn,
Key -> ColumnIdentifierProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"UserNameColumn" (ColumnIdentifierProperty -> (Key, Value))
-> Maybe ColumnIdentifierProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe ColumnIdentifierProperty
userNameColumn]))}
instance JSON.ToJSON DynamicDefaultValueProperty where
toJSON :: DynamicDefaultValueProperty -> Value
toJSON DynamicDefaultValueProperty {Maybe ColumnIdentifierProperty
()
ColumnIdentifierProperty
haddock_workaround_ :: DynamicDefaultValueProperty -> ()
defaultValueColumn :: DynamicDefaultValueProperty -> ColumnIdentifierProperty
groupNameColumn :: DynamicDefaultValueProperty -> Maybe ColumnIdentifierProperty
userNameColumn :: DynamicDefaultValueProperty -> Maybe ColumnIdentifierProperty
haddock_workaround_ :: ()
defaultValueColumn :: ColumnIdentifierProperty
groupNameColumn :: Maybe ColumnIdentifierProperty
userNameColumn :: Maybe ColumnIdentifierProperty
..}
= [(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
"DefaultValueColumn" Key -> ColumnIdentifierProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= ColumnIdentifierProperty
defaultValueColumn]
([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
[Key -> ColumnIdentifierProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"GroupNameColumn" (ColumnIdentifierProperty -> (Key, Value))
-> Maybe ColumnIdentifierProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe ColumnIdentifierProperty
groupNameColumn,
Key -> ColumnIdentifierProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"UserNameColumn" (ColumnIdentifierProperty -> (Key, Value))
-> Maybe ColumnIdentifierProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe ColumnIdentifierProperty
userNameColumn])))
instance Property "DefaultValueColumn" DynamicDefaultValueProperty where
type PropertyType "DefaultValueColumn" DynamicDefaultValueProperty = ColumnIdentifierProperty
set :: PropertyType "DefaultValueColumn" DynamicDefaultValueProperty
-> DynamicDefaultValueProperty -> DynamicDefaultValueProperty
set PropertyType "DefaultValueColumn" DynamicDefaultValueProperty
newValue DynamicDefaultValueProperty {Maybe ColumnIdentifierProperty
()
ColumnIdentifierProperty
haddock_workaround_ :: DynamicDefaultValueProperty -> ()
defaultValueColumn :: DynamicDefaultValueProperty -> ColumnIdentifierProperty
groupNameColumn :: DynamicDefaultValueProperty -> Maybe ColumnIdentifierProperty
userNameColumn :: DynamicDefaultValueProperty -> Maybe ColumnIdentifierProperty
haddock_workaround_ :: ()
defaultValueColumn :: ColumnIdentifierProperty
groupNameColumn :: Maybe ColumnIdentifierProperty
userNameColumn :: Maybe ColumnIdentifierProperty
..}
= DynamicDefaultValueProperty {defaultValueColumn :: ColumnIdentifierProperty
defaultValueColumn = PropertyType "DefaultValueColumn" DynamicDefaultValueProperty
ColumnIdentifierProperty
newValue, Maybe ColumnIdentifierProperty
()
haddock_workaround_ :: ()
groupNameColumn :: Maybe ColumnIdentifierProperty
userNameColumn :: Maybe ColumnIdentifierProperty
haddock_workaround_ :: ()
groupNameColumn :: Maybe ColumnIdentifierProperty
userNameColumn :: Maybe ColumnIdentifierProperty
..}
instance Property "GroupNameColumn" DynamicDefaultValueProperty where
type PropertyType "GroupNameColumn" DynamicDefaultValueProperty = ColumnIdentifierProperty
set :: PropertyType "GroupNameColumn" DynamicDefaultValueProperty
-> DynamicDefaultValueProperty -> DynamicDefaultValueProperty
set PropertyType "GroupNameColumn" DynamicDefaultValueProperty
newValue DynamicDefaultValueProperty {Maybe ColumnIdentifierProperty
()
ColumnIdentifierProperty
haddock_workaround_ :: DynamicDefaultValueProperty -> ()
defaultValueColumn :: DynamicDefaultValueProperty -> ColumnIdentifierProperty
groupNameColumn :: DynamicDefaultValueProperty -> Maybe ColumnIdentifierProperty
userNameColumn :: DynamicDefaultValueProperty -> Maybe ColumnIdentifierProperty
haddock_workaround_ :: ()
defaultValueColumn :: ColumnIdentifierProperty
groupNameColumn :: Maybe ColumnIdentifierProperty
userNameColumn :: Maybe ColumnIdentifierProperty
..}
= DynamicDefaultValueProperty
{groupNameColumn :: Maybe ColumnIdentifierProperty
groupNameColumn = ColumnIdentifierProperty -> Maybe ColumnIdentifierProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "GroupNameColumn" DynamicDefaultValueProperty
ColumnIdentifierProperty
newValue, Maybe ColumnIdentifierProperty
()
ColumnIdentifierProperty
haddock_workaround_ :: ()
defaultValueColumn :: ColumnIdentifierProperty
userNameColumn :: Maybe ColumnIdentifierProperty
haddock_workaround_ :: ()
defaultValueColumn :: ColumnIdentifierProperty
userNameColumn :: Maybe ColumnIdentifierProperty
..}
instance Property "UserNameColumn" DynamicDefaultValueProperty where
type PropertyType "UserNameColumn" DynamicDefaultValueProperty = ColumnIdentifierProperty
set :: PropertyType "UserNameColumn" DynamicDefaultValueProperty
-> DynamicDefaultValueProperty -> DynamicDefaultValueProperty
set PropertyType "UserNameColumn" DynamicDefaultValueProperty
newValue DynamicDefaultValueProperty {Maybe ColumnIdentifierProperty
()
ColumnIdentifierProperty
haddock_workaround_ :: DynamicDefaultValueProperty -> ()
defaultValueColumn :: DynamicDefaultValueProperty -> ColumnIdentifierProperty
groupNameColumn :: DynamicDefaultValueProperty -> Maybe ColumnIdentifierProperty
userNameColumn :: DynamicDefaultValueProperty -> Maybe ColumnIdentifierProperty
haddock_workaround_ :: ()
defaultValueColumn :: ColumnIdentifierProperty
groupNameColumn :: Maybe ColumnIdentifierProperty
userNameColumn :: Maybe ColumnIdentifierProperty
..}
= DynamicDefaultValueProperty
{userNameColumn :: Maybe ColumnIdentifierProperty
userNameColumn = ColumnIdentifierProperty -> Maybe ColumnIdentifierProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "UserNameColumn" DynamicDefaultValueProperty
ColumnIdentifierProperty
newValue, Maybe ColumnIdentifierProperty
()
ColumnIdentifierProperty
haddock_workaround_ :: ()
defaultValueColumn :: ColumnIdentifierProperty
groupNameColumn :: Maybe ColumnIdentifierProperty
haddock_workaround_ :: ()
defaultValueColumn :: ColumnIdentifierProperty
groupNameColumn :: Maybe ColumnIdentifierProperty
..}