module Stratosphere.CustomerProfiles.ObjectType ( module Exports, ObjectType(..), mkObjectType ) where import qualified Data.Aeson as JSON import qualified Stratosphere.Prelude as Prelude import Stratosphere.Property import {-# SOURCE #-} Stratosphere.CustomerProfiles.ObjectType.FieldMapProperty as Exports import {-# SOURCE #-} Stratosphere.CustomerProfiles.ObjectType.KeyMapProperty as Exports import Stratosphere.ResourceProperties import Stratosphere.Tag import Stratosphere.Value data ObjectType = -- | See: ObjectType {haddock_workaround_ :: (), -- | See: allowProfileCreation :: (Prelude.Maybe (Value Prelude.Bool)), -- | See: description :: (Value Prelude.Text), -- | See: domainName :: (Value Prelude.Text), -- | See: encryptionKey :: (Prelude.Maybe (Value Prelude.Text)), -- | See: expirationDays :: (Prelude.Maybe (Value Prelude.Integer)), -- | See: fields :: (Prelude.Maybe [FieldMapProperty]), -- | See: keys :: (Prelude.Maybe [KeyMapProperty]), -- | See: maxProfileObjectCount :: (Prelude.Maybe (Value Prelude.Integer)), -- | See: objectTypeName :: (Value Prelude.Text), -- | See: sourceLastUpdatedTimestampFormat :: (Prelude.Maybe (Value Prelude.Text)), -- | See: tags :: (Prelude.Maybe [Tag]), -- | See: templateId :: (Prelude.Maybe (Value Prelude.Text))} deriving stock (Prelude.Eq, Prelude.Show) mkObjectType :: Value Prelude.Text -> Value Prelude.Text -> Value Prelude.Text -> ObjectType mkObjectType description domainName objectTypeName = ObjectType {haddock_workaround_ = (), description = description, domainName = domainName, objectTypeName = objectTypeName, allowProfileCreation = Prelude.Nothing, encryptionKey = Prelude.Nothing, expirationDays = Prelude.Nothing, fields = Prelude.Nothing, keys = Prelude.Nothing, maxProfileObjectCount = Prelude.Nothing, sourceLastUpdatedTimestampFormat = Prelude.Nothing, tags = Prelude.Nothing, templateId = Prelude.Nothing} instance ToResourceProperties ObjectType where toResourceProperties ObjectType {..} = ResourceProperties {awsType = "AWS::CustomerProfiles::ObjectType", supportsTags = Prelude.True, properties = Prelude.fromList ((Prelude.<>) ["Description" JSON..= description, "DomainName" JSON..= domainName, "ObjectTypeName" JSON..= objectTypeName] (Prelude.catMaybes [(JSON..=) "AllowProfileCreation" Prelude.<$> allowProfileCreation, (JSON..=) "EncryptionKey" Prelude.<$> encryptionKey, (JSON..=) "ExpirationDays" Prelude.<$> expirationDays, (JSON..=) "Fields" Prelude.<$> fields, (JSON..=) "Keys" Prelude.<$> keys, (JSON..=) "MaxProfileObjectCount" Prelude.<$> maxProfileObjectCount, (JSON..=) "SourceLastUpdatedTimestampFormat" Prelude.<$> sourceLastUpdatedTimestampFormat, (JSON..=) "Tags" Prelude.<$> tags, (JSON..=) "TemplateId" Prelude.<$> templateId]))} instance JSON.ToJSON ObjectType where toJSON ObjectType {..} = JSON.object (Prelude.fromList ((Prelude.<>) ["Description" JSON..= description, "DomainName" JSON..= domainName, "ObjectTypeName" JSON..= objectTypeName] (Prelude.catMaybes [(JSON..=) "AllowProfileCreation" Prelude.<$> allowProfileCreation, (JSON..=) "EncryptionKey" Prelude.<$> encryptionKey, (JSON..=) "ExpirationDays" Prelude.<$> expirationDays, (JSON..=) "Fields" Prelude.<$> fields, (JSON..=) "Keys" Prelude.<$> keys, (JSON..=) "MaxProfileObjectCount" Prelude.<$> maxProfileObjectCount, (JSON..=) "SourceLastUpdatedTimestampFormat" Prelude.<$> sourceLastUpdatedTimestampFormat, (JSON..=) "Tags" Prelude.<$> tags, (JSON..=) "TemplateId" Prelude.<$> templateId]))) instance Property "AllowProfileCreation" ObjectType where type PropertyType "AllowProfileCreation" ObjectType = Value Prelude.Bool set newValue ObjectType {..} = ObjectType {allowProfileCreation = Prelude.pure newValue, ..} instance Property "Description" ObjectType where type PropertyType "Description" ObjectType = Value Prelude.Text set newValue ObjectType {..} = ObjectType {description = newValue, ..} instance Property "DomainName" ObjectType where type PropertyType "DomainName" ObjectType = Value Prelude.Text set newValue ObjectType {..} = ObjectType {domainName = newValue, ..} instance Property "EncryptionKey" ObjectType where type PropertyType "EncryptionKey" ObjectType = Value Prelude.Text set newValue ObjectType {..} = ObjectType {encryptionKey = Prelude.pure newValue, ..} instance Property "ExpirationDays" ObjectType where type PropertyType "ExpirationDays" ObjectType = Value Prelude.Integer set newValue ObjectType {..} = ObjectType {expirationDays = Prelude.pure newValue, ..} instance Property "Fields" ObjectType where type PropertyType "Fields" ObjectType = [FieldMapProperty] set newValue ObjectType {..} = ObjectType {fields = Prelude.pure newValue, ..} instance Property "Keys" ObjectType where type PropertyType "Keys" ObjectType = [KeyMapProperty] set newValue ObjectType {..} = ObjectType {keys = Prelude.pure newValue, ..} instance Property "MaxProfileObjectCount" ObjectType where type PropertyType "MaxProfileObjectCount" ObjectType = Value Prelude.Integer set newValue ObjectType {..} = ObjectType {maxProfileObjectCount = Prelude.pure newValue, ..} instance Property "ObjectTypeName" ObjectType where type PropertyType "ObjectTypeName" ObjectType = Value Prelude.Text set newValue ObjectType {..} = ObjectType {objectTypeName = newValue, ..} instance Property "SourceLastUpdatedTimestampFormat" ObjectType where type PropertyType "SourceLastUpdatedTimestampFormat" ObjectType = Value Prelude.Text set newValue ObjectType {..} = ObjectType {sourceLastUpdatedTimestampFormat = Prelude.pure newValue, ..} instance Property "Tags" ObjectType where type PropertyType "Tags" ObjectType = [Tag] set newValue ObjectType {..} = ObjectType {tags = Prelude.pure newValue, ..} instance Property "TemplateId" ObjectType where type PropertyType "TemplateId" ObjectType = Value Prelude.Text set newValue ObjectType {..} = ObjectType {templateId = Prelude.pure newValue, ..}