module Stratosphere.Notifications.NotificationHub.NotificationHubStatusSummaryProperty (
NotificationHubStatusSummaryProperty(..),
mkNotificationHubStatusSummaryProperty
) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import Stratosphere.ResourceProperties
import Stratosphere.Value
data NotificationHubStatusSummaryProperty
=
NotificationHubStatusSummaryProperty {NotificationHubStatusSummaryProperty -> ()
haddock_workaround_ :: (),
NotificationHubStatusSummaryProperty -> Value Text
notificationHubStatus :: (Value Prelude.Text),
NotificationHubStatusSummaryProperty -> Value Text
notificationHubStatusReason :: (Value Prelude.Text)}
deriving stock (NotificationHubStatusSummaryProperty
-> NotificationHubStatusSummaryProperty -> Bool
(NotificationHubStatusSummaryProperty
-> NotificationHubStatusSummaryProperty -> Bool)
-> (NotificationHubStatusSummaryProperty
-> NotificationHubStatusSummaryProperty -> Bool)
-> Eq NotificationHubStatusSummaryProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: NotificationHubStatusSummaryProperty
-> NotificationHubStatusSummaryProperty -> Bool
== :: NotificationHubStatusSummaryProperty
-> NotificationHubStatusSummaryProperty -> Bool
$c/= :: NotificationHubStatusSummaryProperty
-> NotificationHubStatusSummaryProperty -> Bool
/= :: NotificationHubStatusSummaryProperty
-> NotificationHubStatusSummaryProperty -> Bool
Prelude.Eq, Int -> NotificationHubStatusSummaryProperty -> ShowS
[NotificationHubStatusSummaryProperty] -> ShowS
NotificationHubStatusSummaryProperty -> String
(Int -> NotificationHubStatusSummaryProperty -> ShowS)
-> (NotificationHubStatusSummaryProperty -> String)
-> ([NotificationHubStatusSummaryProperty] -> ShowS)
-> Show NotificationHubStatusSummaryProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> NotificationHubStatusSummaryProperty -> ShowS
showsPrec :: Int -> NotificationHubStatusSummaryProperty -> ShowS
$cshow :: NotificationHubStatusSummaryProperty -> String
show :: NotificationHubStatusSummaryProperty -> String
$cshowList :: [NotificationHubStatusSummaryProperty] -> ShowS
showList :: [NotificationHubStatusSummaryProperty] -> ShowS
Prelude.Show)
mkNotificationHubStatusSummaryProperty ::
Value Prelude.Text
-> Value Prelude.Text -> NotificationHubStatusSummaryProperty
mkNotificationHubStatusSummaryProperty :: Value Text -> Value Text -> NotificationHubStatusSummaryProperty
mkNotificationHubStatusSummaryProperty
Value Text
notificationHubStatus
Value Text
notificationHubStatusReason
= NotificationHubStatusSummaryProperty
{haddock_workaround_ :: ()
haddock_workaround_ = (),
notificationHubStatus :: Value Text
notificationHubStatus = Value Text
notificationHubStatus,
notificationHubStatusReason :: Value Text
notificationHubStatusReason = Value Text
notificationHubStatusReason}
instance ToResourceProperties NotificationHubStatusSummaryProperty where
toResourceProperties :: NotificationHubStatusSummaryProperty -> ResourceProperties
toResourceProperties NotificationHubStatusSummaryProperty {()
Value Text
haddock_workaround_ :: NotificationHubStatusSummaryProperty -> ()
notificationHubStatus :: NotificationHubStatusSummaryProperty -> Value Text
notificationHubStatusReason :: NotificationHubStatusSummaryProperty -> Value Text
haddock_workaround_ :: ()
notificationHubStatus :: Value Text
notificationHubStatusReason :: Value Text
..}
= ResourceProperties
{awsType :: Text
awsType = Text
"AWS::Notifications::NotificationHub.NotificationHubStatusSummary",
supportsTags :: Bool
supportsTags = Bool
Prelude.False,
properties :: Object
properties = [Key
"NotificationHubStatus"
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
notificationHubStatus,
Key
"NotificationHubStatusReason" 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
notificationHubStatusReason]}
instance JSON.ToJSON NotificationHubStatusSummaryProperty where
toJSON :: NotificationHubStatusSummaryProperty -> Value
toJSON NotificationHubStatusSummaryProperty {()
Value Text
haddock_workaround_ :: NotificationHubStatusSummaryProperty -> ()
notificationHubStatus :: NotificationHubStatusSummaryProperty -> Value Text
notificationHubStatusReason :: NotificationHubStatusSummaryProperty -> Value Text
haddock_workaround_ :: ()
notificationHubStatus :: Value Text
notificationHubStatusReason :: Value Text
..}
= [(Key, Value)] -> Value
JSON.object
[Key
"NotificationHubStatus" 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
notificationHubStatus,
Key
"NotificationHubStatusReason" 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
notificationHubStatusReason]
instance Property "NotificationHubStatus" NotificationHubStatusSummaryProperty where
type PropertyType "NotificationHubStatus" NotificationHubStatusSummaryProperty = Value Prelude.Text
set :: PropertyType
"NotificationHubStatus" NotificationHubStatusSummaryProperty
-> NotificationHubStatusSummaryProperty
-> NotificationHubStatusSummaryProperty
set PropertyType
"NotificationHubStatus" NotificationHubStatusSummaryProperty
newValue NotificationHubStatusSummaryProperty {()
Value Text
haddock_workaround_ :: NotificationHubStatusSummaryProperty -> ()
notificationHubStatus :: NotificationHubStatusSummaryProperty -> Value Text
notificationHubStatusReason :: NotificationHubStatusSummaryProperty -> Value Text
haddock_workaround_ :: ()
notificationHubStatus :: Value Text
notificationHubStatusReason :: Value Text
..}
= NotificationHubStatusSummaryProperty
{notificationHubStatus :: Value Text
notificationHubStatus = PropertyType
"NotificationHubStatus" NotificationHubStatusSummaryProperty
Value Text
newValue, ()
Value Text
haddock_workaround_ :: ()
notificationHubStatusReason :: Value Text
haddock_workaround_ :: ()
notificationHubStatusReason :: Value Text
..}
instance Property "NotificationHubStatusReason" NotificationHubStatusSummaryProperty where
type PropertyType "NotificationHubStatusReason" NotificationHubStatusSummaryProperty = Value Prelude.Text
set :: PropertyType
"NotificationHubStatusReason" NotificationHubStatusSummaryProperty
-> NotificationHubStatusSummaryProperty
-> NotificationHubStatusSummaryProperty
set PropertyType
"NotificationHubStatusReason" NotificationHubStatusSummaryProperty
newValue NotificationHubStatusSummaryProperty {()
Value Text
haddock_workaround_ :: NotificationHubStatusSummaryProperty -> ()
notificationHubStatus :: NotificationHubStatusSummaryProperty -> Value Text
notificationHubStatusReason :: NotificationHubStatusSummaryProperty -> Value Text
haddock_workaround_ :: ()
notificationHubStatus :: Value Text
notificationHubStatusReason :: Value Text
..}
= NotificationHubStatusSummaryProperty
{notificationHubStatusReason :: Value Text
notificationHubStatusReason = PropertyType
"NotificationHubStatusReason" NotificationHubStatusSummaryProperty
Value Text
newValue, ()
Value Text
haddock_workaround_ :: ()
notificationHubStatus :: Value Text
haddock_workaround_ :: ()
notificationHubStatus :: Value Text
..}