{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE DuplicateRecordFields #-}
{-# LANGUAGE NamedFieldPuns #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE RecordWildCards #-}
{-# LANGUAGE StrictData #-}
{-# LANGUAGE TypeFamilies #-}
{-# LANGUAGE NoImplicitPrelude #-}
{-# OPTIONS_GHC -fno-warn-unused-binds #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
{-# OPTIONS_GHC -fno-warn-unused-matches #-}
module Amazonka.AWSHealth.DisableHealthServiceAccessForOrganization
(
DisableHealthServiceAccessForOrganization (..),
newDisableHealthServiceAccessForOrganization,
DisableHealthServiceAccessForOrganizationResponse (..),
newDisableHealthServiceAccessForOrganizationResponse,
)
where
import Amazonka.AWSHealth.Types
import qualified Amazonka.Core as Core
import qualified Amazonka.Core.Lens.Internal as Lens
import qualified Amazonka.Data as Data
import qualified Amazonka.Prelude as Prelude
import qualified Amazonka.Request as Request
import qualified Amazonka.Response as Response
data DisableHealthServiceAccessForOrganization = DisableHealthServiceAccessForOrganization'
{
}
deriving (DisableHealthServiceAccessForOrganization
-> DisableHealthServiceAccessForOrganization -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: DisableHealthServiceAccessForOrganization
-> DisableHealthServiceAccessForOrganization -> Bool
$c/= :: DisableHealthServiceAccessForOrganization
-> DisableHealthServiceAccessForOrganization -> Bool
== :: DisableHealthServiceAccessForOrganization
-> DisableHealthServiceAccessForOrganization -> Bool
$c== :: DisableHealthServiceAccessForOrganization
-> DisableHealthServiceAccessForOrganization -> Bool
Prelude.Eq, ReadPrec [DisableHealthServiceAccessForOrganization]
ReadPrec DisableHealthServiceAccessForOrganization
Int -> ReadS DisableHealthServiceAccessForOrganization
ReadS [DisableHealthServiceAccessForOrganization]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [DisableHealthServiceAccessForOrganization]
$creadListPrec :: ReadPrec [DisableHealthServiceAccessForOrganization]
readPrec :: ReadPrec DisableHealthServiceAccessForOrganization
$creadPrec :: ReadPrec DisableHealthServiceAccessForOrganization
readList :: ReadS [DisableHealthServiceAccessForOrganization]
$creadList :: ReadS [DisableHealthServiceAccessForOrganization]
readsPrec :: Int -> ReadS DisableHealthServiceAccessForOrganization
$creadsPrec :: Int -> ReadS DisableHealthServiceAccessForOrganization
Prelude.Read, Int -> DisableHealthServiceAccessForOrganization -> ShowS
[DisableHealthServiceAccessForOrganization] -> ShowS
DisableHealthServiceAccessForOrganization -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [DisableHealthServiceAccessForOrganization] -> ShowS
$cshowList :: [DisableHealthServiceAccessForOrganization] -> ShowS
show :: DisableHealthServiceAccessForOrganization -> String
$cshow :: DisableHealthServiceAccessForOrganization -> String
showsPrec :: Int -> DisableHealthServiceAccessForOrganization -> ShowS
$cshowsPrec :: Int -> DisableHealthServiceAccessForOrganization -> ShowS
Prelude.Show, forall x.
Rep DisableHealthServiceAccessForOrganization x
-> DisableHealthServiceAccessForOrganization
forall x.
DisableHealthServiceAccessForOrganization
-> Rep DisableHealthServiceAccessForOrganization x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep DisableHealthServiceAccessForOrganization x
-> DisableHealthServiceAccessForOrganization
$cfrom :: forall x.
DisableHealthServiceAccessForOrganization
-> Rep DisableHealthServiceAccessForOrganization x
Prelude.Generic)
newDisableHealthServiceAccessForOrganization ::
DisableHealthServiceAccessForOrganization
newDisableHealthServiceAccessForOrganization :: DisableHealthServiceAccessForOrganization
newDisableHealthServiceAccessForOrganization =
DisableHealthServiceAccessForOrganization
DisableHealthServiceAccessForOrganization'
instance
Core.AWSRequest
DisableHealthServiceAccessForOrganization
where
type
AWSResponse
DisableHealthServiceAccessForOrganization =
DisableHealthServiceAccessForOrganizationResponse
request :: (Service -> Service)
-> DisableHealthServiceAccessForOrganization
-> Request DisableHealthServiceAccessForOrganization
request Service -> Service
overrides =
forall a. (ToRequest a, ToJSON a) => Service -> a -> Request a
Request.postJSON (Service -> Service
overrides Service
defaultService)
response :: forall (m :: * -> *).
MonadResource m =>
(ByteStringLazy -> IO ByteStringLazy)
-> Service
-> Proxy DisableHealthServiceAccessForOrganization
-> ClientResponse ClientBody
-> m (Either
Error
(ClientResponse
(AWSResponse DisableHealthServiceAccessForOrganization)))
response =
forall (m :: * -> *) a.
MonadResource m =>
AWSResponse a
-> (ByteStringLazy -> IO ByteStringLazy)
-> Service
-> Proxy a
-> ClientResponse ClientBody
-> m (Either Error (ClientResponse (AWSResponse a)))
Response.receiveNull
DisableHealthServiceAccessForOrganizationResponse
DisableHealthServiceAccessForOrganizationResponse'
instance
Prelude.Hashable
DisableHealthServiceAccessForOrganization
where
hashWithSalt :: Int -> DisableHealthServiceAccessForOrganization -> Int
hashWithSalt Int
_salt DisableHealthServiceAccessForOrganization
_ =
Int
_salt forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` ()
instance
Prelude.NFData
DisableHealthServiceAccessForOrganization
where
rnf :: DisableHealthServiceAccessForOrganization -> ()
rnf DisableHealthServiceAccessForOrganization
_ = ()
instance
Data.ToHeaders
DisableHealthServiceAccessForOrganization
where
toHeaders :: DisableHealthServiceAccessForOrganization -> [Header]
toHeaders =
forall a b. a -> b -> a
Prelude.const
( forall a. Monoid a => [a] -> a
Prelude.mconcat
[ HeaderName
"X-Amz-Target"
forall a. ToHeader a => HeaderName -> a -> [Header]
Data.=# ( ByteString
"AWSHealth_20160804.DisableHealthServiceAccessForOrganization" ::
Prelude.ByteString
),
HeaderName
"Content-Type"
forall a. ToHeader a => HeaderName -> a -> [Header]
Data.=# ( ByteString
"application/x-amz-json-1.1" ::
Prelude.ByteString
)
]
)
instance
Data.ToJSON
DisableHealthServiceAccessForOrganization
where
toJSON :: DisableHealthServiceAccessForOrganization -> Value
toJSON = forall a b. a -> b -> a
Prelude.const (Object -> Value
Data.Object forall a. Monoid a => a
Prelude.mempty)
instance
Data.ToPath
DisableHealthServiceAccessForOrganization
where
toPath :: DisableHealthServiceAccessForOrganization -> ByteString
toPath = forall a b. a -> b -> a
Prelude.const ByteString
"/"
instance
Data.ToQuery
DisableHealthServiceAccessForOrganization
where
toQuery :: DisableHealthServiceAccessForOrganization -> QueryString
toQuery = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty
data DisableHealthServiceAccessForOrganizationResponse = DisableHealthServiceAccessForOrganizationResponse'
{
}
deriving (DisableHealthServiceAccessForOrganizationResponse
-> DisableHealthServiceAccessForOrganizationResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: DisableHealthServiceAccessForOrganizationResponse
-> DisableHealthServiceAccessForOrganizationResponse -> Bool
$c/= :: DisableHealthServiceAccessForOrganizationResponse
-> DisableHealthServiceAccessForOrganizationResponse -> Bool
== :: DisableHealthServiceAccessForOrganizationResponse
-> DisableHealthServiceAccessForOrganizationResponse -> Bool
$c== :: DisableHealthServiceAccessForOrganizationResponse
-> DisableHealthServiceAccessForOrganizationResponse -> Bool
Prelude.Eq, ReadPrec [DisableHealthServiceAccessForOrganizationResponse]
ReadPrec DisableHealthServiceAccessForOrganizationResponse
Int -> ReadS DisableHealthServiceAccessForOrganizationResponse
ReadS [DisableHealthServiceAccessForOrganizationResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [DisableHealthServiceAccessForOrganizationResponse]
$creadListPrec :: ReadPrec [DisableHealthServiceAccessForOrganizationResponse]
readPrec :: ReadPrec DisableHealthServiceAccessForOrganizationResponse
$creadPrec :: ReadPrec DisableHealthServiceAccessForOrganizationResponse
readList :: ReadS [DisableHealthServiceAccessForOrganizationResponse]
$creadList :: ReadS [DisableHealthServiceAccessForOrganizationResponse]
readsPrec :: Int -> ReadS DisableHealthServiceAccessForOrganizationResponse
$creadsPrec :: Int -> ReadS DisableHealthServiceAccessForOrganizationResponse
Prelude.Read, Int -> DisableHealthServiceAccessForOrganizationResponse -> ShowS
[DisableHealthServiceAccessForOrganizationResponse] -> ShowS
DisableHealthServiceAccessForOrganizationResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [DisableHealthServiceAccessForOrganizationResponse] -> ShowS
$cshowList :: [DisableHealthServiceAccessForOrganizationResponse] -> ShowS
show :: DisableHealthServiceAccessForOrganizationResponse -> String
$cshow :: DisableHealthServiceAccessForOrganizationResponse -> String
showsPrec :: Int -> DisableHealthServiceAccessForOrganizationResponse -> ShowS
$cshowsPrec :: Int -> DisableHealthServiceAccessForOrganizationResponse -> ShowS
Prelude.Show, forall x.
Rep DisableHealthServiceAccessForOrganizationResponse x
-> DisableHealthServiceAccessForOrganizationResponse
forall x.
DisableHealthServiceAccessForOrganizationResponse
-> Rep DisableHealthServiceAccessForOrganizationResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep DisableHealthServiceAccessForOrganizationResponse x
-> DisableHealthServiceAccessForOrganizationResponse
$cfrom :: forall x.
DisableHealthServiceAccessForOrganizationResponse
-> Rep DisableHealthServiceAccessForOrganizationResponse x
Prelude.Generic)
newDisableHealthServiceAccessForOrganizationResponse ::
DisableHealthServiceAccessForOrganizationResponse
newDisableHealthServiceAccessForOrganizationResponse :: DisableHealthServiceAccessForOrganizationResponse
newDisableHealthServiceAccessForOrganizationResponse =
DisableHealthServiceAccessForOrganizationResponse
DisableHealthServiceAccessForOrganizationResponse'
instance
Prelude.NFData
DisableHealthServiceAccessForOrganizationResponse
where
rnf :: DisableHealthServiceAccessForOrganizationResponse -> ()
rnf DisableHealthServiceAccessForOrganizationResponse
_ = ()