module Stratosphere.SSMIncidents.ResponsePlan (
        module Exports, ResponsePlan(..), mkResponsePlan
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.SSMIncidents.ResponsePlan.ActionProperty as Exports
import {-# SOURCE #-} Stratosphere.SSMIncidents.ResponsePlan.ChatChannelProperty as Exports
import {-# SOURCE #-} Stratosphere.SSMIncidents.ResponsePlan.IncidentTemplateProperty as Exports
import {-# SOURCE #-} Stratosphere.SSMIncidents.ResponsePlan.IntegrationProperty as Exports
import Stratosphere.ResourceProperties
import Stratosphere.Tag
import Stratosphere.Value
data ResponsePlan
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-ssmincidents-responseplan.html>
    ResponsePlan {ResponsePlan -> ()
haddock_workaround_ :: (),
                  -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-ssmincidents-responseplan.html#cfn-ssmincidents-responseplan-actions>
                  ResponsePlan -> Maybe [ActionProperty]
actions :: (Prelude.Maybe [ActionProperty]),
                  -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-ssmincidents-responseplan.html#cfn-ssmincidents-responseplan-chatchannel>
                  ResponsePlan -> Maybe ChatChannelProperty
chatChannel :: (Prelude.Maybe ChatChannelProperty),
                  -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-ssmincidents-responseplan.html#cfn-ssmincidents-responseplan-displayname>
                  ResponsePlan -> Maybe (Value Text)
displayName :: (Prelude.Maybe (Value Prelude.Text)),
                  -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-ssmincidents-responseplan.html#cfn-ssmincidents-responseplan-engagements>
                  ResponsePlan -> Maybe (ValueList Text)
engagements :: (Prelude.Maybe (ValueList Prelude.Text)),
                  -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-ssmincidents-responseplan.html#cfn-ssmincidents-responseplan-incidenttemplate>
                  ResponsePlan -> IncidentTemplateProperty
incidentTemplate :: IncidentTemplateProperty,
                  -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-ssmincidents-responseplan.html#cfn-ssmincidents-responseplan-integrations>
                  ResponsePlan -> Maybe [IntegrationProperty]
integrations :: (Prelude.Maybe [IntegrationProperty]),
                  -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-ssmincidents-responseplan.html#cfn-ssmincidents-responseplan-name>
                  ResponsePlan -> Value Text
name :: (Value Prelude.Text),
                  -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-ssmincidents-responseplan.html#cfn-ssmincidents-responseplan-tags>
                  ResponsePlan -> Maybe [Tag]
tags :: (Prelude.Maybe [Tag])}
  deriving stock (ResponsePlan -> ResponsePlan -> Bool
(ResponsePlan -> ResponsePlan -> Bool)
-> (ResponsePlan -> ResponsePlan -> Bool) -> Eq ResponsePlan
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ResponsePlan -> ResponsePlan -> Bool
== :: ResponsePlan -> ResponsePlan -> Bool
$c/= :: ResponsePlan -> ResponsePlan -> Bool
/= :: ResponsePlan -> ResponsePlan -> Bool
Prelude.Eq, Int -> ResponsePlan -> ShowS
[ResponsePlan] -> ShowS
ResponsePlan -> String
(Int -> ResponsePlan -> ShowS)
-> (ResponsePlan -> String)
-> ([ResponsePlan] -> ShowS)
-> Show ResponsePlan
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> ResponsePlan -> ShowS
showsPrec :: Int -> ResponsePlan -> ShowS
$cshow :: ResponsePlan -> String
show :: ResponsePlan -> String
$cshowList :: [ResponsePlan] -> ShowS
showList :: [ResponsePlan] -> ShowS
Prelude.Show)
mkResponsePlan ::
  IncidentTemplateProperty -> Value Prelude.Text -> ResponsePlan
mkResponsePlan :: IncidentTemplateProperty -> Value Text -> ResponsePlan
mkResponsePlan IncidentTemplateProperty
incidentTemplate Value Text
name
  = ResponsePlan
      {haddock_workaround_ :: ()
haddock_workaround_ = (), incidentTemplate :: IncidentTemplateProperty
incidentTemplate = IncidentTemplateProperty
incidentTemplate,
       name :: Value Text
name = Value Text
name, actions :: Maybe [ActionProperty]
actions = Maybe [ActionProperty]
forall a. Maybe a
Prelude.Nothing,
       chatChannel :: Maybe ChatChannelProperty
chatChannel = Maybe ChatChannelProperty
forall a. Maybe a
Prelude.Nothing, displayName :: Maybe (Value Text)
displayName = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
       engagements :: Maybe (ValueList Text)
engagements = Maybe (ValueList Text)
forall a. Maybe a
Prelude.Nothing, integrations :: Maybe [IntegrationProperty]
integrations = Maybe [IntegrationProperty]
forall a. Maybe a
Prelude.Nothing,
       tags :: Maybe [Tag]
tags = Maybe [Tag]
forall a. Maybe a
Prelude.Nothing}
instance ToResourceProperties ResponsePlan where
  toResourceProperties :: ResponsePlan -> ResourceProperties
toResourceProperties ResponsePlan {Maybe [Tag]
Maybe [IntegrationProperty]
Maybe [ActionProperty]
Maybe (ValueList Text)
Maybe (Value Text)
Maybe ChatChannelProperty
()
Value Text
IncidentTemplateProperty
haddock_workaround_ :: ResponsePlan -> ()
actions :: ResponsePlan -> Maybe [ActionProperty]
chatChannel :: ResponsePlan -> Maybe ChatChannelProperty
displayName :: ResponsePlan -> Maybe (Value Text)
engagements :: ResponsePlan -> Maybe (ValueList Text)
incidentTemplate :: ResponsePlan -> IncidentTemplateProperty
integrations :: ResponsePlan -> Maybe [IntegrationProperty]
name :: ResponsePlan -> Value Text
tags :: ResponsePlan -> Maybe [Tag]
haddock_workaround_ :: ()
actions :: Maybe [ActionProperty]
chatChannel :: Maybe ChatChannelProperty
displayName :: Maybe (Value Text)
engagements :: Maybe (ValueList Text)
incidentTemplate :: IncidentTemplateProperty
integrations :: Maybe [IntegrationProperty]
name :: Value Text
tags :: Maybe [Tag]
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::SSMIncidents::ResponsePlan",
         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
"IncidentTemplate" Key -> IncidentTemplateProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= IncidentTemplateProperty
incidentTemplate, 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 -> [ActionProperty] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Actions" ([ActionProperty] -> (Key, Value))
-> Maybe [ActionProperty] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [ActionProperty]
actions,
                               Key -> ChatChannelProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"ChatChannel" (ChatChannelProperty -> (Key, Value))
-> Maybe ChatChannelProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe ChatChannelProperty
chatChannel,
                               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
"DisplayName" (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)
displayName,
                               Key -> ValueList 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
"Engagements" (ValueList Text -> (Key, Value))
-> Maybe (ValueList Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (ValueList Text)
engagements,
                               Key -> [IntegrationProperty] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Integrations" ([IntegrationProperty] -> (Key, Value))
-> Maybe [IntegrationProperty] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [IntegrationProperty]
integrations,
                               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 ResponsePlan where
  toJSON :: ResponsePlan -> Value
toJSON ResponsePlan {Maybe [Tag]
Maybe [IntegrationProperty]
Maybe [ActionProperty]
Maybe (ValueList Text)
Maybe (Value Text)
Maybe ChatChannelProperty
()
Value Text
IncidentTemplateProperty
haddock_workaround_ :: ResponsePlan -> ()
actions :: ResponsePlan -> Maybe [ActionProperty]
chatChannel :: ResponsePlan -> Maybe ChatChannelProperty
displayName :: ResponsePlan -> Maybe (Value Text)
engagements :: ResponsePlan -> Maybe (ValueList Text)
incidentTemplate :: ResponsePlan -> IncidentTemplateProperty
integrations :: ResponsePlan -> Maybe [IntegrationProperty]
name :: ResponsePlan -> Value Text
tags :: ResponsePlan -> Maybe [Tag]
haddock_workaround_ :: ()
actions :: Maybe [ActionProperty]
chatChannel :: Maybe ChatChannelProperty
displayName :: Maybe (Value Text)
engagements :: Maybe (ValueList Text)
incidentTemplate :: IncidentTemplateProperty
integrations :: Maybe [IntegrationProperty]
name :: Value Text
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
"IncidentTemplate" Key -> IncidentTemplateProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= IncidentTemplateProperty
incidentTemplate, 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 -> [ActionProperty] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Actions" ([ActionProperty] -> (Key, Value))
-> Maybe [ActionProperty] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [ActionProperty]
actions,
                  Key -> ChatChannelProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"ChatChannel" (ChatChannelProperty -> (Key, Value))
-> Maybe ChatChannelProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe ChatChannelProperty
chatChannel,
                  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
"DisplayName" (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)
displayName,
                  Key -> ValueList 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
"Engagements" (ValueList Text -> (Key, Value))
-> Maybe (ValueList Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (ValueList Text)
engagements,
                  Key -> [IntegrationProperty] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Integrations" ([IntegrationProperty] -> (Key, Value))
-> Maybe [IntegrationProperty] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [IntegrationProperty]
integrations,
                  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 "Actions" ResponsePlan where
  type PropertyType "Actions" ResponsePlan = [ActionProperty]
  set :: PropertyType "Actions" ResponsePlan -> ResponsePlan -> ResponsePlan
set PropertyType "Actions" ResponsePlan
newValue ResponsePlan {Maybe [Tag]
Maybe [IntegrationProperty]
Maybe [ActionProperty]
Maybe (ValueList Text)
Maybe (Value Text)
Maybe ChatChannelProperty
()
Value Text
IncidentTemplateProperty
haddock_workaround_ :: ResponsePlan -> ()
actions :: ResponsePlan -> Maybe [ActionProperty]
chatChannel :: ResponsePlan -> Maybe ChatChannelProperty
displayName :: ResponsePlan -> Maybe (Value Text)
engagements :: ResponsePlan -> Maybe (ValueList Text)
incidentTemplate :: ResponsePlan -> IncidentTemplateProperty
integrations :: ResponsePlan -> Maybe [IntegrationProperty]
name :: ResponsePlan -> Value Text
tags :: ResponsePlan -> Maybe [Tag]
haddock_workaround_ :: ()
actions :: Maybe [ActionProperty]
chatChannel :: Maybe ChatChannelProperty
displayName :: Maybe (Value Text)
engagements :: Maybe (ValueList Text)
incidentTemplate :: IncidentTemplateProperty
integrations :: Maybe [IntegrationProperty]
name :: Value Text
tags :: Maybe [Tag]
..}
    = ResponsePlan {actions :: Maybe [ActionProperty]
actions = [ActionProperty] -> Maybe [ActionProperty]
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure [ActionProperty]
PropertyType "Actions" ResponsePlan
newValue, Maybe [Tag]
Maybe [IntegrationProperty]
Maybe (ValueList Text)
Maybe (Value Text)
Maybe ChatChannelProperty
()
Value Text
IncidentTemplateProperty
haddock_workaround_ :: ()
chatChannel :: Maybe ChatChannelProperty
displayName :: Maybe (Value Text)
engagements :: Maybe (ValueList Text)
incidentTemplate :: IncidentTemplateProperty
integrations :: Maybe [IntegrationProperty]
name :: Value Text
tags :: Maybe [Tag]
haddock_workaround_ :: ()
chatChannel :: Maybe ChatChannelProperty
displayName :: Maybe (Value Text)
engagements :: Maybe (ValueList Text)
incidentTemplate :: IncidentTemplateProperty
integrations :: Maybe [IntegrationProperty]
name :: Value Text
tags :: Maybe [Tag]
..}
instance Property "ChatChannel" ResponsePlan where
  type PropertyType "ChatChannel" ResponsePlan = ChatChannelProperty
  set :: PropertyType "ChatChannel" ResponsePlan
-> ResponsePlan -> ResponsePlan
set PropertyType "ChatChannel" ResponsePlan
newValue ResponsePlan {Maybe [Tag]
Maybe [IntegrationProperty]
Maybe [ActionProperty]
Maybe (ValueList Text)
Maybe (Value Text)
Maybe ChatChannelProperty
()
Value Text
IncidentTemplateProperty
haddock_workaround_ :: ResponsePlan -> ()
actions :: ResponsePlan -> Maybe [ActionProperty]
chatChannel :: ResponsePlan -> Maybe ChatChannelProperty
displayName :: ResponsePlan -> Maybe (Value Text)
engagements :: ResponsePlan -> Maybe (ValueList Text)
incidentTemplate :: ResponsePlan -> IncidentTemplateProperty
integrations :: ResponsePlan -> Maybe [IntegrationProperty]
name :: ResponsePlan -> Value Text
tags :: ResponsePlan -> Maybe [Tag]
haddock_workaround_ :: ()
actions :: Maybe [ActionProperty]
chatChannel :: Maybe ChatChannelProperty
displayName :: Maybe (Value Text)
engagements :: Maybe (ValueList Text)
incidentTemplate :: IncidentTemplateProperty
integrations :: Maybe [IntegrationProperty]
name :: Value Text
tags :: Maybe [Tag]
..}
    = ResponsePlan {chatChannel :: Maybe ChatChannelProperty
chatChannel = ChatChannelProperty -> Maybe ChatChannelProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "ChatChannel" ResponsePlan
ChatChannelProperty
newValue, Maybe [Tag]
Maybe [IntegrationProperty]
Maybe [ActionProperty]
Maybe (ValueList Text)
Maybe (Value Text)
()
Value Text
IncidentTemplateProperty
haddock_workaround_ :: ()
actions :: Maybe [ActionProperty]
displayName :: Maybe (Value Text)
engagements :: Maybe (ValueList Text)
incidentTemplate :: IncidentTemplateProperty
integrations :: Maybe [IntegrationProperty]
name :: Value Text
tags :: Maybe [Tag]
haddock_workaround_ :: ()
actions :: Maybe [ActionProperty]
displayName :: Maybe (Value Text)
engagements :: Maybe (ValueList Text)
incidentTemplate :: IncidentTemplateProperty
integrations :: Maybe [IntegrationProperty]
name :: Value Text
tags :: Maybe [Tag]
..}
instance Property "DisplayName" ResponsePlan where
  type PropertyType "DisplayName" ResponsePlan = Value Prelude.Text
  set :: PropertyType "DisplayName" ResponsePlan
-> ResponsePlan -> ResponsePlan
set PropertyType "DisplayName" ResponsePlan
newValue ResponsePlan {Maybe [Tag]
Maybe [IntegrationProperty]
Maybe [ActionProperty]
Maybe (ValueList Text)
Maybe (Value Text)
Maybe ChatChannelProperty
()
Value Text
IncidentTemplateProperty
haddock_workaround_ :: ResponsePlan -> ()
actions :: ResponsePlan -> Maybe [ActionProperty]
chatChannel :: ResponsePlan -> Maybe ChatChannelProperty
displayName :: ResponsePlan -> Maybe (Value Text)
engagements :: ResponsePlan -> Maybe (ValueList Text)
incidentTemplate :: ResponsePlan -> IncidentTemplateProperty
integrations :: ResponsePlan -> Maybe [IntegrationProperty]
name :: ResponsePlan -> Value Text
tags :: ResponsePlan -> Maybe [Tag]
haddock_workaround_ :: ()
actions :: Maybe [ActionProperty]
chatChannel :: Maybe ChatChannelProperty
displayName :: Maybe (Value Text)
engagements :: Maybe (ValueList Text)
incidentTemplate :: IncidentTemplateProperty
integrations :: Maybe [IntegrationProperty]
name :: Value Text
tags :: Maybe [Tag]
..}
    = ResponsePlan {displayName :: Maybe (Value Text)
displayName = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "DisplayName" ResponsePlan
Value Text
newValue, Maybe [Tag]
Maybe [IntegrationProperty]
Maybe [ActionProperty]
Maybe (ValueList Text)
Maybe ChatChannelProperty
()
Value Text
IncidentTemplateProperty
haddock_workaround_ :: ()
actions :: Maybe [ActionProperty]
chatChannel :: Maybe ChatChannelProperty
engagements :: Maybe (ValueList Text)
incidentTemplate :: IncidentTemplateProperty
integrations :: Maybe [IntegrationProperty]
name :: Value Text
tags :: Maybe [Tag]
haddock_workaround_ :: ()
actions :: Maybe [ActionProperty]
chatChannel :: Maybe ChatChannelProperty
engagements :: Maybe (ValueList Text)
incidentTemplate :: IncidentTemplateProperty
integrations :: Maybe [IntegrationProperty]
name :: Value Text
tags :: Maybe [Tag]
..}
instance Property "Engagements" ResponsePlan where
  type PropertyType "Engagements" ResponsePlan = ValueList Prelude.Text
  set :: PropertyType "Engagements" ResponsePlan
-> ResponsePlan -> ResponsePlan
set PropertyType "Engagements" ResponsePlan
newValue ResponsePlan {Maybe [Tag]
Maybe [IntegrationProperty]
Maybe [ActionProperty]
Maybe (ValueList Text)
Maybe (Value Text)
Maybe ChatChannelProperty
()
Value Text
IncidentTemplateProperty
haddock_workaround_ :: ResponsePlan -> ()
actions :: ResponsePlan -> Maybe [ActionProperty]
chatChannel :: ResponsePlan -> Maybe ChatChannelProperty
displayName :: ResponsePlan -> Maybe (Value Text)
engagements :: ResponsePlan -> Maybe (ValueList Text)
incidentTemplate :: ResponsePlan -> IncidentTemplateProperty
integrations :: ResponsePlan -> Maybe [IntegrationProperty]
name :: ResponsePlan -> Value Text
tags :: ResponsePlan -> Maybe [Tag]
haddock_workaround_ :: ()
actions :: Maybe [ActionProperty]
chatChannel :: Maybe ChatChannelProperty
displayName :: Maybe (Value Text)
engagements :: Maybe (ValueList Text)
incidentTemplate :: IncidentTemplateProperty
integrations :: Maybe [IntegrationProperty]
name :: Value Text
tags :: Maybe [Tag]
..}
    = ResponsePlan {engagements :: Maybe (ValueList Text)
engagements = ValueList Text -> Maybe (ValueList Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "Engagements" ResponsePlan
ValueList Text
newValue, Maybe [Tag]
Maybe [IntegrationProperty]
Maybe [ActionProperty]
Maybe (Value Text)
Maybe ChatChannelProperty
()
Value Text
IncidentTemplateProperty
haddock_workaround_ :: ()
actions :: Maybe [ActionProperty]
chatChannel :: Maybe ChatChannelProperty
displayName :: Maybe (Value Text)
incidentTemplate :: IncidentTemplateProperty
integrations :: Maybe [IntegrationProperty]
name :: Value Text
tags :: Maybe [Tag]
haddock_workaround_ :: ()
actions :: Maybe [ActionProperty]
chatChannel :: Maybe ChatChannelProperty
displayName :: Maybe (Value Text)
incidentTemplate :: IncidentTemplateProperty
integrations :: Maybe [IntegrationProperty]
name :: Value Text
tags :: Maybe [Tag]
..}
instance Property "IncidentTemplate" ResponsePlan where
  type PropertyType "IncidentTemplate" ResponsePlan = IncidentTemplateProperty
  set :: PropertyType "IncidentTemplate" ResponsePlan
-> ResponsePlan -> ResponsePlan
set PropertyType "IncidentTemplate" ResponsePlan
newValue ResponsePlan {Maybe [Tag]
Maybe [IntegrationProperty]
Maybe [ActionProperty]
Maybe (ValueList Text)
Maybe (Value Text)
Maybe ChatChannelProperty
()
Value Text
IncidentTemplateProperty
haddock_workaround_ :: ResponsePlan -> ()
actions :: ResponsePlan -> Maybe [ActionProperty]
chatChannel :: ResponsePlan -> Maybe ChatChannelProperty
displayName :: ResponsePlan -> Maybe (Value Text)
engagements :: ResponsePlan -> Maybe (ValueList Text)
incidentTemplate :: ResponsePlan -> IncidentTemplateProperty
integrations :: ResponsePlan -> Maybe [IntegrationProperty]
name :: ResponsePlan -> Value Text
tags :: ResponsePlan -> Maybe [Tag]
haddock_workaround_ :: ()
actions :: Maybe [ActionProperty]
chatChannel :: Maybe ChatChannelProperty
displayName :: Maybe (Value Text)
engagements :: Maybe (ValueList Text)
incidentTemplate :: IncidentTemplateProperty
integrations :: Maybe [IntegrationProperty]
name :: Value Text
tags :: Maybe [Tag]
..}
    = ResponsePlan {incidentTemplate :: IncidentTemplateProperty
incidentTemplate = PropertyType "IncidentTemplate" ResponsePlan
IncidentTemplateProperty
newValue, Maybe [Tag]
Maybe [IntegrationProperty]
Maybe [ActionProperty]
Maybe (ValueList Text)
Maybe (Value Text)
Maybe ChatChannelProperty
()
Value Text
haddock_workaround_ :: ()
actions :: Maybe [ActionProperty]
chatChannel :: Maybe ChatChannelProperty
displayName :: Maybe (Value Text)
engagements :: Maybe (ValueList Text)
integrations :: Maybe [IntegrationProperty]
name :: Value Text
tags :: Maybe [Tag]
haddock_workaround_ :: ()
actions :: Maybe [ActionProperty]
chatChannel :: Maybe ChatChannelProperty
displayName :: Maybe (Value Text)
engagements :: Maybe (ValueList Text)
integrations :: Maybe [IntegrationProperty]
name :: Value Text
tags :: Maybe [Tag]
..}
instance Property "Integrations" ResponsePlan where
  type PropertyType "Integrations" ResponsePlan = [IntegrationProperty]
  set :: PropertyType "Integrations" ResponsePlan
-> ResponsePlan -> ResponsePlan
set PropertyType "Integrations" ResponsePlan
newValue ResponsePlan {Maybe [Tag]
Maybe [IntegrationProperty]
Maybe [ActionProperty]
Maybe (ValueList Text)
Maybe (Value Text)
Maybe ChatChannelProperty
()
Value Text
IncidentTemplateProperty
haddock_workaround_ :: ResponsePlan -> ()
actions :: ResponsePlan -> Maybe [ActionProperty]
chatChannel :: ResponsePlan -> Maybe ChatChannelProperty
displayName :: ResponsePlan -> Maybe (Value Text)
engagements :: ResponsePlan -> Maybe (ValueList Text)
incidentTemplate :: ResponsePlan -> IncidentTemplateProperty
integrations :: ResponsePlan -> Maybe [IntegrationProperty]
name :: ResponsePlan -> Value Text
tags :: ResponsePlan -> Maybe [Tag]
haddock_workaround_ :: ()
actions :: Maybe [ActionProperty]
chatChannel :: Maybe ChatChannelProperty
displayName :: Maybe (Value Text)
engagements :: Maybe (ValueList Text)
incidentTemplate :: IncidentTemplateProperty
integrations :: Maybe [IntegrationProperty]
name :: Value Text
tags :: Maybe [Tag]
..}
    = ResponsePlan {integrations :: Maybe [IntegrationProperty]
integrations = [IntegrationProperty] -> Maybe [IntegrationProperty]
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure [IntegrationProperty]
PropertyType "Integrations" ResponsePlan
newValue, Maybe [Tag]
Maybe [ActionProperty]
Maybe (ValueList Text)
Maybe (Value Text)
Maybe ChatChannelProperty
()
Value Text
IncidentTemplateProperty
haddock_workaround_ :: ()
actions :: Maybe [ActionProperty]
chatChannel :: Maybe ChatChannelProperty
displayName :: Maybe (Value Text)
engagements :: Maybe (ValueList Text)
incidentTemplate :: IncidentTemplateProperty
name :: Value Text
tags :: Maybe [Tag]
haddock_workaround_ :: ()
actions :: Maybe [ActionProperty]
chatChannel :: Maybe ChatChannelProperty
displayName :: Maybe (Value Text)
engagements :: Maybe (ValueList Text)
incidentTemplate :: IncidentTemplateProperty
name :: Value Text
tags :: Maybe [Tag]
..}
instance Property "Name" ResponsePlan where
  type PropertyType "Name" ResponsePlan = Value Prelude.Text
  set :: PropertyType "Name" ResponsePlan -> ResponsePlan -> ResponsePlan
set PropertyType "Name" ResponsePlan
newValue ResponsePlan {Maybe [Tag]
Maybe [IntegrationProperty]
Maybe [ActionProperty]
Maybe (ValueList Text)
Maybe (Value Text)
Maybe ChatChannelProperty
()
Value Text
IncidentTemplateProperty
haddock_workaround_ :: ResponsePlan -> ()
actions :: ResponsePlan -> Maybe [ActionProperty]
chatChannel :: ResponsePlan -> Maybe ChatChannelProperty
displayName :: ResponsePlan -> Maybe (Value Text)
engagements :: ResponsePlan -> Maybe (ValueList Text)
incidentTemplate :: ResponsePlan -> IncidentTemplateProperty
integrations :: ResponsePlan -> Maybe [IntegrationProperty]
name :: ResponsePlan -> Value Text
tags :: ResponsePlan -> Maybe [Tag]
haddock_workaround_ :: ()
actions :: Maybe [ActionProperty]
chatChannel :: Maybe ChatChannelProperty
displayName :: Maybe (Value Text)
engagements :: Maybe (ValueList Text)
incidentTemplate :: IncidentTemplateProperty
integrations :: Maybe [IntegrationProperty]
name :: Value Text
tags :: Maybe [Tag]
..} = ResponsePlan {name :: Value Text
name = PropertyType "Name" ResponsePlan
Value Text
newValue, Maybe [Tag]
Maybe [IntegrationProperty]
Maybe [ActionProperty]
Maybe (ValueList Text)
Maybe (Value Text)
Maybe ChatChannelProperty
()
IncidentTemplateProperty
haddock_workaround_ :: ()
actions :: Maybe [ActionProperty]
chatChannel :: Maybe ChatChannelProperty
displayName :: Maybe (Value Text)
engagements :: Maybe (ValueList Text)
incidentTemplate :: IncidentTemplateProperty
integrations :: Maybe [IntegrationProperty]
tags :: Maybe [Tag]
haddock_workaround_ :: ()
actions :: Maybe [ActionProperty]
chatChannel :: Maybe ChatChannelProperty
displayName :: Maybe (Value Text)
engagements :: Maybe (ValueList Text)
incidentTemplate :: IncidentTemplateProperty
integrations :: Maybe [IntegrationProperty]
tags :: Maybe [Tag]
..}
instance Property "Tags" ResponsePlan where
  type PropertyType "Tags" ResponsePlan = [Tag]
  set :: PropertyType "Tags" ResponsePlan -> ResponsePlan -> ResponsePlan
set PropertyType "Tags" ResponsePlan
newValue ResponsePlan {Maybe [Tag]
Maybe [IntegrationProperty]
Maybe [ActionProperty]
Maybe (ValueList Text)
Maybe (Value Text)
Maybe ChatChannelProperty
()
Value Text
IncidentTemplateProperty
haddock_workaround_ :: ResponsePlan -> ()
actions :: ResponsePlan -> Maybe [ActionProperty]
chatChannel :: ResponsePlan -> Maybe ChatChannelProperty
displayName :: ResponsePlan -> Maybe (Value Text)
engagements :: ResponsePlan -> Maybe (ValueList Text)
incidentTemplate :: ResponsePlan -> IncidentTemplateProperty
integrations :: ResponsePlan -> Maybe [IntegrationProperty]
name :: ResponsePlan -> Value Text
tags :: ResponsePlan -> Maybe [Tag]
haddock_workaround_ :: ()
actions :: Maybe [ActionProperty]
chatChannel :: Maybe ChatChannelProperty
displayName :: Maybe (Value Text)
engagements :: Maybe (ValueList Text)
incidentTemplate :: IncidentTemplateProperty
integrations :: Maybe [IntegrationProperty]
name :: Value Text
tags :: Maybe [Tag]
..}
    = ResponsePlan {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" ResponsePlan
newValue, Maybe [IntegrationProperty]
Maybe [ActionProperty]
Maybe (ValueList Text)
Maybe (Value Text)
Maybe ChatChannelProperty
()
Value Text
IncidentTemplateProperty
haddock_workaround_ :: ()
actions :: Maybe [ActionProperty]
chatChannel :: Maybe ChatChannelProperty
displayName :: Maybe (Value Text)
engagements :: Maybe (ValueList Text)
incidentTemplate :: IncidentTemplateProperty
integrations :: Maybe [IntegrationProperty]
name :: Value Text
haddock_workaround_ :: ()
actions :: Maybe [ActionProperty]
chatChannel :: Maybe ChatChannelProperty
displayName :: Maybe (Value Text)
engagements :: Maybe (ValueList Text)
incidentTemplate :: IncidentTemplateProperty
integrations :: Maybe [IntegrationProperty]
name :: Value Text
..}