module Stratosphere.ConnectCampaignsV2.Campaign (
        module Exports, Campaign(..), mkCampaign
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.ConnectCampaignsV2.Campaign.ChannelSubtypeConfigProperty as Exports
import {-# SOURCE #-} Stratosphere.ConnectCampaignsV2.Campaign.CommunicationLimitsConfigProperty as Exports
import {-# SOURCE #-} Stratosphere.ConnectCampaignsV2.Campaign.CommunicationTimeConfigProperty as Exports
import {-# SOURCE #-} Stratosphere.ConnectCampaignsV2.Campaign.ScheduleProperty as Exports
import {-# SOURCE #-} Stratosphere.ConnectCampaignsV2.Campaign.SourceProperty as Exports
import Stratosphere.ResourceProperties
import Stratosphere.Tag
import Stratosphere.Value
data Campaign
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-connectcampaignsv2-campaign.html>
    Campaign {Campaign -> ()
haddock_workaround_ :: (),
              -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-connectcampaignsv2-campaign.html#cfn-connectcampaignsv2-campaign-channelsubtypeconfig>
              Campaign -> ChannelSubtypeConfigProperty
channelSubtypeConfig :: ChannelSubtypeConfigProperty,
              -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-connectcampaignsv2-campaign.html#cfn-connectcampaignsv2-campaign-communicationlimitsoverride>
              Campaign -> Maybe CommunicationLimitsConfigProperty
communicationLimitsOverride :: (Prelude.Maybe CommunicationLimitsConfigProperty),
              -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-connectcampaignsv2-campaign.html#cfn-connectcampaignsv2-campaign-communicationtimeconfig>
              Campaign -> Maybe CommunicationTimeConfigProperty
communicationTimeConfig :: (Prelude.Maybe CommunicationTimeConfigProperty),
              -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-connectcampaignsv2-campaign.html#cfn-connectcampaignsv2-campaign-connectcampaignflowarn>
              Campaign -> Maybe (Value Text)
connectCampaignFlowArn :: (Prelude.Maybe (Value Prelude.Text)),
              -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-connectcampaignsv2-campaign.html#cfn-connectcampaignsv2-campaign-connectinstanceid>
              Campaign -> Value Text
connectInstanceId :: (Value Prelude.Text),
              -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-connectcampaignsv2-campaign.html#cfn-connectcampaignsv2-campaign-name>
              Campaign -> Value Text
name :: (Value Prelude.Text),
              -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-connectcampaignsv2-campaign.html#cfn-connectcampaignsv2-campaign-schedule>
              Campaign -> Maybe ScheduleProperty
schedule :: (Prelude.Maybe ScheduleProperty),
              -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-connectcampaignsv2-campaign.html#cfn-connectcampaignsv2-campaign-source>
              Campaign -> Maybe SourceProperty
source :: (Prelude.Maybe SourceProperty),
              -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-connectcampaignsv2-campaign.html#cfn-connectcampaignsv2-campaign-tags>
              Campaign -> Maybe [Tag]
tags :: (Prelude.Maybe [Tag])}
  deriving stock (Campaign -> Campaign -> Bool
(Campaign -> Campaign -> Bool)
-> (Campaign -> Campaign -> Bool) -> Eq Campaign
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: Campaign -> Campaign -> Bool
== :: Campaign -> Campaign -> Bool
$c/= :: Campaign -> Campaign -> Bool
/= :: Campaign -> Campaign -> Bool
Prelude.Eq, Int -> Campaign -> ShowS
[Campaign] -> ShowS
Campaign -> String
(Int -> Campaign -> ShowS)
-> (Campaign -> String) -> ([Campaign] -> ShowS) -> Show Campaign
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> Campaign -> ShowS
showsPrec :: Int -> Campaign -> ShowS
$cshow :: Campaign -> String
show :: Campaign -> String
$cshowList :: [Campaign] -> ShowS
showList :: [Campaign] -> ShowS
Prelude.Show)
mkCampaign ::
  ChannelSubtypeConfigProperty
  -> Value Prelude.Text -> Value Prelude.Text -> Campaign
mkCampaign :: ChannelSubtypeConfigProperty
-> Value Text -> Value Text -> Campaign
mkCampaign ChannelSubtypeConfigProperty
channelSubtypeConfig Value Text
connectInstanceId Value Text
name
  = Campaign
      {haddock_workaround_ :: ()
haddock_workaround_ = (),
       channelSubtypeConfig :: ChannelSubtypeConfigProperty
channelSubtypeConfig = ChannelSubtypeConfigProperty
channelSubtypeConfig,
       connectInstanceId :: Value Text
connectInstanceId = Value Text
connectInstanceId, name :: Value Text
name = Value Text
name,
       communicationLimitsOverride :: Maybe CommunicationLimitsConfigProperty
communicationLimitsOverride = Maybe CommunicationLimitsConfigProperty
forall a. Maybe a
Prelude.Nothing,
       communicationTimeConfig :: Maybe CommunicationTimeConfigProperty
communicationTimeConfig = Maybe CommunicationTimeConfigProperty
forall a. Maybe a
Prelude.Nothing,
       connectCampaignFlowArn :: Maybe (Value Text)
connectCampaignFlowArn = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
       schedule :: Maybe ScheduleProperty
schedule = Maybe ScheduleProperty
forall a. Maybe a
Prelude.Nothing, source :: Maybe SourceProperty
source = Maybe SourceProperty
forall a. Maybe a
Prelude.Nothing,
       tags :: Maybe [Tag]
tags = Maybe [Tag]
forall a. Maybe a
Prelude.Nothing}
instance ToResourceProperties Campaign where
  toResourceProperties :: Campaign -> ResourceProperties
toResourceProperties Campaign {Maybe [Tag]
Maybe (Value Text)
Maybe CommunicationLimitsConfigProperty
Maybe ScheduleProperty
Maybe SourceProperty
Maybe CommunicationTimeConfigProperty
()
Value Text
ChannelSubtypeConfigProperty
haddock_workaround_ :: Campaign -> ()
channelSubtypeConfig :: Campaign -> ChannelSubtypeConfigProperty
communicationLimitsOverride :: Campaign -> Maybe CommunicationLimitsConfigProperty
communicationTimeConfig :: Campaign -> Maybe CommunicationTimeConfigProperty
connectCampaignFlowArn :: Campaign -> Maybe (Value Text)
connectInstanceId :: Campaign -> Value Text
name :: Campaign -> Value Text
schedule :: Campaign -> Maybe ScheduleProperty
source :: Campaign -> Maybe SourceProperty
tags :: Campaign -> Maybe [Tag]
haddock_workaround_ :: ()
channelSubtypeConfig :: ChannelSubtypeConfigProperty
communicationLimitsOverride :: Maybe CommunicationLimitsConfigProperty
communicationTimeConfig :: Maybe CommunicationTimeConfigProperty
connectCampaignFlowArn :: Maybe (Value Text)
connectInstanceId :: Value Text
name :: Value Text
schedule :: Maybe ScheduleProperty
source :: Maybe SourceProperty
tags :: Maybe [Tag]
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::ConnectCampaignsV2::Campaign",
         supportsTags :: Bool
supportsTags = Bool
Prelude.True,
         properties :: Object
properties = [Item Object] -> Object
forall l. IsList l => [Item l] -> l
Prelude.fromList
                        ([(Key, Value)] -> [(Key, Value)] -> [(Key, Value)]
forall a. Semigroup a => a -> a -> a
(Prelude.<>)
                           [Key
"ChannelSubtypeConfig" Key -> ChannelSubtypeConfigProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= ChannelSubtypeConfigProperty
channelSubtypeConfig,
                            Key
"ConnectInstanceId" 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
connectInstanceId, Key
"Name" 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
name]
                           ([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
                              [Key -> CommunicationLimitsConfigProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"CommunicationLimitsOverride"
                                 (CommunicationLimitsConfigProperty -> (Key, Value))
-> Maybe CommunicationLimitsConfigProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe CommunicationLimitsConfigProperty
communicationLimitsOverride,
                               Key -> CommunicationTimeConfigProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"CommunicationTimeConfig"
                                 (CommunicationTimeConfigProperty -> (Key, Value))
-> Maybe CommunicationTimeConfigProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe CommunicationTimeConfigProperty
communicationTimeConfig,
                               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..=) Key
"ConnectCampaignFlowArn"
                                 (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
connectCampaignFlowArn,
                               Key -> ScheduleProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Schedule" (ScheduleProperty -> (Key, Value))
-> Maybe ScheduleProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe ScheduleProperty
schedule,
                               Key -> SourceProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Source" (SourceProperty -> (Key, Value))
-> Maybe SourceProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe SourceProperty
source,
                               Key -> [Tag] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Tags" ([Tag] -> (Key, Value)) -> Maybe [Tag] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [Tag]
tags]))}
instance JSON.ToJSON Campaign where
  toJSON :: Campaign -> Value
toJSON Campaign {Maybe [Tag]
Maybe (Value Text)
Maybe CommunicationLimitsConfigProperty
Maybe ScheduleProperty
Maybe SourceProperty
Maybe CommunicationTimeConfigProperty
()
Value Text
ChannelSubtypeConfigProperty
haddock_workaround_ :: Campaign -> ()
channelSubtypeConfig :: Campaign -> ChannelSubtypeConfigProperty
communicationLimitsOverride :: Campaign -> Maybe CommunicationLimitsConfigProperty
communicationTimeConfig :: Campaign -> Maybe CommunicationTimeConfigProperty
connectCampaignFlowArn :: Campaign -> Maybe (Value Text)
connectInstanceId :: Campaign -> Value Text
name :: Campaign -> Value Text
schedule :: Campaign -> Maybe ScheduleProperty
source :: Campaign -> Maybe SourceProperty
tags :: Campaign -> Maybe [Tag]
haddock_workaround_ :: ()
channelSubtypeConfig :: ChannelSubtypeConfigProperty
communicationLimitsOverride :: Maybe CommunicationLimitsConfigProperty
communicationTimeConfig :: Maybe CommunicationTimeConfigProperty
connectCampaignFlowArn :: Maybe (Value Text)
connectInstanceId :: Value Text
name :: Value Text
schedule :: Maybe ScheduleProperty
source :: Maybe SourceProperty
tags :: Maybe [Tag]
..}
    = [(Key, Value)] -> Value
JSON.object
        ([Item [(Key, Value)]] -> [(Key, Value)]
forall l. IsList l => [Item l] -> l
Prelude.fromList
           ([(Key, Value)] -> [(Key, Value)] -> [(Key, Value)]
forall a. Semigroup a => a -> a -> a
(Prelude.<>)
              [Key
"ChannelSubtypeConfig" Key -> ChannelSubtypeConfigProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= ChannelSubtypeConfigProperty
channelSubtypeConfig,
               Key
"ConnectInstanceId" 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
connectInstanceId, Key
"Name" 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
name]
              ([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
                 [Key -> CommunicationLimitsConfigProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"CommunicationLimitsOverride"
                    (CommunicationLimitsConfigProperty -> (Key, Value))
-> Maybe CommunicationLimitsConfigProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe CommunicationLimitsConfigProperty
communicationLimitsOverride,
                  Key -> CommunicationTimeConfigProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"CommunicationTimeConfig"
                    (CommunicationTimeConfigProperty -> (Key, Value))
-> Maybe CommunicationTimeConfigProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe CommunicationTimeConfigProperty
communicationTimeConfig,
                  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..=) Key
"ConnectCampaignFlowArn"
                    (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
connectCampaignFlowArn,
                  Key -> ScheduleProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Schedule" (ScheduleProperty -> (Key, Value))
-> Maybe ScheduleProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe ScheduleProperty
schedule,
                  Key -> SourceProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Source" (SourceProperty -> (Key, Value))
-> Maybe SourceProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe SourceProperty
source,
                  Key -> [Tag] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Tags" ([Tag] -> (Key, Value)) -> Maybe [Tag] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [Tag]
tags])))
instance Property "ChannelSubtypeConfig" Campaign where
  type PropertyType "ChannelSubtypeConfig" Campaign = ChannelSubtypeConfigProperty
  set :: PropertyType "ChannelSubtypeConfig" Campaign
-> Campaign -> Campaign
set PropertyType "ChannelSubtypeConfig" Campaign
newValue Campaign {Maybe [Tag]
Maybe (Value Text)
Maybe CommunicationLimitsConfigProperty
Maybe ScheduleProperty
Maybe SourceProperty
Maybe CommunicationTimeConfigProperty
()
Value Text
ChannelSubtypeConfigProperty
haddock_workaround_ :: Campaign -> ()
channelSubtypeConfig :: Campaign -> ChannelSubtypeConfigProperty
communicationLimitsOverride :: Campaign -> Maybe CommunicationLimitsConfigProperty
communicationTimeConfig :: Campaign -> Maybe CommunicationTimeConfigProperty
connectCampaignFlowArn :: Campaign -> Maybe (Value Text)
connectInstanceId :: Campaign -> Value Text
name :: Campaign -> Value Text
schedule :: Campaign -> Maybe ScheduleProperty
source :: Campaign -> Maybe SourceProperty
tags :: Campaign -> Maybe [Tag]
haddock_workaround_ :: ()
channelSubtypeConfig :: ChannelSubtypeConfigProperty
communicationLimitsOverride :: Maybe CommunicationLimitsConfigProperty
communicationTimeConfig :: Maybe CommunicationTimeConfigProperty
connectCampaignFlowArn :: Maybe (Value Text)
connectInstanceId :: Value Text
name :: Value Text
schedule :: Maybe ScheduleProperty
source :: Maybe SourceProperty
tags :: Maybe [Tag]
..}
    = Campaign {channelSubtypeConfig :: ChannelSubtypeConfigProperty
channelSubtypeConfig = PropertyType "ChannelSubtypeConfig" Campaign
ChannelSubtypeConfigProperty
newValue, Maybe [Tag]
Maybe (Value Text)
Maybe CommunicationLimitsConfigProperty
Maybe ScheduleProperty
Maybe SourceProperty
Maybe CommunicationTimeConfigProperty
()
Value Text
haddock_workaround_ :: ()
communicationLimitsOverride :: Maybe CommunicationLimitsConfigProperty
communicationTimeConfig :: Maybe CommunicationTimeConfigProperty
connectCampaignFlowArn :: Maybe (Value Text)
connectInstanceId :: Value Text
name :: Value Text
schedule :: Maybe ScheduleProperty
source :: Maybe SourceProperty
tags :: Maybe [Tag]
haddock_workaround_ :: ()
communicationLimitsOverride :: Maybe CommunicationLimitsConfigProperty
communicationTimeConfig :: Maybe CommunicationTimeConfigProperty
connectCampaignFlowArn :: Maybe (Value Text)
connectInstanceId :: Value Text
name :: Value Text
schedule :: Maybe ScheduleProperty
source :: Maybe SourceProperty
tags :: Maybe [Tag]
..}
instance Property "CommunicationLimitsOverride" Campaign where
  type PropertyType "CommunicationLimitsOverride" Campaign = CommunicationLimitsConfigProperty
  set :: PropertyType "CommunicationLimitsOverride" Campaign
-> Campaign -> Campaign
set PropertyType "CommunicationLimitsOverride" Campaign
newValue Campaign {Maybe [Tag]
Maybe (Value Text)
Maybe CommunicationLimitsConfigProperty
Maybe ScheduleProperty
Maybe SourceProperty
Maybe CommunicationTimeConfigProperty
()
Value Text
ChannelSubtypeConfigProperty
haddock_workaround_ :: Campaign -> ()
channelSubtypeConfig :: Campaign -> ChannelSubtypeConfigProperty
communicationLimitsOverride :: Campaign -> Maybe CommunicationLimitsConfigProperty
communicationTimeConfig :: Campaign -> Maybe CommunicationTimeConfigProperty
connectCampaignFlowArn :: Campaign -> Maybe (Value Text)
connectInstanceId :: Campaign -> Value Text
name :: Campaign -> Value Text
schedule :: Campaign -> Maybe ScheduleProperty
source :: Campaign -> Maybe SourceProperty
tags :: Campaign -> Maybe [Tag]
haddock_workaround_ :: ()
channelSubtypeConfig :: ChannelSubtypeConfigProperty
communicationLimitsOverride :: Maybe CommunicationLimitsConfigProperty
communicationTimeConfig :: Maybe CommunicationTimeConfigProperty
connectCampaignFlowArn :: Maybe (Value Text)
connectInstanceId :: Value Text
name :: Value Text
schedule :: Maybe ScheduleProperty
source :: Maybe SourceProperty
tags :: Maybe [Tag]
..}
    = Campaign
        {communicationLimitsOverride :: Maybe CommunicationLimitsConfigProperty
communicationLimitsOverride = CommunicationLimitsConfigProperty
-> Maybe CommunicationLimitsConfigProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "CommunicationLimitsOverride" Campaign
CommunicationLimitsConfigProperty
newValue, Maybe [Tag]
Maybe (Value Text)
Maybe ScheduleProperty
Maybe SourceProperty
Maybe CommunicationTimeConfigProperty
()
Value Text
ChannelSubtypeConfigProperty
haddock_workaround_ :: ()
channelSubtypeConfig :: ChannelSubtypeConfigProperty
communicationTimeConfig :: Maybe CommunicationTimeConfigProperty
connectCampaignFlowArn :: Maybe (Value Text)
connectInstanceId :: Value Text
name :: Value Text
schedule :: Maybe ScheduleProperty
source :: Maybe SourceProperty
tags :: Maybe [Tag]
haddock_workaround_ :: ()
channelSubtypeConfig :: ChannelSubtypeConfigProperty
communicationTimeConfig :: Maybe CommunicationTimeConfigProperty
connectCampaignFlowArn :: Maybe (Value Text)
connectInstanceId :: Value Text
name :: Value Text
schedule :: Maybe ScheduleProperty
source :: Maybe SourceProperty
tags :: Maybe [Tag]
..}
instance Property "CommunicationTimeConfig" Campaign where
  type PropertyType "CommunicationTimeConfig" Campaign = CommunicationTimeConfigProperty
  set :: PropertyType "CommunicationTimeConfig" Campaign
-> Campaign -> Campaign
set PropertyType "CommunicationTimeConfig" Campaign
newValue Campaign {Maybe [Tag]
Maybe (Value Text)
Maybe CommunicationLimitsConfigProperty
Maybe ScheduleProperty
Maybe SourceProperty
Maybe CommunicationTimeConfigProperty
()
Value Text
ChannelSubtypeConfigProperty
haddock_workaround_ :: Campaign -> ()
channelSubtypeConfig :: Campaign -> ChannelSubtypeConfigProperty
communicationLimitsOverride :: Campaign -> Maybe CommunicationLimitsConfigProperty
communicationTimeConfig :: Campaign -> Maybe CommunicationTimeConfigProperty
connectCampaignFlowArn :: Campaign -> Maybe (Value Text)
connectInstanceId :: Campaign -> Value Text
name :: Campaign -> Value Text
schedule :: Campaign -> Maybe ScheduleProperty
source :: Campaign -> Maybe SourceProperty
tags :: Campaign -> Maybe [Tag]
haddock_workaround_ :: ()
channelSubtypeConfig :: ChannelSubtypeConfigProperty
communicationLimitsOverride :: Maybe CommunicationLimitsConfigProperty
communicationTimeConfig :: Maybe CommunicationTimeConfigProperty
connectCampaignFlowArn :: Maybe (Value Text)
connectInstanceId :: Value Text
name :: Value Text
schedule :: Maybe ScheduleProperty
source :: Maybe SourceProperty
tags :: Maybe [Tag]
..}
    = Campaign {communicationTimeConfig :: Maybe CommunicationTimeConfigProperty
communicationTimeConfig = CommunicationTimeConfigProperty
-> Maybe CommunicationTimeConfigProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "CommunicationTimeConfig" Campaign
CommunicationTimeConfigProperty
newValue, Maybe [Tag]
Maybe (Value Text)
Maybe CommunicationLimitsConfigProperty
Maybe ScheduleProperty
Maybe SourceProperty
()
Value Text
ChannelSubtypeConfigProperty
haddock_workaround_ :: ()
channelSubtypeConfig :: ChannelSubtypeConfigProperty
communicationLimitsOverride :: Maybe CommunicationLimitsConfigProperty
connectCampaignFlowArn :: Maybe (Value Text)
connectInstanceId :: Value Text
name :: Value Text
schedule :: Maybe ScheduleProperty
source :: Maybe SourceProperty
tags :: Maybe [Tag]
haddock_workaround_ :: ()
channelSubtypeConfig :: ChannelSubtypeConfigProperty
communicationLimitsOverride :: Maybe CommunicationLimitsConfigProperty
connectCampaignFlowArn :: Maybe (Value Text)
connectInstanceId :: Value Text
name :: Value Text
schedule :: Maybe ScheduleProperty
source :: Maybe SourceProperty
tags :: Maybe [Tag]
..}
instance Property "ConnectCampaignFlowArn" Campaign where
  type PropertyType "ConnectCampaignFlowArn" Campaign = Value Prelude.Text
  set :: PropertyType "ConnectCampaignFlowArn" Campaign
-> Campaign -> Campaign
set PropertyType "ConnectCampaignFlowArn" Campaign
newValue Campaign {Maybe [Tag]
Maybe (Value Text)
Maybe CommunicationLimitsConfigProperty
Maybe ScheduleProperty
Maybe SourceProperty
Maybe CommunicationTimeConfigProperty
()
Value Text
ChannelSubtypeConfigProperty
haddock_workaround_ :: Campaign -> ()
channelSubtypeConfig :: Campaign -> ChannelSubtypeConfigProperty
communicationLimitsOverride :: Campaign -> Maybe CommunicationLimitsConfigProperty
communicationTimeConfig :: Campaign -> Maybe CommunicationTimeConfigProperty
connectCampaignFlowArn :: Campaign -> Maybe (Value Text)
connectInstanceId :: Campaign -> Value Text
name :: Campaign -> Value Text
schedule :: Campaign -> Maybe ScheduleProperty
source :: Campaign -> Maybe SourceProperty
tags :: Campaign -> Maybe [Tag]
haddock_workaround_ :: ()
channelSubtypeConfig :: ChannelSubtypeConfigProperty
communicationLimitsOverride :: Maybe CommunicationLimitsConfigProperty
communicationTimeConfig :: Maybe CommunicationTimeConfigProperty
connectCampaignFlowArn :: Maybe (Value Text)
connectInstanceId :: Value Text
name :: Value Text
schedule :: Maybe ScheduleProperty
source :: Maybe SourceProperty
tags :: Maybe [Tag]
..}
    = Campaign {connectCampaignFlowArn :: Maybe (Value Text)
connectCampaignFlowArn = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "ConnectCampaignFlowArn" Campaign
Value Text
newValue, Maybe [Tag]
Maybe CommunicationLimitsConfigProperty
Maybe ScheduleProperty
Maybe SourceProperty
Maybe CommunicationTimeConfigProperty
()
Value Text
ChannelSubtypeConfigProperty
haddock_workaround_ :: ()
channelSubtypeConfig :: ChannelSubtypeConfigProperty
communicationLimitsOverride :: Maybe CommunicationLimitsConfigProperty
communicationTimeConfig :: Maybe CommunicationTimeConfigProperty
connectInstanceId :: Value Text
name :: Value Text
schedule :: Maybe ScheduleProperty
source :: Maybe SourceProperty
tags :: Maybe [Tag]
haddock_workaround_ :: ()
channelSubtypeConfig :: ChannelSubtypeConfigProperty
communicationLimitsOverride :: Maybe CommunicationLimitsConfigProperty
communicationTimeConfig :: Maybe CommunicationTimeConfigProperty
connectInstanceId :: Value Text
name :: Value Text
schedule :: Maybe ScheduleProperty
source :: Maybe SourceProperty
tags :: Maybe [Tag]
..}
instance Property "ConnectInstanceId" Campaign where
  type PropertyType "ConnectInstanceId" Campaign = Value Prelude.Text
  set :: PropertyType "ConnectInstanceId" Campaign -> Campaign -> Campaign
set PropertyType "ConnectInstanceId" Campaign
newValue Campaign {Maybe [Tag]
Maybe (Value Text)
Maybe CommunicationLimitsConfigProperty
Maybe ScheduleProperty
Maybe SourceProperty
Maybe CommunicationTimeConfigProperty
()
Value Text
ChannelSubtypeConfigProperty
haddock_workaround_ :: Campaign -> ()
channelSubtypeConfig :: Campaign -> ChannelSubtypeConfigProperty
communicationLimitsOverride :: Campaign -> Maybe CommunicationLimitsConfigProperty
communicationTimeConfig :: Campaign -> Maybe CommunicationTimeConfigProperty
connectCampaignFlowArn :: Campaign -> Maybe (Value Text)
connectInstanceId :: Campaign -> Value Text
name :: Campaign -> Value Text
schedule :: Campaign -> Maybe ScheduleProperty
source :: Campaign -> Maybe SourceProperty
tags :: Campaign -> Maybe [Tag]
haddock_workaround_ :: ()
channelSubtypeConfig :: ChannelSubtypeConfigProperty
communicationLimitsOverride :: Maybe CommunicationLimitsConfigProperty
communicationTimeConfig :: Maybe CommunicationTimeConfigProperty
connectCampaignFlowArn :: Maybe (Value Text)
connectInstanceId :: Value Text
name :: Value Text
schedule :: Maybe ScheduleProperty
source :: Maybe SourceProperty
tags :: Maybe [Tag]
..}
    = Campaign {connectInstanceId :: Value Text
connectInstanceId = PropertyType "ConnectInstanceId" Campaign
Value Text
newValue, Maybe [Tag]
Maybe (Value Text)
Maybe CommunicationLimitsConfigProperty
Maybe ScheduleProperty
Maybe SourceProperty
Maybe CommunicationTimeConfigProperty
()
Value Text
ChannelSubtypeConfigProperty
haddock_workaround_ :: ()
channelSubtypeConfig :: ChannelSubtypeConfigProperty
communicationLimitsOverride :: Maybe CommunicationLimitsConfigProperty
communicationTimeConfig :: Maybe CommunicationTimeConfigProperty
connectCampaignFlowArn :: Maybe (Value Text)
name :: Value Text
schedule :: Maybe ScheduleProperty
source :: Maybe SourceProperty
tags :: Maybe [Tag]
haddock_workaround_ :: ()
channelSubtypeConfig :: ChannelSubtypeConfigProperty
communicationLimitsOverride :: Maybe CommunicationLimitsConfigProperty
communicationTimeConfig :: Maybe CommunicationTimeConfigProperty
connectCampaignFlowArn :: Maybe (Value Text)
name :: Value Text
schedule :: Maybe ScheduleProperty
source :: Maybe SourceProperty
tags :: Maybe [Tag]
..}
instance Property "Name" Campaign where
  type PropertyType "Name" Campaign = Value Prelude.Text
  set :: PropertyType "Name" Campaign -> Campaign -> Campaign
set PropertyType "Name" Campaign
newValue Campaign {Maybe [Tag]
Maybe (Value Text)
Maybe CommunicationLimitsConfigProperty
Maybe ScheduleProperty
Maybe SourceProperty
Maybe CommunicationTimeConfigProperty
()
Value Text
ChannelSubtypeConfigProperty
haddock_workaround_ :: Campaign -> ()
channelSubtypeConfig :: Campaign -> ChannelSubtypeConfigProperty
communicationLimitsOverride :: Campaign -> Maybe CommunicationLimitsConfigProperty
communicationTimeConfig :: Campaign -> Maybe CommunicationTimeConfigProperty
connectCampaignFlowArn :: Campaign -> Maybe (Value Text)
connectInstanceId :: Campaign -> Value Text
name :: Campaign -> Value Text
schedule :: Campaign -> Maybe ScheduleProperty
source :: Campaign -> Maybe SourceProperty
tags :: Campaign -> Maybe [Tag]
haddock_workaround_ :: ()
channelSubtypeConfig :: ChannelSubtypeConfigProperty
communicationLimitsOverride :: Maybe CommunicationLimitsConfigProperty
communicationTimeConfig :: Maybe CommunicationTimeConfigProperty
connectCampaignFlowArn :: Maybe (Value Text)
connectInstanceId :: Value Text
name :: Value Text
schedule :: Maybe ScheduleProperty
source :: Maybe SourceProperty
tags :: Maybe [Tag]
..} = Campaign {name :: Value Text
name = PropertyType "Name" Campaign
Value Text
newValue, Maybe [Tag]
Maybe (Value Text)
Maybe CommunicationLimitsConfigProperty
Maybe ScheduleProperty
Maybe SourceProperty
Maybe CommunicationTimeConfigProperty
()
Value Text
ChannelSubtypeConfigProperty
haddock_workaround_ :: ()
channelSubtypeConfig :: ChannelSubtypeConfigProperty
communicationLimitsOverride :: Maybe CommunicationLimitsConfigProperty
communicationTimeConfig :: Maybe CommunicationTimeConfigProperty
connectCampaignFlowArn :: Maybe (Value Text)
connectInstanceId :: Value Text
schedule :: Maybe ScheduleProperty
source :: Maybe SourceProperty
tags :: Maybe [Tag]
haddock_workaround_ :: ()
channelSubtypeConfig :: ChannelSubtypeConfigProperty
communicationLimitsOverride :: Maybe CommunicationLimitsConfigProperty
communicationTimeConfig :: Maybe CommunicationTimeConfigProperty
connectCampaignFlowArn :: Maybe (Value Text)
connectInstanceId :: Value Text
schedule :: Maybe ScheduleProperty
source :: Maybe SourceProperty
tags :: Maybe [Tag]
..}
instance Property "Schedule" Campaign where
  type PropertyType "Schedule" Campaign = ScheduleProperty
  set :: PropertyType "Schedule" Campaign -> Campaign -> Campaign
set PropertyType "Schedule" Campaign
newValue Campaign {Maybe [Tag]
Maybe (Value Text)
Maybe CommunicationLimitsConfigProperty
Maybe ScheduleProperty
Maybe SourceProperty
Maybe CommunicationTimeConfigProperty
()
Value Text
ChannelSubtypeConfigProperty
haddock_workaround_ :: Campaign -> ()
channelSubtypeConfig :: Campaign -> ChannelSubtypeConfigProperty
communicationLimitsOverride :: Campaign -> Maybe CommunicationLimitsConfigProperty
communicationTimeConfig :: Campaign -> Maybe CommunicationTimeConfigProperty
connectCampaignFlowArn :: Campaign -> Maybe (Value Text)
connectInstanceId :: Campaign -> Value Text
name :: Campaign -> Value Text
schedule :: Campaign -> Maybe ScheduleProperty
source :: Campaign -> Maybe SourceProperty
tags :: Campaign -> Maybe [Tag]
haddock_workaround_ :: ()
channelSubtypeConfig :: ChannelSubtypeConfigProperty
communicationLimitsOverride :: Maybe CommunicationLimitsConfigProperty
communicationTimeConfig :: Maybe CommunicationTimeConfigProperty
connectCampaignFlowArn :: Maybe (Value Text)
connectInstanceId :: Value Text
name :: Value Text
schedule :: Maybe ScheduleProperty
source :: Maybe SourceProperty
tags :: Maybe [Tag]
..}
    = Campaign {schedule :: Maybe ScheduleProperty
schedule = ScheduleProperty -> Maybe ScheduleProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "Schedule" Campaign
ScheduleProperty
newValue, Maybe [Tag]
Maybe (Value Text)
Maybe CommunicationLimitsConfigProperty
Maybe SourceProperty
Maybe CommunicationTimeConfigProperty
()
Value Text
ChannelSubtypeConfigProperty
haddock_workaround_ :: ()
channelSubtypeConfig :: ChannelSubtypeConfigProperty
communicationLimitsOverride :: Maybe CommunicationLimitsConfigProperty
communicationTimeConfig :: Maybe CommunicationTimeConfigProperty
connectCampaignFlowArn :: Maybe (Value Text)
connectInstanceId :: Value Text
name :: Value Text
source :: Maybe SourceProperty
tags :: Maybe [Tag]
haddock_workaround_ :: ()
channelSubtypeConfig :: ChannelSubtypeConfigProperty
communicationLimitsOverride :: Maybe CommunicationLimitsConfigProperty
communicationTimeConfig :: Maybe CommunicationTimeConfigProperty
connectCampaignFlowArn :: Maybe (Value Text)
connectInstanceId :: Value Text
name :: Value Text
source :: Maybe SourceProperty
tags :: Maybe [Tag]
..}
instance Property "Source" Campaign where
  type PropertyType "Source" Campaign = SourceProperty
  set :: PropertyType "Source" Campaign -> Campaign -> Campaign
set PropertyType "Source" Campaign
newValue Campaign {Maybe [Tag]
Maybe (Value Text)
Maybe CommunicationLimitsConfigProperty
Maybe ScheduleProperty
Maybe SourceProperty
Maybe CommunicationTimeConfigProperty
()
Value Text
ChannelSubtypeConfigProperty
haddock_workaround_ :: Campaign -> ()
channelSubtypeConfig :: Campaign -> ChannelSubtypeConfigProperty
communicationLimitsOverride :: Campaign -> Maybe CommunicationLimitsConfigProperty
communicationTimeConfig :: Campaign -> Maybe CommunicationTimeConfigProperty
connectCampaignFlowArn :: Campaign -> Maybe (Value Text)
connectInstanceId :: Campaign -> Value Text
name :: Campaign -> Value Text
schedule :: Campaign -> Maybe ScheduleProperty
source :: Campaign -> Maybe SourceProperty
tags :: Campaign -> Maybe [Tag]
haddock_workaround_ :: ()
channelSubtypeConfig :: ChannelSubtypeConfigProperty
communicationLimitsOverride :: Maybe CommunicationLimitsConfigProperty
communicationTimeConfig :: Maybe CommunicationTimeConfigProperty
connectCampaignFlowArn :: Maybe (Value Text)
connectInstanceId :: Value Text
name :: Value Text
schedule :: Maybe ScheduleProperty
source :: Maybe SourceProperty
tags :: Maybe [Tag]
..}
    = Campaign {source :: Maybe SourceProperty
source = SourceProperty -> Maybe SourceProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "Source" Campaign
SourceProperty
newValue, Maybe [Tag]
Maybe (Value Text)
Maybe CommunicationLimitsConfigProperty
Maybe ScheduleProperty
Maybe CommunicationTimeConfigProperty
()
Value Text
ChannelSubtypeConfigProperty
haddock_workaround_ :: ()
channelSubtypeConfig :: ChannelSubtypeConfigProperty
communicationLimitsOverride :: Maybe CommunicationLimitsConfigProperty
communicationTimeConfig :: Maybe CommunicationTimeConfigProperty
connectCampaignFlowArn :: Maybe (Value Text)
connectInstanceId :: Value Text
name :: Value Text
schedule :: Maybe ScheduleProperty
tags :: Maybe [Tag]
haddock_workaround_ :: ()
channelSubtypeConfig :: ChannelSubtypeConfigProperty
communicationLimitsOverride :: Maybe CommunicationLimitsConfigProperty
communicationTimeConfig :: Maybe CommunicationTimeConfigProperty
connectCampaignFlowArn :: Maybe (Value Text)
connectInstanceId :: Value Text
name :: Value Text
schedule :: Maybe ScheduleProperty
tags :: Maybe [Tag]
..}
instance Property "Tags" Campaign where
  type PropertyType "Tags" Campaign = [Tag]
  set :: PropertyType "Tags" Campaign -> Campaign -> Campaign
set PropertyType "Tags" Campaign
newValue Campaign {Maybe [Tag]
Maybe (Value Text)
Maybe CommunicationLimitsConfigProperty
Maybe ScheduleProperty
Maybe SourceProperty
Maybe CommunicationTimeConfigProperty
()
Value Text
ChannelSubtypeConfigProperty
haddock_workaround_ :: Campaign -> ()
channelSubtypeConfig :: Campaign -> ChannelSubtypeConfigProperty
communicationLimitsOverride :: Campaign -> Maybe CommunicationLimitsConfigProperty
communicationTimeConfig :: Campaign -> Maybe CommunicationTimeConfigProperty
connectCampaignFlowArn :: Campaign -> Maybe (Value Text)
connectInstanceId :: Campaign -> Value Text
name :: Campaign -> Value Text
schedule :: Campaign -> Maybe ScheduleProperty
source :: Campaign -> Maybe SourceProperty
tags :: Campaign -> Maybe [Tag]
haddock_workaround_ :: ()
channelSubtypeConfig :: ChannelSubtypeConfigProperty
communicationLimitsOverride :: Maybe CommunicationLimitsConfigProperty
communicationTimeConfig :: Maybe CommunicationTimeConfigProperty
connectCampaignFlowArn :: Maybe (Value Text)
connectInstanceId :: Value Text
name :: Value Text
schedule :: Maybe ScheduleProperty
source :: Maybe SourceProperty
tags :: Maybe [Tag]
..}
    = Campaign {tags :: Maybe [Tag]
tags = [Tag] -> Maybe [Tag]
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure [Tag]
PropertyType "Tags" Campaign
newValue, Maybe (Value Text)
Maybe CommunicationLimitsConfigProperty
Maybe ScheduleProperty
Maybe SourceProperty
Maybe CommunicationTimeConfigProperty
()
Value Text
ChannelSubtypeConfigProperty
haddock_workaround_ :: ()
channelSubtypeConfig :: ChannelSubtypeConfigProperty
communicationLimitsOverride :: Maybe CommunicationLimitsConfigProperty
communicationTimeConfig :: Maybe CommunicationTimeConfigProperty
connectCampaignFlowArn :: Maybe (Value Text)
connectInstanceId :: Value Text
name :: Value Text
schedule :: Maybe ScheduleProperty
source :: Maybe SourceProperty
haddock_workaround_ :: ()
channelSubtypeConfig :: ChannelSubtypeConfigProperty
communicationLimitsOverride :: Maybe CommunicationLimitsConfigProperty
communicationTimeConfig :: Maybe CommunicationTimeConfigProperty
connectCampaignFlowArn :: Maybe (Value Text)
connectInstanceId :: Value Text
name :: Value Text
schedule :: Maybe ScheduleProperty
source :: Maybe SourceProperty
..}