module Stratosphere.CleanRooms.ConfiguredTable.SnowflakeTableReferenceProperty (
        module Exports, SnowflakeTableReferenceProperty(..),
        mkSnowflakeTableReferenceProperty
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.CleanRooms.ConfiguredTable.SnowflakeTableSchemaProperty as Exports
import Stratosphere.ResourceProperties
import Stratosphere.Value
data SnowflakeTableReferenceProperty
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cleanrooms-configuredtable-snowflaketablereference.html>
    SnowflakeTableReferenceProperty {SnowflakeTableReferenceProperty -> ()
haddock_workaround_ :: (),
                                     -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cleanrooms-configuredtable-snowflaketablereference.html#cfn-cleanrooms-configuredtable-snowflaketablereference-accountidentifier>
                                     SnowflakeTableReferenceProperty -> Value Text
accountIdentifier :: (Value Prelude.Text),
                                     -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cleanrooms-configuredtable-snowflaketablereference.html#cfn-cleanrooms-configuredtable-snowflaketablereference-databasename>
                                     SnowflakeTableReferenceProperty -> Value Text
databaseName :: (Value Prelude.Text),
                                     -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cleanrooms-configuredtable-snowflaketablereference.html#cfn-cleanrooms-configuredtable-snowflaketablereference-schemaname>
                                     SnowflakeTableReferenceProperty -> Value Text
schemaName :: (Value Prelude.Text),
                                     -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cleanrooms-configuredtable-snowflaketablereference.html#cfn-cleanrooms-configuredtable-snowflaketablereference-secretarn>
                                     SnowflakeTableReferenceProperty -> Value Text
secretArn :: (Value Prelude.Text),
                                     -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cleanrooms-configuredtable-snowflaketablereference.html#cfn-cleanrooms-configuredtable-snowflaketablereference-tablename>
                                     SnowflakeTableReferenceProperty -> Value Text
tableName :: (Value Prelude.Text),
                                     -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-cleanrooms-configuredtable-snowflaketablereference.html#cfn-cleanrooms-configuredtable-snowflaketablereference-tableschema>
                                     SnowflakeTableReferenceProperty -> SnowflakeTableSchemaProperty
tableSchema :: SnowflakeTableSchemaProperty}
  deriving stock (SnowflakeTableReferenceProperty
-> SnowflakeTableReferenceProperty -> Bool
(SnowflakeTableReferenceProperty
 -> SnowflakeTableReferenceProperty -> Bool)
-> (SnowflakeTableReferenceProperty
    -> SnowflakeTableReferenceProperty -> Bool)
-> Eq SnowflakeTableReferenceProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: SnowflakeTableReferenceProperty
-> SnowflakeTableReferenceProperty -> Bool
== :: SnowflakeTableReferenceProperty
-> SnowflakeTableReferenceProperty -> Bool
$c/= :: SnowflakeTableReferenceProperty
-> SnowflakeTableReferenceProperty -> Bool
/= :: SnowflakeTableReferenceProperty
-> SnowflakeTableReferenceProperty -> Bool
Prelude.Eq, Int -> SnowflakeTableReferenceProperty -> ShowS
[SnowflakeTableReferenceProperty] -> ShowS
SnowflakeTableReferenceProperty -> String
(Int -> SnowflakeTableReferenceProperty -> ShowS)
-> (SnowflakeTableReferenceProperty -> String)
-> ([SnowflakeTableReferenceProperty] -> ShowS)
-> Show SnowflakeTableReferenceProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> SnowflakeTableReferenceProperty -> ShowS
showsPrec :: Int -> SnowflakeTableReferenceProperty -> ShowS
$cshow :: SnowflakeTableReferenceProperty -> String
show :: SnowflakeTableReferenceProperty -> String
$cshowList :: [SnowflakeTableReferenceProperty] -> ShowS
showList :: [SnowflakeTableReferenceProperty] -> ShowS
Prelude.Show)
mkSnowflakeTableReferenceProperty ::
  Value Prelude.Text
  -> Value Prelude.Text
     -> Value Prelude.Text
        -> Value Prelude.Text
           -> Value Prelude.Text
              -> SnowflakeTableSchemaProperty -> SnowflakeTableReferenceProperty
mkSnowflakeTableReferenceProperty :: Value Text
-> Value Text
-> Value Text
-> Value Text
-> Value Text
-> SnowflakeTableSchemaProperty
-> SnowflakeTableReferenceProperty
mkSnowflakeTableReferenceProperty
  Value Text
accountIdentifier
  Value Text
databaseName
  Value Text
schemaName
  Value Text
secretArn
  Value Text
tableName
  SnowflakeTableSchemaProperty
tableSchema
  = SnowflakeTableReferenceProperty
      {haddock_workaround_ :: ()
haddock_workaround_ = (), accountIdentifier :: Value Text
accountIdentifier = Value Text
accountIdentifier,
       databaseName :: Value Text
databaseName = Value Text
databaseName, schemaName :: Value Text
schemaName = Value Text
schemaName,
       secretArn :: Value Text
secretArn = Value Text
secretArn, tableName :: Value Text
tableName = Value Text
tableName,
       tableSchema :: SnowflakeTableSchemaProperty
tableSchema = SnowflakeTableSchemaProperty
tableSchema}
instance ToResourceProperties SnowflakeTableReferenceProperty where
  toResourceProperties :: SnowflakeTableReferenceProperty -> ResourceProperties
toResourceProperties SnowflakeTableReferenceProperty {()
Value Text
SnowflakeTableSchemaProperty
haddock_workaround_ :: SnowflakeTableReferenceProperty -> ()
accountIdentifier :: SnowflakeTableReferenceProperty -> Value Text
databaseName :: SnowflakeTableReferenceProperty -> Value Text
schemaName :: SnowflakeTableReferenceProperty -> Value Text
secretArn :: SnowflakeTableReferenceProperty -> Value Text
tableName :: SnowflakeTableReferenceProperty -> Value Text
tableSchema :: SnowflakeTableReferenceProperty -> SnowflakeTableSchemaProperty
haddock_workaround_ :: ()
accountIdentifier :: Value Text
databaseName :: Value Text
schemaName :: Value Text
secretArn :: Value Text
tableName :: Value Text
tableSchema :: SnowflakeTableSchemaProperty
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::CleanRooms::ConfiguredTable.SnowflakeTableReference",
         supportsTags :: Bool
supportsTags = Bool
Prelude.False,
         properties :: Object
properties = [Key
"AccountIdentifier" 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
accountIdentifier,
                       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,
                       Key
"SchemaName" 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
schemaName, Key
"SecretArn" 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
secretArn,
                       Key
"TableName" 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
tableName, Key
"TableSchema" Key -> SnowflakeTableSchemaProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= SnowflakeTableSchemaProperty
tableSchema]}
instance JSON.ToJSON SnowflakeTableReferenceProperty where
  toJSON :: SnowflakeTableReferenceProperty -> Value
toJSON SnowflakeTableReferenceProperty {()
Value Text
SnowflakeTableSchemaProperty
haddock_workaround_ :: SnowflakeTableReferenceProperty -> ()
accountIdentifier :: SnowflakeTableReferenceProperty -> Value Text
databaseName :: SnowflakeTableReferenceProperty -> Value Text
schemaName :: SnowflakeTableReferenceProperty -> Value Text
secretArn :: SnowflakeTableReferenceProperty -> Value Text
tableName :: SnowflakeTableReferenceProperty -> Value Text
tableSchema :: SnowflakeTableReferenceProperty -> SnowflakeTableSchemaProperty
haddock_workaround_ :: ()
accountIdentifier :: Value Text
databaseName :: Value Text
schemaName :: Value Text
secretArn :: Value Text
tableName :: Value Text
tableSchema :: SnowflakeTableSchemaProperty
..}
    = [(Key, Value)] -> Value
JSON.object
        [Key
"AccountIdentifier" 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
accountIdentifier,
         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,
         Key
"SchemaName" 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
schemaName, Key
"SecretArn" 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
secretArn,
         Key
"TableName" 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
tableName, Key
"TableSchema" Key -> SnowflakeTableSchemaProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= SnowflakeTableSchemaProperty
tableSchema]
instance Property "AccountIdentifier" SnowflakeTableReferenceProperty where
  type PropertyType "AccountIdentifier" SnowflakeTableReferenceProperty = Value Prelude.Text
  set :: PropertyType "AccountIdentifier" SnowflakeTableReferenceProperty
-> SnowflakeTableReferenceProperty
-> SnowflakeTableReferenceProperty
set PropertyType "AccountIdentifier" SnowflakeTableReferenceProperty
newValue SnowflakeTableReferenceProperty {()
Value Text
SnowflakeTableSchemaProperty
haddock_workaround_ :: SnowflakeTableReferenceProperty -> ()
accountIdentifier :: SnowflakeTableReferenceProperty -> Value Text
databaseName :: SnowflakeTableReferenceProperty -> Value Text
schemaName :: SnowflakeTableReferenceProperty -> Value Text
secretArn :: SnowflakeTableReferenceProperty -> Value Text
tableName :: SnowflakeTableReferenceProperty -> Value Text
tableSchema :: SnowflakeTableReferenceProperty -> SnowflakeTableSchemaProperty
haddock_workaround_ :: ()
accountIdentifier :: Value Text
databaseName :: Value Text
schemaName :: Value Text
secretArn :: Value Text
tableName :: Value Text
tableSchema :: SnowflakeTableSchemaProperty
..}
    = SnowflakeTableReferenceProperty
        {accountIdentifier :: Value Text
accountIdentifier = PropertyType "AccountIdentifier" SnowflakeTableReferenceProperty
Value Text
newValue, ()
Value Text
SnowflakeTableSchemaProperty
haddock_workaround_ :: ()
databaseName :: Value Text
schemaName :: Value Text
secretArn :: Value Text
tableName :: Value Text
tableSchema :: SnowflakeTableSchemaProperty
haddock_workaround_ :: ()
databaseName :: Value Text
schemaName :: Value Text
secretArn :: Value Text
tableName :: Value Text
tableSchema :: SnowflakeTableSchemaProperty
..}
instance Property "DatabaseName" SnowflakeTableReferenceProperty where
  type PropertyType "DatabaseName" SnowflakeTableReferenceProperty = Value Prelude.Text
  set :: PropertyType "DatabaseName" SnowflakeTableReferenceProperty
-> SnowflakeTableReferenceProperty
-> SnowflakeTableReferenceProperty
set PropertyType "DatabaseName" SnowflakeTableReferenceProperty
newValue SnowflakeTableReferenceProperty {()
Value Text
SnowflakeTableSchemaProperty
haddock_workaround_ :: SnowflakeTableReferenceProperty -> ()
accountIdentifier :: SnowflakeTableReferenceProperty -> Value Text
databaseName :: SnowflakeTableReferenceProperty -> Value Text
schemaName :: SnowflakeTableReferenceProperty -> Value Text
secretArn :: SnowflakeTableReferenceProperty -> Value Text
tableName :: SnowflakeTableReferenceProperty -> Value Text
tableSchema :: SnowflakeTableReferenceProperty -> SnowflakeTableSchemaProperty
haddock_workaround_ :: ()
accountIdentifier :: Value Text
databaseName :: Value Text
schemaName :: Value Text
secretArn :: Value Text
tableName :: Value Text
tableSchema :: SnowflakeTableSchemaProperty
..}
    = SnowflakeTableReferenceProperty {databaseName :: Value Text
databaseName = PropertyType "DatabaseName" SnowflakeTableReferenceProperty
Value Text
newValue, ()
Value Text
SnowflakeTableSchemaProperty
haddock_workaround_ :: ()
accountIdentifier :: Value Text
schemaName :: Value Text
secretArn :: Value Text
tableName :: Value Text
tableSchema :: SnowflakeTableSchemaProperty
haddock_workaround_ :: ()
accountIdentifier :: Value Text
schemaName :: Value Text
secretArn :: Value Text
tableName :: Value Text
tableSchema :: SnowflakeTableSchemaProperty
..}
instance Property "SchemaName" SnowflakeTableReferenceProperty where
  type PropertyType "SchemaName" SnowflakeTableReferenceProperty = Value Prelude.Text
  set :: PropertyType "SchemaName" SnowflakeTableReferenceProperty
-> SnowflakeTableReferenceProperty
-> SnowflakeTableReferenceProperty
set PropertyType "SchemaName" SnowflakeTableReferenceProperty
newValue SnowflakeTableReferenceProperty {()
Value Text
SnowflakeTableSchemaProperty
haddock_workaround_ :: SnowflakeTableReferenceProperty -> ()
accountIdentifier :: SnowflakeTableReferenceProperty -> Value Text
databaseName :: SnowflakeTableReferenceProperty -> Value Text
schemaName :: SnowflakeTableReferenceProperty -> Value Text
secretArn :: SnowflakeTableReferenceProperty -> Value Text
tableName :: SnowflakeTableReferenceProperty -> Value Text
tableSchema :: SnowflakeTableReferenceProperty -> SnowflakeTableSchemaProperty
haddock_workaround_ :: ()
accountIdentifier :: Value Text
databaseName :: Value Text
schemaName :: Value Text
secretArn :: Value Text
tableName :: Value Text
tableSchema :: SnowflakeTableSchemaProperty
..}
    = SnowflakeTableReferenceProperty {schemaName :: Value Text
schemaName = PropertyType "SchemaName" SnowflakeTableReferenceProperty
Value Text
newValue, ()
Value Text
SnowflakeTableSchemaProperty
haddock_workaround_ :: ()
accountIdentifier :: Value Text
databaseName :: Value Text
secretArn :: Value Text
tableName :: Value Text
tableSchema :: SnowflakeTableSchemaProperty
haddock_workaround_ :: ()
accountIdentifier :: Value Text
databaseName :: Value Text
secretArn :: Value Text
tableName :: Value Text
tableSchema :: SnowflakeTableSchemaProperty
..}
instance Property "SecretArn" SnowflakeTableReferenceProperty where
  type PropertyType "SecretArn" SnowflakeTableReferenceProperty = Value Prelude.Text
  set :: PropertyType "SecretArn" SnowflakeTableReferenceProperty
-> SnowflakeTableReferenceProperty
-> SnowflakeTableReferenceProperty
set PropertyType "SecretArn" SnowflakeTableReferenceProperty
newValue SnowflakeTableReferenceProperty {()
Value Text
SnowflakeTableSchemaProperty
haddock_workaround_ :: SnowflakeTableReferenceProperty -> ()
accountIdentifier :: SnowflakeTableReferenceProperty -> Value Text
databaseName :: SnowflakeTableReferenceProperty -> Value Text
schemaName :: SnowflakeTableReferenceProperty -> Value Text
secretArn :: SnowflakeTableReferenceProperty -> Value Text
tableName :: SnowflakeTableReferenceProperty -> Value Text
tableSchema :: SnowflakeTableReferenceProperty -> SnowflakeTableSchemaProperty
haddock_workaround_ :: ()
accountIdentifier :: Value Text
databaseName :: Value Text
schemaName :: Value Text
secretArn :: Value Text
tableName :: Value Text
tableSchema :: SnowflakeTableSchemaProperty
..}
    = SnowflakeTableReferenceProperty {secretArn :: Value Text
secretArn = PropertyType "SecretArn" SnowflakeTableReferenceProperty
Value Text
newValue, ()
Value Text
SnowflakeTableSchemaProperty
haddock_workaround_ :: ()
accountIdentifier :: Value Text
databaseName :: Value Text
schemaName :: Value Text
tableName :: Value Text
tableSchema :: SnowflakeTableSchemaProperty
haddock_workaround_ :: ()
accountIdentifier :: Value Text
databaseName :: Value Text
schemaName :: Value Text
tableName :: Value Text
tableSchema :: SnowflakeTableSchemaProperty
..}
instance Property "TableName" SnowflakeTableReferenceProperty where
  type PropertyType "TableName" SnowflakeTableReferenceProperty = Value Prelude.Text
  set :: PropertyType "TableName" SnowflakeTableReferenceProperty
-> SnowflakeTableReferenceProperty
-> SnowflakeTableReferenceProperty
set PropertyType "TableName" SnowflakeTableReferenceProperty
newValue SnowflakeTableReferenceProperty {()
Value Text
SnowflakeTableSchemaProperty
haddock_workaround_ :: SnowflakeTableReferenceProperty -> ()
accountIdentifier :: SnowflakeTableReferenceProperty -> Value Text
databaseName :: SnowflakeTableReferenceProperty -> Value Text
schemaName :: SnowflakeTableReferenceProperty -> Value Text
secretArn :: SnowflakeTableReferenceProperty -> Value Text
tableName :: SnowflakeTableReferenceProperty -> Value Text
tableSchema :: SnowflakeTableReferenceProperty -> SnowflakeTableSchemaProperty
haddock_workaround_ :: ()
accountIdentifier :: Value Text
databaseName :: Value Text
schemaName :: Value Text
secretArn :: Value Text
tableName :: Value Text
tableSchema :: SnowflakeTableSchemaProperty
..}
    = SnowflakeTableReferenceProperty {tableName :: Value Text
tableName = PropertyType "TableName" SnowflakeTableReferenceProperty
Value Text
newValue, ()
Value Text
SnowflakeTableSchemaProperty
haddock_workaround_ :: ()
accountIdentifier :: Value Text
databaseName :: Value Text
schemaName :: Value Text
secretArn :: Value Text
tableSchema :: SnowflakeTableSchemaProperty
haddock_workaround_ :: ()
accountIdentifier :: Value Text
databaseName :: Value Text
schemaName :: Value Text
secretArn :: Value Text
tableSchema :: SnowflakeTableSchemaProperty
..}
instance Property "TableSchema" SnowflakeTableReferenceProperty where
  type PropertyType "TableSchema" SnowflakeTableReferenceProperty = SnowflakeTableSchemaProperty
  set :: PropertyType "TableSchema" SnowflakeTableReferenceProperty
-> SnowflakeTableReferenceProperty
-> SnowflakeTableReferenceProperty
set PropertyType "TableSchema" SnowflakeTableReferenceProperty
newValue SnowflakeTableReferenceProperty {()
Value Text
SnowflakeTableSchemaProperty
haddock_workaround_ :: SnowflakeTableReferenceProperty -> ()
accountIdentifier :: SnowflakeTableReferenceProperty -> Value Text
databaseName :: SnowflakeTableReferenceProperty -> Value Text
schemaName :: SnowflakeTableReferenceProperty -> Value Text
secretArn :: SnowflakeTableReferenceProperty -> Value Text
tableName :: SnowflakeTableReferenceProperty -> Value Text
tableSchema :: SnowflakeTableReferenceProperty -> SnowflakeTableSchemaProperty
haddock_workaround_ :: ()
accountIdentifier :: Value Text
databaseName :: Value Text
schemaName :: Value Text
secretArn :: Value Text
tableName :: Value Text
tableSchema :: SnowflakeTableSchemaProperty
..}
    = SnowflakeTableReferenceProperty {tableSchema :: SnowflakeTableSchemaProperty
tableSchema = PropertyType "TableSchema" SnowflakeTableReferenceProperty
SnowflakeTableSchemaProperty
newValue, ()
Value Text
haddock_workaround_ :: ()
accountIdentifier :: Value Text
databaseName :: Value Text
schemaName :: Value Text
secretArn :: Value Text
tableName :: Value Text
haddock_workaround_ :: ()
accountIdentifier :: Value Text
databaseName :: Value Text
schemaName :: Value Text
secretArn :: Value Text
tableName :: Value Text
..}