{-# 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.MediaLive.DeleteReservation
(
DeleteReservation (..),
newDeleteReservation,
deleteReservation_reservationId,
DeleteReservationResponse (..),
newDeleteReservationResponse,
deleteReservationResponse_arn,
deleteReservationResponse_count,
deleteReservationResponse_currencyCode,
deleteReservationResponse_duration,
deleteReservationResponse_durationUnits,
deleteReservationResponse_end,
deleteReservationResponse_fixedPrice,
deleteReservationResponse_name,
deleteReservationResponse_offeringDescription,
deleteReservationResponse_offeringId,
deleteReservationResponse_offeringType,
deleteReservationResponse_region,
deleteReservationResponse_renewalSettings,
deleteReservationResponse_reservationId,
deleteReservationResponse_resourceSpecification,
deleteReservationResponse_start,
deleteReservationResponse_state,
deleteReservationResponse_tags,
deleteReservationResponse_usagePrice,
deleteReservationResponse_httpStatus,
)
where
import qualified Amazonka.Core as Core
import qualified Amazonka.Core.Lens.Internal as Lens
import qualified Amazonka.Data as Data
import Amazonka.MediaLive.Types
import qualified Amazonka.Prelude as Prelude
import qualified Amazonka.Request as Request
import qualified Amazonka.Response as Response
data DeleteReservation = DeleteReservation'
{
DeleteReservation -> Text
reservationId :: Prelude.Text
}
deriving (DeleteReservation -> DeleteReservation -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: DeleteReservation -> DeleteReservation -> Bool
$c/= :: DeleteReservation -> DeleteReservation -> Bool
== :: DeleteReservation -> DeleteReservation -> Bool
$c== :: DeleteReservation -> DeleteReservation -> Bool
Prelude.Eq, ReadPrec [DeleteReservation]
ReadPrec DeleteReservation
Int -> ReadS DeleteReservation
ReadS [DeleteReservation]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [DeleteReservation]
$creadListPrec :: ReadPrec [DeleteReservation]
readPrec :: ReadPrec DeleteReservation
$creadPrec :: ReadPrec DeleteReservation
readList :: ReadS [DeleteReservation]
$creadList :: ReadS [DeleteReservation]
readsPrec :: Int -> ReadS DeleteReservation
$creadsPrec :: Int -> ReadS DeleteReservation
Prelude.Read, Int -> DeleteReservation -> ShowS
[DeleteReservation] -> ShowS
DeleteReservation -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [DeleteReservation] -> ShowS
$cshowList :: [DeleteReservation] -> ShowS
show :: DeleteReservation -> String
$cshow :: DeleteReservation -> String
showsPrec :: Int -> DeleteReservation -> ShowS
$cshowsPrec :: Int -> DeleteReservation -> ShowS
Prelude.Show, forall x. Rep DeleteReservation x -> DeleteReservation
forall x. DeleteReservation -> Rep DeleteReservation x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep DeleteReservation x -> DeleteReservation
$cfrom :: forall x. DeleteReservation -> Rep DeleteReservation x
Prelude.Generic)
newDeleteReservation ::
Prelude.Text ->
DeleteReservation
newDeleteReservation :: Text -> DeleteReservation
newDeleteReservation Text
pReservationId_ =
DeleteReservation' {$sel:reservationId:DeleteReservation' :: Text
reservationId = Text
pReservationId_}
deleteReservation_reservationId :: Lens.Lens' DeleteReservation Prelude.Text
deleteReservation_reservationId :: Lens' DeleteReservation Text
deleteReservation_reservationId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DeleteReservation' {Text
reservationId :: Text
$sel:reservationId:DeleteReservation' :: DeleteReservation -> Text
reservationId} -> Text
reservationId) (\s :: DeleteReservation
s@DeleteReservation' {} Text
a -> DeleteReservation
s {$sel:reservationId:DeleteReservation' :: Text
reservationId = Text
a} :: DeleteReservation)
instance Core.AWSRequest DeleteReservation where
type
AWSResponse DeleteReservation =
DeleteReservationResponse
request :: (Service -> Service)
-> DeleteReservation -> Request DeleteReservation
request Service -> Service
overrides =
forall a. ToRequest a => Service -> a -> Request a
Request.delete (Service -> Service
overrides Service
defaultService)
response :: forall (m :: * -> *).
MonadResource m =>
(ByteStringLazy -> IO ByteStringLazy)
-> Service
-> Proxy DeleteReservation
-> ClientResponse ClientBody
-> m (Either
Error (ClientResponse (AWSResponse DeleteReservation)))
response =
forall (m :: * -> *) a.
MonadResource m =>
(Int -> ResponseHeaders -> Object -> Either String (AWSResponse a))
-> (ByteStringLazy -> IO ByteStringLazy)
-> Service
-> Proxy a
-> ClientResponse ClientBody
-> m (Either Error (ClientResponse (AWSResponse a)))
Response.receiveJSON
( \Int
s ResponseHeaders
h Object
x ->
Maybe Text
-> Maybe Int
-> Maybe Text
-> Maybe Int
-> Maybe OfferingDurationUnits
-> Maybe Text
-> Maybe Double
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe OfferingType
-> Maybe Text
-> Maybe RenewalSettings
-> Maybe Text
-> Maybe ReservationResourceSpecification
-> Maybe Text
-> Maybe ReservationState
-> Maybe (HashMap Text Text)
-> Maybe Double
-> Int
-> DeleteReservationResponse
DeleteReservationResponse'
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"arn")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"count")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"currencyCode")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"duration")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"durationUnits")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"end")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"fixedPrice")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"name")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"offeringDescription")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"offeringId")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"offeringType")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"region")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"renewalSettings")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"reservationId")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"resourceSpecification")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"start")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"state")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"tags" forall (f :: * -> *) a. Functor f => f (Maybe a) -> a -> f a
Core..!@ forall a. Monoid a => a
Prelude.mempty)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"usagePrice")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure (forall a. Enum a => a -> Int
Prelude.fromEnum Int
s))
)
instance Prelude.Hashable DeleteReservation where
hashWithSalt :: Int -> DeleteReservation -> Int
hashWithSalt Int
_salt DeleteReservation' {Text
reservationId :: Text
$sel:reservationId:DeleteReservation' :: DeleteReservation -> Text
..} =
Int
_salt forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
reservationId
instance Prelude.NFData DeleteReservation where
rnf :: DeleteReservation -> ()
rnf DeleteReservation' {Text
reservationId :: Text
$sel:reservationId:DeleteReservation' :: DeleteReservation -> Text
..} =
forall a. NFData a => a -> ()
Prelude.rnf Text
reservationId
instance Data.ToHeaders DeleteReservation where
toHeaders :: DeleteReservation -> ResponseHeaders
toHeaders =
forall a b. a -> b -> a
Prelude.const
( forall a. Monoid a => [a] -> a
Prelude.mconcat
[ HeaderName
"Content-Type"
forall a. ToHeader a => HeaderName -> a -> ResponseHeaders
Data.=# ( ByteString
"application/x-amz-json-1.1" ::
Prelude.ByteString
)
]
)
instance Data.ToPath DeleteReservation where
toPath :: DeleteReservation -> ByteString
toPath DeleteReservation' {Text
reservationId :: Text
$sel:reservationId:DeleteReservation' :: DeleteReservation -> Text
..} =
forall a. Monoid a => [a] -> a
Prelude.mconcat
[ByteString
"/prod/reservations/", forall a. ToByteString a => a -> ByteString
Data.toBS Text
reservationId]
instance Data.ToQuery DeleteReservation where
toQuery :: DeleteReservation -> QueryString
toQuery = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty
data DeleteReservationResponse = DeleteReservationResponse'
{
DeleteReservationResponse -> Maybe Text
arn :: Prelude.Maybe Prelude.Text,
DeleteReservationResponse -> Maybe Int
count :: Prelude.Maybe Prelude.Int,
DeleteReservationResponse -> Maybe Text
currencyCode :: Prelude.Maybe Prelude.Text,
DeleteReservationResponse -> Maybe Int
duration :: Prelude.Maybe Prelude.Int,
DeleteReservationResponse -> Maybe OfferingDurationUnits
durationUnits :: Prelude.Maybe OfferingDurationUnits,
DeleteReservationResponse -> Maybe Text
end :: Prelude.Maybe Prelude.Text,
DeleteReservationResponse -> Maybe Double
fixedPrice :: Prelude.Maybe Prelude.Double,
DeleteReservationResponse -> Maybe Text
name :: Prelude.Maybe Prelude.Text,
DeleteReservationResponse -> Maybe Text
offeringDescription :: Prelude.Maybe Prelude.Text,
DeleteReservationResponse -> Maybe Text
offeringId :: Prelude.Maybe Prelude.Text,
DeleteReservationResponse -> Maybe OfferingType
offeringType :: Prelude.Maybe OfferingType,
DeleteReservationResponse -> Maybe Text
region :: Prelude.Maybe Prelude.Text,
DeleteReservationResponse -> Maybe RenewalSettings
renewalSettings :: Prelude.Maybe RenewalSettings,
DeleteReservationResponse -> Maybe Text
reservationId :: Prelude.Maybe Prelude.Text,
DeleteReservationResponse -> Maybe ReservationResourceSpecification
resourceSpecification :: Prelude.Maybe ReservationResourceSpecification,
DeleteReservationResponse -> Maybe Text
start :: Prelude.Maybe Prelude.Text,
DeleteReservationResponse -> Maybe ReservationState
state :: Prelude.Maybe ReservationState,
DeleteReservationResponse -> Maybe (HashMap Text Text)
tags :: Prelude.Maybe (Prelude.HashMap Prelude.Text Prelude.Text),
DeleteReservationResponse -> Maybe Double
usagePrice :: Prelude.Maybe Prelude.Double,
DeleteReservationResponse -> Int
httpStatus :: Prelude.Int
}
deriving (DeleteReservationResponse -> DeleteReservationResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: DeleteReservationResponse -> DeleteReservationResponse -> Bool
$c/= :: DeleteReservationResponse -> DeleteReservationResponse -> Bool
== :: DeleteReservationResponse -> DeleteReservationResponse -> Bool
$c== :: DeleteReservationResponse -> DeleteReservationResponse -> Bool
Prelude.Eq, ReadPrec [DeleteReservationResponse]
ReadPrec DeleteReservationResponse
Int -> ReadS DeleteReservationResponse
ReadS [DeleteReservationResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [DeleteReservationResponse]
$creadListPrec :: ReadPrec [DeleteReservationResponse]
readPrec :: ReadPrec DeleteReservationResponse
$creadPrec :: ReadPrec DeleteReservationResponse
readList :: ReadS [DeleteReservationResponse]
$creadList :: ReadS [DeleteReservationResponse]
readsPrec :: Int -> ReadS DeleteReservationResponse
$creadsPrec :: Int -> ReadS DeleteReservationResponse
Prelude.Read, Int -> DeleteReservationResponse -> ShowS
[DeleteReservationResponse] -> ShowS
DeleteReservationResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [DeleteReservationResponse] -> ShowS
$cshowList :: [DeleteReservationResponse] -> ShowS
show :: DeleteReservationResponse -> String
$cshow :: DeleteReservationResponse -> String
showsPrec :: Int -> DeleteReservationResponse -> ShowS
$cshowsPrec :: Int -> DeleteReservationResponse -> ShowS
Prelude.Show, forall x.
Rep DeleteReservationResponse x -> DeleteReservationResponse
forall x.
DeleteReservationResponse -> Rep DeleteReservationResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep DeleteReservationResponse x -> DeleteReservationResponse
$cfrom :: forall x.
DeleteReservationResponse -> Rep DeleteReservationResponse x
Prelude.Generic)
newDeleteReservationResponse ::
Prelude.Int ->
DeleteReservationResponse
newDeleteReservationResponse :: Int -> DeleteReservationResponse
newDeleteReservationResponse Int
pHttpStatus_ =
DeleteReservationResponse'
{ $sel:arn:DeleteReservationResponse' :: Maybe Text
arn = forall a. Maybe a
Prelude.Nothing,
$sel:count:DeleteReservationResponse' :: Maybe Int
count = forall a. Maybe a
Prelude.Nothing,
$sel:currencyCode:DeleteReservationResponse' :: Maybe Text
currencyCode = forall a. Maybe a
Prelude.Nothing,
$sel:duration:DeleteReservationResponse' :: Maybe Int
duration = forall a. Maybe a
Prelude.Nothing,
$sel:durationUnits:DeleteReservationResponse' :: Maybe OfferingDurationUnits
durationUnits = forall a. Maybe a
Prelude.Nothing,
$sel:end:DeleteReservationResponse' :: Maybe Text
end = forall a. Maybe a
Prelude.Nothing,
$sel:fixedPrice:DeleteReservationResponse' :: Maybe Double
fixedPrice = forall a. Maybe a
Prelude.Nothing,
$sel:name:DeleteReservationResponse' :: Maybe Text
name = forall a. Maybe a
Prelude.Nothing,
$sel:offeringDescription:DeleteReservationResponse' :: Maybe Text
offeringDescription = forall a. Maybe a
Prelude.Nothing,
$sel:offeringId:DeleteReservationResponse' :: Maybe Text
offeringId = forall a. Maybe a
Prelude.Nothing,
$sel:offeringType:DeleteReservationResponse' :: Maybe OfferingType
offeringType = forall a. Maybe a
Prelude.Nothing,
$sel:region:DeleteReservationResponse' :: Maybe Text
region = forall a. Maybe a
Prelude.Nothing,
$sel:renewalSettings:DeleteReservationResponse' :: Maybe RenewalSettings
renewalSettings = forall a. Maybe a
Prelude.Nothing,
$sel:reservationId:DeleteReservationResponse' :: Maybe Text
reservationId = forall a. Maybe a
Prelude.Nothing,
$sel:resourceSpecification:DeleteReservationResponse' :: Maybe ReservationResourceSpecification
resourceSpecification = forall a. Maybe a
Prelude.Nothing,
$sel:start:DeleteReservationResponse' :: Maybe Text
start = forall a. Maybe a
Prelude.Nothing,
$sel:state:DeleteReservationResponse' :: Maybe ReservationState
state = forall a. Maybe a
Prelude.Nothing,
$sel:tags:DeleteReservationResponse' :: Maybe (HashMap Text Text)
tags = forall a. Maybe a
Prelude.Nothing,
$sel:usagePrice:DeleteReservationResponse' :: Maybe Double
usagePrice = forall a. Maybe a
Prelude.Nothing,
$sel:httpStatus:DeleteReservationResponse' :: Int
httpStatus = Int
pHttpStatus_
}
deleteReservationResponse_arn :: Lens.Lens' DeleteReservationResponse (Prelude.Maybe Prelude.Text)
deleteReservationResponse_arn :: Lens' DeleteReservationResponse (Maybe Text)
deleteReservationResponse_arn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DeleteReservationResponse' {Maybe Text
arn :: Maybe Text
$sel:arn:DeleteReservationResponse' :: DeleteReservationResponse -> Maybe Text
arn} -> Maybe Text
arn) (\s :: DeleteReservationResponse
s@DeleteReservationResponse' {} Maybe Text
a -> DeleteReservationResponse
s {$sel:arn:DeleteReservationResponse' :: Maybe Text
arn = Maybe Text
a} :: DeleteReservationResponse)
deleteReservationResponse_count :: Lens.Lens' DeleteReservationResponse (Prelude.Maybe Prelude.Int)
deleteReservationResponse_count :: Lens' DeleteReservationResponse (Maybe Int)
deleteReservationResponse_count = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DeleteReservationResponse' {Maybe Int
count :: Maybe Int
$sel:count:DeleteReservationResponse' :: DeleteReservationResponse -> Maybe Int
count} -> Maybe Int
count) (\s :: DeleteReservationResponse
s@DeleteReservationResponse' {} Maybe Int
a -> DeleteReservationResponse
s {$sel:count:DeleteReservationResponse' :: Maybe Int
count = Maybe Int
a} :: DeleteReservationResponse)
deleteReservationResponse_currencyCode :: Lens.Lens' DeleteReservationResponse (Prelude.Maybe Prelude.Text)
deleteReservationResponse_currencyCode :: Lens' DeleteReservationResponse (Maybe Text)
deleteReservationResponse_currencyCode = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DeleteReservationResponse' {Maybe Text
currencyCode :: Maybe Text
$sel:currencyCode:DeleteReservationResponse' :: DeleteReservationResponse -> Maybe Text
currencyCode} -> Maybe Text
currencyCode) (\s :: DeleteReservationResponse
s@DeleteReservationResponse' {} Maybe Text
a -> DeleteReservationResponse
s {$sel:currencyCode:DeleteReservationResponse' :: Maybe Text
currencyCode = Maybe Text
a} :: DeleteReservationResponse)
deleteReservationResponse_duration :: Lens.Lens' DeleteReservationResponse (Prelude.Maybe Prelude.Int)
deleteReservationResponse_duration :: Lens' DeleteReservationResponse (Maybe Int)
deleteReservationResponse_duration = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DeleteReservationResponse' {Maybe Int
duration :: Maybe Int
$sel:duration:DeleteReservationResponse' :: DeleteReservationResponse -> Maybe Int
duration} -> Maybe Int
duration) (\s :: DeleteReservationResponse
s@DeleteReservationResponse' {} Maybe Int
a -> DeleteReservationResponse
s {$sel:duration:DeleteReservationResponse' :: Maybe Int
duration = Maybe Int
a} :: DeleteReservationResponse)
deleteReservationResponse_durationUnits :: Lens.Lens' DeleteReservationResponse (Prelude.Maybe OfferingDurationUnits)
deleteReservationResponse_durationUnits :: Lens' DeleteReservationResponse (Maybe OfferingDurationUnits)
deleteReservationResponse_durationUnits = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DeleteReservationResponse' {Maybe OfferingDurationUnits
durationUnits :: Maybe OfferingDurationUnits
$sel:durationUnits:DeleteReservationResponse' :: DeleteReservationResponse -> Maybe OfferingDurationUnits
durationUnits} -> Maybe OfferingDurationUnits
durationUnits) (\s :: DeleteReservationResponse
s@DeleteReservationResponse' {} Maybe OfferingDurationUnits
a -> DeleteReservationResponse
s {$sel:durationUnits:DeleteReservationResponse' :: Maybe OfferingDurationUnits
durationUnits = Maybe OfferingDurationUnits
a} :: DeleteReservationResponse)
deleteReservationResponse_end :: Lens.Lens' DeleteReservationResponse (Prelude.Maybe Prelude.Text)
deleteReservationResponse_end :: Lens' DeleteReservationResponse (Maybe Text)
deleteReservationResponse_end = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DeleteReservationResponse' {Maybe Text
end :: Maybe Text
$sel:end:DeleteReservationResponse' :: DeleteReservationResponse -> Maybe Text
end} -> Maybe Text
end) (\s :: DeleteReservationResponse
s@DeleteReservationResponse' {} Maybe Text
a -> DeleteReservationResponse
s {$sel:end:DeleteReservationResponse' :: Maybe Text
end = Maybe Text
a} :: DeleteReservationResponse)
deleteReservationResponse_fixedPrice :: Lens.Lens' DeleteReservationResponse (Prelude.Maybe Prelude.Double)
deleteReservationResponse_fixedPrice :: Lens' DeleteReservationResponse (Maybe Double)
deleteReservationResponse_fixedPrice = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DeleteReservationResponse' {Maybe Double
fixedPrice :: Maybe Double
$sel:fixedPrice:DeleteReservationResponse' :: DeleteReservationResponse -> Maybe Double
fixedPrice} -> Maybe Double
fixedPrice) (\s :: DeleteReservationResponse
s@DeleteReservationResponse' {} Maybe Double
a -> DeleteReservationResponse
s {$sel:fixedPrice:DeleteReservationResponse' :: Maybe Double
fixedPrice = Maybe Double
a} :: DeleteReservationResponse)
deleteReservationResponse_name :: Lens.Lens' DeleteReservationResponse (Prelude.Maybe Prelude.Text)
deleteReservationResponse_name :: Lens' DeleteReservationResponse (Maybe Text)
deleteReservationResponse_name = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DeleteReservationResponse' {Maybe Text
name :: Maybe Text
$sel:name:DeleteReservationResponse' :: DeleteReservationResponse -> Maybe Text
name} -> Maybe Text
name) (\s :: DeleteReservationResponse
s@DeleteReservationResponse' {} Maybe Text
a -> DeleteReservationResponse
s {$sel:name:DeleteReservationResponse' :: Maybe Text
name = Maybe Text
a} :: DeleteReservationResponse)
deleteReservationResponse_offeringDescription :: Lens.Lens' DeleteReservationResponse (Prelude.Maybe Prelude.Text)
deleteReservationResponse_offeringDescription :: Lens' DeleteReservationResponse (Maybe Text)
deleteReservationResponse_offeringDescription = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DeleteReservationResponse' {Maybe Text
offeringDescription :: Maybe Text
$sel:offeringDescription:DeleteReservationResponse' :: DeleteReservationResponse -> Maybe Text
offeringDescription} -> Maybe Text
offeringDescription) (\s :: DeleteReservationResponse
s@DeleteReservationResponse' {} Maybe Text
a -> DeleteReservationResponse
s {$sel:offeringDescription:DeleteReservationResponse' :: Maybe Text
offeringDescription = Maybe Text
a} :: DeleteReservationResponse)
deleteReservationResponse_offeringId :: Lens.Lens' DeleteReservationResponse (Prelude.Maybe Prelude.Text)
deleteReservationResponse_offeringId :: Lens' DeleteReservationResponse (Maybe Text)
deleteReservationResponse_offeringId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DeleteReservationResponse' {Maybe Text
offeringId :: Maybe Text
$sel:offeringId:DeleteReservationResponse' :: DeleteReservationResponse -> Maybe Text
offeringId} -> Maybe Text
offeringId) (\s :: DeleteReservationResponse
s@DeleteReservationResponse' {} Maybe Text
a -> DeleteReservationResponse
s {$sel:offeringId:DeleteReservationResponse' :: Maybe Text
offeringId = Maybe Text
a} :: DeleteReservationResponse)
deleteReservationResponse_offeringType :: Lens.Lens' DeleteReservationResponse (Prelude.Maybe OfferingType)
deleteReservationResponse_offeringType :: Lens' DeleteReservationResponse (Maybe OfferingType)
deleteReservationResponse_offeringType = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DeleteReservationResponse' {Maybe OfferingType
offeringType :: Maybe OfferingType
$sel:offeringType:DeleteReservationResponse' :: DeleteReservationResponse -> Maybe OfferingType
offeringType} -> Maybe OfferingType
offeringType) (\s :: DeleteReservationResponse
s@DeleteReservationResponse' {} Maybe OfferingType
a -> DeleteReservationResponse
s {$sel:offeringType:DeleteReservationResponse' :: Maybe OfferingType
offeringType = Maybe OfferingType
a} :: DeleteReservationResponse)
deleteReservationResponse_region :: Lens.Lens' DeleteReservationResponse (Prelude.Maybe Prelude.Text)
deleteReservationResponse_region :: Lens' DeleteReservationResponse (Maybe Text)
deleteReservationResponse_region = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DeleteReservationResponse' {Maybe Text
region :: Maybe Text
$sel:region:DeleteReservationResponse' :: DeleteReservationResponse -> Maybe Text
region} -> Maybe Text
region) (\s :: DeleteReservationResponse
s@DeleteReservationResponse' {} Maybe Text
a -> DeleteReservationResponse
s {$sel:region:DeleteReservationResponse' :: Maybe Text
region = Maybe Text
a} :: DeleteReservationResponse)
deleteReservationResponse_renewalSettings :: Lens.Lens' DeleteReservationResponse (Prelude.Maybe RenewalSettings)
deleteReservationResponse_renewalSettings :: Lens' DeleteReservationResponse (Maybe RenewalSettings)
deleteReservationResponse_renewalSettings = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DeleteReservationResponse' {Maybe RenewalSettings
renewalSettings :: Maybe RenewalSettings
$sel:renewalSettings:DeleteReservationResponse' :: DeleteReservationResponse -> Maybe RenewalSettings
renewalSettings} -> Maybe RenewalSettings
renewalSettings) (\s :: DeleteReservationResponse
s@DeleteReservationResponse' {} Maybe RenewalSettings
a -> DeleteReservationResponse
s {$sel:renewalSettings:DeleteReservationResponse' :: Maybe RenewalSettings
renewalSettings = Maybe RenewalSettings
a} :: DeleteReservationResponse)
deleteReservationResponse_reservationId :: Lens.Lens' DeleteReservationResponse (Prelude.Maybe Prelude.Text)
deleteReservationResponse_reservationId :: Lens' DeleteReservationResponse (Maybe Text)
deleteReservationResponse_reservationId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DeleteReservationResponse' {Maybe Text
reservationId :: Maybe Text
$sel:reservationId:DeleteReservationResponse' :: DeleteReservationResponse -> Maybe Text
reservationId} -> Maybe Text
reservationId) (\s :: DeleteReservationResponse
s@DeleteReservationResponse' {} Maybe Text
a -> DeleteReservationResponse
s {$sel:reservationId:DeleteReservationResponse' :: Maybe Text
reservationId = Maybe Text
a} :: DeleteReservationResponse)
deleteReservationResponse_resourceSpecification :: Lens.Lens' DeleteReservationResponse (Prelude.Maybe ReservationResourceSpecification)
deleteReservationResponse_resourceSpecification :: Lens'
DeleteReservationResponse (Maybe ReservationResourceSpecification)
deleteReservationResponse_resourceSpecification = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DeleteReservationResponse' {Maybe ReservationResourceSpecification
resourceSpecification :: Maybe ReservationResourceSpecification
$sel:resourceSpecification:DeleteReservationResponse' :: DeleteReservationResponse -> Maybe ReservationResourceSpecification
resourceSpecification} -> Maybe ReservationResourceSpecification
resourceSpecification) (\s :: DeleteReservationResponse
s@DeleteReservationResponse' {} Maybe ReservationResourceSpecification
a -> DeleteReservationResponse
s {$sel:resourceSpecification:DeleteReservationResponse' :: Maybe ReservationResourceSpecification
resourceSpecification = Maybe ReservationResourceSpecification
a} :: DeleteReservationResponse)
deleteReservationResponse_start :: Lens.Lens' DeleteReservationResponse (Prelude.Maybe Prelude.Text)
deleteReservationResponse_start :: Lens' DeleteReservationResponse (Maybe Text)
deleteReservationResponse_start = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DeleteReservationResponse' {Maybe Text
start :: Maybe Text
$sel:start:DeleteReservationResponse' :: DeleteReservationResponse -> Maybe Text
start} -> Maybe Text
start) (\s :: DeleteReservationResponse
s@DeleteReservationResponse' {} Maybe Text
a -> DeleteReservationResponse
s {$sel:start:DeleteReservationResponse' :: Maybe Text
start = Maybe Text
a} :: DeleteReservationResponse)
deleteReservationResponse_state :: Lens.Lens' DeleteReservationResponse (Prelude.Maybe ReservationState)
deleteReservationResponse_state :: Lens' DeleteReservationResponse (Maybe ReservationState)
deleteReservationResponse_state = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DeleteReservationResponse' {Maybe ReservationState
state :: Maybe ReservationState
$sel:state:DeleteReservationResponse' :: DeleteReservationResponse -> Maybe ReservationState
state} -> Maybe ReservationState
state) (\s :: DeleteReservationResponse
s@DeleteReservationResponse' {} Maybe ReservationState
a -> DeleteReservationResponse
s {$sel:state:DeleteReservationResponse' :: Maybe ReservationState
state = Maybe ReservationState
a} :: DeleteReservationResponse)
deleteReservationResponse_tags :: Lens.Lens' DeleteReservationResponse (Prelude.Maybe (Prelude.HashMap Prelude.Text Prelude.Text))
deleteReservationResponse_tags :: Lens' DeleteReservationResponse (Maybe (HashMap Text Text))
deleteReservationResponse_tags = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DeleteReservationResponse' {Maybe (HashMap Text Text)
tags :: Maybe (HashMap Text Text)
$sel:tags:DeleteReservationResponse' :: DeleteReservationResponse -> Maybe (HashMap Text Text)
tags} -> Maybe (HashMap Text Text)
tags) (\s :: DeleteReservationResponse
s@DeleteReservationResponse' {} Maybe (HashMap Text Text)
a -> DeleteReservationResponse
s {$sel:tags:DeleteReservationResponse' :: Maybe (HashMap Text Text)
tags = Maybe (HashMap Text Text)
a} :: DeleteReservationResponse) forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (g :: * -> *) s t a b.
(Functor f, Functor g) =>
AnIso s t a b -> Iso (f s) (g t) (f a) (g b)
Lens.mapping forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b
Lens.coerced
deleteReservationResponse_usagePrice :: Lens.Lens' DeleteReservationResponse (Prelude.Maybe Prelude.Double)
deleteReservationResponse_usagePrice :: Lens' DeleteReservationResponse (Maybe Double)
deleteReservationResponse_usagePrice = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DeleteReservationResponse' {Maybe Double
usagePrice :: Maybe Double
$sel:usagePrice:DeleteReservationResponse' :: DeleteReservationResponse -> Maybe Double
usagePrice} -> Maybe Double
usagePrice) (\s :: DeleteReservationResponse
s@DeleteReservationResponse' {} Maybe Double
a -> DeleteReservationResponse
s {$sel:usagePrice:DeleteReservationResponse' :: Maybe Double
usagePrice = Maybe Double
a} :: DeleteReservationResponse)
deleteReservationResponse_httpStatus :: Lens.Lens' DeleteReservationResponse Prelude.Int
deleteReservationResponse_httpStatus :: Lens' DeleteReservationResponse Int
deleteReservationResponse_httpStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DeleteReservationResponse' {Int
httpStatus :: Int
$sel:httpStatus:DeleteReservationResponse' :: DeleteReservationResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: DeleteReservationResponse
s@DeleteReservationResponse' {} Int
a -> DeleteReservationResponse
s {$sel:httpStatus:DeleteReservationResponse' :: Int
httpStatus = Int
a} :: DeleteReservationResponse)
instance Prelude.NFData DeleteReservationResponse where
rnf :: DeleteReservationResponse -> ()
rnf DeleteReservationResponse' {Int
Maybe Double
Maybe Int
Maybe Text
Maybe (HashMap Text Text)
Maybe OfferingDurationUnits
Maybe OfferingType
Maybe RenewalSettings
Maybe ReservationState
Maybe ReservationResourceSpecification
httpStatus :: Int
usagePrice :: Maybe Double
tags :: Maybe (HashMap Text Text)
state :: Maybe ReservationState
start :: Maybe Text
resourceSpecification :: Maybe ReservationResourceSpecification
reservationId :: Maybe Text
renewalSettings :: Maybe RenewalSettings
region :: Maybe Text
offeringType :: Maybe OfferingType
offeringId :: Maybe Text
offeringDescription :: Maybe Text
name :: Maybe Text
fixedPrice :: Maybe Double
end :: Maybe Text
durationUnits :: Maybe OfferingDurationUnits
duration :: Maybe Int
currencyCode :: Maybe Text
count :: Maybe Int
arn :: Maybe Text
$sel:httpStatus:DeleteReservationResponse' :: DeleteReservationResponse -> Int
$sel:usagePrice:DeleteReservationResponse' :: DeleteReservationResponse -> Maybe Double
$sel:tags:DeleteReservationResponse' :: DeleteReservationResponse -> Maybe (HashMap Text Text)
$sel:state:DeleteReservationResponse' :: DeleteReservationResponse -> Maybe ReservationState
$sel:start:DeleteReservationResponse' :: DeleteReservationResponse -> Maybe Text
$sel:resourceSpecification:DeleteReservationResponse' :: DeleteReservationResponse -> Maybe ReservationResourceSpecification
$sel:reservationId:DeleteReservationResponse' :: DeleteReservationResponse -> Maybe Text
$sel:renewalSettings:DeleteReservationResponse' :: DeleteReservationResponse -> Maybe RenewalSettings
$sel:region:DeleteReservationResponse' :: DeleteReservationResponse -> Maybe Text
$sel:offeringType:DeleteReservationResponse' :: DeleteReservationResponse -> Maybe OfferingType
$sel:offeringId:DeleteReservationResponse' :: DeleteReservationResponse -> Maybe Text
$sel:offeringDescription:DeleteReservationResponse' :: DeleteReservationResponse -> Maybe Text
$sel:name:DeleteReservationResponse' :: DeleteReservationResponse -> Maybe Text
$sel:fixedPrice:DeleteReservationResponse' :: DeleteReservationResponse -> Maybe Double
$sel:end:DeleteReservationResponse' :: DeleteReservationResponse -> Maybe Text
$sel:durationUnits:DeleteReservationResponse' :: DeleteReservationResponse -> Maybe OfferingDurationUnits
$sel:duration:DeleteReservationResponse' :: DeleteReservationResponse -> Maybe Int
$sel:currencyCode:DeleteReservationResponse' :: DeleteReservationResponse -> Maybe Text
$sel:count:DeleteReservationResponse' :: DeleteReservationResponse -> Maybe Int
$sel:arn:DeleteReservationResponse' :: DeleteReservationResponse -> Maybe Text
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
arn
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Int
count
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
currencyCode
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Int
duration
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe OfferingDurationUnits
durationUnits
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
end
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Double
fixedPrice
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
name
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
offeringDescription
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
offeringId
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe OfferingType
offeringType
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
region
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe RenewalSettings
renewalSettings
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
reservationId
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe ReservationResourceSpecification
resourceSpecification
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
start
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe ReservationState
state
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe (HashMap Text Text)
tags
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Double
usagePrice
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Int
httpStatus