module Stratosphere.Connect.RoutingProfile.RoutingProfileManualAssignmentQueueConfigProperty (
module Exports,
RoutingProfileManualAssignmentQueueConfigProperty(..),
mkRoutingProfileManualAssignmentQueueConfigProperty
) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.Connect.RoutingProfile.RoutingProfileQueueReferenceProperty as Exports
import Stratosphere.ResourceProperties
data RoutingProfileManualAssignmentQueueConfigProperty
=
RoutingProfileManualAssignmentQueueConfigProperty {RoutingProfileManualAssignmentQueueConfigProperty -> ()
haddock_workaround_ :: (),
RoutingProfileManualAssignmentQueueConfigProperty
-> RoutingProfileQueueReferenceProperty
queueReference :: RoutingProfileQueueReferenceProperty}
deriving stock (RoutingProfileManualAssignmentQueueConfigProperty
-> RoutingProfileManualAssignmentQueueConfigProperty -> Bool
(RoutingProfileManualAssignmentQueueConfigProperty
-> RoutingProfileManualAssignmentQueueConfigProperty -> Bool)
-> (RoutingProfileManualAssignmentQueueConfigProperty
-> RoutingProfileManualAssignmentQueueConfigProperty -> Bool)
-> Eq RoutingProfileManualAssignmentQueueConfigProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: RoutingProfileManualAssignmentQueueConfigProperty
-> RoutingProfileManualAssignmentQueueConfigProperty -> Bool
== :: RoutingProfileManualAssignmentQueueConfigProperty
-> RoutingProfileManualAssignmentQueueConfigProperty -> Bool
$c/= :: RoutingProfileManualAssignmentQueueConfigProperty
-> RoutingProfileManualAssignmentQueueConfigProperty -> Bool
/= :: RoutingProfileManualAssignmentQueueConfigProperty
-> RoutingProfileManualAssignmentQueueConfigProperty -> Bool
Prelude.Eq, Int -> RoutingProfileManualAssignmentQueueConfigProperty -> ShowS
[RoutingProfileManualAssignmentQueueConfigProperty] -> ShowS
RoutingProfileManualAssignmentQueueConfigProperty -> String
(Int -> RoutingProfileManualAssignmentQueueConfigProperty -> ShowS)
-> (RoutingProfileManualAssignmentQueueConfigProperty -> String)
-> ([RoutingProfileManualAssignmentQueueConfigProperty] -> ShowS)
-> Show RoutingProfileManualAssignmentQueueConfigProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> RoutingProfileManualAssignmentQueueConfigProperty -> ShowS
showsPrec :: Int -> RoutingProfileManualAssignmentQueueConfigProperty -> ShowS
$cshow :: RoutingProfileManualAssignmentQueueConfigProperty -> String
show :: RoutingProfileManualAssignmentQueueConfigProperty -> String
$cshowList :: [RoutingProfileManualAssignmentQueueConfigProperty] -> ShowS
showList :: [RoutingProfileManualAssignmentQueueConfigProperty] -> ShowS
Prelude.Show)
mkRoutingProfileManualAssignmentQueueConfigProperty ::
RoutingProfileQueueReferenceProperty
-> RoutingProfileManualAssignmentQueueConfigProperty
mkRoutingProfileManualAssignmentQueueConfigProperty :: RoutingProfileQueueReferenceProperty
-> RoutingProfileManualAssignmentQueueConfigProperty
mkRoutingProfileManualAssignmentQueueConfigProperty RoutingProfileQueueReferenceProperty
queueReference
= RoutingProfileManualAssignmentQueueConfigProperty
{haddock_workaround_ :: ()
haddock_workaround_ = (), queueReference :: RoutingProfileQueueReferenceProperty
queueReference = RoutingProfileQueueReferenceProperty
queueReference}
instance ToResourceProperties RoutingProfileManualAssignmentQueueConfigProperty where
toResourceProperties :: RoutingProfileManualAssignmentQueueConfigProperty
-> ResourceProperties
toResourceProperties
RoutingProfileManualAssignmentQueueConfigProperty {()
RoutingProfileQueueReferenceProperty
haddock_workaround_ :: RoutingProfileManualAssignmentQueueConfigProperty -> ()
queueReference :: RoutingProfileManualAssignmentQueueConfigProperty
-> RoutingProfileQueueReferenceProperty
haddock_workaround_ :: ()
queueReference :: RoutingProfileQueueReferenceProperty
..}
= ResourceProperties
{awsType :: Text
awsType = Text
"AWS::Connect::RoutingProfile.RoutingProfileManualAssignmentQueueConfig",
supportsTags :: Bool
supportsTags = Bool
Prelude.False,
properties :: Object
properties = [Key
"QueueReference" Key -> RoutingProfileQueueReferenceProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= RoutingProfileQueueReferenceProperty
queueReference]}
instance JSON.ToJSON RoutingProfileManualAssignmentQueueConfigProperty where
toJSON :: RoutingProfileManualAssignmentQueueConfigProperty -> Value
toJSON RoutingProfileManualAssignmentQueueConfigProperty {()
RoutingProfileQueueReferenceProperty
haddock_workaround_ :: RoutingProfileManualAssignmentQueueConfigProperty -> ()
queueReference :: RoutingProfileManualAssignmentQueueConfigProperty
-> RoutingProfileQueueReferenceProperty
haddock_workaround_ :: ()
queueReference :: RoutingProfileQueueReferenceProperty
..}
= [(Key, Value)] -> Value
JSON.object [Key
"QueueReference" Key -> RoutingProfileQueueReferenceProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= RoutingProfileQueueReferenceProperty
queueReference]
instance Property "QueueReference" RoutingProfileManualAssignmentQueueConfigProperty where
type PropertyType "QueueReference" RoutingProfileManualAssignmentQueueConfigProperty = RoutingProfileQueueReferenceProperty
set :: PropertyType
"QueueReference" RoutingProfileManualAssignmentQueueConfigProperty
-> RoutingProfileManualAssignmentQueueConfigProperty
-> RoutingProfileManualAssignmentQueueConfigProperty
set PropertyType
"QueueReference" RoutingProfileManualAssignmentQueueConfigProperty
newValue RoutingProfileManualAssignmentQueueConfigProperty {()
RoutingProfileQueueReferenceProperty
haddock_workaround_ :: RoutingProfileManualAssignmentQueueConfigProperty -> ()
queueReference :: RoutingProfileManualAssignmentQueueConfigProperty
-> RoutingProfileQueueReferenceProperty
haddock_workaround_ :: ()
queueReference :: RoutingProfileQueueReferenceProperty
..}
= RoutingProfileManualAssignmentQueueConfigProperty
{queueReference :: RoutingProfileQueueReferenceProperty
queueReference = PropertyType
"QueueReference" RoutingProfileManualAssignmentQueueConfigProperty
RoutingProfileQueueReferenceProperty
newValue, ()
haddock_workaround_ :: ()
haddock_workaround_ :: ()
..}