{-# LANGUAGE DeriveGeneric #-} {-# LANGUAGE DuplicateRecordFields #-} {-# LANGUAGE NamedFieldPuns #-} {-# LANGUAGE OverloadedStrings #-} {-# LANGUAGE RecordWildCards #-} {-# LANGUAGE StrictData #-} {-# LANGUAGE TypeFamilies #-} {-# LANGUAGE NoImplicitPrelude #-} {-# OPTIONS_GHC -fno-warn-unused-binds #-} {-# OPTIONS_GHC -fno-warn-unused-imports #-} {-# OPTIONS_GHC -fno-warn-unused-matches #-} -- Derived from AWS service descriptions, licensed under Apache 2.0. -- | -- Module : Amazonka.CustomerProfiles.PutProfileObjectType -- Copyright : (c) 2013-2023 Brendan Hay -- License : Mozilla Public License, v. 2.0. -- Maintainer : Brendan Hay -- Stability : auto-generated -- Portability : non-portable (GHC extensions) -- -- Defines a ProfileObjectType. -- -- To add or remove tags on an existing ObjectType, see -- \/. module Amazonka.CustomerProfiles.PutProfileObjectType ( -- * Creating a Request PutProfileObjectType (..), newPutProfileObjectType, -- * Request Lenses putProfileObjectType_allowProfileCreation, putProfileObjectType_encryptionKey, putProfileObjectType_expirationDays, putProfileObjectType_fields, putProfileObjectType_keys, putProfileObjectType_sourceLastUpdatedTimestampFormat, putProfileObjectType_tags, putProfileObjectType_templateId, putProfileObjectType_domainName, putProfileObjectType_objectTypeName, putProfileObjectType_description, -- * Destructuring the Response PutProfileObjectTypeResponse (..), newPutProfileObjectTypeResponse, -- * Response Lenses putProfileObjectTypeResponse_allowProfileCreation, putProfileObjectTypeResponse_createdAt, putProfileObjectTypeResponse_encryptionKey, putProfileObjectTypeResponse_expirationDays, putProfileObjectTypeResponse_fields, putProfileObjectTypeResponse_keys, putProfileObjectTypeResponse_lastUpdatedAt, putProfileObjectTypeResponse_sourceLastUpdatedTimestampFormat, putProfileObjectTypeResponse_tags, putProfileObjectTypeResponse_templateId, putProfileObjectTypeResponse_httpStatus, putProfileObjectTypeResponse_objectTypeName, putProfileObjectTypeResponse_description, ) where import qualified Amazonka.Core as Core import qualified Amazonka.Core.Lens.Internal as Lens import Amazonka.CustomerProfiles.Types import qualified Amazonka.Data as Data import qualified Amazonka.Prelude as Prelude import qualified Amazonka.Request as Request import qualified Amazonka.Response as Response -- | /See:/ 'newPutProfileObjectType' smart constructor. data PutProfileObjectType = PutProfileObjectType' { -- | Indicates whether a profile should be created when data is received if -- one doesn’t exist for an object of this type. The default is @FALSE@. If -- the AllowProfileCreation flag is set to @FALSE@, then the service tries -- to fetch a standard profile and associate this object with the profile. -- If it is set to @TRUE@, and if no match is found, then the service -- creates a new standard profile. allowProfileCreation :: Prelude.Maybe Prelude.Bool, -- | The customer-provided key to encrypt the profile object that will be -- created in this profile object type. encryptionKey :: Prelude.Maybe Prelude.Text, -- | The number of days until the data in the object expires. expirationDays :: Prelude.Maybe Prelude.Natural, -- | A map of the name and ObjectType field. fields :: Prelude.Maybe (Prelude.HashMap Prelude.Text ObjectTypeField), -- | A list of unique keys that can be used to map data to the profile. keys :: Prelude.Maybe (Prelude.HashMap Prelude.Text [ObjectTypeKey]), -- | The format of your @sourceLastUpdatedTimestamp@ that was previously set -- up. sourceLastUpdatedTimestampFormat :: Prelude.Maybe Prelude.Text, -- | The tags used to organize, track, or control access for this resource. tags :: Prelude.Maybe (Prelude.HashMap Prelude.Text Prelude.Text), -- | A unique identifier for the object template. For some attributes in the -- request, the service will use the default value from the object template -- when TemplateId is present. If these attributes are present in the -- request, the service may return a @BadRequestException@. These -- attributes include: AllowProfileCreation, -- SourceLastUpdatedTimestampFormat, Fields, and Keys. For example, if -- AllowProfileCreation is set to true when TemplateId is set, the service -- may return a @BadRequestException@. templateId :: Prelude.Maybe Prelude.Text, -- | The unique name of the domain. domainName :: Prelude.Text, -- | The name of the profile object type. objectTypeName :: Prelude.Text, -- | Description of the profile object type. description :: Prelude.Text } deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic) -- | -- Create a value of 'PutProfileObjectType' with all optional fields omitted. -- -- Use or to modify other optional fields. -- -- The following record fields are available, with the corresponding lenses provided -- for backwards compatibility: -- -- 'allowProfileCreation', 'putProfileObjectType_allowProfileCreation' - Indicates whether a profile should be created when data is received if -- one doesn’t exist for an object of this type. The default is @FALSE@. If -- the AllowProfileCreation flag is set to @FALSE@, then the service tries -- to fetch a standard profile and associate this object with the profile. -- If it is set to @TRUE@, and if no match is found, then the service -- creates a new standard profile. -- -- 'encryptionKey', 'putProfileObjectType_encryptionKey' - The customer-provided key to encrypt the profile object that will be -- created in this profile object type. -- -- 'expirationDays', 'putProfileObjectType_expirationDays' - The number of days until the data in the object expires. -- -- 'fields', 'putProfileObjectType_fields' - A map of the name and ObjectType field. -- -- 'keys', 'putProfileObjectType_keys' - A list of unique keys that can be used to map data to the profile. -- -- 'sourceLastUpdatedTimestampFormat', 'putProfileObjectType_sourceLastUpdatedTimestampFormat' - The format of your @sourceLastUpdatedTimestamp@ that was previously set -- up. -- -- 'tags', 'putProfileObjectType_tags' - The tags used to organize, track, or control access for this resource. -- -- 'templateId', 'putProfileObjectType_templateId' - A unique identifier for the object template. For some attributes in the -- request, the service will use the default value from the object template -- when TemplateId is present. If these attributes are present in the -- request, the service may return a @BadRequestException@. These -- attributes include: AllowProfileCreation, -- SourceLastUpdatedTimestampFormat, Fields, and Keys. For example, if -- AllowProfileCreation is set to true when TemplateId is set, the service -- may return a @BadRequestException@. -- -- 'domainName', 'putProfileObjectType_domainName' - The unique name of the domain. -- -- 'objectTypeName', 'putProfileObjectType_objectTypeName' - The name of the profile object type. -- -- 'description', 'putProfileObjectType_description' - Description of the profile object type. newPutProfileObjectType :: -- | 'domainName' Prelude.Text -> -- | 'objectTypeName' Prelude.Text -> -- | 'description' Prelude.Text -> PutProfileObjectType newPutProfileObjectType pDomainName_ pObjectTypeName_ pDescription_ = PutProfileObjectType' { allowProfileCreation = Prelude.Nothing, encryptionKey = Prelude.Nothing, expirationDays = Prelude.Nothing, fields = Prelude.Nothing, keys = Prelude.Nothing, sourceLastUpdatedTimestampFormat = Prelude.Nothing, tags = Prelude.Nothing, templateId = Prelude.Nothing, domainName = pDomainName_, objectTypeName = pObjectTypeName_, description = pDescription_ } -- | Indicates whether a profile should be created when data is received if -- one doesn’t exist for an object of this type. The default is @FALSE@. If -- the AllowProfileCreation flag is set to @FALSE@, then the service tries -- to fetch a standard profile and associate this object with the profile. -- If it is set to @TRUE@, and if no match is found, then the service -- creates a new standard profile. putProfileObjectType_allowProfileCreation :: Lens.Lens' PutProfileObjectType (Prelude.Maybe Prelude.Bool) putProfileObjectType_allowProfileCreation = Lens.lens (\PutProfileObjectType' {allowProfileCreation} -> allowProfileCreation) (\s@PutProfileObjectType' {} a -> s {allowProfileCreation = a} :: PutProfileObjectType) -- | The customer-provided key to encrypt the profile object that will be -- created in this profile object type. putProfileObjectType_encryptionKey :: Lens.Lens' PutProfileObjectType (Prelude.Maybe Prelude.Text) putProfileObjectType_encryptionKey = Lens.lens (\PutProfileObjectType' {encryptionKey} -> encryptionKey) (\s@PutProfileObjectType' {} a -> s {encryptionKey = a} :: PutProfileObjectType) -- | The number of days until the data in the object expires. putProfileObjectType_expirationDays :: Lens.Lens' PutProfileObjectType (Prelude.Maybe Prelude.Natural) putProfileObjectType_expirationDays = Lens.lens (\PutProfileObjectType' {expirationDays} -> expirationDays) (\s@PutProfileObjectType' {} a -> s {expirationDays = a} :: PutProfileObjectType) -- | A map of the name and ObjectType field. putProfileObjectType_fields :: Lens.Lens' PutProfileObjectType (Prelude.Maybe (Prelude.HashMap Prelude.Text ObjectTypeField)) putProfileObjectType_fields = Lens.lens (\PutProfileObjectType' {fields} -> fields) (\s@PutProfileObjectType' {} a -> s {fields = a} :: PutProfileObjectType) Prelude.. Lens.mapping Lens.coerced -- | A list of unique keys that can be used to map data to the profile. putProfileObjectType_keys :: Lens.Lens' PutProfileObjectType (Prelude.Maybe (Prelude.HashMap Prelude.Text [ObjectTypeKey])) putProfileObjectType_keys = Lens.lens (\PutProfileObjectType' {keys} -> keys) (\s@PutProfileObjectType' {} a -> s {keys = a} :: PutProfileObjectType) Prelude.. Lens.mapping Lens.coerced -- | The format of your @sourceLastUpdatedTimestamp@ that was previously set -- up. putProfileObjectType_sourceLastUpdatedTimestampFormat :: Lens.Lens' PutProfileObjectType (Prelude.Maybe Prelude.Text) putProfileObjectType_sourceLastUpdatedTimestampFormat = Lens.lens (\PutProfileObjectType' {sourceLastUpdatedTimestampFormat} -> sourceLastUpdatedTimestampFormat) (\s@PutProfileObjectType' {} a -> s {sourceLastUpdatedTimestampFormat = a} :: PutProfileObjectType) -- | The tags used to organize, track, or control access for this resource. putProfileObjectType_tags :: Lens.Lens' PutProfileObjectType (Prelude.Maybe (Prelude.HashMap Prelude.Text Prelude.Text)) putProfileObjectType_tags = Lens.lens (\PutProfileObjectType' {tags} -> tags) (\s@PutProfileObjectType' {} a -> s {tags = a} :: PutProfileObjectType) Prelude.. Lens.mapping Lens.coerced -- | A unique identifier for the object template. For some attributes in the -- request, the service will use the default value from the object template -- when TemplateId is present. If these attributes are present in the -- request, the service may return a @BadRequestException@. These -- attributes include: AllowProfileCreation, -- SourceLastUpdatedTimestampFormat, Fields, and Keys. For example, if -- AllowProfileCreation is set to true when TemplateId is set, the service -- may return a @BadRequestException@. putProfileObjectType_templateId :: Lens.Lens' PutProfileObjectType (Prelude.Maybe Prelude.Text) putProfileObjectType_templateId = Lens.lens (\PutProfileObjectType' {templateId} -> templateId) (\s@PutProfileObjectType' {} a -> s {templateId = a} :: PutProfileObjectType) -- | The unique name of the domain. putProfileObjectType_domainName :: Lens.Lens' PutProfileObjectType Prelude.Text putProfileObjectType_domainName = Lens.lens (\PutProfileObjectType' {domainName} -> domainName) (\s@PutProfileObjectType' {} a -> s {domainName = a} :: PutProfileObjectType) -- | The name of the profile object type. putProfileObjectType_objectTypeName :: Lens.Lens' PutProfileObjectType Prelude.Text putProfileObjectType_objectTypeName = Lens.lens (\PutProfileObjectType' {objectTypeName} -> objectTypeName) (\s@PutProfileObjectType' {} a -> s {objectTypeName = a} :: PutProfileObjectType) -- | Description of the profile object type. putProfileObjectType_description :: Lens.Lens' PutProfileObjectType Prelude.Text putProfileObjectType_description = Lens.lens (\PutProfileObjectType' {description} -> description) (\s@PutProfileObjectType' {} a -> s {description = a} :: PutProfileObjectType) instance Core.AWSRequest PutProfileObjectType where type AWSResponse PutProfileObjectType = PutProfileObjectTypeResponse request overrides = Request.putJSON (overrides defaultService) response = Response.receiveJSON ( \s h x -> PutProfileObjectTypeResponse' Prelude.<$> (x Data..?> "AllowProfileCreation") Prelude.<*> (x Data..?> "CreatedAt") Prelude.<*> (x Data..?> "EncryptionKey") Prelude.<*> (x Data..?> "ExpirationDays") Prelude.<*> (x Data..?> "Fields" Core..!@ Prelude.mempty) Prelude.<*> (x Data..?> "Keys" Core..!@ Prelude.mempty) Prelude.<*> (x Data..?> "LastUpdatedAt") Prelude.<*> (x Data..?> "SourceLastUpdatedTimestampFormat") Prelude.<*> (x Data..?> "Tags" Core..!@ Prelude.mempty) Prelude.<*> (x Data..?> "TemplateId") Prelude.<*> (Prelude.pure (Prelude.fromEnum s)) Prelude.<*> (x Data..:> "ObjectTypeName") Prelude.<*> (x Data..:> "Description") ) instance Prelude.Hashable PutProfileObjectType where hashWithSalt _salt PutProfileObjectType' {..} = _salt `Prelude.hashWithSalt` allowProfileCreation `Prelude.hashWithSalt` encryptionKey `Prelude.hashWithSalt` expirationDays `Prelude.hashWithSalt` fields `Prelude.hashWithSalt` keys `Prelude.hashWithSalt` sourceLastUpdatedTimestampFormat `Prelude.hashWithSalt` tags `Prelude.hashWithSalt` templateId `Prelude.hashWithSalt` domainName `Prelude.hashWithSalt` objectTypeName `Prelude.hashWithSalt` description instance Prelude.NFData PutProfileObjectType where rnf PutProfileObjectType' {..} = Prelude.rnf allowProfileCreation `Prelude.seq` Prelude.rnf encryptionKey `Prelude.seq` Prelude.rnf expirationDays `Prelude.seq` Prelude.rnf fields `Prelude.seq` Prelude.rnf keys `Prelude.seq` Prelude.rnf sourceLastUpdatedTimestampFormat `Prelude.seq` Prelude.rnf tags `Prelude.seq` Prelude.rnf templateId `Prelude.seq` Prelude.rnf domainName `Prelude.seq` Prelude.rnf objectTypeName `Prelude.seq` Prelude.rnf description instance Data.ToHeaders PutProfileObjectType where toHeaders = Prelude.const ( Prelude.mconcat [ "Content-Type" Data.=# ( "application/x-amz-json-1.1" :: Prelude.ByteString ) ] ) instance Data.ToJSON PutProfileObjectType where toJSON PutProfileObjectType' {..} = Data.object ( Prelude.catMaybes [ ("AllowProfileCreation" Data..=) Prelude.<$> allowProfileCreation, ("EncryptionKey" Data..=) Prelude.<$> encryptionKey, ("ExpirationDays" Data..=) Prelude.<$> expirationDays, ("Fields" Data..=) Prelude.<$> fields, ("Keys" Data..=) Prelude.<$> keys, ("SourceLastUpdatedTimestampFormat" Data..=) Prelude.<$> sourceLastUpdatedTimestampFormat, ("Tags" Data..=) Prelude.<$> tags, ("TemplateId" Data..=) Prelude.<$> templateId, Prelude.Just ("Description" Data..= description) ] ) instance Data.ToPath PutProfileObjectType where toPath PutProfileObjectType' {..} = Prelude.mconcat [ "/domains/", Data.toBS domainName, "/object-types/", Data.toBS objectTypeName ] instance Data.ToQuery PutProfileObjectType where toQuery = Prelude.const Prelude.mempty -- | /See:/ 'newPutProfileObjectTypeResponse' smart constructor. data PutProfileObjectTypeResponse = PutProfileObjectTypeResponse' { -- | Indicates whether a profile should be created when data is received if -- one doesn’t exist for an object of this type. The default is @FALSE@. If -- the AllowProfileCreation flag is set to @FALSE@, then the service tries -- to fetch a standard profile and associate this object with the profile. -- If it is set to @TRUE@, and if no match is found, then the service -- creates a new standard profile. allowProfileCreation :: Prelude.Maybe Prelude.Bool, -- | The timestamp of when the domain was created. createdAt :: Prelude.Maybe Data.POSIX, -- | The customer-provided key to encrypt the profile object that will be -- created in this profile object type. encryptionKey :: Prelude.Maybe Prelude.Text, -- | The number of days until the data in the object expires. expirationDays :: Prelude.Maybe Prelude.Natural, -- | A map of the name and ObjectType field. fields :: Prelude.Maybe (Prelude.HashMap Prelude.Text ObjectTypeField), -- | A list of unique keys that can be used to map data to the profile. keys :: Prelude.Maybe (Prelude.HashMap Prelude.Text [ObjectTypeKey]), -- | The timestamp of when the domain was most recently edited. lastUpdatedAt :: Prelude.Maybe Data.POSIX, -- | The format of your @sourceLastUpdatedTimestamp@ that was previously set -- up in fields that were parsed using -- . -- If you have @sourceLastUpdatedTimestamp@ in your field, you must set up -- @sourceLastUpdatedTimestampFormat@. sourceLastUpdatedTimestampFormat :: Prelude.Maybe Prelude.Text, -- | The tags used to organize, track, or control access for this resource. tags :: Prelude.Maybe (Prelude.HashMap Prelude.Text Prelude.Text), -- | A unique identifier for the object template. templateId :: Prelude.Maybe Prelude.Text, -- | The response's http status code. httpStatus :: Prelude.Int, -- | The name of the profile object type. objectTypeName :: Prelude.Text, -- | Description of the profile object type. description :: Prelude.Text } deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic) -- | -- Create a value of 'PutProfileObjectTypeResponse' with all optional fields omitted. -- -- Use or to modify other optional fields. -- -- The following record fields are available, with the corresponding lenses provided -- for backwards compatibility: -- -- 'allowProfileCreation', 'putProfileObjectTypeResponse_allowProfileCreation' - Indicates whether a profile should be created when data is received if -- one doesn’t exist for an object of this type. The default is @FALSE@. If -- the AllowProfileCreation flag is set to @FALSE@, then the service tries -- to fetch a standard profile and associate this object with the profile. -- If it is set to @TRUE@, and if no match is found, then the service -- creates a new standard profile. -- -- 'createdAt', 'putProfileObjectTypeResponse_createdAt' - The timestamp of when the domain was created. -- -- 'encryptionKey', 'putProfileObjectTypeResponse_encryptionKey' - The customer-provided key to encrypt the profile object that will be -- created in this profile object type. -- -- 'expirationDays', 'putProfileObjectTypeResponse_expirationDays' - The number of days until the data in the object expires. -- -- 'fields', 'putProfileObjectTypeResponse_fields' - A map of the name and ObjectType field. -- -- 'keys', 'putProfileObjectTypeResponse_keys' - A list of unique keys that can be used to map data to the profile. -- -- 'lastUpdatedAt', 'putProfileObjectTypeResponse_lastUpdatedAt' - The timestamp of when the domain was most recently edited. -- -- 'sourceLastUpdatedTimestampFormat', 'putProfileObjectTypeResponse_sourceLastUpdatedTimestampFormat' - The format of your @sourceLastUpdatedTimestamp@ that was previously set -- up in fields that were parsed using -- . -- If you have @sourceLastUpdatedTimestamp@ in your field, you must set up -- @sourceLastUpdatedTimestampFormat@. -- -- 'tags', 'putProfileObjectTypeResponse_tags' - The tags used to organize, track, or control access for this resource. -- -- 'templateId', 'putProfileObjectTypeResponse_templateId' - A unique identifier for the object template. -- -- 'httpStatus', 'putProfileObjectTypeResponse_httpStatus' - The response's http status code. -- -- 'objectTypeName', 'putProfileObjectTypeResponse_objectTypeName' - The name of the profile object type. -- -- 'description', 'putProfileObjectTypeResponse_description' - Description of the profile object type. newPutProfileObjectTypeResponse :: -- | 'httpStatus' Prelude.Int -> -- | 'objectTypeName' Prelude.Text -> -- | 'description' Prelude.Text -> PutProfileObjectTypeResponse newPutProfileObjectTypeResponse pHttpStatus_ pObjectTypeName_ pDescription_ = PutProfileObjectTypeResponse' { allowProfileCreation = Prelude.Nothing, createdAt = Prelude.Nothing, encryptionKey = Prelude.Nothing, expirationDays = Prelude.Nothing, fields = Prelude.Nothing, keys = Prelude.Nothing, lastUpdatedAt = Prelude.Nothing, sourceLastUpdatedTimestampFormat = Prelude.Nothing, tags = Prelude.Nothing, templateId = Prelude.Nothing, httpStatus = pHttpStatus_, objectTypeName = pObjectTypeName_, description = pDescription_ } -- | Indicates whether a profile should be created when data is received if -- one doesn’t exist for an object of this type. The default is @FALSE@. If -- the AllowProfileCreation flag is set to @FALSE@, then the service tries -- to fetch a standard profile and associate this object with the profile. -- If it is set to @TRUE@, and if no match is found, then the service -- creates a new standard profile. putProfileObjectTypeResponse_allowProfileCreation :: Lens.Lens' PutProfileObjectTypeResponse (Prelude.Maybe Prelude.Bool) putProfileObjectTypeResponse_allowProfileCreation = Lens.lens (\PutProfileObjectTypeResponse' {allowProfileCreation} -> allowProfileCreation) (\s@PutProfileObjectTypeResponse' {} a -> s {allowProfileCreation = a} :: PutProfileObjectTypeResponse) -- | The timestamp of when the domain was created. putProfileObjectTypeResponse_createdAt :: Lens.Lens' PutProfileObjectTypeResponse (Prelude.Maybe Prelude.UTCTime) putProfileObjectTypeResponse_createdAt = Lens.lens (\PutProfileObjectTypeResponse' {createdAt} -> createdAt) (\s@PutProfileObjectTypeResponse' {} a -> s {createdAt = a} :: PutProfileObjectTypeResponse) Prelude.. Lens.mapping Data._Time -- | The customer-provided key to encrypt the profile object that will be -- created in this profile object type. putProfileObjectTypeResponse_encryptionKey :: Lens.Lens' PutProfileObjectTypeResponse (Prelude.Maybe Prelude.Text) putProfileObjectTypeResponse_encryptionKey = Lens.lens (\PutProfileObjectTypeResponse' {encryptionKey} -> encryptionKey) (\s@PutProfileObjectTypeResponse' {} a -> s {encryptionKey = a} :: PutProfileObjectTypeResponse) -- | The number of days until the data in the object expires. putProfileObjectTypeResponse_expirationDays :: Lens.Lens' PutProfileObjectTypeResponse (Prelude.Maybe Prelude.Natural) putProfileObjectTypeResponse_expirationDays = Lens.lens (\PutProfileObjectTypeResponse' {expirationDays} -> expirationDays) (\s@PutProfileObjectTypeResponse' {} a -> s {expirationDays = a} :: PutProfileObjectTypeResponse) -- | A map of the name and ObjectType field. putProfileObjectTypeResponse_fields :: Lens.Lens' PutProfileObjectTypeResponse (Prelude.Maybe (Prelude.HashMap Prelude.Text ObjectTypeField)) putProfileObjectTypeResponse_fields = Lens.lens (\PutProfileObjectTypeResponse' {fields} -> fields) (\s@PutProfileObjectTypeResponse' {} a -> s {fields = a} :: PutProfileObjectTypeResponse) Prelude.. Lens.mapping Lens.coerced -- | A list of unique keys that can be used to map data to the profile. putProfileObjectTypeResponse_keys :: Lens.Lens' PutProfileObjectTypeResponse (Prelude.Maybe (Prelude.HashMap Prelude.Text [ObjectTypeKey])) putProfileObjectTypeResponse_keys = Lens.lens (\PutProfileObjectTypeResponse' {keys} -> keys) (\s@PutProfileObjectTypeResponse' {} a -> s {keys = a} :: PutProfileObjectTypeResponse) Prelude.. Lens.mapping Lens.coerced -- | The timestamp of when the domain was most recently edited. putProfileObjectTypeResponse_lastUpdatedAt :: Lens.Lens' PutProfileObjectTypeResponse (Prelude.Maybe Prelude.UTCTime) putProfileObjectTypeResponse_lastUpdatedAt = Lens.lens (\PutProfileObjectTypeResponse' {lastUpdatedAt} -> lastUpdatedAt) (\s@PutProfileObjectTypeResponse' {} a -> s {lastUpdatedAt = a} :: PutProfileObjectTypeResponse) Prelude.. Lens.mapping Data._Time -- | The format of your @sourceLastUpdatedTimestamp@ that was previously set -- up in fields that were parsed using -- . -- If you have @sourceLastUpdatedTimestamp@ in your field, you must set up -- @sourceLastUpdatedTimestampFormat@. putProfileObjectTypeResponse_sourceLastUpdatedTimestampFormat :: Lens.Lens' PutProfileObjectTypeResponse (Prelude.Maybe Prelude.Text) putProfileObjectTypeResponse_sourceLastUpdatedTimestampFormat = Lens.lens (\PutProfileObjectTypeResponse' {sourceLastUpdatedTimestampFormat} -> sourceLastUpdatedTimestampFormat) (\s@PutProfileObjectTypeResponse' {} a -> s {sourceLastUpdatedTimestampFormat = a} :: PutProfileObjectTypeResponse) -- | The tags used to organize, track, or control access for this resource. putProfileObjectTypeResponse_tags :: Lens.Lens' PutProfileObjectTypeResponse (Prelude.Maybe (Prelude.HashMap Prelude.Text Prelude.Text)) putProfileObjectTypeResponse_tags = Lens.lens (\PutProfileObjectTypeResponse' {tags} -> tags) (\s@PutProfileObjectTypeResponse' {} a -> s {tags = a} :: PutProfileObjectTypeResponse) Prelude.. Lens.mapping Lens.coerced -- | A unique identifier for the object template. putProfileObjectTypeResponse_templateId :: Lens.Lens' PutProfileObjectTypeResponse (Prelude.Maybe Prelude.Text) putProfileObjectTypeResponse_templateId = Lens.lens (\PutProfileObjectTypeResponse' {templateId} -> templateId) (\s@PutProfileObjectTypeResponse' {} a -> s {templateId = a} :: PutProfileObjectTypeResponse) -- | The response's http status code. putProfileObjectTypeResponse_httpStatus :: Lens.Lens' PutProfileObjectTypeResponse Prelude.Int putProfileObjectTypeResponse_httpStatus = Lens.lens (\PutProfileObjectTypeResponse' {httpStatus} -> httpStatus) (\s@PutProfileObjectTypeResponse' {} a -> s {httpStatus = a} :: PutProfileObjectTypeResponse) -- | The name of the profile object type. putProfileObjectTypeResponse_objectTypeName :: Lens.Lens' PutProfileObjectTypeResponse Prelude.Text putProfileObjectTypeResponse_objectTypeName = Lens.lens (\PutProfileObjectTypeResponse' {objectTypeName} -> objectTypeName) (\s@PutProfileObjectTypeResponse' {} a -> s {objectTypeName = a} :: PutProfileObjectTypeResponse) -- | Description of the profile object type. putProfileObjectTypeResponse_description :: Lens.Lens' PutProfileObjectTypeResponse Prelude.Text putProfileObjectTypeResponse_description = Lens.lens (\PutProfileObjectTypeResponse' {description} -> description) (\s@PutProfileObjectTypeResponse' {} a -> s {description = a} :: PutProfileObjectTypeResponse) instance Prelude.NFData PutProfileObjectTypeResponse where rnf PutProfileObjectTypeResponse' {..} = Prelude.rnf allowProfileCreation `Prelude.seq` Prelude.rnf createdAt `Prelude.seq` Prelude.rnf encryptionKey `Prelude.seq` Prelude.rnf expirationDays `Prelude.seq` Prelude.rnf fields `Prelude.seq` Prelude.rnf keys `Prelude.seq` Prelude.rnf lastUpdatedAt `Prelude.seq` Prelude.rnf sourceLastUpdatedTimestampFormat `Prelude.seq` Prelude.rnf tags `Prelude.seq` Prelude.rnf templateId `Prelude.seq` Prelude.rnf httpStatus `Prelude.seq` Prelude.rnf objectTypeName `Prelude.seq` Prelude.rnf description