stratosphere-connectcampaignsv2-1.0.0: gen/Stratosphere/ConnectCampaignsV2/Campaign/AnswerMachineDetectionConfigProperty.hs
module Stratosphere.ConnectCampaignsV2.Campaign.AnswerMachineDetectionConfigProperty (
AnswerMachineDetectionConfigProperty(..),
mkAnswerMachineDetectionConfigProperty
) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import Stratosphere.ResourceProperties
import Stratosphere.Value
data AnswerMachineDetectionConfigProperty
= -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-connectcampaignsv2-campaign-answermachinedetectionconfig.html>
AnswerMachineDetectionConfigProperty {haddock_workaround_ :: (),
-- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-connectcampaignsv2-campaign-answermachinedetectionconfig.html#cfn-connectcampaignsv2-campaign-answermachinedetectionconfig-awaitanswermachineprompt>
awaitAnswerMachinePrompt :: (Prelude.Maybe (Value Prelude.Bool)),
-- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-connectcampaignsv2-campaign-answermachinedetectionconfig.html#cfn-connectcampaignsv2-campaign-answermachinedetectionconfig-enableanswermachinedetection>
enableAnswerMachineDetection :: (Value Prelude.Bool)}
deriving stock (Prelude.Eq, Prelude.Show)
mkAnswerMachineDetectionConfigProperty ::
Value Prelude.Bool -> AnswerMachineDetectionConfigProperty
mkAnswerMachineDetectionConfigProperty enableAnswerMachineDetection
= AnswerMachineDetectionConfigProperty
{haddock_workaround_ = (),
enableAnswerMachineDetection = enableAnswerMachineDetection,
awaitAnswerMachinePrompt = Prelude.Nothing}
instance ToResourceProperties AnswerMachineDetectionConfigProperty where
toResourceProperties AnswerMachineDetectionConfigProperty {..}
= ResourceProperties
{awsType = "AWS::ConnectCampaignsV2::Campaign.AnswerMachineDetectionConfig",
supportsTags = Prelude.False,
properties = Prelude.fromList
((Prelude.<>)
["EnableAnswerMachineDetection"
JSON..= enableAnswerMachineDetection]
(Prelude.catMaybes
[(JSON..=) "AwaitAnswerMachinePrompt"
Prelude.<$> awaitAnswerMachinePrompt]))}
instance JSON.ToJSON AnswerMachineDetectionConfigProperty where
toJSON AnswerMachineDetectionConfigProperty {..}
= JSON.object
(Prelude.fromList
((Prelude.<>)
["EnableAnswerMachineDetection"
JSON..= enableAnswerMachineDetection]
(Prelude.catMaybes
[(JSON..=) "AwaitAnswerMachinePrompt"
Prelude.<$> awaitAnswerMachinePrompt])))
instance Property "AwaitAnswerMachinePrompt" AnswerMachineDetectionConfigProperty where
type PropertyType "AwaitAnswerMachinePrompt" AnswerMachineDetectionConfigProperty = Value Prelude.Bool
set newValue AnswerMachineDetectionConfigProperty {..}
= AnswerMachineDetectionConfigProperty
{awaitAnswerMachinePrompt = Prelude.pure newValue, ..}
instance Property "EnableAnswerMachineDetection" AnswerMachineDetectionConfigProperty where
type PropertyType "EnableAnswerMachineDetection" AnswerMachineDetectionConfigProperty = Value Prelude.Bool
set newValue AnswerMachineDetectionConfigProperty {..}
= AnswerMachineDetectionConfigProperty
{enableAnswerMachineDetection = newValue, ..}