module Stratosphere.Bedrock.KnowledgeBase.RedshiftQueryEngineRedshiftStorageConfigurationProperty (
RedshiftQueryEngineRedshiftStorageConfigurationProperty(..),
mkRedshiftQueryEngineRedshiftStorageConfigurationProperty
) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import Stratosphere.ResourceProperties
import Stratosphere.Value
data RedshiftQueryEngineRedshiftStorageConfigurationProperty
=
RedshiftQueryEngineRedshiftStorageConfigurationProperty {RedshiftQueryEngineRedshiftStorageConfigurationProperty -> ()
haddock_workaround_ :: (),
RedshiftQueryEngineRedshiftStorageConfigurationProperty
-> Value Text
databaseName :: (Value Prelude.Text)}
deriving stock (RedshiftQueryEngineRedshiftStorageConfigurationProperty
-> RedshiftQueryEngineRedshiftStorageConfigurationProperty -> Bool
(RedshiftQueryEngineRedshiftStorageConfigurationProperty
-> RedshiftQueryEngineRedshiftStorageConfigurationProperty -> Bool)
-> (RedshiftQueryEngineRedshiftStorageConfigurationProperty
-> RedshiftQueryEngineRedshiftStorageConfigurationProperty -> Bool)
-> Eq RedshiftQueryEngineRedshiftStorageConfigurationProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: RedshiftQueryEngineRedshiftStorageConfigurationProperty
-> RedshiftQueryEngineRedshiftStorageConfigurationProperty -> Bool
== :: RedshiftQueryEngineRedshiftStorageConfigurationProperty
-> RedshiftQueryEngineRedshiftStorageConfigurationProperty -> Bool
$c/= :: RedshiftQueryEngineRedshiftStorageConfigurationProperty
-> RedshiftQueryEngineRedshiftStorageConfigurationProperty -> Bool
/= :: RedshiftQueryEngineRedshiftStorageConfigurationProperty
-> RedshiftQueryEngineRedshiftStorageConfigurationProperty -> Bool
Prelude.Eq, Int
-> RedshiftQueryEngineRedshiftStorageConfigurationProperty -> ShowS
[RedshiftQueryEngineRedshiftStorageConfigurationProperty] -> ShowS
RedshiftQueryEngineRedshiftStorageConfigurationProperty -> String
(Int
-> RedshiftQueryEngineRedshiftStorageConfigurationProperty
-> ShowS)
-> (RedshiftQueryEngineRedshiftStorageConfigurationProperty
-> String)
-> ([RedshiftQueryEngineRedshiftStorageConfigurationProperty]
-> ShowS)
-> Show RedshiftQueryEngineRedshiftStorageConfigurationProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int
-> RedshiftQueryEngineRedshiftStorageConfigurationProperty -> ShowS
showsPrec :: Int
-> RedshiftQueryEngineRedshiftStorageConfigurationProperty -> ShowS
$cshow :: RedshiftQueryEngineRedshiftStorageConfigurationProperty -> String
show :: RedshiftQueryEngineRedshiftStorageConfigurationProperty -> String
$cshowList :: [RedshiftQueryEngineRedshiftStorageConfigurationProperty] -> ShowS
showList :: [RedshiftQueryEngineRedshiftStorageConfigurationProperty] -> ShowS
Prelude.Show)
mkRedshiftQueryEngineRedshiftStorageConfigurationProperty ::
Value Prelude.Text
-> RedshiftQueryEngineRedshiftStorageConfigurationProperty
mkRedshiftQueryEngineRedshiftStorageConfigurationProperty :: Value Text
-> RedshiftQueryEngineRedshiftStorageConfigurationProperty
mkRedshiftQueryEngineRedshiftStorageConfigurationProperty
Value Text
databaseName
= RedshiftQueryEngineRedshiftStorageConfigurationProperty
{haddock_workaround_ :: ()
haddock_workaround_ = (), databaseName :: Value Text
databaseName = Value Text
databaseName}
instance ToResourceProperties RedshiftQueryEngineRedshiftStorageConfigurationProperty where
toResourceProperties :: RedshiftQueryEngineRedshiftStorageConfigurationProperty
-> ResourceProperties
toResourceProperties
RedshiftQueryEngineRedshiftStorageConfigurationProperty {()
Value Text
haddock_workaround_ :: RedshiftQueryEngineRedshiftStorageConfigurationProperty -> ()
databaseName :: RedshiftQueryEngineRedshiftStorageConfigurationProperty
-> Value Text
haddock_workaround_ :: ()
databaseName :: Value Text
..}
= ResourceProperties
{awsType :: Text
awsType = Text
"AWS::Bedrock::KnowledgeBase.RedshiftQueryEngineRedshiftStorageConfiguration",
supportsTags :: Bool
supportsTags = Bool
Prelude.False,
properties :: Object
properties = [Key
"DatabaseName" 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
databaseName]}
instance JSON.ToJSON RedshiftQueryEngineRedshiftStorageConfigurationProperty where
toJSON :: RedshiftQueryEngineRedshiftStorageConfigurationProperty -> Value
toJSON RedshiftQueryEngineRedshiftStorageConfigurationProperty {()
Value Text
haddock_workaround_ :: RedshiftQueryEngineRedshiftStorageConfigurationProperty -> ()
databaseName :: RedshiftQueryEngineRedshiftStorageConfigurationProperty
-> Value Text
haddock_workaround_ :: ()
databaseName :: Value Text
..}
= [(Key, Value)] -> Value
JSON.object [Key
"DatabaseName" 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
databaseName]
instance Property "DatabaseName" RedshiftQueryEngineRedshiftStorageConfigurationProperty where
type PropertyType "DatabaseName" RedshiftQueryEngineRedshiftStorageConfigurationProperty = Value Prelude.Text
set :: PropertyType
"DatabaseName"
RedshiftQueryEngineRedshiftStorageConfigurationProperty
-> RedshiftQueryEngineRedshiftStorageConfigurationProperty
-> RedshiftQueryEngineRedshiftStorageConfigurationProperty
set
PropertyType
"DatabaseName"
RedshiftQueryEngineRedshiftStorageConfigurationProperty
newValue
RedshiftQueryEngineRedshiftStorageConfigurationProperty {()
Value Text
haddock_workaround_ :: RedshiftQueryEngineRedshiftStorageConfigurationProperty -> ()
databaseName :: RedshiftQueryEngineRedshiftStorageConfigurationProperty
-> Value Text
haddock_workaround_ :: ()
databaseName :: Value Text
..}
= RedshiftQueryEngineRedshiftStorageConfigurationProperty
{databaseName :: Value Text
databaseName = PropertyType
"DatabaseName"
RedshiftQueryEngineRedshiftStorageConfigurationProperty
Value Text
newValue, ()
haddock_workaround_ :: ()
haddock_workaround_ :: ()
..}